on *:TEXT:!Gratz*:#jerre: { msg $chan 4 gratz $nick on $2- $nice 1-Gratz!@!!¤.¡*°*¡.¤ :D/-<@!!- } on *:TEXT:heya*:#peza: { msg $chan 0,1 Hi $nick 14 $+@!!@! } on *:TEXT:Hi:#peza: {msg $chan 0,1 hi $nick $+@!!@! } on *:ACTION:*slaps*:#jerre: {if ($2 == $me) {var %item = $read(itemlist.txt)describe $chan slaps $nick back with a sea turtle on *:text:!autovoice on:#PEZA: { msg $chan autovoice is now on. && on *:join:#: /mode $chan +v $nick } {mode $iif($1,$1,$chan) + $+ $str(v,$nick($iif($1,$1,$chan) ,0,r)) $regsubex($str(~,$nick($iif($1,$1,$chan),0,r)),/(.)/g,$+($nick($iif($1,$1,$chan),\n,r),$chr(32)))} Alias voiceall { mode $iif($1,$1,$chan) + $+ $str(v,$nick($iif($1,$1,$chan) ,0,r)) $regsubex($str(~,$nick($iif($1,$1,$chan),0,r)),/(.)/g,$+($nick($iif($1,$1,$chan),\n,r),$chr(32))) } ON *:TEXT:!DM:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2) { notice $nick 10*** 02[10 DM 02]10 Sorry there is already a game for02 $chan 10 please wait for it to finish or expire. halt } if ($readini(dm.ini,$chan,Status) == ON && $nick == $readini(dm.ini,$chan,Player1)) { .notice $nick 10*** 02[10 DM 02]10 You cant fight yourself. halt } if ($readini(dm.ini,$chan,Status) == ON) { writeini dm.ini $chan HP2 99 .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan Player2 $nick writeini dm.ini $chan Shark2 10 writeini dm.ini $chan Status ON2 writeini dm.ini $chan Spec2 100 writeini dm.ini $chan b2 5 writeini dm.ini $chan a2 1 msg $chan 10*** 02[10 DM 02]10 The battle -02 $readini(dm.ini,$chan,Player1) 10Vs.02 $readini(dm.ini,$chan,Player2)  .notice $nick 10You have02 1010 shark. Use 02!Eat10 to eat the sharks. Your hitpoint level will be noticed to you momentarily. .notice $readini(dm.ini,$chan,Player1) 10You have02 1010 shark. Use 02!Eat10 to eat the sharks. Your hitpoint level will be noticed to you momentarily. set %dm.turn. $+ $chan $rand(1,2) if (%dm.turn. [ $+ [ $chan ] ] == 2) { writeini dm.ini $chan Turn P2 msg $chan 10*** 02[10 DM 02]10 $nick it is your turn to go. Use02 !DmCommands10 to see all the weapons you can use. halt } if (%dm.turn. [ $+ [ $chan ] ] == 1) { writeini dm.ini $chan Turn P1 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) it is your turn to go. Use02 !DmCommands10 to see all the weapons you can use. halt } } if ($readini(dm.ini,$chan,Status) == $null) { writeini dm.ini $chan HP1 99 writeini dm.ini $chan Status ON writeini dm.ini $chan Player1 $nick writeini dm.ini $chan Shark1 10 writeini dm.ini $chan Spec1 100 writeini dm.ini $chan b1 5 writeini dm.ini $chan a1 1 msg $chan 10*** 02[10 DM 02]10 You have02 6010 seconds to death match $nick $+ . Type02 !DM 10if you have the balls! .timer $+ $chan $+ 1 1 60 msg $chan 10*** 02[10 DM 02]10 The time for this02 DM10 has been halted. - .ini file deleted. .timer $+ $chan $+ 2 1 60 remini dm.ini $chan halt } } ON *:TEXT:!Whip:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!Flick:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,15) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,15) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!dds:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,20) writeini dm.ini $chan Hit2 $rand(0,20) if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) & 0 $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,20) writeini dm.ini $chan Hit2 $rand(0,20) if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) & 0 $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!GMaul:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,30) writeini dm.ini $chan Hit2 $rand(0,20) writeini dm.ini $chan Hit3 $rand(0,15) if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2) + $readini(dm.ini,$chan,Hit3))) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) & 0 & 0 $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2) + $readini(dm.ini,$chan,Hit3))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) & $readini(dm.ini,$chan,Hit3) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 50) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,30) writeini dm.ini $chan Hit2 $rand(0,20) writeini dm.ini $chan Hit3 $rand(0,15) if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit))) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) & 0 & 0 $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) & $readini(dm.ini,$chan,Hit3) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 50) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!cBow:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!DScimmy:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,30) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,30) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!DLong:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,45) if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + 0 )) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,45) if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + 0 )) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!DMace:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. You cant Special! halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. You cant Special! halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,50) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,50) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!DAxe:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(0,15) if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit))) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(0,15) if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit))) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))) msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25) .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left. .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!Eat:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Shark1) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have no shark left! halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Shark2) <= 0) { .notice $nick 10*** 02[10 DM 02]10 You have no shark left! halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Shark1) >= 0) { writeini dm.ini $chan Shark1 $calc($readini(dm.ini,$chan,Shark1) - 1 ) writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) + 18) msg $chan 10*** 02[10 DM 02]10 $nick eats a shark $HPLevel($readini(dm.ini,$chan,HP1)) .notice $nick 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Shark1) shark left. writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Shark2) >= 0) { writeini dm.ini $chan Shark2 $calc($readini(dm.ini,$chan,Shark2) - 1 ) writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) + 18) msg $chan 10*** 02[10 DM 02]10 $nick eats a shark $HPLevel($readini(dm.ini,$chan,HP2)) .notice $nick 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Shark2) shark left. writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } on *:TEXT:!admin:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($nick ishop #ZetaAdmins) || ($nick isop #ZetaAdmins) { if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { if ($readini(dm.ini,$chan,a1) >= 1) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan a1 0 writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) writeini dm.ini $chan Hit $rand(60,70) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } else { notice $nick 10*** 02[10 DM 02]10 You have already used admin! halt } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { if ($readini(dm.ini,$chan,a2) >= 1) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan a2 0 writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) writeini dm.ini $chan Hit $rand(60,70) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } else { notice $nick 10*** 02[10 DM 02]10 You have already used admin! halt } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } } ON *:TEXT:!GAxe:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2) if ($readini(dm.ini,$chan,HP1) <= 10) { writeini dm.ini $chan Hit $rand(0,100) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,HP1) <= 20) { writeini dm.ini $chan Hit $rand(0,60) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,HP1) <= 50) { writeini dm.ini $chan Hit $rand(0,45) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,HP1) <= 70) { writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,HP1) <= 70) { writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } if ($readini(dm.ini,$chan,HP1) <= 99) { writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2)) writeini dm.ini $chan Turn P2 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1 halt } } } if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1) if ($readini(dm.ini,$chan,HP2) <= 10) { writeini dm.ini $chan Hit $rand(0,100) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } if ($readini(dm.ini,$chan,HP2) <= 20) { writeini dm.ini $chan Hit $rand(0,60) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } if ($readini(dm.ini,$chan,HP2) <= 50) { writeini dm.ini $chan Hit $rand(0,45) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } if ($readini(dm.ini,$chan,HP2) <= 70) { writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } if ($readini(dm.ini,$chan,HP2) <= 99) { writeini dm.ini $chan Hit $rand(0,25) if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) { msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0) msg $chan 10*** 02[10 DM 02]10 $nick is the winner! remini dm.ini $chan halt } else { writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1)) writeini dm.ini $chan Turn P1 .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn. .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2 halt } } } else { .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game. } } ON *:TEXT:!DMCommands:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } msg $nick 10!GAxe 02-10 !Whip 02-10 !DAxe 02-10 !DDS 02-10 !DLong 02-10 !DMace 02-10 !Flick 02-10 !CBow 02-10 !DScimmy 02-10 !GMaul } ON *:TEXT:!StopDM:#:{ if ($readini(Status.ini,$me,$chan) == DChan) { halt } if ($nick isop $chan || $nick ishop $chan) { .timer $+ $chan $+ 1 off .timer $+ $chan $+ 2 off remini dm.ini $chan .notice $nick 10*** 02[10 DM 02]10 Game Over msg $chan 10*** 02[10 DM 02]10 I'll be back ~ Arnold. } } ON *:START:{ remove dm.ini }