rendered paste body;----------------------------------------------------------------------------
;------------------- Hash tables ---------------------------
;----------------------------------------------------------------------------
on *:START: {
hmake enemy 100
hload enemy targets.txt
hmake BPM1 100
hload BPM1 bpm1.txt
hmake IS1 100
hload IS1 IS1.txt
hmake BPM 100
hload BPM bpm.txt
hmake IS 100
hload IS IS.txt
hmake admin 100
hload admin admin.txt
hmake masson 100
hload masson masson.txt
hmake user5x1 3000
hload user5x1 user5x1.txt
hmake activemassers 200
hload activemassers activemassers.txt
hmake massbegintime 100
hload massbegintime massbegintime.txt
hmake lastmass 100
hload lastmass lastmass.txt
hmake ISss 100
hmake BPMss 100
hmake ssstarttime 100
hmake ssendtime 100
hload ISss ISss.txt
hload BPMss BPMss.txt
hload ssstarttime ssstarttime.txt
hload ssendtime ssendtime.txt
hmake stick1 100
hload stick1 stick1.txt
hmake knife1 100
hload knife1 knife1.txt
hmake shortbow1 100
hload shortbow1 shortbow1.txt
hmake staff1 100
hload staff1 staff1.txt
hmake hatchet1 100
hload hatchet1 hatchet1.txt
hmake sling1 100
hload sling1 sling1.txt
hmake crossbow1 100
hload crossbow1 crossbow1.txt
hmake club1 100
hload club1 club1.txt
hmake long1sword1 100
hload longsword1 longsword1.txt
hmake pike1 100
hload pike1 pike1.txt
hmake longbow1 100
hload longbow1 longbow1.txt
hmake mace1 100
hload mace1 mace1.txt
hmake lance1 100
hload lance1 lance1.txt
hmake spear1 100
hload spear1 spear1.txt
hmake warblade1 100
hload warblade1 warblade1.txt
hmake broadsword1 100
hload broadsword1 broadsword1.txt
hmake warhammer1 100
hload warhammer1 warhammer1.txt
hmake excalibur1 100
hload excalibur1 excalibur1.txt
hmake warg1 100
hload warg1 warg1.txt
hmake dragon1 100
hload dragon1 dragon1.txt
hmake hammerofthor1 100
hload hammerofthor1 hammerofthor1.txt
hmake battleaxe1 100
hload battleaxe1 battleaxe1.txt
hmake steelbow1 100
hload steelbow1 steelbow1.txt
hmake steed1 100
hload steed1 steed1.txt
hmake flamingarrow1 100
hload flamingarrow1 flamingarrow1.txt
hmake chariot1 100
hload chariot1 chariot1.txt
hmake helmet1 100
hload helmet1 helmet1.txt
hmake shield1 100
hload shield1 shield1.txt
hmake chainmail1 100
hload chainmail1 chainmail1.txt
hmake platearmor1 100
hload platearmor1 platearmor1.txt
hmake elvencloak1 100
hload elvencloak1 elvencloak1.txt
hmake dragonskin1 100
hload dragonskin1 dragonskin1.txt
hmake gauntlets1 100
hload gauntlets1 gauntlets1.txt
hmake mithril1 100
hload mithril1 mithril1.txt
hmake heavyshield1 100
hload heavyshield1 heavyshield1.txt
hmake stick 100
hload stick.txt
hmake knife 100
hload knife.txt
hmake shortbow 100
hload shortbow.txt
hmake staff 100
hload staff.txt
hmake hatchet 100
hload hatchet.txt
hmake sling 100
hload sling.txt
hmake crossbow 100
hload crossbow.txt
hmake club 100
hload club.txt
hmake longsword 100
hload longsword.txt
hmake pike 100
hload pike.txt
hmake longbow 100
hload longbow.txt
hmake mace 100
hload mace.txt
hmake lance 100
hload lance.txt
hmake spear 100
hload spear.txt
hmake warblade 100
hload warblade.txt
hmake broadsword 100
hload broadsword.txt
hmake warhammer 100
hload warhammer.txt
hmake excalibur 100
hload excalibur.txt
hmake warg 100
hload warg.txt
hmake dragon 100
hload dragon.txt
hmake hammerofthor 100
hload hammerofthor.txt
hmake battleaxe 100
hload battleaxe.txt
hmake steelbow 100
hload steelbow.txt
hmake steed 100
hload steed.txt
hmake flamingarrow 100
hload flamingarrow.txt
hmake chariot 100
hload chariot.txt
hmake helmet 100
hload helmet.txt
hmake shield 100
hload shield.txt
hmake chainmail 100
hload chainmail.txt
hmake platearmor 100
hload platearmor.txt
hmake elvencloak 100
hload elvencloak.txt
hmake dragonskin 100
hload dragonskin.txt
hmake gauntlets 100
hload gauntlets.txt
hmake mithril 100
hload mithril.txt
hmake heavyshield 100
hload heavyshield.txt
}
;----------------------------------------------------------------------------
;------------------- Command lists ---------------------------
;----------------------------------------------------------------------------
on *:JOIN:#: {
/notice $nick Type !commands for a list of available commands.
}
on *:TEXT:!commands:#: {
/notice $nick Type !admincommands for the admin commands.
/notice $nick Type !usercommands for the basic user commands.
/notice $nick Type !masscommands for the commands which only work during a mass.
}
on *:TEXT:!admincommands:#: {
/notice $nick To add a target, type !addtarget <stats link> <name>
/notice $nick To remove a target, type !deltarget <name> <stats link>
/notice $nick To start a mass on the targets, type !targetsmass
/notice $nick Type !waitlist to see who the active massers are during a mass.
/notice $nick type !endmass to end a mass.
/notice $nick Type !admin <nick> to give a user admin access to the bot.
/notice $nick Type !deladmin <nick> to remove a user's admin access to the bot.
/notice $nick Type !cleartargets to remove all the targets.
/notice $nickvType !clearwaitlist during a mass to remove all the active massers on the list.
}
on *:TEXT:!usercommands:#: {
/notice $nick To start logging sabs just paste your sab logs.
/notice $nick Type !mystats to see your sab stats.
/notice $nick Type !sabbed <weapon> to display how many of that weapon you have sabbed.
}
on *:TEXT:!masscommands:#: {
notice $nick Type !addme to be added to the active sabbers list.
notice $nick Type !delme to be removed from the active sabbers list.
}
;----------------------------------------------------------------------------
;------------------- Sab logging ---------------------------
;----------------------------------------------------------------------------
on *:TEXT:Your spies successfully enter *'s armory undetected, and destroy * of the enemy's *:#: {
if ($14 == Invisibility) {
hinc IS $nick $10
hsave IS is.txt
}
if ($14 == Blackpowder) {
hinc BPM $nick $10
hsave BPM bpm.txt
}
if ($14 == Stick) {
hinc stick $nick $10
hsave stick stick.txt
}
if ($14 == Knife) {
hinc knife $nick $10
hsave knife knife.txt
}
if ($14 == Short) {
hinc shortbow $nick $10
hsave shortbow shortbow.txt
}
if ($14 == Staff) {
hinc Staff $nick $10
hsave staff staff.txt
}
if ($14 == Hatchet) {
hinc hatchet $nick $10
hsave hatchet hatchet.txt
}
if ($14 == Sling) {
hinc sling $nick $10
hsave sling sling.txt
}
if ($14 == Crossbow) {
hinc crossbow $nick $10
hsave crossbow crossbow.txt
}
if ($14 == Longbow) {
hinc longbow $nick $10
hsave longbow longbow.txt
}
if ($14 == Steel) {
hinc steelbow $nick $10
hsave steelbow steelbow.txt
}
if ($14 == Steed) {
hinc steed $nick $10
hsave steed steed.txt
}
if ($14 == Flaming) {
hinc flamingarrow $nick $10
hsave flamingarrow flamingarrow.txt
}
if ($14 == Chariot) {
hinc chariot $nick $10
hsave chariot chariot.txt
}
if ($14 == Club) {
hinc club $nick $10
hsave club club.txt
}
if ($14 == Spear) {
hinc spear $nick $10
hsave spear spear.txt
}
if ($14 == Warblade) {
hinc warblade $nick $10
hsave warblade warblade.txt
}
if ($14 == Warg) {
hinc warg $nick $10
hsave warg warg.txt
}
if ($14 == Dragon) {
hinc dragon $nick $10
hsave dragon dragon.txt
}
if ($14 == Elven) {
hinc elvencloak $nick $10
hsave elvencloak elvencloak.txt
}
if ($14 == Helmet) {
hinc helmet $nick $10
hsave helmet helmet.txt
}
if ($14 == Shield) {
hinc shield $nick $10
hsave shield shield.txt
}
if ($14 == Chainmail) {
hinc chainmail $nick $10
hsave chainmail chainmail.txt
}
if ($14 == Plate) {
hinc platearmor $nick $10
hsave platearmor platearmor.txt
}
if ($14 == Heavy) {
hinc heavyshield $nick $10
hsave heavyshield heavyshield.txt
}
if ($14 == Dragonskin) {
hinc dragonskin $nick $10
hsave dragonskin dragonskin.txt
}
if ($14 == Long) {
hinc longsword $nick $10
hsave longsword longsword.txt
}
if ($14 == Lance) {
hinc lance $nick $10
hsave lance lance.txt
}
if ($14 == Broadsword) {
hinc broadsword $nick $10
hsave broadsword broadsword.txt
}
if ($14 == Excalibur) {
hinc excalibur $nick $10
hsave excalibur excalibur.txt
}
if ($14 == Mithril) {
hinc mithril $nick $10
hsave mithril mithril.txt
}
if ($14 == Pike) {
hinc pike $nick $10
hsave pike pike.txt
}
if ($14 == Mace) {
hinc mace $nick $10
hsave mace mace.txt
}
if ($14 == Warhammer) {
hinc warhammer $nick $10
hsave warhammer warhammer.txt
}
if ($14 == Hammer) {
hinc hammerofthor $nick $10
hsave hammerofthor hammerofthor.txt
}
if ($14 == Battle) {
hinc battleaxe $nick $10
hsave battleaxe battleaxe.txt
}
if ($14 == Gauntlets) {
hinc Gauntlets $nick $10
hsave gauntlets gauntlets.txt
}
notice $nick Your sabotage on $5 has been recorded.
else { halt }
}
;----------------------------------------------------------------------------
;------------------- Sab stats ---------------------------
;----------------------------------------------------------------------------
on *:TEXT:!mystats:#: {
if (!$hget(IS, $nick)) && (!$hget(BPM, $nick)) {
notice $nick No sabs recorded for this nickname. Post a sab log to start recording your sabs. }
else {
notice $nick Invisibility Shields: $hget(IS, $nick)
notice $nick Blackpowder Missile's: $hget(BPM, $nick)
var %row1 = $calc(($hget(stick,$nick) * 200) + ($hget(knife,$nick) * 1000) + ($hget(sling,$nick) * 1800) + ($hget(club,$nick) * 3200) + ($hget(spear,$nick) * 5100))
var %row2 = $calc(($hget(warblade,$nick) * 16400) + ($hget(warg,$nick) * 50000) + ($hget(dragon,$nick) * 200000) + ($hget(chariot,$nick) * 50000) + ($hget(BPM,$nick) * 850000))
var %row3 = $calc(($hget(helmet,$nick) * 2000) + ($hget(shield,$nick) * 3200) + ($hget(chainmail,$nick) * 5100) + ($hget(platearmor,$nick) * 16400) + ($hget(heavyshield,$nick) * 50000))
var %row4 = $calc(($hget(dragonskin,$nick) * 200000) + ($hget(IS,$nick) * 750000) + ($hget(shortbow,$nick) * 1800) + ($hget(crossbow,$nick) * 3200) + ($hget(longbow,$nick) * 5100))
var %row5 = $calc(($hget(steelbow,$nick) * 16400) + ($hget(steed,$nick) * 50000) + ($hget(flamingarrow,$nick) * 200000) + ($hget(elvencloak,$nick) * 50000) + ($hget(longsword,$nick) * 3200))
var %row6 = $calc(($hget(lance,$nick) * 5100) + ($hget(broadsword,$nick) * 16400) + ($hget(excalibur,$nick) * 200000) + ($hget(mithril,$nick) * 50000) + ($hget(hatchet,$nick) * 1800))
var %row7 = $calc(($hget(pike,$nick) * 3200) + ($hget(mace,$nick) * 5100)) + ($hget(warhammer,$nick) * 16400) + ($hget(battleaxe,$nick) * 180000) + ($hget(hammeFrofthor,$nick) * 50000) + ($hget(gauntlets,$nick) * 50000))
notice $nick Total Weapon Value Sabbed: $calc((%row1 + %row2 + %row3 + %row4 + %row5 + %row6 + %row7))
var %row8 = $calc(($hget(stick,$nick) * 2) + ($hget(knife,$nick) * 5) + ($hget(sling,$nick) * 10) + ($hget(club,$nick) * 20) + ($hget(spear,$nick) * 40))
var %row9 = $calc(($hget(warblade,$nick) * 160) + ($hget(warg,$nick) * 640) + ($hget(dragon,$nick) * 2560) + ($hget(chariot,$nick) * 640) + ($hget(BPM,$nick) * 12000))
var %row10 = $calc(($hget(helmet,$nick) * 10) + ($hget(shield,$nick) * 20) + ($hget(chainmail,$nick) * 40) + ($hget(platearmor,$nick) * 160) + ($hget(heavyshield,$nick) * 640))
var %row11 = $calc(($hget(dragonskin,$nick) * 2560) + ($hget(IS,$nick) * 10000) + ($hget(shortbow,$nick) * 10) + ($hget(crossbow,$nick) * 20) + ($hget(longbow,$nick) * 40))
var %row12 = $calc(($hget(steelbow,$nick) * 160) + ($hget(steed,$nick) * 640) + ($hget(flamingarrow,$nick) * 2560) + ($hget(elvencloak,$nick) * 640) + ($hget(longsword,$nick) * 20))
var %row13 = $calc(($hget(lance,$nick) * 40) + ($hget(broadsword,$nick) * 160) + ($hget(excalibur,$nick) * 2560) + ($hget(mithril,$nick) * 640) + ($hget(hatchet,$nick) * 10))
var %row14 = $calc(($hget(pike,$nick) * 20) + ($hget(mace,$nick) * 40)) + ($hget(warhammer,$nick) * 160) + ($hget(battleaxe,$nick) * 2560) + ($hget(hammerofthor,$nick) * 640) + ($hget(gauntlets,$nick) * 640))
notice $nick Total Weapon Strength Sabbed: $calc((%row8 + %row9 + %row10 + %row11 + %row12 + %row13 + %row14))
}
}
;----------------------------------------------------------------------------
;------------------- Targets stuffs ---------------------------
;----------------------------------------------------------------------------
on *:TEXT:!addtarget http*//www.kingsofchaos.com/stats*:#: {
If $3 = $hget(enemy).data $hget(enemy).item {
notice $nick $3 is already a target.
halt }
If ($nick === $hfind(admin,$nick)) {
hadd enemy $3 $2
hsave enemy targets.txt
notice $nick Target added.
}
}
on *:TEXT:!addtarget http*//www.kingsofchaos.com/stats*:?: {
If $3 = $hget(enemy).data $hget(enemy).item {
msg $nick $3 is already a target.
halt }
If ($nick === $hfind(admin,$nick)) {
hadd enemy $3 $2
hsave enemy targets.txt
msg $nick Target added.
}
}
on *:TEXT:!deltarget*:#: {
If ($nick === $hfind(admin,$nick)) {
hdel enemy $3 $2
hsave enemy targets.txt
notice $nick Target removed.
}
}
on *:TEXT:!cleartargets:#: {
If ($nick !=== $hfind(admin,$nick)) {
notice $nick You must be an admin to use that command.
halt }
write -c C:\chambot\mIRC\targets.txt
notice $nick cleared.
}
;----------------------------------------------------------------------------
;------------------- # of sabbed weapons ----------------------
;----------------------------------------------------------------------------
on *:TEXT:!sabbed*:#: {
if (!$2) { notice $nick Syntax: !sabbed <weaponname> Use the whole weapon name with no spaces! F.E Heavy Shield wont work but HeavyShield will. IS and BPM to show them, for the rest use their full name with no spaces.
halt }
if ($2 == IS) && (!$hget(IS, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == IS) && ($hget(IS, $nick)) {
notice $nick Total sabbed Invisiblity Shields: $bytes($hget(IS,$nick),b)
notice $nick Total Value: $bytes($calc(($hget(IS,$nick) * 750000)),b) Gold
notice $nick Total Strength: $bytes($calc(($hget(IS,$nick) * 10000)),b)
}
if ($2 == BPM) && (!$hget(BPM, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == BPM) && ($hget(BPM, $nick)) {
//notice $nick Total sabbed Blackpowder Missile: $bytes($hget(BPM, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(BPM,$nick) * 850000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(BPM,$nick) * 12000)),b)
}
if ($2 == sticks) && (!$hget(stick, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == sticks) && ($hget(stick, $nick)) {
//notice $nick Total sabbed Sticks: $bytes($hget(stick, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(stick,$nick) * 200)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(stick,$nick) * 2)),b)
}
if ($2 == knives) && (!$hget(knife, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == knives) && ($hget(knife, $nick)) {
//notice $nick Total sabbed Knives: $bytes($hget(knife, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(knife,$nick) * 1000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(knife,$nick) * 5)),b)
}
if ($2 == shortbow) && (!$hget(shortbow, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == shortbow) && ($hget(shortbow, $nick)) {
//notice $nick Total sabbed Shortbows: $bytes($hget(shortbow, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(shortbow,$nick) * 1800)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(shortbow,$nick) * 10)),b)
}
if ($2 == staff) && (!$hget(staff, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == staff) && ($hget(staff, $nick)) {
//notice $nick Total sabbed Staffs: $bytes($hget(staff, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(staff,$nick) * 1800)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(staff,$nick) * 10)),b)
}
if ($2 == hatchet) && (!$hget(hatchet, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == hatchet) && ($hget(hatchet, $nick)) {
//notice $nick Total sabbed Hatchets: $bytes($hget(Hatchet, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Hatchet,$nick) * 1800)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Hatchet,$nick) * 10)),b)
}
if ($2 == sli* && !$hget(sling, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == sli* && $hget(sling, $nick) == true) {
//notice $nick Total sabbed Slings: $bytes($hget(sling, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(sling,$nick) * 1800)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(sling,$nick) * 10)),b)
}
if ($2 == crossbow) && (!$hget(crossbow, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == crossbow) && ($hget(crossbow, $nick)) {
//notice $nick Total sabbed Crossbows: $bytes($hget(Crossbow, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Crossbow,$nick) * 3200)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Crossbow,$nick) * 20)),b)
}
if ($2 == longbow) && (!$hget(longbow, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == longbow) && ($hget(longbow, $nick)) {
//notice $nick Total sabbed Longbows: $bytes($hget(Longbow, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Longbow,$nick) * 5100)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Longbow,$nick) * 40)),b)
}
if ($2 == steelbow) && (!$hget(steelbow, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == steelbow) && ($hget(steelbow, $nick)) {
//notice $nick Total sabbed Steelbows: $bytes($hget(Steelbow, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Steelbow,$nick) * 16400)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Steelbow,$nick) * 160)),b)
}
if ($2 == steed) && (!$hget(steed, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == steed) && ($hget(steed, $nick)) {
//notice $nick Total sabbed Steeds: $bytes($hget(Steed, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Steed,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Steed,$nick) * 640)),b)
}
if ($2 == flamingarrow) && (!$hget(flamingarrow, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == flamingarrow) && ($hget(flamingarrow, $nick)) {
//notice $nick Total sabbed Flaming Arrows: $bytes($hget(FlamingArrow, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(FlamingArrow,$nick) * 200000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(FlamingArrow,$nick) * 2560)),b)
}
if ($2 == chariot) && (!$hget(chariot, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == chariot) && ($hget(chariot, $nick)) {
//notice $nick Total sabbed Chariots: $bytes($hget(Chariot, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Chariot,$nick) * 450000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Chariot,$nick) * 6000)),b)
}
if ($2 == club) && (!$hget(club, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == club) && ($hget(club, $nick)) {
//notice $nick Total sabbed Clubs: $bytes($hget(Club, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Club,$nick) * 3200)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Club,$nick) * 20)),b)
}
if ($2 == spear) && (!$hget(spear, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == spear) && ($hget(spear, $nick)) {
//notice $nick Total sabbed Spears: $bytes($hget(Spear, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Spear,$nick) * 5100)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Spear,$nick) * 40)),b)
}
if ($2 == warblade) && (!$hget(warblade, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == warblade) && ($hget(warblade, $nick)) {
//notice $nick Total sabbed Warblades: $bytes($hget(Warblade, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Warblade,$nick) * 16400)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Warblade,$nick) * 160)),b)
}
if ($2 == warg) && (!$hget(warg, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == warg) && ($hget(warg, $nick)) {
//notice $nick Total sabbed Wargs: $bytes($hget(Warg, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Warg,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Warg,$nick) * 640)),b)
}
if ($2 == Dragon) && (!$hget(Dragon, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == Dragon) && ($hget(Dragon, $nick)) {
//notice $nick Total sabbed Dragons: $bytes($hget(Dragon, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Dragon,$nick) * 200000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Dragon,$nick) * 2560)),b)
}
if ($2 == Elvencloak) && (!$hget(elvencloak, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == Elvencloak) && ($hget(elvencloak, $nick)) {
//notice $nick Total sabbed Elven Cloaks: $bytes($hget(ElvenCloak, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(ElvenCloak,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(ElvenCloak,$nick) * 640)),b)
}
if ($2 == helmet) && (!$hget(helmet, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == helmet) && ($hget(helmet, $nick)) {
//notice $nick Total sabbed Helmets: $bytes($hget(Helmet, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Helmet,$nick) * 2000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Helmet,$nick) * 10)),b)
}
if ($2 == shield) && (!$hget(shield, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == shield) && ($hget(shield, $nick)) {
//notice $nick Total sabbed Shields: $bytes($hget(Shield, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Shield,$nick) * 3200)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Shield,$nick) * 20)),b)
}
if ($2 == chainmail) && (!$hget(chainmail, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == chainmail) && ($hget(chainmail, $nick)) {
//notice $nick Total sabbed chainmails $bytes($hget(chainmail, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(chainmail,$nick) * 5100)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(chainmail,$nick) * 40)),b)
}
if ($2 == platearmor) && (!$hget(platearmor, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == platearmor) && ($hget(platearmor, $nick)) {
//notice $nick Total sabbed Plate Armors: $bytes($hget(PlateArmor, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(PlateArmor,$nick) * 16400)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(PlateArmor,$nick) * 160)),b)
}
if ($2 == heavyshield) && (!$hget(heavyshield, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == heavyshield) && ($hget(heavyshield, $nick)) {
//notice $nick Total sabbed Heavy Shields: $bytes($hget(Heavyshield, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Heavyshield,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Heavyshield,$nick) * 640)),b)
}
if ($2 == dragonskin) && (!$hget(dragonskin, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == dragonskin) && ($hget(dragonskin, $nick)) {
//notice $nick Total sabbed Dragonskins: $bytes($hget(Dragonskin, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Dragonskin,$nick) * 200000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Dragonskin,$nick) * 2560)),b)
}
if ($2 == longsword) && (!$hget(longsword, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == longsword) && ($hget(longsword, $nick)) {
//notice $nick Total sabbed Longswords: $bytes($hget(Longsword, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Longsword,$nick) * 3200)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Longsword,$nick) * 20)),b)
}
if ($2 == lance) && (!$hget(lance, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == lance) && ($hget(lance, $nick)) {
//notice $nick Total sabbed Lances: $bytes($hget(Lance, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Lance,$nick) * 5100)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Lance,$nick) * 40)),b)
}
if ($2 == broadsword) && (!$hget(broadsword, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == broadsword) && ($hget(broadsword, $nick)) {
//notice $nick Total sabbed broadswords: $bytes($hget(broadsword, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(broadsword,$nick) * 16400)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(broadsword,$nick) * 160)),b)
}
if ($2 == excalibur) && (!$hget(excalibur, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == excalibur) && ($hget(excalibur, $nick)) {
//notice $nick Total sabbed Excaliburs: $bytes($hget(Excalibur, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Excalibur,$nick) * 200000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Excalibur,$nick) * 2560)),b)
}
if ($2 == mithril) && (!$hget(mithril, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == mithril) && ($hget(mithril, $nick)) {
//notice $nick Total sabbed Mithrils: $bytes($hget(Mithril, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Mithril,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Mithril,$nick) * 640)),b)
}
if ($2 == pike) && (!$hget([pike, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == pike) && ($hget(pike, $nick)) {
//notice $nick Total sabbed Pikes: $bytes($hget(Pike, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Pike,$nick) * 3200)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Pike,$nick) * 20)),b)
}
if ($2 == mace) && (!$hget(mace, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == mace) && ($hget(mace, $nick)) {
//notice $nick Total sabbed Maces: $bytes($hget(Mace, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Mace,$nick) * 5100)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Mace,$nick) * 40)),b)
}
if ($2 == warhammer) && (!$hget(warhammer, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == warhammer) && ($hget(warhammer, $nick)) {
//notice $nick Total sabbed Warhammers: $bytes($hget(Warhammer, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Warhammer,$nick) * 16400)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Warhammer,$nick) * 160)),b)
}
if ($2 == hammerofthor) && (!$hget(hammerofthor, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == hammerofthor) && ($hget(hammerofthor, $nick)) {
//notice $nick Total sabbed Hammer of Thors: $bytes($hget(Hammerofthor, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Hammerofthor,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Hammerofthor,$nick) * 640)),b)
}
if ($2 == battleaxe) && (!$hget(battleaxe, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == battleaxe) && ($hget(battleaxe, $nick)) {
//notice $nick Total sabbed Battleaxes: $bytes($hget(Battleaxe, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Battleaxe,$nick) * 180000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Battleaxe,$nick) * 2560)),b)
}
if ($2 == gauntlet) && (!$hget(gauntlet, $nick)) {
notice $nick No weapons of that type sabbed by you. | }
elseif ($2 == gauntlet) && ($hget(gauntlet, $nick)) {
//notice $nick Total sabbed Gauntlets: $bytes($hget(Gauntlet, $nick),b)
//notice $nick Total Value: $bytes($calc(($hget(Gauntlet,$nick) * 50000)),b) Gold
//notice $nick Total Strength: $bytes($calc(($hget(Gauntlet,$nick) * 640)),b)
}
}
;----------------------------------------------------------------------------
;------------------- Admin stuff ---------------------------
;----------------------------------------------------------------------------
on *:TEXT:!admin*:#: {
if ($nick !=== $hfind(admin, $nick)) {
notice $nick You must be an admin to add another admin.
Halt }
if ($nick === $hfind(admin, $nick)) {
hadd admin $2
hsave admin admin.txt
notice $2 You are now an administrator.
msg $chan $2 is now an administrator.
notice $nick $2 has been added to the administrator list.
}
}
on *:TEXT:!deladmin*:#: {
if ($nick !=== $hfind(admin, $nick)) {
notice $nick You must be an admin to add another admin.
Halt }
if ($nick === $hfind(admin, $nick)) {
hdel admin $2
hsave admin admin.txt
notice $2 You are no longer an administrator.
msg $chan $2 is no longer an administrator.
notice $nick $2 has been deleted from administrator list.
}
}
;----------------------------------------------------------------------------
;------------------- Mass stuff ---------------------------
;----------------------------------------------------------------------------
on *:TEXT:!targetsmass:#: {
If ($nick !=== $hfind(admin,$nick)) {
//notice $nick You must be an admin to run a mass.
Halt }
If (%mass == 1) {
msg $chan There is already a mass going on.
halt }
elseIf ($nick === $hfind(admin,$nick)) {
mode $chan -b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
mode $chan -b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
timer1 off
timer2 off
timer3 off
timer4 off
timer5 off
timer6 off
timer7 off
msg $chan 9Mass mode is now activated.
hadd masson yes
hsave masson masson.txt
hadd massbegintime $fulldate
hsave massbegintime massbegintime.txt
hadd lastmass $date
hadd lastmass lastmass.txt
set -e %mass 1
set -e %ss 1
set -e %nroftargets $calc($lines(targets.txt) / 2)
msg $chan 4There are currently $calc($lines(targets.txt) / 2) targets.
msg $chan 7The mass will begin in 10 seconds.
timer1 1 10 /msg $chan 5The mass has begun.
timer2 1 10 /msg $chan Type !addme to begin massing, and !delme when you're done.
timer3 1 10 /mode $chan +b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
timer4 1 10 /mode $chan +b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
timer5 1 10 /msg $chan 8You will not be able to post your sabs until the target has been broken.
timer6 1 10 set -e %targetnr 1 }
}
on *:TEXT:!addme:#: {
if (!%targetnr) { halt
}
elseif (%mass = 1) {
notice $nick Target: $hget(enemy, %targetnr).data $hget(enemy, %targetnr).item
hadd activemassers $nick
hsave activemassers activemassers.txt
}
}
on *:TEXT:!delme:#: {
if (%mass == 0) {
halt }
if ($hget(activemassers).item => 1) {
notice $nick You have been removed.
hdel activemassers $nick
hsave activemassers activemassers.txt
hload activemassers activemassers.txt
halt
}
if (%targetnr == %nroftargets) && (!$hget(activemassers).item) {
msg $chan 9No more targets. Well done everyone!9
hdel activemassers $nick
hsave activemassers activemassers.txt
hload activemassers activemassers.txt
set %mass 0
unset %ss
unset %targetnr
unset %nroftargets
}
elseif (!$hget(activemassers).item) {
inc %targetnr 1
msg $chan 4Loading target %targetnr $+ / $+ %nroftargets $+ . Get ready!4
timer6 1 10 /msg $chan Type !addme to begin massing, and !delme when you're done.
timer7 1 10 /mode $chan +b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
timer8 1 10 /mode $chan +b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
timer9 1 10 /msg $chan 8You will not be able to post your sabs until the target has been broken. }
else {
halt }
}
on *:TEXT:*Gold stolen*details:#: {
If (%mass = 1) {
/notice $nick You attacked $4 with $8 turn(s) and stole $5 gold. You lost $10 soldiers and killed $9 soldiers.
/mode $chan -b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
/mode $chan -b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
/msg $chan $4 has been broken, feel free to post your sabs.
}
}
on *:TEXT:!waitlist:#: {
if ($lines(activemassers.txt) == 0) {
notice $nick There are no active massers
Halt }
else {
/msg $chan Massing:
/play -q5m1 $chan activemassers.txt }
}
on *:TEXT:!endmass:#: {
If ($nick === $hfind(admin,$nick)) {
/msg $chan 4The mass has been halted by8 $nick
//hdel masson yes
//hsave masson masson.txt
set %mass 0
unset %ss
unset %targetnr
unset %nroftargets
/mode $chan -b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
/mode $chan -b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
/timer1 off
/timer2 off
/timer3 off
/timer4 off
/timer5 off
/timer6 off
/timer7 off
hfree activemassers
/write -c activemassers.txt
}
}
on *:TEXT:!next:#: {
If ($nick === $hfind(admin,$nick)) {
hfree activemassers
write -c activemassers.txt
inc %targetnr 1
msg $chan 4Loading target %targetnr $+ / $+ %nroftargets $+ . Get ready!4
timer6 1 10 /msg $chan Type !addme to begin massing, and !delme when you're done.
timer7 1 10 /mode $chan +b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
timer8 1 10 /mode $chan +b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
timer9 1 10 /msg $chan 8You will not be able to post your sabs until the target has been broken. }
}
on *:TEXT:!bpmtarget:#: {
If ($nick === $hfind(admin, $nick)) {
mode $chan -b ~T:block:Your*spies*successfully*enter*'s*armory*undetected,*and*destroy*of*the*enemy's*
mode $chan -b ~T:block:Your*Chief*of*Intelligence*dispatches*spies*to*attempt*to*sabotage*of*'s*weapons*of*type*
}
else { halt
}
}
;----------------------------------------------------------------------------
;------------------- Mass Stats ----------------------------
;----------------------------------------------------------------------------
on *:TEXT:Your spies successfully enter *'s armory undetected, and destroy * of the enemy's *:#: {
If (%ss != 1) {
Halt
}
if ($14 == Invisibility) {
hinc IS1 $nick $10
hsave IS1 is1.txt
}
if ($14 == Blackpowder) {
hinc BPM1 $nick $10
hsave BPM1 bpm1.txt
}
if ($14 == Stick) {
hinc stick1 $nick $10
hsave stick1 stick1.txt
}
if ($14 == Knife) {
hinc knife1 $nick1 $10
hsave knife1 knife1.txt
}
if ($14 == Short) {
hinc shortbow1 $nick $10
hsave shortbow1 shortbow1.txt
}
if ($14 == Staff) {
hinc Staff1 $nick $10
hsave staff1 staff1.txt
}
if ($14 == Hatchet) {
hinc hatchet1 $nick $10
hsave hatchet1 hatchet1.txt
}
if ($14 == Sling) {
hinc sling1 $nick $10
hsave sling1 sling1.txt
}
if ($14 == Crossbow) {
hinc crossbow1 $nick $10
hsave crossbow1 crossbow1.txt
}
if ($14 == Longbow) {
hinc longbow1 $nick $10
hsave longbow1 longbow1.txt
}
if ($14 == Steel) {
hinc steelbow1 $nick $10
hsave steelbow1 steelbow1.txt
}
if ($14 == Steed) {
hinc steed1 $nick $10
hsave steed1 steed1.txt
}
if ($14 == Flaming) {
hinc flamingarrow1 $nick $10
hsave flamingarrow1 flamingarrow1.txt
}
if ($14 == Chariot) {
hinc chariot1 $nick $10
hsave chariot1 chariot1.txt
}
if ($14 == Club) {
hinc club1 $nick $10
hsave club1 club1.txt
}
if ($14 == Spear) {
hinc spear1 $nick $10
hsave spear1 spear1.txt
}
if ($14 == Warblade) {
hinc warblade1 $nick $10
hsave warblade1 warblade1.txt
}
if ($14 == Warg) {
hinc warg1 $nick $10
hsave warg1 warg1.txt
}
if ($14 == Dragon) {
hinc dragon1 $nick $10
hsave dragon1 dragon1.txt
}
if ($14 == Elven) {
hinc elvencloak1 $nick $10
hsave elvencloak1 elvencloak1.txt
}
if ($14 == Helmet) {
hinc helmet1 $nick $10
hsave helmet1 helmet1.txt
}
if ($14 == Shield) {
hinc shield1 $nick $10
hsave shield1 shield1.txt
}
if ($14 == Chainmail) {
hinc chainmail1 $nick $10
hsave chainmail1 chainmail1.txt
}
if ($14 == Plate) {
hinc platearmor1 $nick $10
hsave platearmor1 platearmor1.txt
}
if ($14 == Heavy) {
hinc heavyshield1 $nick $10
hsave heavyshield1 heavyshield1.txt
}
if ($14 == Dragonskin) {
hinc dragonskin1 $nick $10
hsave dragonskin1 dragonskin1.txt
}
if ($14 == Long) {
hinc longsword1 $nick $10
hsave longsword1 longsword1.txt
}
if ($14 == Lance) {
hinc lance1 $nick $10
hsave lance1 lance1.txt
}
if ($14 == Broadsword) {
hinc broadsword1 $nick $10
hsave broadsword1 broadsword1.txt
}
if ($14 == Excalibur) {
hinc excalibur1 $nick $10
hsave excalibur1 excalibur1.txt
}
if ($14 == Mithril) {
hinc mithril1 $nick $10
hsave mithril1 mithril1.txt
}
if ($14 == Pike) {
hinc pike1 $nick $10
hsave pike1 pike1.txt
}
if ($14 == Mace) {
hinc mace1 $nick $10
hsave mace1 mace1.txt
}
if ($14 == Warhammer) {
hinc warhammer1 $nick $10
hsave warhammer1 warhammer1.txt
}
if ($14 == Hammer) {
hinc hammerofthor1 $nick $10
hsave hammerofthor1 hammerofthor1.txt
}
if ($14 == Battle) {
hinc battleaxe1 $nick $10
hsave battleaxe1 battleaxe1.txt
}
if ($14 == Gauntlets) {
hinc Gauntlets1 $nick $10
hsave gauntlets1 gauntlets1.txt
}
notice $nick Your sabotage on $5 has been recorded.
else { halt }
}
on *:TEXT:!mymassstats:#: {
If (%ss != 1) {
Halt
}
if (!$hget(IS1, $nick)) && (!$hget(BPM1, $nick)) {
notice $nick No sabs recorded for this nickname. Post a sab log to start recording your sabs. }
else {
msg $chan Invisibility Shields: $hget(IS1, $nick)
msg $chan Blackpowder Missile's: $hget(BPM1, $nick)
var %row1 = $calc(($hget(stick1,$nick) * 200) + ($hget(knife1,$nick) * 1000) + ($hget(sling1,$nick) * 1800) + ($hget(club1,$nick) * 3200) + ($hget(spear1,$nick) * 5100))
var %row2 = $calc(($hget(warblade1,$nick) * 16400) + ($hget(warg1,$nick) * 50000) + ($hget(dragon1,$nick) * 200000) + ($hget(chariot1,$nick) * 50000) + ($hget(BPM1,$nick) * 850000))
var %row3 = $calc(($hget(helmet1,$nick) * 2000) + ($hget(shield1,$nick) * 3200) + ($hget(chainmail1,$nick) * 5100) + ($hget(platearmor1,$nick) * 16400) + ($hget(heavyshield1,$nick) * 50000))
var %row4 = $calc(($hget(dragonskin1,$nick) * 200000) + ($hget(IS1,$nick) * 750000) + ($hget(shortbow1,$nick) * 1800) + ($hget(crossbow1,$nick) * 3200) + ($hget(longbow1,$nick) * 5100))
var %row5 = $calc(($hget(steelbow1,$nick) * 16400) + ($hget(steed1,$nick) * 50000) + ($hget(flamingarrow1,$nick) * 200000) + ($hget(elvencloak1,$nick) * 50000) + ($hget(longsword1,$nick) * 3200))
var %row6 = $calc(($hget(lance1,$nick) * 5100) + ($hget(broadsword1,$nick) * 16400) + ($hget(excalibur1,$nick) * 200000) + ($hget(mithril1,$nick) * 50000) + ($hget(hatchet1,$nick) * 1800))
var %row7 = $calc(($hget(pike1,$nick) * 3200) + ($hget(mace1,$nick) * 5100)) + ($hget(warhammer1,$nick) * 16400) + ($hget(battleaxe1,$nick) * 180000) + ($hget(hammeFrofthor1,$nick) * 50000) + ($hget(gauntlets1,$nick) * 50000))
notice $nick Total Weapon Value Sabbed: $calc((%row1 + %row2 + %row3 + %row4 + %row5 + %row6 + %row7))
var %row8 = $calc(($hget(stick1,$nick) * 2) + ($hget(knife1,$nick) * 5) + ($hget(sling1,$nick) * 10) + ($hget(club1,$nick) * 20) + ($hget(spear1,$nick) * 40))
var %row9 = $calc(($hget(warblade1,$nick) * 160) + ($hget(warg1,$nick) * 640) + ($hget(dragon1,$nick) * 2560) + ($hget(chariot1,$nick) * 640) + ($hget(BPM1,$nick) * 12000))
var %row10 = $calc(($hget(helmet1,$nick) * 10) + ($hget(shield1,$nick) * 20) + ($hget(chainmail1,$nick) * 40) + ($hget(platearmor1,$nick) * 160) + ($hget(heavyshield1,$nick) * 640))
var %row11 = $calc(($hget(dragonskin1,$nick) * 2560) + ($hget(IS1,$nick) * 10000) + ($hget(shortbow1,$nick) * 10) + ($hget(crossbow1,$nick) * 20) + ($hget(longbow1,$nick) * 40))
var %row12 = $calc(($hget(steelbow1,$nick) * 160) + ($hget(steed1,$nick) * 640) + ($hget(flamingarrow1,$nick) * 2560) + ($hget(elvencloak1,$nick) * 640) + ($hget(longsword1,$nick) * 20))
var %row13 = $calc(($hget(lance1,$nick) * 40) + ($hget(broadsword1,$nick) * 160) + ($hget(excalibur1,$nick) * 2560) + ($hget(mithril1,$nick) * 640) + ($hget(hatchet1,$nick) * 10))
var %row14 = $calc(($hget(pike1,$nick) * 20) + ($hget(mace1,$nick) * 40)) + ($hget(warhammer1,$nick) * 160) + ($hget(battleaxe1,$nick) * 2560) + ($hget(hammerofthor1,$nick) * 640) + ($hget(gauntlets1,$nick) * 640))
notice $nick Total Weapon Strength Sabbed: $calc((%row8 + %row9 + %row10 + %row11 + %row12 + %row13 + %row14))
}
}
on *:TEXT:!massstats:#: {
If (%ss != 1) {
Halt
}
notice $nick Invisibility Shields: $hget(IS1).data
notice $nick Blackpowder Missile's: $hget(BPM1).data
var %row1 = $calc(($hget(stick1).data * 200) + ($hget(knife1).data * 1000) + ($hget(sling1).data * 1800) + ($hget(club1).data * 3200) + ($hget(spear1).data * 5100))
var %row2 = $calc(($hget(warblade1).data * 16400) + ($hget(warg1).data * 50000) + ($hget(dragon1).data * 200000) + ($hget(chariot1).data * 50000) + ($hget(BPM1).data * 850000))
var %row3 = $calc(($hget(helmet1).data * 2000) + ($hget(shield1).data * 3200) + ($hget(chainmail1).data * 5100) + ($hget(platearmor1).data * 16400) + ($hget(heavyshield1).data * 50000))
var %row4 = $calc(($hget(dragonskin1).data * 200000) + ($hget(IS1).data * 750000) + ($hget(shortbow1).data * 1800) + ($hget(crossbow1).data * 3200) + ($hget(longbow1).data * 5100))
var %row5 = $calc(($hget(steelbow1).data * 16400) + ($hget(steed1).data * 50000) + ($hget(flamingarrow1).data * 200000) + ($hget(elvencloak1).data * 50000) + ($hget(longsword1).data * 3200))
var %row6 = $calc(($hget(lance1).data * 5100) + ($hget(broadsword1).data * 16400) + ($hget(excalibur1).data * 200000) + ($hget(mithril1).data * 50000) + ($hget(hatchet1).data * 1800))
var %row7 = $calc(($hget(pike1).data * 3200) + ($hget(mace1).data * 5100)) + ($hget(warhammer1).data * 16400) + ($hget(battleaxe1).data * 180000) + ($hget(hammeFrofthor1).data * 50000) + ($hget(gauntlets1).data * 50000))
msg $chan Total Weapon Value Sabbed This Mass: $calc((%row1 + %row2 + %row3 + %row4 + %row5 + %row6 + %row7))
var %row8 = $calc(($hget(stick1).data * 2) + ($hget(knife1).data * 5) + ($hget(sling1).data * 10) + ($hget(club1).data * 20) + ($hget(spear1).data * 40))
var %row9 = $calc(($hget(warblade1).data * 160) + ($hget(warg1).data * 640) + ($hget(dragon1).data * 2560) + ($hget(chariot1).data * 640) + ($hget(BPM1).data * 12000))
var %row10 = $calc(($hget(helmet1).data * 10) + ($hget(shield1).data * 20) + ($hget(chainmail1).data * 40) + ($hget(platearmor1).data * 160) + ($hget(heavyshield1).data * 640))
var %row11 = $calc(($hget(dragonskin1).data * 2560) + ($hget(IS1).data * 10000) + ($hget(shortbow1).data * 10) + ($hget(crossbow1).data * 20) + ($hget(longbow1).data * 40))
var %row12 = $calc(($hget(steelbow1).data * 160) + ($hget(steed1).data * 640) + ($hget(flamingarrow1).data * 2560) + ($hget(elvencloak1).data * 640) + ($hget(longsword1).data * 20))
var %row13 = $calc(($hget(lance1).data * 40) + ($hget(broadsword1).data * 160) + ($hget(excalibur1).data * 2560) + ($hget(mithril1).data * 640) + ($hget(hatchet1).data * 10))
var %row14 = $calc(($hget(pike1).data * 20) + ($hget(mace1).data * 40)) + ($hget(warhammer1).data * 160) + ($hget(battleaxe1).data * 2560) + ($hget(hammerofthor1).data * 640) + ($hget(gauntlets1).data * 640))
msg $chan Total Weapon Strength Sabbed This Mass: $calc((%row8 + %row9 + %row10 + %row11 + %row12 + %row13 + %row14))
}