ON *:TEXT:!dm*:#:{
if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) {
notice $nick Your already in the DM.
halt
}
if ($readini(dm.ini,$chan,Status) == ON2) {
notice $nick There is already a DM Going on.
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 The Fight is. $readini(pdm.ini,$chan,Player1) Vs. $readini(pdm.ini,$chan,Player2)
msg $chan ~dmcommands For DM Commands.
notice $readini(pdm.ini,$chan,Player2) You will have 99 HP and 20 Sharks that heal 20 HP each when the DM starts.
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 $+ $readini(pdm.ini,$chan,Player1) has decided to DM. Type !dm to fight $readini(pdm.ini,$chan,Player1) $+ .
notice $readini(pdm.ini,$chan,Player1) You will have 99 HP and 20 Sharks that heal 20 HP each when the DM starts.
halt
}
}
on *:TEXT:!whip*:#:{
in ($readini(dm.ini,$chan,Statsu) == $null) {
notice $nick There is not a DM Going right now. Type !dm to have a Dm
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You Need to find someone to attack.
halt
}
if ($readini(dm.ini,$chan,Status) == On2 && $readini
(turn.ini,$chan,turn) == ! && $readini(pdm.ini,$chan,Player1) == $nick) {
writeini hit.ini $chan Hit $rand(0,40)
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 $+ $readini(pdm.ini,$chan,Player1) Attacks at $readini(pdm.ini,$chan,Player2) hitting a $readini
(hit.ini,$chan,Hit) $+ . Leaving them with 0 HP
timer 1 3 msg $chan $+ $readini(pdm.ini,$chan,Player1) Has Won the DM!
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 $+ $readini(pdm.ini,$chan,Player1) Attacks at
$readini(pdm.ini,$chan,Player2) hitting a $readini
(hit.ini,$chan,Hit) $+ . Leaving them with $readini
(hp.ini,$chan,Player2) HP
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,40)
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 $+ $readini(pdm.ini,$chan,Player2) Attacks at
$readini(pdm.ini, $chan,Player1) Hitting a $readini
(hit.ini,$chan,Hit) $+ . Leaving them with 0 HP
time 1 3 msg $chan $+ $readini(pdm.ini,$chan,Player2)
Has won the DM!
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 $+ $readini(pdm.ini,$chan,Player2) attacks at
$readini(pdm.ini,$chan,Player1) hitting a $readini
(hit.ini,$chan,Hit) $+ . Leaving him with $readini(hp.ini,$chan,Player1) HP.
writeini turn.ini $chan Turn 1
halt
}
}
else {
notice $nick Its not your turn or your not in this DM.
}
}
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 You dont have any sharks 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 You dont have any sharks left.
halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
notice $nick There is no DM on. Type !DM To start one.
halt
}
if ($readini(dm.ini,$chan,Status) == ON) {
notice $nick You cannot 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) You now have $readini(shark.ini,$chan,Player1) Shark left.
msg $chan $+ $readini(pdm.ini,$chan,Player2) eats a shark giving him $readini(hp.ini,$chan,Player2) HP.
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) You now have $readini(shark.ini,$chan,Player2) Shark left.
msg $chan $+ $readini(pdm.ini,$chan,Player2) eats a shark giving him $readini(hp.ini,$chan,Player2) HP.
writeini turn.ini $chan Turn 1
halt
}
else {
notice $nick Its not your turn or your not in this DM.
}
}