rendered paste body
on *:TEXT:!dm:#:{ if (%dm.on. [ $+ [ $chan ] ] == $null) {
if ($chan == #PCelites) { HALT }
set %dm.starter. [ $+ [ $chan ] ] $nick
set %dm.on. [ $+ [ $chan ] ] on
set %dm.starter.health. [ $+ [ $chan ] ] 99
set %dm.starter.spec. [ $+ [ $chan ] ] 100
set %dm.starter.food. [ $+ [ $chan ] ] 20
set %dm.attacker. [ $+ [ $chan ] ] %dm.starter. [ $+ [ $chan ] ]
msg $chan $nick has requested a dm type !dm to fight him/her
halt
}
if (%dm.on. [ $+ [ $chan ] ] == on) {
set %dm.on. [ $+ [ $chan ] ] off
set %dm.oppenent. [ $+ [ $chan ] ] $nick
set %dm.oppenent.health. [ $+ [ $chan ] ] 99
set %dm.oppenent.spec. [ $+ [ $chan ] ] 100
set %dm.oppenent.food. [ $+ [ $chan ] ] 20
set %dm.started. [ $+ [ $chan ] ] on
set %dm.defender. [ $+ [ $chan ] ] %dm.oppenent. [ $+ [ $chan ] ]
msg $chan $nick has accepted the dm against %dm.starter. [ $+ [ $chan ] ]
halt
}
if (%dm.started. [ $+ [ $chan ] ] == on) {
notice $nick theres already a dm running on this chan please go another channel for a new dm
}
}
on *:TEXT:!whip:#:{ if ($nick == %dm.attacker. [ $+ [ $chan ] ]) && ($nick == %dm.starter. [ $+ [ $chan ] ]) && (%dm.started. [ $+ [ $chan ] ] == on) {
set %whip.attack. [ $+ [ $chan ] ] $rand(0,32)
if (%whip.attack. [ $+ [ $chan ] ] > %dm.oppenent.health. [ $+ [ $chan ] ]) { set %whip.attack. [ $+ [ $chan ] ] %dm.oppenent.health. [ $+ [ $chan ] ] }
dec %dm.oppenent.health. [ $+ [ $chan ] ] %whip.attack. [ $+ [ $chan ] ]
if (%dm.oppenent.health. [ $+ [ $chan ] ] < 1) { set %dm.oppenent.health. [ $+ [ $chan ] ] 0 | goto two }
msg $chan %dm.starter. [ $+ [ $chan ] ] hits an %whip.attack. [ $+ [ $chan ] ] , %dm.oppenent. [ $+ [ $chan ] ] has now %dm.oppenent.health. [ $+ [ $chan ] ] hp left
set %dm.defender. [ $+ [ $chan ] ] %dm.attacker. [ $+ [ $chan ] ]
set %dm.attacker. [ $+ [ $chan ] ] %dm.oppenent. [ $+ [ $chan ] ]
halt
}
if ($nick == %dm.attacker. [ $+ [ $chan ] ]) && ($nick == %dm.oppenent. [ $+ [ $chan ] ]) {
set %whip.attack. [ $+ [ $chan ] ] $rand(0,32)
if (%whip.attack. [ $+ [ $chan ] ] > %dm.starter.health. [ $+ [ $chan ] ]) { set %whip.attack. [ $+ [ $chan ] ] %dm.starter.health. [ $+ [ $chan ] ] }
dec %dm.starter.health. [ $+ [ $chan ] ] %whip.attack. [ $+ [ $chan ] ]
if (%dm.starter.health. [ $+ [ $chan ] ] < 1) { set %dm.starter.health. [ $+ [ $chan ] ] 0 | goto two }
msg $chan %dm.oppenent. [ $+ [ $chan ] ] hits an %whip.attack. [ $+ [ $chan ] ] , %dm.starter. [ $+ [ $chan ] ] has now %dm.starter.health. [ $+ [ $chan ] ] hp left
set %dm.defender. [ $+ [ $chan ] ] %dm.attacker. [ $+ [ $chan ] ]
set %dm.attacker. [ $+ [ $chan ] ] %dm.starter. [ $+ [ $chan ] ]
halt
}
if ($nick == %dm.defender. [ $+ [ $chan ] ]) {
notice $nick its not your turn
}
:two
if (%dm.starter.health. [ $+ [ $chan ] ] < 1) {
msg $chan gratz %dm.oppenent. [ $+ [ $chan ] ] you ko'ed %dm.starter. [ $+ [ $chan ] ] with a %whip.attack. [ $+ [ $chan ] ]
inc %etoken. [ $+ [ $nick ] ] %dm.oppenent.health. [ $+ [ $chan ] ]
msg $chan $nick now got %etoken. [ $+ [ $nick ] ] etokens
unset %dm.starter.health. [ $+ [ $chan ] ]
unset %dm.oppenent.health. [ $+ [ $chan ] ]
unset %dm.starter.spec. [ $+ [ $chan ] ]
unset %dm.oppenent.spec. [ $+ [ $chan ] ]
unset %whip.attack. [ $+ [ $chan ] ]
unset %dm.starter. [ $+ [ $chan ] ]
unset %dm.oppenent. [ $+ [ $chan ] ]
unset %dm.attacker. [ $+ [ $chan ] ]
unset %dm.defender. [ $+ [ $chan ] ]
unset %dm.on. [ $+ [ $chan ] ]
unset %dm.started. [ $+ [ chan ] ]
unset %dds.attack.1 [ $+ [ $chan ] ]
unset %dds.attack.2 [ $+ [ $chan ] ]
unset %dds.attack. [ $+ [ $chan ] ]
}
if (%dm.oppenent.health. [ $+ [ $chan ] ] < 1) {
msg $chan gratz %dm.starter. [ $+ [ $chan ] ] you ko'ed %dm.oppenent. [ $+ [ $chan ] ] with a %whip.attack. [ $+ [ $chan ] ]
inc %etoken. [ $+ [ $nick ] ] %dm.starter.health. [ $+ [ $chan ] ]
msg $chan $nick now got %etoken. [ $+ [ $nick ] ] etokens
unset %dm.starter.health. [ $+ [ $chan ] ]
unset %dm.oppenent.health. [ $+ [ $chan ] ]
unset %dm.starter.spec. [ $+ [ $chan ] ]
unset %dm.oppenent.spec. [ $+ [ $chan ] ]
unset %whip.attack. [ $+ [ $chan ] ]
unset %dm.starter. [ $+ [ $chan ] ]
unset %dm.oppenent. [ $+ [ $chan ] ]
unset %dm.attacker. [ $+ [ $chan ] ]
unset %dm.defender. [ $+ [ $chan ] ]
unset %dm.on. [ $+ [ $chan ] ]
unset %dm.started. [ $+ [ chan ] ]
unset %dds.attack.1 [ $+ [ $chan ] ]
unset %dds.attack.2 [ $+ [ $chan ] ]
unset %dds.attack. [ $+ [ $chan ] ]
}
}
on *:TEXT:!stopdm:#:{ if ($nick ishop $chan) || ($nick isop $chan) || ($nick == dm.starter. [ $+ [ $chan ] ]) || ($nick == dm.oppenent. [ $+ [ $chan ] ]) && (%dm.started. [ $+ [ $chan ] ] == on) {
unset %dm.starter.health. [ $+ [ $chan ] ]
unset %dm.oppenent.health. [ $+ [ $chan ] ]
unset %dm.starter.spec. [ $+ [ $chan ] ]
unset %dm.oppenent.spec. [ $+ [ $chan ] ]
unset %whip.attack. [ $+ [ $chan ] ]
unset %dm.starter. [ $+ [ $chan ] ]
unset %dm.oppenent. [ $+ [ $chan ] ]
unset %dm.attacker. [ $+ [ $chan ] ]
unset %dm.defender. [ $+ [ $chan ] ]
unset %dm.on. [ $+ [ $chan ] ]
unset %dm.started. [ $+ [ chan ] ]
unset %dds.attack.1 [ $+ [ $chan ] ]
unset %dds.attack.2 [ $+ [ $chan ] ]
unset %dds.attack. [ $+ [ $chan ] ]
msg $chan the current dm has been turned off by $nick
}
}
on *:TEXT:!eat:#:{ if ($nick == %dm.starter. [ $+ [ $chan ] ]) && (%dm.starter.food. [ $+ [ $chan ] ] == 0) {
notice $nick u got no more food left
halt
}
if ($nick == %dm.oppenent. [ $+ [ $chan ] ]) && (%dm.oppenent.food. [ $+ [ $chan ] ] == 0) {
notice $nick u got no more food left
halt
}
if ($nick == %dm.defender. [ $+ [ $chan ] ]) {
notice $nick its not ur turn
halt
}
if ($nick == %dm.attacker. [ $+ [ $chan ] ]) && (%dm.started. [ $+ [ $chan ] ] == on) && ($nick == %dm.starter. [ $+ [ $chan ] ]) {
inc %dm.starter.health. [ $+ [ $chan ] ] 20
dec %dm.starter.food. [ $+ [ $chan ] ]
goto two
}
if ($nick == %dm.attacker. [ $+ [ $chan ] ]) && (%dm.started. [ $+ [ $chan ] ] == on) && ($nick == %dm.oppenent. [ $+ [ $chan ] ]) {
inc %dm.oppenent.health. [ $+ [ $chan ] ] 20
dec %dm.oppenent.food. [ $+ [ $chan ] ]
goto three
}
:two
if (%dm.starter.health. [ $+ [ $chan ] ] > 99) { set %dm.starter.health. [ $+ [ $chan ] ] 99 }
if (%dm.starter.health. [ $+ [ $chan ] ] <= 99) {
msg $chan %dm.attacker. [ $+ [ $chan ] ] eats a shark, he/she has now %dm.starter.food. [ $+ [ $chan ] ] sharks left and has now %dm.starter.health. [ $+ [ $chan ] ] health remaining
set %dm.attacker. [ $+ [ $chan ] ] %dm.oppenent. [ $+ [ $chan ] ]
set %dm.defender. [ $+ [ $chan ] ] %dm.starter. [ $+ [ $chan ] ]
halt
}
:three
if (%dm.oppenent.health. [ $+ [ $chan ] ] > 99) { set %dm.oppenent.health. [ $+ [ $chan ] ] 99 }
if (%dm.oppenent.health. [ $+ [ $chan ] ] <= 99) {
msg $chan %dm.attacker. [ $+ [ $chan ] ] eats a shark, he/she has now %dm.oppenent.food. [ $+ [ $chan ] ] sharks left and has now %dm.oppenent.health. [ $+ [ $chan ] ] health remaining
set %dm.attacker. [ $+ [ $chan ] ] %dm.starter. [ $+ [ $chan ] ]
set %dm.defender. [ $+ [ $chan ] ] %dm.oppenent. [ $+ [ $chan ] ]
halt
}
}
on *:TEXT:!dds:#:{
if (%dm.starter.spec. [ $+ [ $chan ] ] == 0) && (%dm.starter. [ $+ [ $chan ] ] == %dm.attacker. [ $+ [ $chan ] ]) {
notice $nick u got no spec energy left
halt
}
if (%dm.oppenent.spec. [ $+ [ $chan ] ] == 0) && (%dm.oppenent. [ $+ [ $chan ] ] == %dm.attacker. [ $+ [ $chan ] ]) {
notice $nick u got no spec energy left
halt
}
if ($nick == %dm.attacker. [ $+ [ $chan ] ]) && ($nick == %dm.starter. [ $+ [ $chan ] ]) && (%dm.started. [ $+ [ $chan ] ] == on) && (%dm.starter.spec. [ $+ [ $chan ] ] >= 25) {
set %dds.attack.1 [ $+ [ $chan ] ] $rand(0,22)
set %dds.attack.2 [ $+ [ $chan ] ] $rand(0,22)
dec %dm.starter.spec. [ $+ [ $chan ] ] 25
notice $nick u now got %dm.starter.spec. [ $+ [ $chan ] ] spec energy left
set %dds.attack. [ $+ [ $chan ] ] $calc(%dds.attack.1 [ $+ [ $chan ] ] + %dds.attack.2 [ $+ [ $chan ] ])
if (%dds.attack. [ $+ [ $chan ] ] > %dm.oppenent.health. [ $+ [ $chan ] ]) {
set %dds.attack. [ $+ [ $chan ] ] %dm.oppenent.health. [ $+ [ $chan ] ]
set %dds.attack1 [ $+ [ $chan ] ] $calc(%dds.attack. [ $chan ] ] / 2)
if (.5 isin %dds.attack.1 [ $+ [ $chan ] ]) { inc %dds.attack.1 [ $+ [ $chan ] ] .5 }
set %dds.attack.2 [ $+ [ $chan ] ] $calc(%dds.attack. [ $+ [ $chan ] ] / 2)
if (.5 isin %dds.attack.2 [ $+ [ $chan ] ]) { dec %dds.attack.2 [ $+ [ $chan ] ] .5 } }
dec %dm.oppenent.health. [ $+ [ $chan ] ] %dds.attack.1 [ $+ [ $chan ] ]
dec %dm.oppenent.health. [ $+ [ $chan ] ] %dds.attack.2 [ $+ [ $chan ] ]
if (%dm.oppenent.health. [ $+ [ $chan ] ] < 1) { set %dm.oppenent.health. [ $+ [ $chan ] ] 0 | goto two }
msg $chan %dm.starter. [ $+ [ $chan ] ] hits an %dds.attack.1 [ $+ [ $chan ] ] and %dds.attack.2 [ $+ [ $chan ] ] with dds , %dm.oppenent. [ $+ [ $chan ] ] has now %dm.oppenent.health. [ $+ [ $chan ] ] hp left
set %dm.defender. [ $+ [ $chan ] ] %dm.attacker. [ $+ [ $chan ] ]
set %dm.attacker. [ $+ [ $chan ] ] %dm.oppenent. [ $+ [ $chan ] ]
halt
}
if ($nick == %dm.attacker. [ $+ [ $chan ] ]) && ($nick == %dm.oppenent. [ $+ [ $chan ] ]) && (%dm.oppenent.spec. [ $+ [ $chan ] ] >= 25) {
set %dds.attack.1 [ $+ [ $chan ] ] $rand(0,22)
set %dds.attack.2 [ $+ [ $chan ] ] $rand(0,22)
dec %dm.oppenent.spec. [ $+ [ $chan ] ] 25
notice $nick u now got %dm.oppenent.spec. [ $+ [ $chan ] ] spec energy left
set %dds.attack. [ $+ [ $chan ] ] $calc(%dds.attack.1 [ $+ [ $chan ] ] + %dds.attack.2 [ $+ [ $chan ] ])
if (%dds.attack. [ $+ [ $chan ] ] > %dm.starter.health. [ $+ [ $chan ] ]) {
set %dds.attack. [ $+ [ $chan ] ] %dm.starter.health. [ $+ [ $chan ] ]
set %dds.attack1 [ $+ [ $chan ] ] $calc(%dds.attack. [ $chan ] ] / 2)
if (.5 isin %dds.attack.1 [ $+ [ $chan ] ]) { inc %dds.attack.1 [ $+ [ $chan ] ] .5 }
set %dds.attack.2 [ $+ [ $chan ] ] $calc(%dds.attack. [ $+ [ $chan ] ] / 2)
if (.5 isin %dds.attack.2 [ $+ [ $chan ] ]) { dec %dds.attack.2 [ $+ [ $chan ] ] .5 } }
dec %dm.starter.health. [ $+ [ $chan ] ] %dds.attack.1 [ $+ [ $chan ] ]
dec %dm.starter.health. [ $+ [ $chan ] ] %dds.attack.1 [ $+ [ $chan ] ]
if (%dm.starter.health. [ $+ [ $chan ] ] < 1) { set %dm.starter.health. [ $+ [ $chan ] ] 0 | goto two }
msg $chan %dm.oppenent. [ $+ [ $chan ] ] hits an %dds.attack.1 [ $+ [ $chan ] ] and %dds.attack.2 [ $+ [ $chan ] ] with dds , %dm.starter. [ $+ [ $chan ] ] has now %dm.starter.health. [ $+ [ $chan ] ] hp left
set %dm.defender. [ $+ [ $chan ] ] %dm.attacker. [ $+ [ $chan ] ]
set %dm.attacker. [ $+ [ $chan ] ] %dm.starter. [ $+ [ $chan ] ]
halt
}
if ($nick == %dm.defender. [ $+ [ $chan ] ]) {
notice $nick its not your turn
}
:two
if (%dm.starter.health. [ $+ [ $chan ] ] < 1) {
msg $chan gratz %dm.oppenent. [ $+ [ $chan ] ] you ko'ed %dm.starter. [ $+ [ $chan ] ] with a %dds.attack.1 [ $+ [ $chan ] ] and %dds.attack.2 [ $+ [ $chan ] ]
inc %etoken. [ $+ [ $nick ] ] %dm.oppenent.health. [ $+ [ $chan ] ]
msg $chan $nick now got %etoken. [ $+ [ $nick ] ] etokens
unset %dm.starter.health. [ $+ [ $chan ] ]
unset %dm.oppenent.health. [ $+ [ $chan ] ]
unset %dm.starter.spec. [ $+ [ $chan ] ]
unset %dm.oppenent.spec. [ $+ [ $chan ] ]
unset %whip.attack. [ $+ [ $chan ] ]
unset %dm.starter. [ $+ [ $chan ] ]
unset %dm.oppenent. [ $+ [ $chan ] ]
unset %dm.attacker. [ $+ [ $chan ] ]
unset %dm.defender. [ $+ [ $chan ] ]
unset %dm.on. [ $+ [ $chan ] ]
unset %dm.started. [ $+ [ chan ] ]
unset %dds.attack.1 [ $+ [ $chan ] ]
unset %dds.attack.2 [ $+ [ $chan ] ]
unset %dds.attack. [ $+ [ $chan ] ]
}
if (%dm.oppenent.health. [ $+ [ $chan ] ] < 1) {
msg $chan gratz %dm.starter. [ $+ [ $chan ] ] you ko'ed %dm.oppenent. [ $+ [ $chan ] ] with a %dds.attack.1 [ $+ [ $chan ] ] and %dds.attack.2 [ $+ [ $chan ] ] with dds
inc %etoken. [ $+ [ $nick ] ] %dm.starter.health. [ $+ [ $chan ] ]
msg $chan $nick now got %etoken. [ $+ [ $nick ] ] etokens
unset %dm.starter.health. [ $+ [ $chan ] ]
unset %dm.oppenent.health. [ $+ [ $chan ] ]
unset %dm.starter.spec. [ $+ [ $chan ] ]
unset %dm.oppenent.spec. [ $+ [ $chan ] ]
unset %whip.attack. [ $+ [ $chan ] ]
unset %dm.starter. [ $+ [ $chan ] ]
unset %dm.oppenent. [ $+ [ $chan ] ]
unset %dm.attacker. [ $+ [ $chan ] ]
unset %dm.defender. [ $+ [ $chan ] ]
unset %dm.on. [ $+ [ $chan ] ]
unset %dm.started. [ $+ [ chan ] ]
unset %dds.attack.1 [ $+ [ $chan ] ]
unset %dds.attack.2 [ $+ [ $chan ] ]
unset %dds.attack. [ $+ [ $chan ] ]
}
}