;============================================================
;Wavestorm - By Jarel Jones (http://wavestorm.rangerwiki.com)
;============================================================
;
;Information on file usage in Readme.txt.
;This file contains the following:
;On NOTICE events.

on ^*:NOTICE:*:*: {
  if ((($gettok($1-,1,32) == Wavestorm) || ($gettok($1-,1,63) == Wavestorm)) && ($1- != Wavestorm - mIRC RPG Multiplayer Battle Engine)) { haltdef }
  if ($2 == statshow) {
    set -n %wavestorm-statshow-nick $nick
    set -n %wavestorm-statshow-scriptdir $scriptdir
    if ($3 == 2) {
      display3 %wavechat $nick has not downloaded any stats for you to see.
      return
    }
    if ($3 == 0) {
      set %wavestorm-statshow-maxhp $4
      set %wavestorm-statshow-maxmp $5
      set %wavestorm-statshow-level $6
      set -n %wavestorm-statshow-weapon $7
      set %wavestorm-statshow-wins $8
      set %wavestorm-statshow-losses $9
      set -n %wavestorm-statshow-color $10
      set -n %wavestorm-statshow-gender $11
      set %wavestorm-statshow-version $12
    }
    elseif ($3 == 1) {
      set %wavestorm-statshow-curhp $4
      set %wavestorm-statshow-maxhp $5
      set %wavestorm-statshow-curmp $6
      set %wavestorm-statshow-maxmp $7
      set %wavestorm-statshow-omega $8
      set %wavestorm-statshow-level $9
      set -n %wavestorm-statshow-weapon $10
      set %wavestorm-statshow-wins $11
      set %wavestorm-statshow-losses $12
      set -n %wavestorm-statshow-color $13
      set -n %wavestorm-statshow-gender $14
      set -n %wavestorm-statshow-status $15
      set -n %wavestorm-statshow-status $replace(%wavestorm-statshow-status,DodgeUp,Dodge Up,M.Fortified,M. Fortified)
      set %wavestorm-statshow-version $16
    }
    set -n %wavestorm-statshow-weapon %wavestorm-statshow-weapon
    if (!%wavestorm-statshow-version) { set %wavestorm-statshow-version 0.850 }
    if (%wavestatnum > 1000) { set %wavestatnum 0 }
    if (%statshow > 10) { set %statshow 0 }
    inc %wavestatnum 1
    inc %statshow 1
    if ($3 == 0) { dialog -mabh $+(Stats,%wavestatnum) statshow0 }
    elseif ($3 == 1) { dialog -mabh $+(Stats,%wavestatnum) statshow1 }
    unset %wavestorm-statshow-*
  }
  if ($2 == !wavestorm) {
    if ($hget(Player)) { statshow $nick }
  }
  if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == targetcheck) {
    .notice $nick Wavestorm targetcheckreturn $gettok($1-,$numtok($1-,32),32)
  }
  if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == targetcheckreturn) {
    if ($gettok($1-,$numtok($1-,32),32) == 1) { .timertarget1 off }
    elseif ($gettok($1-,$numtok($1-,32),32) == 2) { .timertarget2 off }
    elseif ($gettok($1-,$numtok($1-,32),32) == 3) { .timertarget3 off }
    elseif ($gettok($1-,$numtok($1-,32),32) == 4) { .timertarget4 off }
    elseif ($gettok($1-,$numtok($1-,32),32) == 5) { .timertarget5 off }
    elseif ($gettok($1-,$numtok($1-,32),32) == 6) { .timertarget6 off }
    elseif ($gettok($1-,$numtok($1-,32),32) == 7) { .timertarget7 off }
  }
  if (%wavestorm-battleon == 1) {
    if ($2 == s15switch) {
      set -n %wavestorm-battleground $3
      .timers15 1 $rand(300,480) wavestorm-s15switch
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 3),32) == fuse) {
      if (!%wavestorm-fuse1) {
        set -n %wavestorm-fuse1nick $nick
        set %wavestorm-fuse1 $gettok($1-,$calc($numtok($1-,32) - 2),32)
        set -n %wavestorm-fuse1color $gettok($1-,$calc($numtok($1-,32) - 1),32)
        display2 %wavechat accepts the %wavestorm-fuse1color energy fuse from $+($nick,!)
        if ($dialog(Datascope)) {
          if ((%wavestorm-battletimer == $null) || (%wavestorm-battletimer <= 0)) {
            did -e datascope 18
            if ($hget(Player,Modifier) == e) { did -e datascope 24 }
          }
          did -r datascope 18
          if (%wavestorm-fuse1color) { did -i datascope 18 1 Drop Fuse (1 - $+(%wavestorm-fuse1color,$chr(41)) }
          else { did -i datascope 18 1 Drop Fuse (1) }
          datascoperefresh
      } }
      elseif ((%wavestorm-fuse1) && (!%wavestorm-fuse2)) {
        set -n %wavestorm-fuse2nick $nick
        set %wavestorm-fuse2 $gettok($1-,$calc($numtok($1-,32) - 2),32)
        set -n %wavestorm-fuse2color $gettok($1-,$calc($numtok($1-,32) - 1),32)
        display2 %wavechat accepts the %wavestorm-fuse2color energy fuse from $+($nick,!)
        if ($dialog(Datascope)) {
          if ((%wavestorm-battletimer == $null) || (%wavestorm-battletimer <= 0)) {
            did -e datascope 19
            if ($hget(Player,Modifier) == e) { did -e datascope 25 }
          }
          did -r datascope 19
          if (%wavestorm-fuse2color) { did -i datascope 19 1 Drop Fuse (1 - $+(%wavestorm-fuse2color,$chr(41)) }
          else { did -i datascope 19 1 Drop Fuse (2) }
          datascoperefresh
    } } }
    if ($2 == send) { wavesend $nick }
    if ($2 == accept) {
      writeini " $+ $scriptdirWSInfo3.ini" $nick z01 $3
      writeini " $+ $scriptdirWSInfo3.ini" $nick s04level $4
      writeini " $+ $scriptdirWSInfo3.ini" $nick level $5
      writeini " $+ $scriptdirWSInfo3.ini" $nick b02 $6
      writeini " $+ $scriptdirWSInfo3.ini" $nick b09 $7
      writeini " $+ $scriptdirWSInfo3.ini" $nick b17 $8
      writeini " $+ $scriptdirWSInfo3.ini" $nick b24 $9
      if ($11) { writeini " $+ $scriptdirWSInfo3.ini" $nick color $11 }
      wavewindowreset
      if ($10 != Blank) {
        .timerbattleground off
        if ($dialog(StageSelect)) { dialog -x stageselect }
        unset %wavestorm-battlegroundtimer
        set %wavestorm-battleground $10
        if (%wavestorm-battleground == s04) { set %wavestorm-s04level 1 }
        if (%wavemusic == 1) {
          if ((%wavestorm-battleground == s15) || (%wavestorm-battleground == s16) || (%wavestorm-battleground == s17) || (%wavestorm-battleground == s18) || (%wavestorm-battleground == s19)) { .timerwavemusic 1 5 wavestorm-music 15 }
          else { .timerwavemusic 1 5 wavestorm-music $remove(%wavestorm-battleground,s) }
    } } }
    if ($2 == battleground) {
      .timerbattleground off
      if ($dialog(StageSelect)) { dialog -x stageselect }
      unset %wavestorm-battlegroundtimer
      if ($dialog(Datascope)) { did -b did -b datascope 28 }
      set %wavestorm-stageselecttimer 1
      .timerstageselectblock 1 300 unset %wavestorm-stageselecttimer
      set %wavestorm-battleground $3
      if (%wavestorm-battleground == s04) { set %wavestorm-s04level 1 }
      if (%wavemusic == 1) {
        if ((%wavestorm-battleground == s15) || (%wavestorm-battleground == s16) || (%wavestorm-battleground == s17) || (%wavestorm-battleground == s18) || (%wavestorm-battleground == s19)) { .timerwavemusic 1 5 wavestorm-music 15 }
        else { .timerwavemusic 1 5 wavestorm-music $remove(%wavestorm-battleground,s) }
    } }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == r01) {
      writeini " $+ $scriptdirWSInfo3.ini" $nick z01 0
      writeini " $+ $scriptdirWSInfo3.ini" $nick b02 0
      writeini " $+ $scriptdirWSInfo3.ini" $nick b09 0
      writeini " $+ $scriptdirWSInfo3.ini" $nick b17 0
      writeini " $+ $scriptdirWSInfo3.ini" $nick b24 0
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == quit) {
      remini " $+ $scriptdirWSInfo3.ini" $nick
      if ((%wavestorm-melee == 1) || ($nick == %wavestorm-friend1) || ($nick == %wavestorm-friend2) || ($nick == %wavestorm-friend3) || ($nick == %wavestorm-enemy1) || ($nick == %wavestorm-enemy2) || ($nick == %wavestorm-enemy3) || ($nick == %wavestorm-enemy4)) {
        wavewindowreset
      }
      if (%wavestorm-friend1 == $nick) {
        unset %wavestorm-friend1
        if (%wavestorm-friend2 != $null) { 
          set %wavestorm-friend1 %wavestorm-friend2
          unset %wavestorm-friend2
        }
        if (%wavestorm-friend3 != $null) { 
          set %wavestorm-friend2 %wavestorm-friend3
          unset %wavestorm-friend3
      } }
      if (%wavestorm-friend2 == $nick) {
        unset %wavestorm-friend2
        if (%wavestorm-friend3 != $null) { 
          set %wavestorm-friend2 %wavestorm-friend3
          unset %wavestorm-friend3
      } }
      if (%wavestorm-friend3 == $nick) { unset %wavestorm-friend3 }
      if (%wavestorm-enemy1 == $nick) {
        unset %wavestorm-enemy1
        if (%wavestorm-enemy2 != $null) { 
          set %wavestorm-enemy1 %wavestorm-enemy2
          unset %wavestorm-enemy2
        }
        if (%wavestorm-enemy3 != $null) { 
          set %wavestorm-enemy2 %wavestorm-enemy3
          unset %wavestorm-enemy3
        }
        if (%wavestorm-enemy4 != $null) { 
          set %wavestorm-enemy3 %wavestorm-enemy4
          unset %wavestorm-enemy4
      } }
      if (%wavestorm-enemy2 == $nick) {
        unset %wavestorm-enemy2
        if (%wavestorm-enemy3 != $null) { 
          set %wavestorm-enemy2 %wavestorm-enemy3
          unset %wavestorm-enemy3
        }
        if (%wavestorm-enemy4 != $null) { 
          set %wavestorm-enemy3 %wavestorm-enemy4
          unset %wavestorm-enemy4
      } }
      if (%wavestorm-enemy3 == $nick) {
        unset %wavestorm-enemy3
        if (%wavestorm-enemy4 != $null) { 
          set %wavestorm-enemy3 %wavestorm-enemy4
          unset %wavestorm-enemy4
      } }
      if (%wavestorm-enemy4 == $nick) { unset %wavestorm-enemy4 }
      if ((%wavestorm-melee != 1) && (!%wavestorm-enemy1) && (!%wavestorm-enemy2) && (!%wavestorm-enemy3) && (!%wavestorm-enemy4)) {
        display2 %wavechat has no enemies in Team mode left; $me quits out of the battle.
        wavequit2
    } }
    if ((($gettok($1-,$calc($numtok($1-,32) - 3),32) == s01) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s02) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s03) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s04) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s05) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s06) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s07) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s08) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s09) || ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s10)) && ($gettok($1-,$calc($numtok($1-,32) - 3),32) != %wavestorm-battleground)) {
      .timerbattleground off
      if ($dialog(StageSelect)) { dialog -x stageselect }
      set %wavestorm-battleground $gettok($1-,$calc($numtok($1-,32) - 3),32)
      if (%wavestorm-battleground == s04) { set %wavestorm-s04level 1 }
      if (%wavemusic == 1) {
        if ((%wavestorm-battleground == s15) || (%wavestorm-battleground == s16) || (%wavestorm-battleground == s17) || (%wavestorm-battleground == s18) || (%wavestorm-battleground == s19)) { .timerwavemusic 1 5 wavestorm-music 15 }
        else { .timerwavemusic 1 5 wavestorm-music $remove(%wavestorm-battleground,s) }
    } }
    if ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == c) && ((%wavestorm-melee == 1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend3)) {
      set %wavestorm-lastspell $right($gettok($1-,$calc($numtok($1-,32) - 1),32),2)
    }
    :start
    if (($gettok($1-,$calc($numtok($1-,32) - 3),32) == s03) && ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),2) == c0) && ($mid($gettok($1-,$calc($numtok($1-,32) - 1),32),3,1) isnum 1 - 7) && ($gettok($1-,$calc($numtok($1-,32) - 4),32) == %wavestorm-s03level) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy4) || (%wavestorm-melee == 1))) {
      if ($rand(1,7) = 4) {
        set %wavestorm-hpdummy $round($rand($calc(10 * $hget(Player,Level)),$calc(15 * $hget(Player,Level))),0)
        dec %wavestorm-hp %wavestorm-hpdummy
        display2 %wavechat gets caught in a sudden brushfire from the Red Wavestorm attack!  $me loses %wavestorm-hpdummy HP!
        unset %wavestorm-hpdummy
        if (%wavestorm-hp < 1) { set %wavestorm-hp 0 | nohp $nick | return }
    } }
    if ((!%wavestorm-s04test) && ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s04) && ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b04) && ($gettok($1-,$calc($numtok($1-,32) - 4),32) == %wavestorm-s04level) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy4) || (%wavestorm-melee == 1))) {
      set %wavestorm-s04test 1
      .timer 1 20 unset %wavestorm-s04test
      set %wavestorm-hpdummy $round($rand($calc(10 * $hget(Player,Level)),$calc(15 * $hget(Player,Level))),0)
      dec %wavestorm-hp %wavestorm-hpdummy
      display2 %wavechat gets nicked by the demolition ball!  $me loses %wavestorm-hpdummy HP!
      unset %wavestorm-hpdummy
      if (%wavestorm-hp < 1) { set %wavestorm-hp 0 | nohp | return }
    }
    if ((%wavestorm-battleground == s06) && ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s06) && ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b05) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy4) || (%wavestorm-melee == 1))) {
      set %wavestorm-hpdummy $round($rand($calc(20 * $hget(Player,Level)),$calc(30 * $hget(Player,Level))),0)
      dec %wavestorm-hp %wavestorm-hpdummy
      display2 %wavechat gets hit by the mine cart and tumbles to the ground!  $me loses %wavestorm-hpdummy HP!
      unset %wavestorm-hpdummy
      if (%wavestorm-hp < 1) { set %wavestorm-hp 0 | nohp $nick | return }
    }
    if ((%wavestorm-battleground == s08) && ($gettok($1-,$calc($numtok($1-,32) - 3),32) == s08) && ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b16) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-friend3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy3) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == %wavestorm-enemy4) || (%wavestorm-melee == 1))) {
      set %wavestorm-hpdummy $round($rand($calc(10 * $hget(Player,Level)),$calc(15 * $hget(Player,Level))),0)
      dec %wavestorm-hp %wavestorm-hpdummy
      display2 %wavechat gets knocked over by $+($nick,!)  $me loses %wavestorm-hpdummy HP!
      unset %wavestorm-hpdummy
      if (%wavestorm-hp < 1) { set %wavestorm-hp 0 | nohp $nick | return }
    }
    if (($gettok($1-,$calc($numtok($1-,32) - 1),32) == z11) && ($gettok($1-,$calc($numtok($1-,32) - 2),32) == $me)) {
      set %wavestorm-hpdummy $round($gettok($1-,$numtok($1-,32),32),0)
      inc %wavestorm-hp %wavestorm-hpdummy
      if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
      display2 %wavechat gains %wavestorm-hpdummy HP!
      unset %wavestorm-hpdummy
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == z01-) { writeini " $+ $scriptdirWSInfo3.ini" $nick z01 $gettok($1-,$numtok($1-,32),32) }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b02-) { writeini " $+ $scriptdirWSInfo3.ini" $nick b02 $gettok($1-,$numtok($1-,32),32) }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b09-) { writeini " $+ $scriptdirWSInfo3.ini" $nick b09 $gettok($1-,$numtok($1-,32),32) }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b17-) { writeini " $+ $scriptdirWSInfo3.ini" $nick b17 $gettok($1-,$numtok($1-,32),32) }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b24-) { writeini " $+ $scriptdirWSInfo3.ini" $nick b24 $gettok($1-,$numtok($1-,32),32) }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == z01) {
      if ($readini(" $+ $scriptdirWSInfo3.ini",$nick,z01) != 1) { writeini " $+ $scriptdirWSInfo3.ini" $nick z01 1 }
      else { writeini " $+ $scriptdirWSInfo3.ini" $nick z01 0 }
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b02) {
      if ($readini(" $+ $scriptdirWSInfo3.ini",$nick,b02) != 1) { writeini " $+ $scriptdirWSInfo3.ini" $nick b02 1 }
      else { remini " $+ $scriptdirWSInfo3.ini" $nick b02 }
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b09) {
      if ($readini(" $+ $scriptdirWSInfo3.ini",$nick,b09) != 1) { writeini " $+ $scriptdirWSInfo3.ini" $nick b09 1 }
      else { remini " $+ $scriptdirWSInfo3.ini" $nick b09 }
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b17) {
      if ($readini(" $+ $scriptdirWSInfo3.ini",$nick,b17) != 1) { writeini " $+ $scriptdirWSInfo3.ini" $nick b17 1 }
      else { remini " $+ $scriptdirWSInfo3.ini" $nick b17 }
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == b24) {
      if ($readini(" $+ $scriptdirWSInfo3.ini",$nick,b24) != 1) { writeini " $+ $scriptdirWSInfo3.ini" $nick b24 1 }
      else { remini " $+ $scriptdirWSInfo3.ini" $nick b24 }
    }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == s04level) {
      writeini " $+ $scriptdirWSInfo3.ini" $nick s04level $gettok($1-,$numtok($1-,32),32)
    }
    if (($gettok($1-,4,32) == relocate) && (%wavestorm-relocate == 1)) {
      if ($gettok($1-,5-,32) == 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0) {
        display2 %wavechat attempts to take $+($nick,'s) beneficial status effects, but $nick has no good status effects to transfer!
      }
      else {
        if ($gettok($1-,5,32) == 1) { set %wavestorm-z01 1 }
        if (($gettok($1-,6,32) == 1) && ($gettok($1-,7,32) != 0)) { set %wavestorm-z03 1 | set %wavestorm-z03turn $gettok($1-,7,32) }
        if (($gettok($1-,8,32) == 1) && ($gettok($1-,9,32) != 0)) { set %wavestorm-z05 1 | set %wavestorm-z05turn $gettok($1-,9,32) }
        if ($gettok($1-,10,32) == 1) { set %wavestorm-z09 1 }
        if ($gettok($1-,11,32) == 1) { set %wavestorm-z10 1 }
        if ($gettok($1-,12,32) == 1) { set %wavestorm-z12 1 }
        if (($gettok($1-,13,32) == 1) && ($gettok($1-,14,32) != 0)) { set %wavestorm-z13 1 | set %wavestorm-z13turn $gettok($1-,14,32) }
        if ($gettok($1-,15,32) == 1) { set %wavestorm-z14 1 }
        if ($gettok($1-,16,32) == 1) { set %wavestorm-z15 1 }
        if (($gettok($1-,17,32) == 1) && ($gettok($1-,18,32) != 0)) { set %wavestorm-z16 1 | set %wavestorm-z16turn $gettok($1-,18,32) }
        if (($gettok($1-,19,32) == 1) && ($gettok($1-,20,32) != 0)) { set %wavestorm-z18 1 | set %wavestorm-z18turn $gettok($1-,20,32) }
        if (($gettok($1-,21,32) == 1) && ($gettok($1-,22,32) != 0)) { set %wavestorm-z19 1 | set %wavestorm-z19turn $gettok($1-,22,32) }
        if (($gettok($1-,23,32) == 1) && ($gettok($1-,24,32) != 0)) { set %wavestorm-z20 1 | set %wavestorm-z20turn $gettok($1-,24,32) }
        display2 %wavechat gains all of $+($nick,'s) beneficial status effects!
        wavewindowreset
      }
      unset %wavestorm-relocate
      return
    }
    if (($gettok($1-,$calc($numtok($1-,32) - 2),32) == $me) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == panacea) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) isnum 1 - 6)) {
      if ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == c) { goto magic }
      elseif ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == d) { goto magic2 }
      elseif ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == e) { goto magic3 }
      elseif ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == f) { goto magic4 }
      elseif ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == a) { goto attack }
      elseif ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == i) { goto item }
      elseif ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),1) == w) { goto wavebeast }
      elseif ($gettok($1-,$calc($numtok($1-,32) - 1),32) == w1) { goto drain }
      else { goto continue }
      :attack
      if (($7 != 1) && ($nick != %wavestorm-enemy1) && ($nick != %wavestorm-enemy2) && ($nick != %wavestorm-enemy3) && ($nick != %wavestorm-enemy4) && ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),2) != a!) && (%wavestorm-melee != 1)) { return }
      if ((%wavestorm-z01 == 1) || (%wavestorm-z7mode isnum 4 - 7)) { return }
      if ($left($gettok($1-,$calc($numtok($1-,32) - 1),32),3) == a-1) { goto dodgepast }
      if ((%wavestorm-wavebeast == 1) && (%wavestorm-wavebeast-15 == 2)) {
        display2 %wavechat watches as %wavestorm-gender3 clone intercepts $nick $+ 's attack and reverses it!
        .notice $nick Wavestorm %wavestorm-battleground $1 a000 $5
        return
      }
      if ((%wavestorm-z15 == 1) && ($mid($gettok($1-,$calc($numtok($1-,32) - 1),32),2,1) != $chr(45))) {
        set %wavestorm-z15test 1
        display2 %wavechat dodges the attack and teleports behind $nick
        attack $nick
        return
      }
      if (%wavestorm-z18 == 1) {
        display2 %wavechat shifts into shadow form and phases right through the attack! 
        if ((%wavestorm-z18turn < 1) || (%wavestorm-z18turn == $null)) {
          unset %wavestorm-z18*
          display2 %wavechat prepares to fight as %wavestorm-gender3 shadow abilities vanish
        }
        return
      }
      if (%wavestorm-z19 == 1) {
        display2 %wavechat throws up %wavestorm-gender3 arms and neutralizes the attack! 
        if ((%wavestorm-z19turn < 1) || (%wavestorm-z19turn == $null)) {
          unset %wavestorm-z19*
          display2 %wavechat prepares to fight as %wavestorm-gender3 neutralization powers fades
        }
        return
      }
      if (($hget(Player,Modifier) == c) && ($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) != 999)) {
        display2 %wavechat tenses as $nick rushes through the energy shield, taking damage while attacking
        .notice $nick Wavestorm %wavestorm-battleground $nick a999 %wavestorm-levelsend
      }
      if ((%wavestorm-z04 == 1) || (%wavestorm-z07 == 1)) { set %wavestorm-dodge1 0 }
      elseif (%wavestorm-z05 == 1) { set %wavestorm-dodge1 333 }
      elseif (%wavestorm-z06 == 1) { set %wavestorm-dodge1 1332 }
      else { set %wavestorm-dodge1 666 }
      if (%wavestorm-z10 == 1) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 2) }
      elseif (%wavestorm-z10 == 2) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 4) }
      if (%wavestorm-battleground == s03) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 2) }
      if (%wavestorm-battleground == s12) {
        set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 5 / 3)
        var %wavestorm-dodge-s12 = 1
      }
      if (%wavestorm-battleground == s17) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 2) }
      if ($hget(Player,Modifier) isletter bj) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 2) }
      if ($hget(Player,Modifier) == f) { set %wavestorm-dodge1 0 }
      if ($hget(Player,Weapon) == 1) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 1.4) }
      elseif ($hget(Player,Weapon) == 2) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 1.4) }
      elseif ($hget(Player,Weapon) == 3) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 1.8) }
      elseif ($hget(Player,Weapon) == 4) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 1.6) }
      elseif ($hget(Player,Weapon) == 5) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 1.6) }
      elseif ($hget(Player,Weapon) == 6) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 1.2) }
      elseif ($hget(Player,Weapon) == 7) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 2) }
      elseif ($hget(Player,Weapon) == 8) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 1.8) }
      elseif ($hget(Player,Weapon) == 9) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 * 1.2) }
      elseif ($hget(Player,Weapon) == 10) { set %wavestorm-dodge1 $calc(%wavestorm-dodge1 / 2) }
      set %wavestorm-dodge1 $int(%wavestorm-dodge1)
      if (($rand(0,%wavestorm-dodge1) isnum 1 - $hget(Player,Level)) || (%wavestorm-z03 isnum 1 - 2)) {
        if ((%wavestorm-battleground = s03) && ($rand(1,4) == 4)) { goto custom-dodge5 }
        if (%wavestorm-dodge-s12 == 1) { goto custom-dodge6 }
        if ((%wavestorm-z03 == 1) || (%wavestorm-z03 == 3)) { goto custom-dodge3 }
        if (%wavestorm-z03 == 2) { goto custom-dodge4 }
        if ($exists(" $+ $scriptdirWSdodge.wvs") == $false) { goto custom-dodge1 }
        if ((%wave-custom-dodge1 != 1) && (%wave-custom-dodge2 != 1)) { goto custom-dodge1 }
        elseif ((%wave-custom-dodge1 == 1) && (%wave-custom-dodge2 != 1)) { goto custom-dodge1 }
        elseif ((%wave-custom-dodge2 == 1) && (%wave-custom-dodge1 != 1)) { goto custom-dodge2 }
        elseif ((%wave-custom-dodge1 == 1) && (%wave-custom-dodge2 == 1)) {
          var %wave-custom-dodge3 = $rand(1,$calc(10 + $lines(" $+ $scriptdirWSdodge.wvs")))
          if (%wave-custom-dodge3 <= 10) { goto custom-dodge1 }
          else { goto custom-dodge2 }
        }
        :custom-dodge1
        var %wavestorm-dodge = $rand(1,10)
        if (%wavestorm-dodge == 1) { 
          if ($hget(Player,Weapon) == 10) { display2 %wavechat knocks $+($nick,'s) attack away }
          else { display2 %wavechat knocks $+($nick,'s) attack away with %wavestorm-gender3 $lower($hget(Player,Weaponname)) }
        }
        elseif (%wavestorm-dodge == 2) { display2 %wavechat hops backwards through the air to avoid the attack }
        elseif (%wavestorm-dodge == 3) { display2 %wavechat hops into a plothole in the ground and dodges the attack, then hops back out as the plothole disappears }
        elseif (%wavestorm-dodge == 4) { display2 %wavechat leans back and falls to the ground, watching as $nick flies over %wavestorm-gender2 }
        elseif (%wavestorm-dodge == 5) {
          if ($rand(1,2) == 1) { display2 %wavechat sidesteps to left, dodging the attack }
          else { display2 %wavechat sidesteps to right, dodging the attack }
        }
        elseif (%wavestorm-dodge == 6) { display2 %wavechat runs right past $nick before the attack can even get off }
        elseif (%wavestorm-dodge == 7) {
          :dodgenick
          set %wavestorm-dodgenick $nick(%wavechat,$rand(1,$nick(%wavechat,0)))
          if ((%wavestorm-dodgenick == $me) || (%wavestorm-dodgenick == $nick)) { goto dodgenick }
          elseif ($nick(%wavechat,0) < 3) { set %wavestorm-dodgenick Wavestorm-Null }
          if (%wavestorm-dodgenick == Wavestorm-Null) { display2 %wavechat runs forward and tosses $+(%wavestorm-gender2,self) into $+($nick,'s) attack, sending both of them sprawling to the ground, but allowing $me to dodge the attack }
          else {
            display2 %wavechat picks up and tosses %wavestorm-dodgenick into $+($nick,'s) attack, sending both of them sprawling to the ground
            .notice %wavestorm-dodgenick Wavestorm %wavestorm-battleground %wavestorm-dodgenick a001 $gettok($1-,$numtok($1-,32),32)
            .notice $nick Wavestorm %wavestorm-battleground $nick a001 $gettok($1-,$numtok($1-,32),32)
          }
          unset %wavestorm-dodgenick
        }
        elseif (%wavestorm-dodge == 8) { display2 %wavechat pulls a Matrix and bends backwards, $+($nick,'s) attack passing by %wavestorm-gender2 multiple times with futuristic, air-rippling special effects }
        elseif (%wavestorm-dodge == 9) { display2 %wavechat grabs $+($nick,'s) shoulders and flips over and around, landing behind $nick and dodging the attack }
        elseif (%wavestorm-dodge == 10) { display2 %wavechat backs away and trips over a misplaced rock, but, lying on the floor, %wavestorm-gender1 manages to dodge the attack just as well }
        goto custom-dodge-skip
        :custom-dodge2
        var %custom-dodge-replace = $replace($read(" $+ $scriptdirWSdodge.wvs"),!target,$1,!enemy,$nick,!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        display2 %wavechat $replace(%custom-dodge-replace,!weapon,$readini(" $+ $scriptdirWSInfo1.ini",Weapon,$+($hget(Player,Weapon),$hget(Player,Modifier))))
        goto custom-dodge-skip
        :custom-dodge3
        display2 %wavechat cringes as the attack comes, but before it hits, an electric outer shell appears, completely surrounding %wavestorm-gender2 and blocking the attack
        dec %wavestorm-z03turn 1
        goto custom-dodge-skip
        :custom-dodge4
        display2 %wavechat sees the uncoming attack and makes no attempt to move, and the attack passes right through %wavestorm-gender3 shadowy body!
        dec %wavestorm-z03turn 1
        goto custom-dodge-skip
        :custom-dodge5
        display2 %wavechat ducks down into the abundant overgrowth, and the attack flies right over %wavestorm-gender3 head
        goto custom-dodge-skip
        :custom-dodge6
        set %wavestorm-s12cube $rand(1,3)
        if (%wavestorm-s12cube == 1) { display2 %wavechat flails onto the wall as the room rotates, and %wavestorm-gender1 falls past attack! }
        elseif (%wavestorm-s12cube == 2) { display2 %wavechat flails onto the ceiling as the room rotates, and %wavestorm-gender1 falls past the attack! }
        elseif (%wavestorm-s12cube == 3) { display2 %wavechat flails onto the floor as the room rotates, and %wavestorm-gender1 falls past the attack! }
        unset %wavestorm-s12cube
        :custom-dodge-skip
        if ((%wavestorm-z03turn < 1) || (!%wavestorm-z03turn)) {
          if (%wavestorm-z03 == 1) { unset %wavestorm-z03* | display2 %wavechat is surrounded by a sudden burst of high voltage as Khaki Fortify wears off }
          if (%wavestorm-z03 == 2) { unset %wavestorm-z03* | display2 %wavechat reverts from a mystical umbra back to %wavestorm-gender3 regular form as Silver Nocturne wears off }
          if (%wavestorm-z03 == 3) { unset %wavestorm-z03* | display2 %wavechat blinks as %wavestorm-gender3 physical shield fades away }
        }
        return
      }
      :dodgepast
      set %wavestorm-hploss $round($rand($calc(($gettok($1-,$numtok($1-,32),32) * 680 / 99)),$calc(($gettok($1-,$numtok($1-,32),32) * 680 / 99) + 20)),0)
      if (%wavestorm-z24 == 1) { set %wavestorm-hploss $calc(%wavestorm-hploss / 2) }
      if (%wavestorm-z03 == 1) {
        set %wavestorm-hploss 0
        dec %wavestorm-z03turn 1
      }
      if (%wavestorm-z20 == 1) {
        set %wavestorm-hploss $calc(%wavestorm-hploss / 3)
        dec %wavestorm-z20turn 1
      }
      if ((%wavestorm-battleground == s04) && (%test == 1)) {
        if ($readini(" $+ $scriptdirWSInfo3.ini",$nick,s04level) == $null) { writeini" $+ $scriptdirWSInfo3.ini" $nick s04level 1 }
        set %wavestorm-s04difference $abs($calc(%wavestorm-s04level - $readini(" $+ $scriptdirWSInfo3.ini",$nick,s04level)))
        if (%wavestorm-s04difference != 0) { set %wavestorm-hploss $calc(%wavestorm-hploss / %wavestorm-s04difference ) }
        unset %wavestorm-s04difference
      }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 210) && ($hget(Player,Wavelength) == 5)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 220) && ($hget(Player,Wavelength) == 4)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 230) && ($hget(Player,Wavelength) == 8)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 240) && ($hget(Player,Wavelength) == 4)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 250) && ($hget(Player,Wavelength) == 2)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 260) && ($hget(Player,Wavelength) == 7)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 270) && ($hget(Player,Wavelength) == 6)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 280) && ($hget(Player,Wavelength) == 3)) { hpweakness }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 210) && ($hget(Player,Wavelength) == 1)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 220) && ($hget(Player,Wavelength) == 2)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 230) && ($hget(Player,Wavelength) == 3)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 240) && ($hget(Player,Wavelength) == 4)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 250) && ($hget(Player,Wavelength) == 5)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 260) && ($hget(Player,Wavelength) == 6)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 270) && ($hget(Player,Wavelength) == 7)) { hpweakness switch }
      if (($right($gettok($1-,$calc($numtok($1-,32) - 1),32),-1) == 280) && ($hget(Player,Wavelength) == 8)) { hpweakness switch }
      set %wavestorm-hploss $round(%wavestorm-hploss,0)
      dec %wavestorm-hp %wavestorm-hploss
      inc %wavestorm-omega $int($calc($gettok($1-,$numtok($1-,32),32) ^ (1 / 3)))
      if (%wavestorm-omega >= 100) { set %wavestorm-omega 100 | if ($dialog(Datascope)) { did -e datascope 4 } }
      if (%wavestorm-hp < 0) { set %wavestorm-hp 0 }
      if (%wavestorm-z20 == 1) {
        set %wavestorm-z20test 1
        display2 %wavechat watches as $1 attacks through the heat barrier and takes damage!
        attack $1
      }
      var %soundtest = $rand(1,2)
      if (%soundtest == 2) { var %soundtest = 3 }
      wavesound %soundtest
      display2 %wavechat is hit!  $me loses %wavestorm-hploss HP!  Current HP: %wavestorm-hp
      if ((%wavestorm-z03 == 1) && (%wavestorm-z03turn < 1)) {
        unset %wavestorm-z03*
        display2 %wavechat frowns as the Khaki Fortify shield dissipates
      }
      if ((%wavestorm-z20 == 1) && (%wavestorm-z20turn < 1)) {
        unset %wavestorm-z20*
        display2 %wavechat frowns as the Cadmium Barrier shield dissipates
      }
      set %wavestorm-z04properhit 1
      unset %wavestorm-hploss
      unset %wavestorm-hpgain
      unset %wavestorm-mploss
      unset %wavestorm-mpgain
      if (%wavestorm-hp == 0) { nohp $nick | return }
      goto continue
      :magic
      set %wavestorm-magicid $right($gettok($1-,$calc($numtok($1-,32) - 1),32),2)
      if ((%wavestorm-z01 == 1) && (%wavestorm-magicid != 39) && (%wavestorm-magicid != 41)) { return }
      if (%wavestorm-magic-wavebeast == 1) { unset %wavestorm-magic-wavebeast | return }
      if ((%wavestorm-z14 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        display2 %wavechat grins as the crystal mirror in front of %wavestorm-gender2 shimmers, and bounces the magic attack right back at $nick
        .notice %wavechat Wavestorm $gettok($1-,$calc($numtok($1-,32) - 3),32) $nick $gettok($1-,$calc($numtok($1-,32) - 1),32) $gettok($1-,$numtok($1-,32),32)
        unset %wavestorm-z14*
        display2 %wavechat puts %wavestorm-gender3 guard up as %wavestorm-gender3 reflect shield sizzles out
        return
      }
      if ((%wavestorm-z16 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        dec %wavestorm-z16turn 1
        display2 %wavechat gets ready to get smacked, but the obsidian cover in front of %wavestorm-gender2 cancels the magic attack 
        if ((%wavestorm-z16turn < 1) || (%wavestorm-z16turn == $null)) {
          unset %wavestorm-z16*
          display2 %wavechat prepares to fight as %wavestorm-gender3 magic shield disintegrates
        }
        return
      }
      if ((%wavestorm-z18 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        display2 %wavechat shifts into shadow form and phases right through the attack! 
        if ((%wavestorm-z18turn < 1) || (%wavestorm-z18turn == $null)) {
          unset %wavestorm-z18*
          display2 %wavechat prepares to fight as %wavestorm-gender3 shadow abilities vanish
        }
        return
      }
      if (%wavestorm-z19 == 1) {
        display2 %wavechat throws up %wavestorm-gender3 arms and neutralizes the magic! 
        if ((%wavestorm-z19turn < 1) || (%wavestorm-z19turn == $null)) {
          unset %wavestorm-z19*
          display2 %wavechat prepares to fight as %wavestorm-gender3 neutralization powers fades
        }
        return
      }
      if ($left(%wavestorm-magicid,1) == 0) { set %wavestorm-magicid $right(%wavestorm-magicid,1) }
      if (%wavestorm-melee != 1) {
        if (($7 != 1) || (($nick == %wavestorm-enemy1) || ($nick == %wavestorm-enemy2) || ($nick == %wavestorm-enemy3) || ($nick == %wavestorm-enemy4)) && ($readini(" $+ $scriptdirWSInfo1.ini",$+(1Tier,%wavestorm-magicid),Target) == 1)) { return }
        if (($7 == 1) && (($nick == %wavestorm-friend1) || ($nick == %wavestorm-friend2) || ($nick == %wavestorm-friend3)) && ($readini(" $+ $scriptdirWSInfo1.ini",$+(1Tier,%wavestorm-magicid),Target) == 2)) { return }
      }
      if ((%wavestorm-magicid == 46) && ($hget(Player,Modifier) isletter hj)) { return }
      var %wavestorm-magicidcheck = %wavestorm-magicid
      if ($len(%wavestorm-magicidcheck) == 1) { var %wavestorm-magicidcheck = 0 $+ %wavestorm-magicidcheck }
      if (%wavestorm-melee != 1) { var %wavestorm-magicidmelee = 15 }
      else { var %wavestorm-magicidmelee = 0 }
      if (%wavestorm-magicidcheck isin 09 13 20 32 34 37 43 54 55 67 68) {
        if (%wavestorm-z03) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z05) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z09) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z10) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z12) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z13) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z14) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z15) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z16) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z18) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z19) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z20) { dec %wavestorm-magicidmelee 15 }
      }
      elseif (%wavestorm-magicidcheck isin 02 06 11 23 24 27 30 46 47 51 58 60 65) {
        if (%wavestorm-z02) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z04) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z06) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z07) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z08) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z11) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z17) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z21) { dec %wavestorm-magicidmelee 10 }
      }
      if ((%wavestorm-magicidcheck isin 09 13 20 32 34 37 43 54 55 67 68) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-magicidmelee + $int(($gettok($1-,$numtok($1-,32),32) / 4))))) {
        display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Failure2),!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        goto continue
      }
      elseif ((%wavestorm-magicidcheck isin 39 41) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-magicidmelee + $int(($gettok($1-,$numtok($1-,32),32) / 2))))) {
        display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Failure2),!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        goto continue
      }
      elseif ((%wavestorm-magicidcheck isin 02 06 11 23 24 27 30 46 47 51 58 60 65) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-magicidmelee + $gettok($1-,$numtok($1-,32),32) - $hget(Player,Level)))) {
        display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Failure2),!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        goto continue
      }
      magiccommand 1 %wavestorm-magicid 1 $nick
      if (%wavestorm-hpgain != $null) {
        set %wavestorm-hpgain $round(%wavestorm-hpgain,0)
        inc %wavestorm-hp %wavestorm-hpgain
        if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
      }
      elseif (%wavestorm-hploss != $null) {
        set %wavestorm-hploss $round(%wavestorm-hploss,0)
        dec %wavestorm-hp %wavestorm-hploss
        inc %wavestorm-omega $int($calc($gettok($1-,$numtok($1-,32),32) ^ (1 / 3)))
        if (%wavestorm-omega >= 100) { set %wavestorm-omega 100 }
      }
      if (%wavestorm-hp < 1) { set %wavestorm-hp 0 }
      if (((%wavestorm-magicid == 39) || (%wavestorm-magicid == 41)) && (%wavestorm-z01 != 1)) { return }
      if (((%wavestorm-magicid == 43) && ((%wavestorm-z05 == 0) || (%wavestorm-z05 == $null))) || ((%wavestorm-magicid == 46) && ((%wavestorm-z06 == 0) || (%wavestorm-z06 == $null)))) {
        display2 %wavechat blinks as the haste and slow powers react and cancel each other out
      }
      elseif ((%wavestorm-magicid == 43) && (%wavestorm-hastestopcounter == 1)) {
        unset %wavestorm-hastestopcounter
        wavestop2 hastestopcounter
      }
      else { display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Saying2),!target,$nick,!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3) }
      if (%wavestorm-hpgain != $null) { display2 %wavechat gains %wavestorm-hpgain HP!  Current HP: %wavestorm-hp }
      elseif (%wavestorm-hploss != $null) {
        var %soundtest = $rand(1,2)
        if (%soundtest == 2) { var %soundtest = 3 }
        wavesound %soundtest
        display2 %wavechat loses %wavestorm-hploss HP!  Current HP: %wavestorm-hp
      }
      if (%wavestorm-mpgain != $null) { display2 %wavechat gains %wavestorm-mpgain MP!  Current MP: %wavestorm-mp }
      elseif (%wavestorm-mploss != $null) {
        var %soundtest = $rand(1,2)
        if (%soundtest == 2) { var %soundtest = 3 }
        wavesound %soundtest
        display2 %wavechat loses %wavestorm-mploss MP!  Current MP: %wavestorm-mp
      }
      if (%wavestorm-magicid == 2) { .notice $nick Wavestorm %wavestorm-battleground $nick w1 %wavestorm-hploss }
      unset %wavestorm-hpgain
      unset %wavestorm-hploss
      unset %wavestorm-mploss
      unset %wavestorm-mpgain
      if (%wavestorm-hp == 0) { nohp $nick | return }
      goto continue
      :magic2
      magic2r $nick $1-
      goto continue
      :magic3
      magic3r $nick $1-
      goto continue
      :magic4
      if ($len($gettok($1-,$calc($numtok($1-,32) - 1),32)) == 2) { set %wavestorm-magic4id $right($gettok($1-,$calc($numtok($1-,32) - 1),32),1) }
      elseif ($len($gettok($1-,$calc($numtok($1-,32) - 1),32)) == 3) { set %wavestorm-magic4id $right($gettok($1-,$calc($numtok($1-,32) - 1),32),2) }
      if (%wavestorm-z01 == 1) { return }
      if ((%wavestorm-melee != 1) && ($7 != 1)) {
        if ((($nick == %wavestorm-enemy1) || ($nick == %wavestorm-enemy2) || ($nick == %wavestorm-enemy3) || ($nick == %wavestorm-enemy4)) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == 1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == 3))) { return }
        if ((($nick == %wavestorm-friend1) || ($nick == %wavestorm-friend2) || ($nick == %wavestorm-friend3)) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == 2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == 4))) { return }
      }
      else {
        if (($me isin $gettok($1-,$calc($numtok($1-,32) - 3),32)) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == 2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == 4))) { return }
        if (($me !isin $gettok($1-,$calc($numtok($1-,32) - 3),32)) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == 1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == 3))) { return }
      }
      if ((%wavestorm-melee != 1) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == 1) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == 3)) && (($nick != %wavestorm-friend1) && ($nick != %wavestorm-friend2) && ($nick != %wavestorm-friend3))) { return }
      if ((%wavestorm-melee != 1) && (($gettok($1-,$calc($numtok($1-,32) - 2),32) == 2) || ($gettok($1-,$calc($numtok($1-,32) - 2),32) == 4)) && (($nick != %wavestorm-enemy1) && ($nick != %wavestorm-enemy2) && ($nick != %wavestorm-enemy3) && ($nick != %wavestorm-enemy4))) { return }
      if (%wavestorm-magic-wavebeast == 1) { unset %wavestorm-magic-wavebeast | return }
      if ((%wavestorm-z14 == 1) && (%wavestorm-magic4id != 11)) {
        display2 %wavechat grins as the crystal mirror in front of %wavestorm-gender2 shimmers, and bounces summon right back at $nick
        .notice $nick Wavestorm $gettok($1-,$calc($numtok($1-,32) - 5),32) $nick $gettok($1-,$calc($numtok($1-,32) - 1),32) $gettok($1-,$numtok($1-,32),32)
        unset %wavestorm-z14*
        display2 %wavechat puts %wavestorm-gender3 guard up as %wavestorm-gender3 reflect shield sizzles out
        return
      }
      if ((%wavestorm-z16 == 1) && (%wavestorm-magicid != 11)) {
        dec %wavestorm-z16turn 1
        display2 %wavechat gets ready to get smacked, but the obsidian cover in front of %wavestorm-gender2 cancels the magic attack 
        unset %wavestorm-z16*
        if ((%wavestorm-z16turn < 1) || (%wavestorm-z16turn == $null)) {
          unset %wavestorm-z16*
          display2 %wavechat prepares to fight as %wavestorm-gender3 magic shield disintegrates
        }
        return
      }
      if ((%wavestorm-z18 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        display2 %wavechat shifts into shadow form and phases right through the attack! 
        if ((%wavestorm-z18turn < 1) || (%wavestorm-z18turn == $null)) {
          unset %wavestorm-z18*
          display2 %wavechat prepares to fight as %wavestorm-gender3 shadow abilities vanish
        }
        return
      }
      if (%wavestorm-z19 == 1) {
        display2 %wavechat throws up %wavestorm-gender3 arms and neutralizes the magic! 
        if ((%wavestorm-z19turn < 1) || (%wavestorm-z19turn == $null)) {
          unset %wavestorm-z19*
          display2 %wavechat prepares to fight as %wavestorm-gender3 neutralization powers fades
        }
        return
      }
      magiccommand 4 %wavestorm-magic4id 1 $nick $gettok($1-,$numtok($1-,32),32)
      if (%wavestorm-hpgain != $null) {
        set %wavestorm-hpgain $round(%wavestorm-hpgain,0)
        inc %wavestorm-hp %wavestorm-hpgain
        if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
      }
      elseif (%wavestorm-hploss != $null) {
        set %wavestorm-hploss $round(%wavestorm-hploss,0)
        dec %wavestorm-hp %wavestorm-hploss
        inc %wavestorm-omega $int($calc($gettok($1-,$numtok($1-,32),32) ^ (1 / 3)))
        if (%wavestorm-omega >= 100) { set %wavestorm-omega 100 }
      }
      if (%wavestorm-hp < 1) { set %wavestorm-hp 0 }
      if ($readini(" $+ $scriptdirWSInfo1.ini",$+(4Tier,%wavestorm-magic4id),Saying2)) { display2 %wavechat $readini(" $+ $scriptdirWSInfo1.ini",$+(4Tier,%wavestorm-magic4id),Saying2) }
      if (%wavestorm-hpgain != $null) { display2 %wavechat gains %wavestorm-hpgain HP!  Current HP: %wavestorm-hp }
      elseif (%wavestorm-hploss != $null) {
        var %soundtest = $rand(1,2)
        if (%soundtest == 2) { var %soundtest = 3 }
        wavesound %soundtest
        if ($gettok($1-,$calc($numtok($1-,32) - 2),32) isnum 1 - 2) { display2 %wavechat loses %wavestorm-hploss HP!  Current HP: %wavestorm-hp }
        else { display2 %wavechat is hit!  $me loses %wavestorm-hploss HP!  Current HP: %wavestorm-hp }
      }
      unset %wavestorm-hpgain
      unset %wavestorm-hploss
      unset %wavestorm-mploss
      unset %wavestorm-mpgain
      if (%wavestorm-hp == 0) { nohp $nick 1 $gettok($1-,$calc($numtok($1-,32) - 3),32) | return }
      goto continue
      :drain
      if (%wavestorm-z01 == 1) { return }
      set %wavestorm-hpgain $gettok($1-,$numtok($1-,32),32)
      inc %wavestorm-hp %wavestorm-hpgain
      if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
      display2 %wavechat absorbs the energy and gains %wavestorm-hpgain HP!  Current HP: %wavestorm-hp
      unset %wavestorm-hpgain
      goto continue
      :item
      if (($7 != 1) && ($nick != %wavestorm-friend1) && ($nick != %wavestorm-friend2) && ($nick != %wavestorm-friend3) && (%wavestorm-melee != 1)) { return }
      set %wavestorm-itemid $right($gettok($1-,$calc($numtok($1-,32) - 1),32),2)
      if ($left(%wavestorm-itemid,1) == 0) { set %wavestorm-itemid $right(%wavestorm-itemid,1) }
      if ((%wavestorm-z01 == 1) && (%wavestorm-itemid != 8)) { return }
      if ((%wavestorm-z7mode == 4) || (%wavestorm-z7mode == 6)) { return }
      if (((%wavestorm-itemid == 10) || (%wavestorm-itemid == 39)) && ($hget(Player,Modifier) isletter hj)) { return }

      if (%wavestorm-melee != 1) { var %wavestorm-itemidmelee == 15 }
      else { var %wavestorm-itemidmelee == 0 }
      if (%wavestorm-itemid isin 06 07 08 09 11 12 14 16 17 19 22 38) {
        if (%wavestorm-z03) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z05) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z09) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z10) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z12) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z13) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z14) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z15) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z16) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z18) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z19) { dec %wavestorm-itemidmelee 15 }
        if (%wavestorm-z20) { dec %wavestorm-itemidmelee 15 }
      }
      elseif (%wavestorm-itemid isin 10 13 15 18 20 21 39 40) {
        if (%wavestorm-z02) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z04) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z06) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z07) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z08) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z11) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z17) { dec %wavestorm-itemidmelee 10 }
        if (%wavestorm-z21) { dec %wavestorm-itemidmelee 15 }
      }
      if ((%wavestorm-itemidmelee isin 6 7 8 9 11 12 14 16 17 19 22 38) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-itemidmelee + $int(($gettok($1-,$numtok($1-,32),32) / 4))))) {
        display2 %wavechat frowns as the item fails to take effect!
        goto continue
      }
      elseif ((%wavestorm-itemidmelee isin 10 13 15 18 20 21 39 40) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-itemidmelee + $gettok($1-,$numtok($1-,32),32) - $hget(Player,Level)))) {
        display2 %wavechat smiles as the item fails to take effect!
        goto continue
      }


      if (%wavestorm-itemid == 1) {
        inc %wavestorm-hp 50
        if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
        display2 %wavechat gains 50 HP!  Current HP: %wavestorm-hp
      }
      elseif (%wavestorm-itemid == 2) {
        inc %wavestorm-hp 350
        if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
        display2 %wavechat gains 350 HP!  Current HP: %wavestorm-hp
      }
      elseif (%wavestorm-itemid == 3) {
        inc %wavestorm-hp 2000
        if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
        display2 %wavechat gains 2000 HP!  Current HP: %wavestorm-hp
      }
      elseif (%wavestorm-itemid == 4) {
        inc %wavestorm-mp 50
        if (%wavestorm-mp > $hget(Player,MagicPoints)) { set %wavestorm-mp $hget(Player,MagicPoints) }
        display2 %wavechat gains 50 MP!  Current MP: %wavestorm-mp
      }
      elseif (%wavestorm-itemid == 5) {
        inc %wavestorm-mp 250
        if (%wavestorm-mp > $hget(Player,MagicPoints)) { set %wavestorm-mp $hget(Player,MagicPoints) }
        display2 %wavechat gains 250 MP!  Current MP: %wavestorm-mp
      }
      elseif (%wavestorm-itemid == 6) {
        set %wavestorm-hpgain $calc($hget(Player,HealthPoints) - %wavestorm-hp)
        set %wavestorm-mpgain $calc($hget(Player,MagicPoints) - %wavestorm-mp)
        set %wavestorm-hp $hget(Player,HealthPoints)
        set %wavestorm-mp $hget(Player,MagicPoints)
        display2 %wavechat gains %wavestorm-hpgain HP and %wavestorm-mpgain MP!  Current HP: %wavestorm-hp - Current MP: %wavestorm-mp
      }
      elseif (%wavestorm-itemid == 7) {
        set %wavestorm-hpgain $calc($hget(Player,HealthPoints) - %wavestorm-hp)
        set %wavestorm-mpgain $calc($hget(Player,MagicPoints) - %wavestorm-mp)
        set %wavestorm-hp $hget(Player,HealthPoints)
        set %wavestorm-mp $hget(Player,MagicPoints)
        display2 %wavechat gains %wavestorm-hpgain HP and %wavestorm-mpgain MP!  Current HP: %wavestorm-hp - Current MP: %wavestorm-mp
      }
      elseif (%wavestorm-itemid == 8) {
        if (%wavestorm-z01 == 1) {
          wavereset 1
          display2 %wavechat is brought back to life!
          .notice %wavechat Wavestorm z01 %wavestorm-levelsend
      } }
      elseif (%wavestorm-itemid == 9) {
        if (%wavestorm-z02 > 0) {
          unset %wavestorm-z02*
          display2 %wavechat is no longer poisoned!
      } }
      elseif (%wavestorm-itemid == 10) {
        if ((%wavestorm-z05 == 1) && (%wavestorm-z17 != 1)) {
          unset %wavestorm-z05
          display2 %wavechat is no longer hasted!
      } }
      elseif (%wavestorm-itemid == 11) {
        if (%wavestorm-z17 != 1) { return }
        if (%wavestorm-z06 == 1) {
          unset %wavestorm-z06
          set %wavestorm-itemid11ok 1
        }
        if (%wavestorm-b14 == 1) {
          unset %wavestorm-b14
          set %wavestorm-itemid11ok 1
        }
        if (%wavestorm-b12 == 1) {
          unset %wavestorm-b12
          set %wavestorm-itemid11ok 1
        }
        if (%wavestorm-b27 == 1) {
          unset %wavestorm-b27
          set %wavestorm-itemid11ok 1
        }
        if (%wavestorm-itemid11ok == 1) {
          unset %wavestorm-itemid11ok
          display2 %wavechat is no longer slowed!
        }
        if (%wavestorm-z07 == 1) {
          wavestop2
      } }
      elseif (%wavestorm-itemid == 12) {
        if (%wavestorm-z04 == 1) {
          unset %wavestorm-z04
          display2 %wavechat is no longer asleep!
        }
        if (%wavestorm-z08 == 1) {
          unset %wavestorm-z08
          display2 %wavechat is no longer weakened!
        }
        goto continue2
      }
      elseif (%wavestorm-itemid == 13) {
        if (%wavestorm-z02 !isnum 1 - 4) { set %wavestorm-z02 4 }
        display2 %wavechat is poisoned!
      }
      elseif (%wavestorm-itemid == 14) {
        if (%wavestorm-z08 == 1) {
          unset %wavestorm-z08
          display2 %wavechat watches as %wavestorm-gender3 physical strength jumps back to normal
        }
        else {
          unset %wavestorm-z08
          set %wavestorm-z12 1
          display2 %wavechat has %wavestorm-gender3 physical strength boosted!
      } }
      elseif (%wavestorm-itemid == 15) {
        if (%wavestorm-z12 == 1) {
          unset %wavestorm-z12
          display2 %wavechat watches as %wavestorm-gender3 physical strength drops back to normal
        }
        else {
          unset %wavestorm-z12
          set %wavestorm-z08 1
          display2 %wavechat frowns as %wavestorm-gender3 physical strength drops below normal!
      } }
      elseif (%wavestorm-itemid == 16) {
        if (%wavestorm-z03 != 1) {
          set %wavestorm-z03 3
          set %wavestorm-z03turn 3
          display2 %wavechat smiles as a physical shield sets itself up in front of $+(%wavestorm-gender2,!)
      } }
      elseif (%wavestorm-itemid == 17) {
        if (%wavestorm-z16 != 1) {
          set %wavestorm-z16 1
          set %wavestorm-z16turn 3
          display2 %wavechat smiles as a magical shield sets itself up in front of $+(%wavestorm-gender2,!)
      } }
      elseif (%wavestorm-itemid == 18) {
        if ((%wavestorm-z03 isnum 1 - 3) && (%wavestorm-z16 == 1)) {
          unset %wavestorm-z03*
          unset %wavestorm-z16*
          display2 %wavechat frowns as both %wavestorm-gender3 physical and magic shields distegrate
        }
        elseif ((%wavestorm-z03 isnum 1 - 3) && (%wavestorm-z16 != 1)) {
          unset %wavestorm-z03*
          display2 %wavechat frowns as %wavestorm-gender3 physical shield distegrates
        }
        elseif ((%wavestorm-z03 !isnum 1 - 3) && (%wavestorm-z16 == 1)) {
          unset %wavestorm-z16*
          display2 %wavechat frowns as %wavestorm-gender3 magical shield distegrates
      } }
      elseif (%wavestorm-itemid == 19) {
        if (%wavestorm-z10 != 1) {
          set %wavestorm-z10 1
          display2 %wavechat grins as %wavestorm-gender1 dodge ability gets boosted
      } }
      elseif (%wavestorm-itemid == 20) {
        if (%wavestorm-z10 == 1) {
          unset %wavestorm-z10
          display2 %wavechat frowns as %wavestorm-gender1 loses part of %wavestorm-gender3 dodge ability
      } }
      elseif (%wavestorm-itemid == 21) {
        if (%wavestorm-z17 !isnum 1 - 2) {
          set %wavestorm-z17 1
          if ((%wavestorm-melee != 1) && (($nick == %wavestorm-enemy1) || ($nick == %wavestorm-enemy2) || ($nick == %wavestorm-enemy3) || ($nick == %wavestorm-enemy4))) { set -n %wavestorm-z17nick $nick }
          else { unset %wavestorm-z17nick }
          if ((%wavestorm-z05 isnum 1 - 3) || (%wavestorm-z05 == 8)) { set %wavestorm-z17haste 1 }
          .timerfrenzy 1 45 wavestorm-frenzycool
          if (%wavestorm-z17haste == 1) { display2 %wavechat screams in pain as %wavestorm-gender3 already hasted body shifts into frenzied mode, shooting %wavestorm-gender3 body past its limits }
          else { display2 %wavechat loses control of %wavestorm-gender3 body and shifts into frenzied mode! }
          startbattletimer
      } }
      elseif (%wavestorm-itemid == 22) {
        if (%wavestorm-z17 == 1) { 
          wavestorm-frenzycool
          if (%wavestorm-z22 == 1) { unset %wavestorm-z22* }
        }
        else {
          if (%wavestorm-z22 == 1) {
            unset %wavestorm-z22*
            display2 %wavechat blinks and shakes %wavestorm-gender3 head as the confusion wears off
      } } }
      elseif (%wavestorm-itemid == 38) {
        if (%wavestorm-z07 > 0) {
          wavestop2 hastestopcounter2
        }
        elseif ((%wavestorm-z05 !isnum 1 - 2) && (%wavestorm-s05mode !isnum 1 - 2) && (%wavestorm-z06 !isnum 1 - 2) && (%wavestorm-b14 != 1) && (%wavestorm-b12 != 1) && (%wavestorm-b27 != 1) && (%wavestorm-z17 != 1)) {
          set %wavestorm-z05 2
          set %wavestorm-z05turn 5
          display2 %wavechat grins as %wavestorm-gender1 can suddenly move twice as fast!
      } }
      elseif (%wavestorm-itemid == 39) {
        if ($hget(Player,Modifier) isletter hj) { return }
        if ((%wavestorm-z05 !isnum 1 - 2) && (%wavestorm-s05mode !isnum 1 - 2) && (%wavestorm-z06 !isnum 1 - 2) && (%wavestorm-b14 != 1) && (%wavestorm-b12 != 1) && (%wavestorm-b27 != 1) && (%wavestorm-z17 != 1)) {
          set %wavestorm-z06 2
          set %wavestorm-z06turn 5
          display2 %wavechat frowns as %wavestorm-gender1 starts moving more than twice as slow as %wavestorm-gender3 usual speed
      } }
      elseif (%wavestorm-itemid == 40) {
        if (%wavestorm-z17 != 1) {
          unset %wavestorm-z04*
          unset %wavestorm-z05*
          unset %wavestorm-z06*
          set %wavestorm-z07mode 8
          display2 %wavechat tries to move but is frozen in place!
          wavestop
      } }
      elseif ((%wavestorm-itemid isnum 23 - 37) || (%wavestorm-itemid isnum 41 - 49) || (%wavestorm-itemid isnum 51 - 56)) {
        set %wavestorm-hploss $readini(" $+ $scriptdirWSInfo1.ini",$+(Shop,%wavestorm-itemid),HP)
        set %wavestorm-hploss $rand(%wavestorm-hploss,$calc(%wavestorm-hploss + ($gettok($1-,$numtok($1-,32),32) * 3)))
        if (%wavestorm-z24 == 1) { set %wavestorm-hploss $calc(%wavestorm-hploss / 2) }
        set %wavestorm-weaknesstest $hget(Player,Wavelength)
        if (((%wavestorm-weaknesstest == 1) && (%wavestorm-itemid isnum 30 - 32)) || ((%wavestorm-weaknesstest == 2) && (%wavestorm-magicid isnum 33 - 35)) || ((%wavestorm-weaknesstest == 3) && (%wavestorm-magicid isnum 45 - 47)) || ((%wavestorm-weaknesstest == 4) && (%wavestorm-magicid isnum 24 - 26)) || ((%wavestorm-weaknesstest == 5) && (%wavestorm-magicid isnum 21 - 23)) || ((%wavestorm-weaknesstest == 6) && (%wavestorm-magicid isnum 39 - 41)) || ((%wavestorm-weaknesstest == 7) && (%wavestorm-magicid isnum 42 - 44)) || ((%wavestorm-weaknesstest == 8) && (%wavestorm-magicid isnum 27 - 29))) {
          set %wavestorm-hploss $round($calc(%wavestorm-hploss * 6 / 5),0)
        }
        unset %wavestorm-weaknesstest
        set %wavestorm-hploss $round(%wavestorm-hploss,0)
        dec %wavestorm-hp %wavestorm-hploss
        if (%wavestorm-hp < 0) { set %wavestorm-hp 0 }
        inc %wavestorm-omega $int($calc($gettok($1-,$numtok($1-,32),32) ^ (1 / 3)))
        if (%wavestorm-omega >= 100) { set %wavestorm-omega 100 }
        var %soundtest = $rand(1,2)
        if (%soundtest == 2) { var %soundtest = 3 }
        wavesound %soundtest
        display2 %wavechat loses %wavestorm-hploss HP!  Current HP: %wavestorm-hp
        unset %wavestorm-hploss
        unset %wavestorm-hpgain
        unset %wavestorm-mploss
        unset %wavestorm-mpgain
        if (%wavestorm-hp == 0) { nohp $nick | return }
      }
      elseif (%wavestorm-itemid == 50) {
        if (%wavestorm-z22 != 1) {
          set %wavestorm-z22
          display2 %wavechat spins around woozily as %wavestorm-gender1 loses track of who %wavestorm-gender3 teammates and enemies are!
      } }
      goto continue
      :wavebeast
      set %wavestorm-magicid $right($gettok($1-,$calc($numtok($1-,32) - 1),32),2)
      if ((%wavestorm-z01 == 1) && (%wavestorm-magicid != 39) && (%wavestorm-magicid != 41)) { return }
      if ((%wavestorm-z14 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        display2 %wavechat grins as the crystal mirror in front of %wavestorm-gender2 shimmers, and bounces the magic attack right back at $nick
        .notice %wavechat Wavestorm $gettok($1-,$calc($numtok($1-,32) - 3),32) $nick $gettok($1-,$calc($numtok($1-,32) - 1),32) $gettok($1-,$numtok($1-,32),32)
        unset %wavestorm-z14*
        display2 %wavechat puts %wavestorm-gender3 guard up as %wavestorm-gender3 reflect shield sizzles out
        return
      }
      if ((%wavestorm-z16 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        dec %wavestorm-z16turn 1
        display2 %wavechat gets ready to get smacked, but the obsidian cover in front of %wavestorm-gender2 cancels the magic attack 
        if ((%wavestorm-z16turn < 1) || (%wavestorm-z16turn == $null)) {
          unset %wavestorm-z16*
          display2 %wavechat prepares to fight as %wavestorm-gender3 magic shield disintegrates
        }
        return
      }
      if ((%wavestorm-z18 == 1) && (%wavestorm-magicid != 9) && (%wavestorm-magicid != 20) && (%wavestorm-magicid != 27) && (%wavestorm-magicid != 32) && (%wavestorm-magicid != 34) && (%wavestorm-magicid !isnum 36 - 41) && (%wavestorm-magicid != 43) && (%wavestorm-magicid != 45) && (%wavestorm-magicid !isnum 54 - 55)) {
        display2 %wavechat shifts into shadow form and phases right through the attack! 
        if ((%wavestorm-z18turn < 1) || (%wavestorm-z18turn == $null)) {
          unset %wavestorm-z18*
          display2 %wavechat prepares to fight as %wavestorm-gender3 shadow abilities vanish
        }
        return
      }
      if (%wavestorm-z19 == 1) {
        display2 %wavechat throws up %wavestorm-gender3 arms and neutralizes the magic! 
        if ((%wavestorm-z19turn < 1) || (%wavestorm-z19turn == $null)) {
          unset %wavestorm-z19*
          display2 %wavechat prepares to fight as %wavestorm-gender3 neutralization powers fades
        }
        return
      }
      if ($left(%wavestorm-magicid,1) == 0) { set %wavestorm-magicid $right(%wavestorm-magicid,1) }
      if ((($nick == %wavestorm-enemy1) || ($nick == %wavestorm-enemy2) || ($nick == %wavestorm-enemy3) || ($nick == %wavestorm-enemy4)) && ($readini(" $+ $scriptdirWSInfo1.ini",$+(1Tier,%wavestorm-magicid),Target) == 1)) { return }
      if ((($nick == %wavestorm-friend1) || ($nick == %wavestorm-friend2) || ($nick == %wavestorm-friend3)) && ($readini(" $+ $scriptdirWSInfo1.ini",$+(1Tier,%wavestorm-magicid),Target) == 2)) { return }
      if ((%wavestorm-magicid == 46) && ($hget(Player,Modifier) isletter hj)) { return }
      var %wavestorm-magicidcheck = %wavestorm-magicid
      if ($len(%wavestorm-magicidcheck) == 1) { var %wavestorm-magicidcheck = 0 $+ %wavestorm-magicidcheck }
      if (%wavestorm-melee != 1) { var %wavestorm-magicidmelee == 15 }
      else { var %wavestorm-magicidmelee == 0 }
      if (%wavestorm-magicidcheck isin 09 13 20 32 34 37 43 54 55) {
        if (%wavestorm-z03) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z05) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z09) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z10) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z12) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z13) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z14) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z15) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z16) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z18) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z19) { dec %wavestorm-magicidmelee 15 }
        if (%wavestorm-z20) { dec %wavestorm-magicidmelee 15 }
      }
      elseif (%wavestorm-magicidcheck isin 02 06 11 23 24 27 30 46 47 51) {
        if (%wavestorm-z02) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z04) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z06) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z07) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z08) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z11) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z17) { dec %wavestorm-magicidmelee 10 }
        if (%wavestorm-z21) { dec %wavestorm-magicidmelee 10 }
      }
      if ((%wavestorm-magicidcheck isin 09 13 20 32 34 37 43 54 55) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-magicidmelee + $int(($gettok($1-,$numtok($1-,32),32) / 4))))) {
        display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Failure2),!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        goto continue
      }
      elseif ((%wavestorm-magicidcheck isin 39 41) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-magicidmelee + $int(($gettok($1-,$numtok($1-,32),32) / 2))))) {
        display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Failure2),!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        goto continue
      }
      elseif ((%wavestorm-magicidcheck isin 02 06 11 23 24 27 30 46 47 51) && ($rand(1,100) !isnum 1 - $calc(75 + %wavestorm-magicidmelee + $gettok($1-,$numtok($1-,32),32) - $hget(Player,Level)))) {
        display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Failure2),!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3)
        goto continue
      }
      magiccommand 1 %wavestorm-magicid 1
      if (%wavestorm-hpgain != $null) {
        set %wavestorm-hpgain $round(%wavestorm-hpgain,0)
        inc %wavestorm-hp %wavestorm-hpgain
        if (%wavestorm-hp > $hget(Player,HealthPoints)) { set %wavestorm-hp $hget(Player,HealthPoints) }
      }
      elseif (%wavestorm-hploss != $null) {
        set %wavestorm-hploss $round(%wavestorm-hploss,0)
        dec %wavestorm-hp %wavestorm-hploss
        inc %wavestorm-omega $int($calc($gettok($1-,$numtok($1-,32),32) ^ (1 / 3)))
        if (%wavestorm-omega >= 100) { set %wavestorm-omega 100 }
      }
      if (%wavestorm-hp < 1) { set %wavestorm-hp 0 }
      if (((%wavestorm-magicid == 39) || (%wavestorm-magicid == 41)) && (%wavestorm-z01 != 1)) { return }
      if (((%wavestorm-magicid == 43) && ((%wavestorm-z05 == 0) || (%wavestorm-z05 == $null))) || ((%wavestorm-magicid == 46) && ((%wavestorm-z06 == 0) || (%wavestorm-z06 == $null)))) {
        display2 %wavechat blinks as the haste and slow powers react and cancel each other out
      }
      elseif ((%wavestorm-magicid == 43) && (%wavestorm-hastestopcounter == 1)) {
        unset %wavestorm-hastestopcounter
        wavestop2 hastestopcounter
      }
      else { display2 %wavechat $replace($readini(" $+ $scriptdirWSInfo1.ini",1Tier $+ %wavestorm-magicid,Saying2),!target,$nick,!me,$me,!gender1,%wavestorm-gender1,!gender2,%wavestorm-gender2,!gender3,%wavestorm-gender3) }
      if (%wavestorm-hpgain != $null) { display2 %wavechat gains %wavestorm-hpgain HP!  Current HP: %wavestorm-hp }
      elseif (%wavestorm-hploss != $null) { display2 %wavechat loses %wavestorm-hploss HP!  Current HP: %wavestorm-hp }
      if (%wavestorm-mpgain != $null) { display2 %wavechat gains %wavestorm-mpgain MP!  Current MP: %wavestorm-mp }
      elseif (%wavestorm-mploss != $null) { display2 %wavechat loses %wavestorm-mploss MP!  Current MP: %wavestorm-mp }
      if (%wavestorm-magicid == 2) { .notice $nick Wavestorm %wavestorm-battleground $nick w1 %wavestorm-hploss }
      unset %wavestorm-hpgain
      unset %wavestorm-hploss
      unset %wavestorm-mploss
      unset %wavestorm-mpgain
      if (%wavestorm-hp == 0) { nohp $nick | return }
      goto continue














      :continue
      if (%wavestorm-z01 == 1) { return }
      if ((%wavestorm-z04 == 1) && (%wavestorm-z04juststart != 1) && (%wavestorm-z04properhit == 1)) {
        if (%wavestorm-hp == 0) { unset %wavestorm-z* }
        else {
          waveasleep2
      } }
      if (%wavestorm-z04juststart != $null) { unset %wavestorm-z04juststart }
      unset %wavestorm-z04properhit
      if ((%wavestorm-battleground == s02) && ($rand(1,15) == 7)) {
        set %wavestorm-z07mode 4
        wavestop
        display2 %wavechat gets knocked off the airship!
        .notice %wavechat Wavestorm %wavestorm-battleground %wavechat b02 %wavestorm-levelsend
        startbattletimer
      }
      if ((%wavestorm-battleground == s06) && ($rand(1,3) == 2)) {
        if (%wavestorm-s06mode != 1) {         
          set %wavestorm-s06mode 1
          display2 %wavechat is pushed onto the railway tracks
        }
        else {
          set %wavestorm-s06mode 2
          display2 %wavechat is pushed off the railway tracks
        }
      }
      if ((%wavestorm-battleground == s09) && ($rand(1,15) == 7)) {
        set %wavestorm-z07mode 6
        wavestop
        display2 %wavechat gets knocked off the motorcycle and tumbles to the pavement!
        .notice %wavechat Wavestorm %wavestorm-battleground %wavechat b17 %wavestorm-levelsend
        startbattletimer
    } }
    :continue2
    if (%wavestorm-melee == 1) { goto meleedead }
    if ($gettok($1-,$calc($numtok($1-,32) - 1),32) == z01) {
      if ((%wavestorm-melee != 1) && (%wavestorm-z01 == 1) && ((($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-friend1,z01) == 1) && (%wavestorm-friend2 == $null) && (%wavestorm-friend3 == $null)) || (($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-friend1,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-friend2,z01) == 1) && (%wavestorm-friend3 == $null)) || (($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-friend1,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-friend2,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-friend3,z01) == 1)))) {
        display3 %wavechat Your team has lost the battle.  The script will now turn off and reset.
        unset %wavestorm-*
        return
      }
      if (%wavestorm-melee != 1) {
        if (($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,z01) == 1) && (%wavestorm-enemy2 == $null) && (%wavestorm-enemy3 == $null) && (%wavestorm-enemy4 == $null)) { goto teamdead }
        if (($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,z01) == 1) && (%wavestorm-enemy3 == $null) && (%wavestorm-enemy4 == $null)) { goto teamdead }
        if (($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,z01) == 1) && (%wavestorm-enemy4 == $null)) { goto teamdead }
        if (($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,z01) == 1) && ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,z01) == 1)) { goto teamdead }
        else { goto meleedead }
        :teamdead
        if (%wavestorm-enemy1 != $null) {
          if ($hget(Player,Level) < 100) {
            set %wavestorm-tempexp $calc(6 * $round($rand($calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) * 75) - ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) * 15)),$calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) * 75) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) * 15))),0))
          }
          set %wavestorm-tempcred $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level) * $rand(11,15)
          if ($hget(Player,Modifier) isletter ij) {
            set %wavestorm-tempcred $calc(%wavestorm-tempcred * 3)
          }
          if (%wavestorm-battleground == s12) { set %wavestorm-tempcred $calc(%wavestorm-tempcred * 2) }
          hadd -m Player Credits $int($calc($hget(Player,Credits) + %wavestorm-tempcred))
          inc %wavestorm-apgain $calc(5 * $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy1,level))
        }
        if (%wavestorm-enemy2 != $null) {
          if ($hget(Player,Level) < 100) {
            inc %wavestorm-tempexp $calc(6 * $round($rand($calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) * 75) - ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) * 15)),$calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) * 75) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) * 15))),0))
          }
          inc %wavestorm-tempcred $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level) * $rand(11,15)
          if (%wavestorm-battleground == s12) { set %wavestorm-tempcred $calc(%wavestorm-tempcred * 2) }
          if ($hget(Player,Modifier) isletter ij) {
            set %wavestorm-tempcred $calc(%wavestorm-tempcred * 3)
          }
          hadd -m Player Credits $int($calc($hget(Player,Credits) + %wavestorm-tempcred))
          inc %wavestorm-apgain $calc(5 * $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy2,level))
        }
        if (%wavestorm-enemy3 != $null) {
          if ($hget(Player,Level) < 100) {
            inc %wavestorm-tempexp $calc(6 * $round($rand($calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) * 75) - ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) * 15)),$calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) * 75) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) * 15))),0))
          }
          inc %wavestorm-tempcred $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level) * $rand(11,15)
          if (%wavestorm-battleground == s12) { set %wavestorm-tempcred $calc(%wavestorm-tempcred * 2) }
          if ($hget(Player,Modifier) isletter ij) {
            set %wavestorm-tempcred $calc(%wavestorm-tempcred * 3)
          }
          hadd -m Player Credits $int($calc($hget(Player,Credits) + %wavestorm-tempcred))
          inc %wavestorm-apgain $calc(5 * $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy3,level))
        }
        if (%wavestorm-enemy4 != $null) {
          if ($hget(Player,Level) < 100) {
            inc %wavestorm-tempexp $calc(6 * $round($rand($calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) * 75) - ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) * 15)),$calc($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) * 75) + ($readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) * 15))),0))
          }
          inc %wavestorm-tempcred $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level) * $rand(11,15)
          if (%wavestorm-battleground == s12) { set %wavestorm-tempcred $calc(%wavestorm-tempcred * 2) }
          if ($hget(Player,Modifier) isletter ij) {
            set %wavestorm-tempcred $calc(%wavestorm-tempcred * 3)
          }
          hadd -m Player Credits $int($calc($hget(Player,Credits) + %wavestorm-tempcred))
          inc %wavestorm-apgain $calc(5 * $readini(" $+ $scriptdirWSInfo3.ini",%wavestorm-enemy4,level))
        }
        set %wavestorm-expsplit 1
        if (%wavestorm-friend1) { inc %wavestorm-expsplit 1 }
        if (%wavestorm-friend2) { inc %wavestorm-expsplit 1 }
        if (%wavestorm-friend3) { inc %wavestorm-expsplit 1 }
        set %wavestorm-tempexp $calc(%wavestorm-tempexp / %wavestorm-expsplit)
        if ($hget(Player,Level) isnum 1 - 9) { set %wavestorm-tempexp $calc(%wavestorm-tempexp / 1) }
        else { set %wavestorm-tempexp $calc(%wavestorm-tempexp / $left($hget(Player,Level),-1)) }
        set %wavestorm-tempexp $int(%wavestorm-tempexp)
        if (%wavestorm-battleground == s12) { set %wavestorm-temexp $calc(%wavestorm-tempexp * 2) }
        set %wavestorm-apgain $calc(%wavestorm-apgain / %wavestorm-expsplit)
        if (%wavestorm-battleground == s12) { set %wavestorm-apgain $calc(%wavestorm-apgain * 2) }
        if ($hget(Player,Modifier) isletter ij) {
          set %wavestorm-tempexp $calc(%wavestorm-tempexp * 3)
          set %wavestorm-apgain $calc(%wavestorm-apgain * 3)
        }
        hadd -m Player AbilityPoints $int($calc($hget(Player,AbilityPoints) + %wavestorm-apgain))
        unset %wavestorm-expsplit
        hadd -m Player Wins $calc($hget(Player,Wins) + 1)
        if (%wavemusic == 1) { wavestorm-music 16 }
        wave-eps
        if ($hget(Player,Level) >= 100) {
          if (%wavestorm-apgain == 1) { display2 %wavechat wins!  $me gains %wavestorm-apgain Ability Point and %wavestorm-tempcred Omnis. }
          elseif (%wavestorm-apgain > 1) { display2 %wavechat wins!  $me gains %wavestorm-apgain Ability Points and %wavestorm-tempcred Omnis. }
        }
        else {
          if (%wavestorm-apgain == 1) { display2 %wavechat wins!  $me gains %wavestorm-tempexp Experience Points, %wavestorm-apgain Ability Point, and %wavestorm-tempcred Omnis. }
          elseif (%wavestorm-apgain > 1) { display2 %wavechat wins!  $me gains %wavestorm-tempexp Experience Points, %wavestorm-apgain Ability Points, and %wavestorm-tempcred Omnis. }
        }
        unset %wavestorm-levelup
        :levelup
        if (($calc(%wavestorm-tempexp + $hget(Player,CurrentExperience)) >= $hget(Player,NeededExperience)) && ($hget(Player,Level) < 100)) {
          inc %wavestorm-levelup 1
          hadd -m Player Level $calc($hget(Player,Level) + 1)
          set %wavestorm-tempexp $calc(%wavestorm-tempexp - ($hget(Player,NeededExperience) - $hget(Player,CurrentExperience)))
          hadd -m Player CurrentExperience 0
          set %wavestorm-maxexp2 $round($rand($calc($hget(Player,Level) + ($hget(Player,Level) * 500) - ($hget(Player,Level) * 20)),$calc($hget(Player,Level) + ($hget(Player,Level) * 500) + ($hget(Player,Level) * 20))),0)
          if (%wavestorm-maxexp2 <= $calc((85 * $hget(Player,Level)) + $hget(Player,NeededExperience))) { 
            set %wavestorm-maxexp2 %wavestorm-maxexp
            set %wavestorm-maxexp $round($calc(%wavestorm-maxexp2 + $rand($calc($hget(Player,Level) / 2),$calc($hget(Player,Level) * 2))),0)
          }
          else { set %wavestorm-maxexp %wavestorm-maxexp2 }
          hadd -m Player NeededExperience $int(%wavestorm-maxexp)
          unset %wavestorm-maxexp*
          if ($rand(1,2) == 1)) { set %wavestorm-maxhp $calc($int($calc($hget(Player,Level) * 99.99)) + $rand(0,20)) }
          else { set %wavestorm-maxhp $calc($int($calc($hget(Player,Level) * 99.99)) - $rand(0,20)) }
          if ($hget(Player,HealthPoints > %wavestorm-maxhp) { hadd -m Player HealthPoints $calc($hget(Player,HealthPoints + $rand(25,75)) }
          else { hadd -m Player HealthPoints %wavestorm-maxhp }
          unset %wavestorm-maxhp
          if ($hget(Player,MagicPoints)) {
            if ($rand(1,2) == 1)) { set %wavestorm-maxmp $calc($int($calc($hget(Player,Level) * 9.99)) + $rand(0,5)) }
            else { set %wavestorm-maxmp $calc($int($calc($hget(Player,Level) * 9.99)) - $rand(0,5)) }
            if ($hget(Player,MagicPoints > %wavestorm-maxmp) { hadd -m Player MagicPoints $calc($hget(Player,MagicPoints + $rand(2,7)) }
            else { hadd -m Player MagicPoints %wavestorm-maxmp }
            unset %wavestorm-maxmp
          }
          if ($hget(Player,Level) == 100) {
            hadd -m Player HealthPoints 9999
          if ($hget(Player,MagicPoints)) {hadd -m Player MagicPoints 999 }
        }
        else { goto levelupskip }
        set %wavestorm-levelsend $hget(Player,Level)
        goto levelup
        :levelupskip
      }
      if ($nick == $me) { return }
      if ($hget(Player,Level) < 100) {
        hadd -m Player CurrentExperience $int($calc($hget(Player,CurrentExperience) + %wavestorm-tempexp))
      }
      unset %wavestorm-tempexp
      if (%wavestorm-levelup > 0) {
        if (%wavestorm-levelup == 1) { display2 %wavechat gained a level!  Current level: $hget(Player,Level) }
        elseif (%wavestorm-levelup > 1) { display2 %wavechat gained %wavestorm-levelup levels!  Current level: $hget(Player,Level) }
        if (%wavestorm-mp != $null) { display2 %wavechat Max HP - $hget(Player,HealthPoints) : MP - $hget(Player,MagicPoints) }
        else { display2 %wavechat Max HP - $hget(Player,HealthPoints) }
      }
      if ($hget(Player,Level) < 100) {
        display2 %wavechat - Current Experience Points: [ $hget(Player,CurrentExperience) / $hget(Player,NeededExperience) ]
      }
      if (($hget(Player,Spell1) == 1) && ($hget(Player,Spell2) == 1) && ($hget(Player,Spell3) == 1) && ($hget(Player,Spell4) == 1) && ($hget(Player,Spell5) == 1) && ($hget(Player,Spell6) == 1) && ($hget(Player,Spell7) == 1)) {
        set %wavestorm-apconvert $round($calc($hget(Player,AbilityPoints) ^ (1 / 3)),0)
        hadd -m Player Credits $int($round($calc($hget(Player,Credits) + %wavestorm-apconvert),0))
        display2 %wavechat takes his $hget(Player,AbilityPoints) excess AP to the bank and converts it to %wavestorm-apconvert Omnis!
        hadd -m Player AbilityPoints 0
        unset %wavestorm-apconvert
      }
      unset %wavestorm-levelup
      unset %wavestorm-tempcred
      set %wave-update 1
      wavequit2
      return
    }
    :meleedead
    if (%wavestorm-melee == 1) {
      if (($gettok($1-,$calc($numtok($1-,32) - 1),32) == z01) && ($me isin $gettok($1-,$calc($numtok($1-,32) - 2),32))) {
        set %wavestorm-enemydummylevel $gettok($1-,$numtok($1-,32),32)
        set %wavestorm-tempexp $calc(6 * $round($rand($calc(%wavestorm-enemydummylevel + (%wavestorm-enemydummylevel * 100) - (%wavestorm-enemydummylevel * 15)),$calc(%wavestorm-enemydummylevel + (%wavestorm-enemydummylevel * 100) + (%wavestorm-enemydummylevel * 15))),0))
        if ($hget(Player,Level) isnum 1 - 9) { set %wavestorm-tempexp $calc(%wavestorm-tempexp / 1) }
        else { set %wavestorm-tempexp $calc(%wavestorm-tempexp / $left($hget(Player,Level),-1)) }
        set %wavestorm-tempexp $int(%wavestorm-tempexp)
        set %wavestorm-tempcred %wavestorm-enemydummylevel * $rand(11,15)
        set %wavestorm-apgain $int($calc(5 * %wavestorm-enemydummylevel))
        unset %wavestorm-enemydummylevel
        if ($hget(Player,Modifier) isletter ij) {
          set %wavestorm-tempexp $calc(%wavestorm-tempexp * 3)
          set %wavestorm-tempcred $calc(%wavestorm-tempcred * 3)
          set %wavestorm-apgain $calc(%wavestorm-apgain * 3)
        }
        hadd -m Player Credits $int($calc($hget(Player,Credits) + %wavestorm-tempcred))
        hadd -m Player AbilityPoints $int($calc($hget(Player,AbilityPoints) + %wavestorm-apgain))
        hadd -m Player Wins $calc($hget(Player,Wins) + 1)
        wave-eps
        if ($hget(Player,Level) >= 100) {
          display2 %wavechat wins!  $me gains %wavestorm-apgain Ability Points and %wavestorm-tempcred Omnis.
        }
        else {
          display2 %wavechat wins!  $me gains %wavestorm-tempexp Experience Points, %wavestorm-apgain Ability Points, and %wavestorm-tempcred Omnis.
        }
        unset %wavestorm-levelup
        :levelup2
        if (($calc(%wavestorm-tempexp + $hget(Player,CurrentExperience)) >= $hget(Player,NeededExperience)) && ($hget(Player,Level) < 100)) {
          inc %wavestorm-levelup 1
          hadd -m Player Level $calc($hget(Player,Level) + 1)
          set %wavestorm-tempexp $calc(%wavestorm-tempexp - ($hget(Player,NeededExperience) - $hget(Player,CurrentExperience)))
          hadd -m Player CurrentExperience 0
          set %wavestorm-maxexp2 $round($rand($calc($hget(Player,Level) + ($hget(Player,Level) * 500) - ($hget(Player,Level) * 20)),$calc($hget(Player,Level) + ($hget(Player,Level) * 500) + ($hget(Player,Level) * 20))),0)
          if (%wavestorm-maxexp2 <= $calc((85 * $hget(Player,Level)) + $hget(Player,NeededExperience))) { 
            set %wavestorm-maxexp2 %wavestorm-maxexp
            set %wavestorm-maxexp $round($calc(%wavestorm-maxexp2 + $rand($calc($hget(Player,Level) / 2),$calc($hget(Player,Level) * 2))),0)
          }
          else { set %wavestorm-maxexp %wavestorm-maxexp2 }
          hadd -m Player NeededExperience $int(%wavestorm-maxexp)
          unset %wavestorm-maxexp*
          if ($rand(1,2) == 1)) { set %wavestorm-maxhp $calc($int($calc($hget(Player,Level) * 99.99)) + $rand(0,20)) }
          else { set %wavestorm-maxhp $calc($int($calc($hget(Player,Level) * 99.99)) - $rand(0,20)) }
          if ($hget(Player,HealthPoints) > %wavestorm-maxhp) { hadd -m Player HealthPoints $calc($hget(Player,HealthPoints) + $rand(25,75)) }
          else { hadd -m Player HealthPoints %wavestorm-maxhp }
          unset %wavestorm-maxhp
          if ($hget(Player,MagicPoints)) {
            if ($rand(1,2) == 1)) { set %wavestorm-maxmp $calc($int($calc($hget(Player,Level) * 9.99)) + $rand(0,5)) }
            else { set %wavestorm-maxmp $calc($int($calc($hget(Player,Level) * 9.99)) - $rand(0,5)) }
            if ($hget(Player,MagicPoints) > %wavestorm-maxmp) { hadd -m Player MagicPoints $calc($hget(Player,MagicPoints + $rand(2,7)) }
            else { hadd -m Player MagicPoints %wavestorm-maxmp }
            unset %wavestorm-maxmp
          }
          if ($hget(Player,Level) == 100) {
            hadd -m Player HealthPoints 9999
          if ($hget(Player,MagicPoints)) {hadd -m Player MagicPoints 999 }
        }
        else { goto levelup3 }
        set %wavestorm-levelsend $hget(Player,Level)
        goto levelup2
        :levelup3
        if ($hget(Player,Level) < 100) {
          hadd -m Player CurrentExperience $int($calc($hget(Player,CurrentExperience) + %wavestorm-tempexp))
        }
        unset %wavestorm-tempexp
        if (%wavestorm-levelup > 0) {
          if (%wavestorm-levelup == 1) { display2 %wavechat gained a level!  Current level: $hget(Player,Level) }
          elseif (%wavestorm-levelup > 1) { display2 %wavechat gained %wavestorm-levelup levels!  Current level: $hget(Player,Level) }
          if (%wavestorm-mp != $null) { display2 %wavechat Max HP - $hget(Player,HealthPoints) : MP - $hget(Player,MagicPoints) }
          else { display2 %wavechat Max HP - $hget(Player,HealthPoints) }
        }
        if ($hget(Player,Level) < 100) {
          display2 %wavechat - Current Experience Points: [ $hget(Player,CurrentExperience) / $hget(Player,NeededExperience) ]
        }
        if (($hget(Player,Spell1) == 1) && ($hget(Player,Spell2) == 1) && ($hget(Player,Spell3) == 1) && ($hget(Player,Spell4) == 1) && ($hget(Player,Spell5) == 1) && ($hget(Player,Spell6) == 1) && ($hget(Player,Spell7) == 1)) {
          set %wavestorm-apconvert $round($calc($hget(Player,AbilityPoints) ^ (1 / 3)),0)
          hadd -m Player Credits $round($calc($hget(Player,Credits) + %wavestorm-apconvert),0)
          display2 %wavechat takes his $hget(Player,AbilityPoints) excess AP to the bank and converts it to %wavestorm-apconvert Omnis!
          hadd -m Player AbilityPoints 0
          unset %wavestorm-apconvert
        }
        unset %wavestorm-levelup
        unset %wavestorm-tempcred
        set %wave-update 1
} } } }