rendered paste bodyon *: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
}