digimon mIRC script

By glucht23 on Apr 01, 2014

digimon script for mIRC in progress... if anyone would like to help me add on to it since my time is limited it'd be much appreciated!

current battle commands; !digimon, !digimon digivice, and !digimon digiform

stop by on irc.bitsjoint.net and join #secret to talk to me

use !addchan on the channels you want it to work on and then it'll work (i keep that command in all of my scripts but decided not to delete it from this one)

;stop by irc.bitsjoint.net on #secret to talk to me
;made by glucht23

on *:text:!addchan:#: {
if ($chan isin %chan.list) { notice $nick $chan is already in the list of channels to work in | halt }
else { set %chan.list %chan.list | msg $chan $chan is now added to list of channels for all commands to work in | halt }
}

on $*:text:/^[@!.](digiscores)?digiscores$/Si:#:{
  if ($chan !isin %chan.list) { halt }
  var %x, %i = $hget(digiscores,0).item, %o
  while (%i) {
    %x = $instok(%x,$hget(digiscores,$hget(digiscores,%i).item),0,32)
    dec %i
  }
  %x = $sorttok(%x,32,nr)
  %i = 1
  while (%i <= 10) {
    if (!$hget(digiscores,%i).item) break
    %o = $addtok(%o,$ord(%i) $+ : $hfind(digiscores,$gettok(%x,%i,32),$calc($findtok(%o,$gettok(%x,%i,32),0,32) +1)).data 4~~ $bytes($gettok(%x,%i,32),b) |,32)
    inc %i
  }
  $iif($left($1,1) == @,msg #,msg $chan digiscorestop10) $left(%o,-1)
}

On *:Start:{
  if (!$hget(diginicks)) { hmake diginicks 10 }
  if ($isfile(diginicks.hsh)) { hload  diginicks diginicks.hsh }
  if (!$hget(digiscores)) { hmake digiscores 10 }
  if ($isfile(digiscores.hsh)) { hload  digiscores digiscores.hsh }
  if (!$hget(digimon)) { hmake digimon 10 }
  if ($isfile(digimon.hsh)) { hload  digimon digimon.hsh }
}

On *:Disconnect: { 
  if ($hget(diginicks)) { hsave diginicks diginicks.hsh } 
  if ($hget(digiscores)) { hsave digiscores digiscores.hsh }
  if ($hget(digimon)) { hsave digimon digimon.hsh }
}

On *:Exit: { 
  if ($hget(digiscores)) { hsave digiscores digiscores.hsh }
if ($hget(digimon)) { hsave digimon digimon.hsh } } 
if ($hget(diginicks)) { hsave diginicks diginicks.hsh }

alias windigibattle {
  if ($hget(Digimon1HP,$nick) < 1) { 
    msg $chan 5 $hget(digimon,$nick)  fainted! You lost the battle! You lost $hget(digipoints,$nick) digipoints to see highscores for digimon do !digiscores
    msg $chan $hget(winmessage,$nick)
    hdec -m digiscores $nick %digipoints
    hdel digimon2 $nick
    hdel digibattle $nick
    hdel player2stamina $nick 
    hdel player1stamina $nick 
    hdel digimon1hp $nick 
    hdel digimon2hp $nick
  }   
  elseif ($hget(Digimon2HP,$nick) < 1) { 
    msg $chan 5 $hget(digimon2,$nick)  fainted! You win the battle! You earned $hget(digireward,$nick) and gained $hget(digipoints,$nick) digipoints to see highscores for digimon do !digiscores
    hinc -m digiscores $nick %digipoints
    msg $chan $hget(winmessage,$nick)
    hdel digimon2 $nick 
    hdel digibattle $nick 
    hdel player2stamina $nick 
    hdel player1stamina $nick 
    hdel digimon1hp $nick
    hdel digimon2hp $nick 
    if (digivolve isin $hget(digireward,$nick)) { if ($nick isin %digivolve) { halt } | set %digivolve %digivolve $nick | halt }
    if (digidestined isin $hget(digireward,$nick)) { set %digidestined %digidestined $nick | halt }
    if (digivice isin $hget(digireward,$nick)) { if ($nick isin %digivice) { halt } | set %digivice %digivice $nick | halt }
  }
}

alias digimonattacks1 {
  if ($hget(digimon,$nick) == Greymon) { notice $nick your attacks are !NovaBlast and !GreatHornAttack you start with 350HP you require stamina to use !NovaBlast you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Garurumon) { notice $nick your attacks are !HowlingBlaster and !Slammingattack you start with 350HP you require stamina to use !HowlingBlaster you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Birdramon) { notice $nick your attacks are !MeteorWing and !FireFlapping you start with 350HP you require stamina to use !MeteorWing you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Ikkakumon) { notice $nick your attacks are !HarpoonTorpedo and !HeatTop you start with 350HP you require stamina to use !HarpoonTorpedo you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Kabuterimon) { notice $nick your attacks are !electroshocker and !Beetlehornattack you start with 350HP you require stamina to use !Electroshocker you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Angemon) { notice $nick your attacks are !HandOfFate and !HeavensKnuckle you start with 350HP you require stamina to use !HandofFate you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Togemon) { notice $nick your attacks are !NeedleSpray and !LightSpeedjabbing you start with 350HP you require stamina to use !NeedleSpray you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Gatomon) { notice $nick your attacks are !CatsEyeHypnotism and !LightningPaw you start with 350HP you require stamina to use !CatsEyeHypnotism you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Exveemon) { notice $nick your attacks are !VLaser and !criticalCrunch you start with 350HP you require stamina to use !Vlaser you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Stingmon) { notice $nick your attacks are !Moonshooter and !SpikingStrike you start with 350HP you require stamina to use !Moonshooter you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Aquilamon) { notice $nick your attacks are !Blastlaser and !Grandhorn you start with 350HP you require stamina to use !BlastLaser you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Ankylomon) { notice $nick your attacks are !MegatonPress and !Tailhammer you start with 350HP you require stamina to use !MegatonPress you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Growlmon) { notice $nick your attacks are !PyroBlaster and !DragonSlash you start with 350HP you require stamina to use !PyroBlaster you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Galgomon) { notice $nick your attacks are !GargoLaser and !BunnyPummel you start with 350HP you require stamina to use !GargoLaser you start with 45 stamina (using it takes up 9) }
  if ($hget(digimon,$nick) == Kyubimon) { notice $nick your attacks are !FoxtailInferno and !DragonWheel you start with 350HP you require stamina to use !FoxtailInferno you start with 45 stamina (using it takes up 9) }
}

alias dedigivolvewin {
  if ($hget(digimon1hp,$nick) < 1) { 
    msg $chan 5 $hget(digimon,$nick)  fainted! You lost the battle! You lost $hget(digipoints,$nick) digipoints to see highscores for digimon do !digiscores
    msg $chan You lost the battle... try again?
    hdec -m digiscores $nick %digipoints
    hdel digimon2 $nick 
    hdel digibattle $nick
    hdel player2stamina $nick
    hdel player1stamina $nick
    dedigivolve
    hdel digimon1hp $nick
    hdel digimon2hp $nick
  }   
  if ($hget(Digimon2HP,$nick) < 1) { 
    msg $chan 5 $hget(digimon2,$nick)  fainted! You win the battle! You earned $hget(digireward,$nick) and gained $hget(digipoints,$nick) digipoints to see highscores for digimon do !digiscores
    hinc -m digiscores $nick $hget(digipoints,$nick)
    msg $chan $hget(winmessage,$nick)
    hdel digimon2 $nick 
    hdel digibattle $nick
    hdel player2stamina $nick 
    hdel player1stamina $nick
    dedigivolve
    hdel digimon1hp $nick
    hdel digimon2hp $nick
    if (digivolve isin $hget(digireward,$nick)) { if ($nick isin %digivolve) { halt } | set %digivolve %digivolve $nick | halt }
    if (digidestined isin $hget(digireward,$nick)) { set %digidestined %digidestined $nick | halt }
    if (digivice isin $hget(digireward,$nick)) { if ($nick isin %digivice) { halt } | set %digivice %digivice $nick | halt }
  }
}

alias digimonattacks {
  if ($hget(digimon,$nick) == agumon) { notice $nick your attacks are !PepperBreath and !ClawAttack you start with 150HP you require stamina to use !pepperbreath you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Gabumon) { notice $nick your attacks are !BlueBlaster and !HornAttack you start with 150HP you require stamina to use !blueblaster you start with 21 stamina (using it takes up 7) } 
  if ($hget(digimon,$nick) == Biyomon) { notice $nick your attacks are !SpiralTwister and !PeckingAttack you start with 150HP you require stamina to use !Spiraltwister you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Gomamon) { notice $nick your attacks are !Marchingfishes and !Clawattack you start with 150HP you require stamina to use !Marchingfishes you start with 21 stamina (using it takes up 7) } 
  if ($hget(digimon,$nick) == Tentomon) { notice $nick your attacks are !supershocker and !TalonAttack you start with 150HP you require stamina to use !supershocker you start with 21 stamina (using it takes up 7) } 
  if ($hget(digimon,$nick) == Patamon) { notice $nick your attacks are !boombubble and !slamattack you start with 150HP you require stamina to use !boombubble you start with 21 stamina (using it takes up 7) } 
  if ($hget(digimon,$nick) == Palmon) { notice $nick your attacks are !poisonivy and !stingingattack you start with 150HP you require stamina to use !poisonivy you start with 21 stamina (using it takes up 7) }   
  if ($hget(digimon,$nick) == Salamon) { notice $nick your attacks are !puppyhowling and !pettypunch you start with 150HP you require stamina to use !puppyhowling you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Veemon) { notice $nick your attacks are !Veeheadbutt and !Veepunch you start with 150HP you require stamina to use !Veeheadbutt you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Wormmon) { notice $nick your attacks are !stickynet and !silkthread you start with 150HP you require stamina to use !stickynet you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Hawkmon) { notice $nick your attacks are !featherslash and !beakpecker you start with 150HP you require stamina to use !featherslash you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Armadillomon) { notice $nick your attacks are !Diamondshell and !DiamondSlam you start with 150HP you require stamina to use !DiamondShell you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Guilmon) { notice $nick your attacks are !Pyrosphere and !rockbreaker you start with 150HP you require stamina to use !pyrosphere you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Terriermon) { notice $nick your attacks are !bunnyblast and !TerrierTornado you start with 150HP you require stamina to use !terriertornado you start with 21 stamina (using it takes up 7) }
  if ($hget(digimon,$nick) == Renamon) { notice $nick your attacks are !Diamondstorm and !WisteriaPunch you start with 150HP you require stamina to use !Diamondstorm you start with 21 stamina (using it takes up 7) }
}

alias digivolve {
  if ($hget(digimon,$nick) == agumon) { msg $chan 4Agumon digivolves toooo... 1,14Greymon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Greymon }
  if ($hget(digimon,$nick) == Gabumon) { msg $chan 2Gabumon digivolves toooo... 11,12Garurumon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Garurumon }
  if ($hget(digimon,$nick) == Biyomon) { msg $chan 13Biymon digivolves toooo... 4,13Birdramon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Birdramon }
  if ($hget(digimon,$nick) == Gomamon) { msg $chan 15Gomamon digivolves toooo... 0,1Ikkakumon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Ikkakumon }
  if ($hget(digimon,$nick) == tentomon) { msg $chan 6Tentomon digivolves toooo... 2,14Kabuterimon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Kabuterimon }
  if ($hget(digimon,$nick) == Patamon) { msg $chan 7Patamon digivolves toooo... 1,2Angemon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Angemon }
  if ($hget(digimon,$nick) == Palmon) { msg $chan 3Palmon digivolves toooo... 3,4Togemon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Togemon }
  if ($hget(digimon,$nick) == Salamon) { msg $chan 14Salamon digivolves toooo... 8,10Gatomon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Gatomon }
  if ($hget(digimon,$nick) == Veemon) { msg $chan 11Veemon digivolves toooo... 11,13ExVeemon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick ExVeemon }
  if ($hget(digimon,$nick) == Wormmon) { msg $chan 9Wormmon digivolves toooo... 3,4Stingmon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Stingmon }
  if ($hget(digimon,$nick) == Hawkmon) { msg $chan 5Hawkmon digivolves toooo... 4,1Aquillamon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Aquilamon }
  if ($hget(digimon,$nick) == armadillomon) { msg $chan 8Armadillomon digivolves toooo... 8,7Ankylomon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Ankylomon }
  if ($hget(digimon,$nick) == guilmon) { msg $chan 4Guilmon digivolves toooo... 4,14Growlmon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Growlmon }
  if ($hget(digimon,$nick) == terriermon) { msg $chan 15Terriermon digivolves toooo... 2,9Galgomon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Galgomon }
  if ($hget(digimon,$nick) == Renamon) { msg $chan 7Renamon digivolves toooo... 8,15Kyubimon Your digimon digivolved! Your digimon now has new attacks to use and more hp / stamina for this battle ! | hadd digimon $nick Kyubimon }
}

alias dedigivolve {
  if ($hget(digimon,$nick) == Greymon) { msg $chan Greymon dedigivolved to Agumon Your digimon turned back to its previous form | hadd digimon $nick Agumon }
  if ($hget(digimon,$nick) == Garurumon) { msg $chan Garurumon dedigivolved to Gabumon Your digimon turned back to its previous form  | hadd digimon $nick Gabumon }
  if ($hget(digimon,$nick) == Birdramon) { msg $chan Birdramon dedigivolved to Biyomon Your digimon turned back to its previous form  | hadd digimon $nick Biyomon }
  if ($hget(digimon,$nick) == Ikkakumon) { msg $chan Ikkakumon dedigivolved to Gomamon Your digimon turned back to its previous form  | hadd digimon $nick Gomamon }
  if ($hget(digimon,$nick) == Kabuterimon) { msg $chan Kabuterimon dedigivolved to Tentomon Your digimon turned back to its previous form  | hadd digimon $nick Tentomon }
  if ($hget(digimon,$nick) == Angemon) { msg $chan Angemon dedigivolved to Patamon Your digimon turned back to its previous form  | hadd digimon $nick Patamon }
  if ($hget(digimon,$nick) == Togemon) { msg $chan Togemon dedigivolved to Palmon Your digimon turned back to its previous form  | hadd digimon $nick Palmon }
  if ($hget(digimon,$nick) == Gatomon) { msg $chan Gatomon dedigivolved to Salamon Your digimon turned back to its previous form | hadd digimon $nick Salamon }
  if ($hget(digimon,$nick) == ExVeemon) { msg $chan ExVeemon dedigivolved to Veemon Your digimon turned back to its previous form | hadd digimon $nick Veemon }
  if ($hget(digimon,$nick) == Stingmon) { msg $chan Stingmon dedigivolved to Wormmon Your digimon turned back to its previous form | hadd digimon $nick Wormmon }
  if ($hget(digimon,$nick) == Aquilamon) { msg $chan Aquilamon dedigivolved to Hawkmon Your digimon turned back to its previous form   | hadd digimon $nick Hawkmon }
  if ($hget(digimon,$nick) == Ankylomon) { msg $chan Ankylomon dedigivolved to Armadillomon Your digimon turned back to its previous form | hadd digimon $nick Armadillomon }
  if ($hget(digimon,$nick) == growlmon) { msg $chan Growlmon dedigivolved to Guilmon Your digimon turned back to its previous form   | hadd digimon $nick Guilmon }
  if ($hget(digimon,$nick) == Galgomon) { msg $chan Galgomon dedigivolved to Terriermon Your digimon turned back to its previous form | hadd digimon $nick Terriermon }
  if ($hget(digimon,$nick) == Kyubimon) { msg $chan Kyubimon dedigivolved to Renamon Your digimon turned back to its previous form | hadd digimon $nick Renamon }
}

alias Digiattack1 {
  var %Digiattack1 = $rand(41,71)
  hdec Digimon2HP $nick %Digiattack1
  hdec Player1Stamina $nick 7
  msg $hget(digichan,$nick) $hget(digimon,$nick) attacks with %digiattackname and does %Digiattack1 damage to $hget(Digimon2,$nick) opponent has $hget(digimon2hp,$nick) HP left attack decreased stamina by 4 7  you have $hget(player1stamina,$nick) stamina left.
  if ($hget(digimon2,$nick) == koramon) { bubbleblow }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) > 6) {
      var %kuwagamonatk = $rand(1,3)
    }
    if (%kuwagamonatk == 1) { 
      var %diginpcattackname = Scissor Claw
      digiNPCatk2 
    }
    if (%kuwagamonatk == 2) {
      var %diginpcattackname = Scissor Claw 
      digiNPCatk2
    }
    if (%kuwagamonatk == 3) { var %diginpcattackname = Power Guillotine 
      digiNPCatk1 
    }
  }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) < 6) { 
      var %diginpcattackname = Scissor Claw 
      digiNPCatk2   
    }
  }
}

alias DigiNPCatk3 {  
  var %DigiNPCatk3 = $rand(50,104)
  hdec Digimon1HP $nick %DigiNPCatk3
  hdec Player2Stamina $nick 9
  msg $hget(digichan,$nick) $hget(digimon2,$nick) attacks with %diginpcattackname and does %DigiNPCatk3 damage to $hget(digimon,$nick) $+ . $hget(digimon,$nick) has $hget(digimon1hp,$nick) HP left attack decreased stamina by 4 9  the $hget(digimon2,$nick) has $hget(player2stamina,$nick) stamina left.
}

alias DigiNPCatk4 {
  var %DigiNPCatk4 = $rand(33,73)
  hdec Digimon1HP $nick %DigiNPCatk4
  msg $hget(digichan,$nick) $hget(digimon2,$nick) attacks with %diginpcattackname and does %DigiNPCatk4 damage to $hget(digimon,$nick) $+ . $hget(digimon,$nick) has $hget(digimon1hp,$nick) HP left attack decreased stamina by 4 0  the $hget(digimon2,$nick) has $hget(player2stamina,$nick) stamina left.
}

alias Digiattack3 {
  var %Digiattack3 = $rand(72,104)
  hdec Digimon2HP $nick %Digiattack3
  msg $hget(digichan,$nick) $hget(digimon,$nick) attacks with %digiattackname and does %Digiattack3 damage to $hget(Digimon2,$nick) $+ . $hget(digimon,$nick) has $hget(digimon2hp,$nick) HP left attack decreased stamina by 4 0  you have $hget(player1stamina,$nick) stamina left.
  if ($hget(digimon2,$nick) == koramon) { bubbleblow }
  if ($hget(digimon2,$nick) == Devimon) {
    if ($hget(player2stamina,$nick) > 6) {
      var %Devimonatk = $rand(1,3)
    }
    if (%devimonatk == 1) {
      var %diginpcattackname = The Touch of Evil
      digiNPCatk3
    }
    if (%devimonatk == 2) {
      var %diginpcattackname = The Touch of Evil
      digiNPCatk3
    }
    if (%devimonatk == 3) {
      var %diginpcattackname = Evil Wing
      digiNPCatk4
    }
  }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) > 6) {
      var %kuwagamonatk = $rand(1,3)
    }
    if (%kuwagamonatk == 1) { 
      var %diginpcattackname = Scissor Claw
      digiNPCatk1
    }
    if (%kuwagamonatk == 2) {
      var %diginpcattackname = Scissor Claw 
      digiNPCatk1
    }
    if (%kuwagamonatk == 3) {
      var %diginpcattackname = Power Guillotine 
      digiNPCatk2 
    }
  }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) < 6) { 
      var %diginpcattackname = Scissor Claw 
      digiNPCatk4  
    }
  }
}

alias Digiattack4 {
  var %Digiattack4 = $rand(41,73)
  hdec Digimon2HP $nick %Digiattack4
  hdec Player1Stamina $nick 9
  msg $hget(digichan,$nick) $hget(digimon,$nick) attacks with %digiattackname and does %Digiattack4 damage to $hget(digimon2,$nick) opponent has $hget(digimon2hp,$nick) HP left attack decreased stamina by 4 9  you have $hget(player1stamina,$nick) stamina left.
  if ($hget(digimon2,$nick) == koramon) { bubbleblow }
  if ($hget(digimon2,$nick) == Devimon) {
    if ($hget(player2stamina,$nick) > 6) {
      var %Devimonatk = $rand(1,3)
    }
    if (%devimonatk == 1) {
      var %diginpcattackname = The Touch of Evil
      digiNPCatk3
    }
    if (%devimonatk == 2) {
      var %diginpcattackname = The Touch of Evil
      digiNPCatk3
    }
    if (%devimonatk == 3) {
      var %diginpcattackname = Evil Wing
      digiNPCatk4
    }
  }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) > 6) {
      var %kuwagamonatk = $rand(1,3)
    }
    if (%kuwagamonatk == 1) { 
      var %diginpcattackname = Scissor Claw
      digiNPCatk1
    }
    if (%kuwagamonatk == 2) {
      var %diginpcattackname = Scissor Claw 
      digiNPCatk1
    }
    if (%kuwagamonatk == 3) { 
      var %diginpcattackname = Power Guillotine 
      digiNPCatk2 
    }
  }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) < 6) { 
      var %diginpcattackname = Scissor Claw 
      digiNPCatk4  
    }
  }
}

alias DigiNPCatk1 {
  var %DigiNPCatk1 = $rand(41,71)
  hdec Digimon1HP $nick %Diginpcatk1
  hdec Player2Stamina $nick 7
  msg $hget(digichan,$nick) $hget(digimon2,$nick) attacks with %diginpcattackname and does %DigiNPCatk1 damage to $hget(digimon,$nick) $+ . $hget(digimon,$nick) has $hget(digimon1hp,$nick) HP left attack decreased stamina by 4 7  the $hget(digimon2,$nick) has $hget(player2stamina,$nick) stamina left.
}

alias DigiNPCatk2 {
  var %DigiNPCatk1 = $rand(20,42)
  hdec Digimon1HP $nick %Diginpcatk2
  msg $hget(digichan,$nick) $hget(digimon2,$nick) attacks with %diginpcattackname and does %DigiNPCatk2 damage to $hget(digimon,$nick) $+ . $hget(digimon,$nick) has $hget(digimon1hp,$nick) HP left attack decreased stamina by 4 0  the $hget(digimon2,$nick) has $hget(player2stamina,$nick) stamina left.
}

alias Digiattack2 {
  var %Digiattack2 = $rand(20,42)
  hdec Digimon2HP $nick %Digiattack2
  msg $hget(digichan,$nick) $hget(digimon,$nick) attacks with %digiattackname and does %digiattack2 damage to $hget(digimon2,$nick) opponent has $hget(digimon2hp,$nick) HP left attack required 0 stamina you have $hget(player1stamina,$nick) stamina left.
  if ($hget(digimon2,$nick) == koramon) { bubbleblow }
  if ($hget(digimon2,$nick) == Kuwagamon) { 
    if ($hget(player2stamina,$nick) > 6) {
      var %kuwagamonatk = $rand(1,3)
    }
    if (%kuwagamonatk == 1) { digiNPCatk2 }
    if (%kuwagamonatk == 2) { digiNPCatk1 }
    if (%kuwagamonatk == 3) { digiNPCatk1 }
  }
}

alias Bubbleblow {
  var %bubbleblow = $rand(15,32)
  hdec digimon1HP $nick %bubbleblow
  msg $hget(digichan,$nick) Koramon attacks with bubbleblow and does %bubbleblow damage to $hget(digimon1,$nick) you have $hget(digimon1hp,$nick) HP left attack required 0 stamina digimon has $hget(player2stamina,$nick) stamina left.
}

on *:text:!digimon:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) != $null) { notice $nick you're already in a digibattle | halt }
  if ($hget(digimon,$nick) == $null) { msg $chan 14Is it safe?.. you there.. you're a digidestined.. I'm going to transport you to the digiworld we need your help! | msg $chan There's a ton of digimon going evil lately but you're a digidestined so you can stop them! A digimon will now choose you.. please wait.. digimons are now deciding who wants you | hadd -m digimon $nick $read(digimonchoices.txt) | timerdigimon 1 5 msg $chan $hget(digimon,$nick) has chosen you to be their digiowner! start now into the digiworld use !digimon once again | set %digidestined %digidestined $nick | hadd -m diginicks $nick | halt }
  if ($nick isin %digidestined) {     msg $chan What who are you?.. oh no we just meet? I must've lost my memory in that fight with that evil Koromon (first digiform of Agumon) oh no here he comes again.. it's going to attack! 
    hadd -m digibattle $nick $nick
    hadd -m winmessage $nick you beat Koramon but the secrets of this place are lost since your guide lost its memory use !digimon digivice for part 2
    hadd -m Player2Stamina $nick 21
    hadd -m Player1Stamina $nick 21
    hadd -m Digimon1HP $nick 150
    hadd -m Digimon2HP $nick 135
    hadd -m digimon2 $nick Koramon
    hadd -m digipoints $nick $rand(1,2)
    hadd -m digireward $nick digidestined tital
    timer 1 3 msg $chan 4Koramon attacks! your attacks and battle details are now being noticed to you 
    if ($hget(digimon,$nick) == agumon) { notice $nick your attacks are !PepperBreath and !ClawAttack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !pepperbreath you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Gabumon) { notice $nick your attacks are !BlueBlaster and !HornAttack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !blueblaster you start with 21 stamina (using it takes up 7) } 
    if ($hget(digimon,$nick) == Biyomon) { notice $nick your attacks are !SpiralTwister and !PeckingAttack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !Spiraltwister you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Gomamon) { notice $nick your attacks are !Marchingfishes and !Clawattack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !Marchingfishes you start with 21 stamina (using it takes up 7) } 
    if ($hget(digimon,$nick) == Tentomon) { notice $nick your attacks are !supershocker and !TalonAttack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !supershocker you start with 21 stamina (using it takes up 7) } 
    if ($hget(digimon,$nick) == Patamon) { notice $nick your attacks are !boombubble and !slamattack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !boombubble you start with 21 stamina (using it takes up 7) } 
    if ($hget(digimon,$nick) == Palmon) { notice $nick your attacks are !poisonivy and !stingingattack The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !poisonivy you start with 21 stamina (using it takes up 7) }   
    if ($hget(digimon,$nick) == Salamon) { notice $nick your attacks are !puppyhowling and !pettypunch The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !puppyhowling you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Veemon) { notice $nick your attacks are !Veeheadbutt and !Veepunch The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !Veeheadbutt you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Wormmon) { notice $nick your attacks are !stickynet and !silkthread The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !stickynet you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Hawkmon) { notice $nick your attacks are !featherslash and !beakpecker The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !featherslash you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Armadillomon) { notice $nick your attacks are !Diamondshell and !DiamondSlam The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !DiamondShell you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Guilmon) { notice $nick your attacks are !Pyrosphere and !rockbreaker The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !pyrosphere you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Terriermon) { notice $nick your attacks are !bunnyblast and !TerrierTornado The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !terriertornado you start with 21 stamina (using it takes up 7) }
    if ($hget(digimon,$nick) == Renamon) { notice $nick your attacks are !Diamondstorm and !WisteriaPunch The 4Koramon is sick it starts with 135HP you start with 150HP you require stamina to use !Diamondstorm you start with 21 stamina (using it takes up 7) }
  }
}

on *:text:!digimon*:#: {
  if ($hget(digibattle,$nick) != $null) { notice $nick you're already in a digibattle | halt }
  if (%digimon != $null) { notice $nick someone is currently being transported into the digiworld.. please wait %digimon more seconds | halt }
  if ($2 == digivice) {
    if ($nick isin %digidestined) { 
      msg $chan Time to get your 3Digivice $+ ! oh no.. Kuwagamon looks mad you have to battle it to get your digivice! the Kuwagamon starts with 100HP your details are being noticed to you 
      /digimonattacks
      hadd -m digimon2 $nick Kuwagamon
      hadd -m winmessage $nick Kuwagamon got mad and went to attack again but you hid in the forest to get away... what will happen next? use !digimon digiform for part 3
      hadd -m digibattle $nick $nick
      hadd -m digireward $nick digivice
      hadd -m Player2Stamina $nick 21
      hadd -m Player1Stamina $nick 21
      hadd -m Digimon1HP $nick 150
      hadd -m Digimon2HP $nick 100
      hadd -m digipoints $nick $rand(1,3)
    }
  }
  elseif ($2 == digiform) {
    if ($nick !isin %digidestined) { notice $nick you first need to do !digimon first | halt }
    if ($nick !isin %digivice) { notice $nick you first need to do !digimon digivice | halt }
    msg $chan it's 1Devimon $+ ! you're not strong enough to defeat him this round... but have your digimon distract him for a while so you can get away
    msg $chan your 11Digivice is glowing! it's reacting with your digimon! Digivolve!
    /digivolve
    /digimonattacks1
    hadd -m digimon2 $nick Devimon
    hadd -m winmessage $nick well you've learned about digivolution... what other secrets does this place hold?
    hadd -m digibattle $nick on
    hadd -m digireward $nick digivolve
    hadd -m Player2Stamina $nick 45
    hadd -m Player1Stamina $nick 45
    hadd -m Digimon1HP $nick 350
    hadd -m Digimon2HP $nick 450
    hadd -m digipoints $nick $rand(1,4)
  }
}

on *:text:!pepperbreath:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != agumon) { notice $nick only agumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = pepperbreath
    /digiattack1
    hadd -m digichan $nick $chan
    /windigibattle
  }
}

on *:text:!clawattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != agumon) {
  elseif ($hget(digimon,$nick) != gomamon) { notice $nick only agumon and gomamon can use that attack! | halt } }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = claw attack
    /digiattack2
    /windigibattle
  }
}

on *:text:!blueblaster:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != gabumon) { notice $nick only gabumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = blue blaster
    /digiattack1
    hadd -m digichan $nick $chan
    /windigibattle
  }
}

on *:text:!hornattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != gabumon) { notice $nick only gabumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = horn attack
    /digiattack2
    /windigibattle
  }
}

on *:text:!spiraltwister:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != biyomon) { notice $nick only biyomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = spiral twister
    /digiattack1
    /windigibattle
  }
}

on *:text:!peckingattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != biyomon) { notice $nick only biyomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = pecking attack
    /digiattack2
    /windigibattle
  }
}

on *:text:!supershocker:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != tentomon) { notice $nick only tentomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = super shocker
    digiattack1
    /windigibattle
  }
}

on *:text:!talonattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != tentomon) { notice $nick only tentomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) {
    var %digiattackname = talon attack 
    hadd -m digichan $nick $chan
    /digiattack2
    /windigibattle
  }
}

on *:text:!boombubble:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != patamon) { notice $nick only patamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = boom bubble
    /digiattack1
    /windigibattle
  }
}

on *:text:!slamattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != patamon) { notice $nick only patamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = slam attack
    /digiattack2
    /windigibattle
  }
}

on *:text:!poisonivy:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != palmon) { notice $nick only palmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = poison ivy
    /digiattack1
    /windigibattle
  }
}

on *:text:!stingingattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != palmon) { notice $nick only palmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = stinging attack
    /digiattack2
    /windigibattle
  }
}

on *:text:!puppyhowling:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != salamon) { notice $nick only salamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = puppy howling
    hadd -m digichan $nick $chan
    /digiattack1
    /windigibattle
  }
}

on *:text:!pettypunch:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != salamon) { notice $nick only salamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = petty punch
    hadd -m digichan $nick $chan
    /digiattack2
    /windigibattle
  }
}

on *:text:!veeheadbutt:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != veemon) { notice $nick only veemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = vee head butt
    hadd -m digichan $nick $chan
    /digiattack1
    /windigibattle
  }
}

on *:text:!veepunch:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != veemon) { notice $nick only veemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = veepunch
    hadd -m digichan $nick $chan
    /digiattack2
    /windigibattle
  }
}

on *:text:!stickynet:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != wormmon) { notice $nick only biyomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = stickynet
    /digiattack1
    /windigibattle
  }
}

on *:text:!silkythread:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != wormmon) { notice $nick only biyomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = silkythread
    /digiattack2
    /windigibattle
  }
}

on *:text:!featherslash:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != hawkmon) { notice $nick only hawkmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = featherslash
    /digiattack1
    /windigibattle
  }
}

on *:text:!beakpecker:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != hawkmon) { notice $nick only hawkmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = beakpecker
    /digiattack2
    /windigibattle
  }
}

on *:text:!Diamondslam:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != armadillomon) { notice $nick only armadillomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = diamondslam
    hadd -m digichan $nick $chan
    /digiattack2
    /windigibattle
  }
}

on *:text:!pyrosphere:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != guilmon) { notice $nick only guilmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = pyro sphere
    /digiattack1
    /windigibattle
  }
}

on *:text:!rockbreaker:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != guilmon) { notice $nick only guilmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    hadd -m digichan $nick $chan
    var %digiattackname = rock breaker
    /digiattack2
    /windigibattle
  }
}

on *:text:!terriertornado:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != terriermon) { notice $nick only terriermon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    hadd -m digichan $nick $chan
    var %digiattackname = terrier tornado
    /digiattack1
    /windigibattle
  }
}

on *:text:!bunnyblast:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != terriermon) { notice $nick only terriermon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = bunny blast
    hadd -m digichan $nick $chan
    /digiattack2
    /windigibattle
  }
}

on *:text:!diamondstorm:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != renamon) { notice $nick only renamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = diamond storm
    hadd -m digichan $nick $chan
    /digiattack1
    /windigibattle
  }
}

on *:text:!wisteriapunch:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != renamon) { notice $nick only renamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = wisteria punch
    hadd -m digichan $nick $chan
    digiattack2
    /windigibattle
  }
}

on *:text:!Novablast:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Greymon) { notice $nick only Greymon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Nova Blast
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Greathornsattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Greymon) { notice $nick only renamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Great Horns Attack
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!HowlingBlaster:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Garurumon) { notice $nick only Garurumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Howling blast
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Slammingattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Garurumon) { notice $nick only Garurumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Slamming attack
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!MeteorWing:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Birdramon) { notice $nick only Birdramon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Meteor Wing
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Fireflapping:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Birdramon) { notice $nick only Birdramon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Fire flapping
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!HarpoonTorpedo:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Ikkakumon) { notice $nick only Ikkakumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Harpoon Torpedo
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Heattop:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Ikkakumon) { notice $nick only Ikkakumon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Heat top
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!Electroshocker:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Kabuterimon) { notice $nick only Kabuterimon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Electro Shocker
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Beetlehornattack:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Kabuterimon) { notice $nick only Kabuterimon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Beetle horn attack
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!HandOfFate:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Angemon) { notice $nick only Angemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Hand Of Fate
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!AngelRod:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Angemon) { notice $nick only Angemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Angel Rod
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!NeedleSpray:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Togemon) { notice $nick only Togemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Needle Spray
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Lightspeedjabbing:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Togemon) { notice $nick only Togemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Light Speed Jabbing
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!CatsEyeHypnotism:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Gatomon) { notice $nick only Gatomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Cats Eye Hypnotism
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!LightningPaw:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Gatomon) { notice $nick only Gatomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Lightning Paw
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!Vlaser:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != ExVeemon) { notice $nick only Exveemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = V-Laser
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Criticalcrunch:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Exveemon) { notice $nick only ExVeemon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Critical Crunch
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!MoonShooter:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Stingmon) { notice $nick only Stingmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Moon Shooter
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Spikingstrike:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Stingmon) { notice $nick only Stingmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Spiking Strike
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!BlastLaser:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Aquillamon) { notice $nick only Aquillamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Blast Laser
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Grandhorn:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Aquillamon) { notice $nick only Aquillamon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Grand Horn
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!Megatonpress:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle! | halt }
  if ($hget(digimon,$nick) != Ankylomon) { notice $nick only Ankylomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Megaton Press
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Tailhammer:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Ankylomon) { notice $nick only Ankylomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Tail Hammer
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!PyroBlaster:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Growlmon) { notice $nick only Growlmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Pyro Blaster
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!Dragonslash:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Growlmon) { notice $nick only Growlmon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Dragon Slash
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!GargoLaser:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Galgomon) { notice $nick only Galgomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Gargo Laser
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!BunnyPummel:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Galgomon) { notice $nick only Galgomon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Bunny Pummel
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

on *:text:!FoxtailInferno:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Kyubimon) { notice $nick only Kyubimon can use that attack! | halt }
  if ($hget(player1stamina,$nick) < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if ($hget(player1stamina,$nick) > 6) { 
    var %digiattackname = Foxtail Inferno
    hadd -m digichan $nick $chan
    /digiattack3
    /dedigivolvewin
  }
}

on *:text:!DragonWheel:#: {
  if ($chan !isin %chan.list) { halt }
  if ($hget(digibattle,$nick) == $null) { notice $nick you're not in a battle | halt }
  if ($hget(digimon,$nick) != Kyubimon) { notice $nick only Kyubimon can use that attack! | halt }
  if ($hget(player1stamina,$nick) != $null) { 
    var %digiattackname = Dragon Wheel
    hadd -m digichan $nick $chan
    digiattack4
    /dedigivolvewin
  }
}

Comments

Sign in to comment.
ProIcons   -  Apr 05, 2014

These scripts are completely useless since you are not including any documentation.

 if ($hget(digimon,$nick) != agumon) {
  elseif ($hget(digimon,$nick) != gomamon) { notice $nick only agumon and gomamon can use that attack! | halt } }

completely invalid piece of code.

if ($hget(digimon,$nick) != wormmon) { notice $nick only biyomon can use that attack! | halt }

even you got confused in your own code.

 if (%player1stamina < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  if (%player1stamina > 6) { 

pointless you are making 2 check since you can make only one

 if (%player1stamina < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
  else {

Also on your attacks you are only checking player1stamina, while you dont know which of the players triggering the attack...
Fix your code and then post it

 Respond  
Yawhatnever   -  Apr 01, 2014

Only the first matching event per script file will be triggered. You'll need to combine your on *:start: events and any others that overlap in that way.

glucht23  -  Apr 02, 2014

better?

Yawhatnever  -  Apr 02, 2014

Your on *:exit: event has a bracket mismatch now. The others look ok at a quick glance.

Sign in to comment

Vegito   -  Apr 01, 2014

This script contains alot of repetition.
You could've written this ALOT shorter.

glucht23  -  Apr 01, 2014

everything in it was necessary I didn't I suppose I could've made a alias for the end thing though... i'll shorten it up by doing that real quick

Vegito  -  Apr 01, 2014

You can make an alias for unset and your checks

glucht23  -  Apr 01, 2014

I'm making an alias for checking the reward/winning/losing the battle should shorten it up by like 1000 lines lol

glucht23  -  Apr 01, 2014

made it shorter with the alias by like 1700 lines dang thanks for the suggestion

Vegito  -  Apr 01, 2014

You can also put this in an alias.

if ($chan !isin %chan.list) { halt }
if (%digibattle == $null) { notice $nick you're not in a battle | halt }
if (%digimon == $null) { notice $nick who are you trying to attack? use !digimon first | halt }
if (%digibattle != $nick) { notice $nick you're not in a battle! | halt }
if ($hget(digimon,$nick) != Ankylomon) { notice $nick only Ankylomon can use that attack! | halt }
nox`  -  Apr 01, 2014

This is a bad method

if ($chan !isin %chan.list) { halt }

use $istok

if (!$istok(%chan.list,$chan,32)) { halt }
glucht23  -  Apr 01, 2014

what's the difference?.. it only serves to not work in a channel unless it's approved :>

Vegito  -  Apr 02, 2014
if (%player1stamina < 6) { notice $nick you can't use $1 because you don't have enough stamina! | halt }
if (%player1stamina > 6) { 

You dont need the second line.

ProIcons  -  Apr 05, 2014

glucth23, Its about optimizing you code. We are just sayin it could be done a lot better and faster, more organized with way more preferred ways, functions and so on.

glucht23  -  Apr 05, 2014

I'll try edit it up in a couple days when I get time

Sign in to comment

Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.