rendered paste bodyON *:TEXT:!dm*:#luckydm:{
if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) {
notice $nick 12Your already in the game.
halt
}
if ($readini(dm.ini,$chan,Status) == ON2) {
notice $nick 12There is already a DM.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
writeini pdm.ini $chan Player2 $nick
writeini dm.ini $chan Status ON2
writeini hp.ini $chan Player2 99
writeini turn.ini $chan Turn 1
writeini shark.ini $chan Player2 20
writeini spec.ini $chan Player2 100
writeini spec.ini $chan Player1 100
msg $chan |||15The Fight is.1 $readini(pdm.ini,$chan,Player1) 15Vs.1 $readini(pdm.ini,$chan,Player2)
msg $chan 15.dmcommands For DM1 Commands1|||
notice $readini(pdm.ini,$chan,Player2) 7You have4 99 7Hit Points and4 20 7Shark that heal4 20 7Health each.
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
writeini pdm.ini $chan Player1 $nick
writeini dm.ini $chan Status ON
writeini hp.ini $chan Player1 99
writeini shark.ini $chan Player1 20
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has initiated the DM Command. Type 4!dm12 to fight $readini(pdm.ini,$chan,Player1) $+ .
notice $readini(pdm.ini,$chan,Player1) 7You have4 99 7Hit Points and4 20 7Shark that heal4 20 7Health each.
halt
}
}
ON *:TEXT:!whip*:#:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 15There is no DM on. Type4 !DM 15To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick 6You need someone to attack....
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
writeini hit.ini $chan Hit $rand(0,43)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 0 12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 $readini(hp.ini,$chan,Player2) 12Hitpoints.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
writeini hit.ini $chan Hit $rand(0,43)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4[[ 0 ]]12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 $readini(hp.ini,$chan,Player1) 12Hitpoints.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick 12Its not your turn or your not in this round.
}
}
on *:TEXT:!dh*:#:{
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(hp.ini,$chan,Player2) <= 30 ) {
notice $nick 15You cant use the4 !dh15 attack when your Opponent has less than 30 Hit Points.
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(hp.ini,$chan,Player1) <= 30 ) {
notice $nick 15You cant use the4 !dh15 attack when your Opponent has less than 30 Hit Points.
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 15There is no DM on. Type4 !DM 12To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick 6You need someone to attack....
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
writeini hit.ini $chan Hit $rand(0,85)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) hacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4[[ 0 ]]12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini dds.ini $chan Total
remini pdm.ini $chan Player2
halt
}
else {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) hacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 $readini(hp.ini,$chan,Player2) 12Hitpoints.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
writeini hit.ini $chan Hit $rand(0,85)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) hacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4[[ 0 ]]12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) hacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 $readini(hp.ini,$chan,Player1) 12Hitpoints.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick 12Its not your turn or your not in this round.
}
}
ON *:TEXT:!eat*:#:{
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(shark.ini,$chan,Player2) <= 0 ) {
Notice $nick 12You dont have any shark left....
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(shark.ini,$chan,Player1) <= 0 ) {
Notice $nick 12You dont have any shark left....
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 15There is no DM on. Type4 !DM 15To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick 6You can't eat yet.....
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) + 20 )
writeini shark.ini $chan Player1 $calc( $readini(shark.ini,$chan,Player1) - 1)
notice $readini(pdm.ini,$chan,Player1) 12You now have4 $readini(shark.ini,$chan,Player1) 12Shark left.
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) eats a shark giving him4 $readini(hp.ini,$chan,Player1) 12Hit Points.
writeini turn.ini $chan Turn 2
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) + 20 )
writeini shark.ini $chan Player2 $calc( $readini(shark.ini,$chan,Player2) - 1)
notice $readini(pdm.ini,$chan,Player2) 12You now have4 $readini(shark.ini,$chan,Player2) 12Shark left.
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) eats a shark giving him4 $readini(hp.ini,$chan,Player2) 12Hit Points.
writeini turn.ini $chan Turn 1
halt
}
else {
notice $nick 15Its not your turn or your not in this round.
}
}
ON *:TEXT:!dds*:#:{
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(spec.ini,$chan,Player1) <= 0 ) {
notice $nick 12You dont have any special Left.
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(spec.ini,$chan,Player2) <= 0 ) {
notice $nick 12You dont have any special Left.
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 15There is no DM on. Type4 !DM 15To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick 6You need someone to attack....
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
writeini hit.ini $chan Hit $rand(0,25)
writeini hit.ini $chan Hit2 $rand(0,25)
writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(dds.ini,$chan,total) )
writeini spec.ini $chan Player1 $calc( $readini(spec.ini,$chan,Player1) - 25 )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) Specials at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving him with4[[ 0 ]]12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
notice $nick 12You have4 $readini(spec.ini,$chan,Player1) $+ 12% of your Special Bar left.
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) specials at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2)$+ . Leaving him with4 $readini(hp.ini,$chan,Player2) 12Hitpoints.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
writeini hit.ini $chan Hit $rand(0,25)
writeini hit.ini $chan Hit2 $rand(0,25)
writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(dds.ini,$chan,total) )
writeini spec.ini $chan Player2 $calc( $readini(spec.ini,$chan,Player2) - 25 )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) Specials at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving him with4[[ 0 ]]12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
notice $nick 12You have4 $readini(spec.ini,$chan,Player2) $+ 12% of your Special Bar left.
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) specials at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2)$+ . Leaving him with4 $readini(hp.ini,$chan,Player1) 12Hitpoints.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick 12Its not your turn or your not in this round.
}
}
ON *:TEXT:!stopDM*:#:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 13There is no DM for this channel
halt
}
if ($nick isop $chan || $nick ishop $chan) {
msg $chan 12DM Halted by $nick $+ .
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
}
else {
notice $nick 12You need halfop+
}
}
ON *:TEXT:.dmcommands*:#:{
msg $nick 12!StopDM <Stops the dm>
msg $nick 12!DM <Starts a DM>
msg $nick 12!Whip <Whip attack>
msg $nick 12!DDS <DDS special>
msg $nick 12!DH <Hits with dharoks (Full)>
msg $nick 12!Eat <Eats a shark (heals 20hp)>
msg $nick 12!tele <Makes you teleport, you lose the game if you do>
msg $nick 12!barrage <Ice barrage hits up to 30 and holds for 15 seconds>
}
ON *:TEXT:!tele*:#:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 12There is no DM on. Type4 !DM 12To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick 12You cant Tele yet rofl.
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has just teled.
msg $chan 4 $+ $readini(pdm.ini,$chan,Player2) 12wins!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) has just teled, Stupid teletubby.
msg $chan 1 $+ $readini(pdm.ini,$chan,Player1) 4wins!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
}
}
ON *:TEXT:!barrage*:#:{
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick 12There is no DM on. Type4 !DM 12To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick 12You need someone to attack....
halt
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
writeini hit.ini $chan Hit $rand(0,30)
writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player2) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) hacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 0 12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini dds.ini $chan Total
remini pdm.ini $chan Player2
halt
}
else {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) hacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 $readini(hp.ini,$chan,Player2) 12Hitpoints.
writeini turn.ini $chan Turn 2
halt
}
}
if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
writeini hit.ini $chan Hit $rand(0,30)
writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
if ($readini(hp.ini,$chan,Player1) <= 0 ) {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) hacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4 0 12Hitpoints.
timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) has won!
remini dm.ini $chan Status
remini shark.ini $chan Player1
remini shark.ini $chan Player2
remini Hit.ini $chan Hit
remini Hit.ini $chan Hit2
remini hp.ini $chan Player1
remini hp.ini $chan Player2
remini pdm.ini $chan Player1
remini pdm.ini $chan Player2
remini dds.ini $chan Total
halt
}
else {
msg $chan 12 $+ $readini(pdm.ini,$chan,Player2) barrages at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Freezing him for 15 seconds and Leaving him with4 $readini(hp.ini,$chan,Player1) 12Hitpoints.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick 12Its not your turn or your not in this round.
}
}