Glacier_Rat

menu * {
  -
  Slayer
  .Slayer Settings
  ..Set task nr.:/set %tasknr $?="Please enter the number of tasks completed:"
  ..Set slay exp.:/set %slayexp $?="Enter current slayer exp:"
  .Aberrant spectres:/set %hp 90 | /set %monstername Aberrant spectres | /ksc
  .Abyssal demons:/set %hp 150 | /set %monstername Abyssal demons | /ksc
  .Aquanite:/set %hp 125 | /set %monstername Aquanite | /ksc
  .Banshee:/set %hp 22 | /set %monstername Banshee | /ksc
  .Basilisks:/set %hp 75 | /set %monstername Basilisks | /ksc
  .Black demons:/set %hp 157 | /set %monstername Black demons | /ksc
  .Black dragons
  ..Baby black dragons:/set %hp 80 | /set %monstername Baby black dragons | /ksc
  ..Black dragons:/set %hp 190 | /set %monstername Black dragons | /ksc
  .blue dragons
  ..Baby blue dragons:/set %hp 50 | /set %monstername Baby Blue Dragons | /ksc
  ..Blue Dragons:/set %hp 107 | /set %monstername Blue Dragons | /ksc
  .Bloodvelds
  ..Bloodvelds:/set %hp 120 | /set %monstername Bloodvelds | /ksc
  ..Mutated bloodvelds:/set %hp 178 | /set %monstername Mutated bloodvelds | /ksc
  .Brine Rat:/ %hp 50 | /set %monstername Brinze Rat | /ksc
  .Cave Horror:/set %hp 55 | /set %monstername Cave Horror | /ksc
  .Dagannoths:/set %hp 120 | /set %monstername Dagannoths | /ksc
  .Dark beasts:/set %hp 220 | /set %monstername Dark Beasts | /ksc
  .desert strykewyrm:/set %hp 120 | /set %monstername desert strykewyrm | /ksc
  .Dust devils:/set %hp 105 | /set %monstername Dust devils | /ksc
  .Fire giants:/set %hp 111 | /set %monstername Fire giants | /ksc
  .Gargoyles:/set %hp 105 | /set %monstername Gargoyles | /ksc
  .Goraks:/set %hp 112 | /set %monstername Goraks | /ksc
  .Greater demons:/set %hp 87 | /set %monstername Greater demons | /ksc
  .Hellhounds:/set %hp 116 | /set %monstername Hellhounds | /ksc
  .Ice Strykewyrm:/set %hp 210 | /set %monstername Ice Strykewyrm | /ksc
  .infernal Mage:/set %hp 60 | /set %monstername Infernal Mage | /ksc
  .Iron dragons:/set %hp 165 | /set %monstername Iron dragons | /ksc
  .Jelly:/set %hp 75 | /set %monstername Jelly | /ksc
  .Jungle Strykewyrm:/set %hp 110 | /set %monstername Jungle Strykewyrm | /ksc
  .Kalphites
  ..Workers:/set %hp 40 | /set %monstername Kalphite workers | /ksc
  ..Soldiers:/set %hp 90 | /set %monstername Kalphite Soldiers | /ksc
  .Lesser Demon:/set %hp 80 | /set %monstername Lesser Demon | /ksc
  .living rocks
  ..Living Rock Protecter:/set %hp 200 | /set %monstername Living Rock Protecter | /ksc
  ..Living Rock Striker:/set %hp 275 | /set %monstername Living Rock Striker | /ksc
  .Mithril Dragons:/set %hp 254 | /set %monstername Mithril Dragons | /ksc
  .Nechryael:/set %hp 105 | /set %monstername Nechryael | /ksc
  .Scabarbites:/set %hp 90 | /set %monstername Scabarites | /ksc
  .scabaras
  ..lancer :/set %hp 90 | /set %monstername scabaras lancer| /ksc
  ..ranger:/set %hp 90 | /set %monstername scabaras ranger | /ksc
  .scabaras mage:/set %hp 70 | /set %monstername scabaras mage | /ksc
  .skeletal wyvern:/set %hp 204 | /set %monstername Skeletal wyverns | /ksc
  .Spiritual mages
  ..Zammy:/set %hp 75 | /set %monstername Spiritual mages | /ksc
  ..Sara:/set %hp 85 | /set %monstername Spiritual mages | /ksc
  .Steel dragons:/set %hp 210 | /set %monstername Steel Dragons | /ksc
  .terror dog
  ..terror dog:/set %hp 83 | /set %monstername Terror Dogs | /ksc
  ..terror dog:/set %hp 89 | /set %monstername Terror Dogs | /ksc
  .turoth's
  ..turoth lvl 83:/set %hp 76 | /set %monstername turoth | /ksc
  ..turoth lvl 85:/set %hp 77 | /set %monstername turoth | /ksc
  ..turoth lvl 87:/set %hp 79 | /set %monstername turoth | /ksc
  ..turoth lvl 89:/set %hp 81 | /set %monstername turoth | /ksc
  .Suqahs:/set %hp 106 | /set %monstername Suqahs | /ksc
  .Warped:/set %hp 150 | /set %monstername Warped Terrorbirds | /ksc
  .Waterfiends:/set %hp 128 | /set %monstername Waterfiends | /ksc
}


alias ksc {
  set %amount $?="Amount of monsters:"
  inc %tasknr
  inc %slayexp $calc(%amount * %hp)
  msg # I'm on task $c2(no. $+ $bytes(%tasknr,bd)) $+ $c1(:) $c2(%amount %monstername) $+ $c1(; that's) $c2($bytes($calc(%amount * %hp * 4),bd)) $c1(cmb XP,) $c2($bytes($floor($calc(%amount * 4/3 * %hp)),bd)) $c1(HP XP &) $c2($bytes($calc(%amount * %hp),bd)) $c1(Slay XP; I will have) $c2($bytes(%slayexp,bd)) $+ $chr(15) $c1(Slayer exp)
}

alias slayer {
  msg # I have done $c2($bytes(%tasknr,bd) tasks) $+ $c1(. My last known) $c2(slayer task) $c1(was) $c2(%amount %monstername) $+ $c1(. I gained) $c2($bytes($calc(%amount * %hp * 4),bd) Combat Exp) $+ $c1(;) $c2($bytes($floor($calc(%amount * 4/3 * %hp)),bd) HP Exp) $+ $c1(;) $c2($bytes($calc(%amount * %hp),bd) Slay XP) $c1(Which also got me a total of) $c2($bytes(%slayexp,bd) Slayer exp)) $+ $c1(!)
}

alias c1 return $+($chr(3),10,$1,$chr(3))
alias c2 return $+($chr(3),07,$1,$chr(3))