Sound(GetInfo(67).."/sounds/skills/fastwake.ogg")
Sound(GetInfo(67).."/sounds/bombs/put in shell.ogg")
Sound(GetInfo(67).."/sounds/bombs/shell1.ogg")
DoAfterSpecial(0.2,'Sound(GetInfo(67).."/sounds/bombs/shell2.ogg")',12)
Sound(GetInfo(67).."/sounds/bombs/explode.ogg")
Sound(GetInfo(67).."/sounds/bombs/ice ring.ogg")
Sound(GetInfo(67).."/sounds/bombs/fire liquid.ogg")
Sound(GetInfo(67).."/sounds/bombs/make bladebomb.ogg")
Sound(GetInfo(67).."/sounds/bombs/make firebomb.ogg")
Sound(GetInfo(67).."/sounds/bombs/make frostring.ogg")
Sound(GetInfo(67).."/sounds/bombs/makefuse.ogg")
Sound(GetInfo(67).."/sounds/skills/usebrage.ogg")
prevhp = 0
prevmn = 0
rct={}
Sound(sdir.."/sounds/combat/deathcard.ogg")
Execute("c %1 group")
if rooms==nil then
Note("Can't get room table information.")
elseif rooms[k_room]==nil then
Note("There is no information for this room.")
else
unexplored={}
doors={}
for k,v in pairs(rooms[k_room]) do
if v=="unexplored" then
table.insert(unexplored,walkdirs[k])
elseif v=="door" then
table.insert(unexplored,walkdirs[k])
end --unexplored
end --for
if (#unexplored>1) then
count=#unexplored-1
end --count
if #unexplored==1 then
Note("There is an unexplored exit "..table.concat(unexplored, ", "))
elseif #unexplored>1 then
Note("There are unexplored exits "..table.concat(unexplored, ", ", 1, count)..", and "..unexplored[#unexplored]..".")
else
nearest()
end --count
end --nil
lastdir=walkdirs["%1"]
pmap()
k_room="%1"
if rooms==nil then
rooms={}
end
if rooms[k_room]==nil then
rooms[k_room]={}
end
if (gs("shortid")==1) then
Note("%0")
return
end
if (gs("shortid")==3) then
Note("%0")
end
if iidflags==nil then
iidflags=", damage %1 to %2 %3 needs %4 str. "
else
iidflags=iidflags..", damage %1 to %2 %3 needs %4 str. "
end
swheel=0
Sound(GetInfo(67).."/sounds/slots/bandit1.ogg")
DoAfterSpecial(1.3,'Sound(GetInfo(67).."/sounds/slots/bandit2.ogg")',12)
DoAfterSpecial(3.3,'Sound(GetInfo(67).."/sounds/slots/losemerchant.ogg")',12)
ppi.stop(wheel1)
ppi.stop(wheel2)
Sound(GetInfo(67).."/sounds/slots/travel.ogg")
Sound(GetInfo(67).."/sounds/slots/wagon.ogg")
rc("darken")
if kspells["darken"]==1 then
rct["darken"]=true
end
Sound(GetInfo(67).."/sounds/spells/darken off.ogg")
if gs("shortid")==1 then return end
if ("%1"~="weapon") then
iacapply="%3 min str %5"
Note("This item is a %2 %1.")
else
iacapply=nil
Note("This item is a %2 weapon.")
end
if gs("shortid")==1 then return end
if "%1"=="LIQUID CONTAINER" then
Send("lecho liquid_id")
elseif ("%1"=="SPELLCOMP" or "%1"=="HERB" or "%1"=="FOOD") then
Send("lecho spellcomp_id")
else
if "%1"~="weapon" then
Note("This item is a %1")
else
iacapply=nil
Note("This item is a %3 weapon.")
end
end
print("A "..idlevel.." brew component.")
Note("this is a %2 liquid container")
if gs("shortid")==1 then return end
if iidflags==nil then
iidflags=" bound"
else
iidflags=iidflags.." bound"
end
if gs("shortid")==1 then return end
if iidflags==nil then
iidflags=" account bound"
else
iidflags=iidflags.." account bound"
end
if settings.shortid.status==1 then
Note("Flags: %1")
return
end
if (gs("shortid")==3) then
Note("Flags: %1")
end
iidflags="%1"
EnableTimer("maptimer",true)
--print(#kspells..", "..kspells)
Execute("storage fcapture -wearable %1")
Execute("storage fcapture -wearable %1")
storefilter={}
Note("ok, cleared")
if gs("shortid")==1 then return end
if string.match("%3","Level: ") then
idlevel="level "..string.sub("%3",7)
elseif string.match("%3","Total levels: ") then
idlevel="total "..string.sub("%3",15)
end
if gs("shortid")==1 then return end
Send("lecho affects_done")
iaffects=""
Note("map interrupted unexpectedly, can't find next exit. use zmap resume or zmr to resume.")
zmap go %1
zmap door %1
zmap start
zmap stop
zmap goback
zmap pause
zmap resume
zmap undo
if "%1"~=curmap[1] then
Note("you are in the wrong room for this map! You should be in "..curmap[1])
else
mvtime=true
adir=0
table.remove(curmap,1)
table.remove(curmap,1)
maxdir=#curmap
Send(curmap[1].." | tail 1 | prefix moving")
table.insert(mapback,1,ldir[curmap[1]])
end
stand
l | head 1 | prefix mapmove
mtime=true
curmap={}
table.insert(curmap,"%1")
table.insert(curmap,true)
Note("starting new map at "..curmap[1]..". To stop, type zmap stop.")
Note("Please note that you will need to use the movement pad or the one letter direction aliases so the direction is recorded properly. Refer to the readme for more details.")
stand
l | head 1 | prefix mapstart
em exclaims, 'Ich bringe das Feuer!;a
Zmap commands are:
zmap start or zms - start a map
zmap door or zmd name - add a door to a map.
zmap undo or zmu - remove last direction you went to.
zmap pause - stop logging directions, for example if you're not sure which direction is next then go back to where you were and resume.
zmap stop or zmst - complete a map
zmap list - list all your maps
zmap go or zmg mapname go to a given map
zmap resume or zmr - resume an unexpectedly interrupted map or paused map creation.
zmap goback or zmgb - go the last map backwards
trackarea=""
trackconflict=0
trackdistn=0
trackdist=""
trackdir=""
Send("nearby | grep %1 | prefix trk")
Send("lecho tracking_start")
trackconflict=0
Send("nearby | grep %1 | prefix trk")
if trackarea=="" then
Note("No area with such name was found! Please make sure you capitalize it correctly.")
end
if trackconflict==1 then
trackarea=""
end
Note("%1/%2 visible max was %3")
Note("There are no items to capture.")
Sound(GetInfo(67).."/sounds/notifications/daygift.ogg")
filtering=true
if gs("container")~=nil then
Note("Now filter capturing %1")
Send("storage llist %1 -insult | prefix storecap")
else
Note("You haven't set your container! Look for the container used for item keeping in config.")
end
filtering=false
if gs("container")~=nil then
Note("Now capturing %1")
Send("storage llist %1 -insult | prefix storecap")
else
Note("You haven't set your container! Look for the container used for item keeping in config.")
end
Note("Testing capture of %1")
previtems=0
prevweight=0
Send("storage llist %1 -w | prefix storeprev")
Send("lecho preview_done")
for i,v in pairs(zapped) do
Send("wear "..v)
end
Sound(GetInfo(67).."/sounds/notifications/setcomplete.ogg")
Execute("eql change "..act[2].." "..eql[act[2]].container)
eql.lastset=act[2]
eql.wearing=false
Note("done!")
dbn("Took "..os.clock()-c1.."seconds")
eql.items=tonumber("%1")
eql.maxitems=tonumber("%2")
eql.cancarry=eql.maxitems-eql.items
Send("lecho lightning_wear")
k_cap=tonumber("%1")
k_cap=tonumber("%1")
table.insert(zapped,"%1")
EnableGroup("telltriggers",0)
DoAfterSpecial(1,'EnableGroup("telltriggers",1)',12)
ecnum=ecnum-1
container=ecnum.."."..eql[act[2]].container
table.remove(containerstocheck,1)
if #containerstocheck>0 then
Send("lecho container_check 1")
else
Send("insult -all | prefix eqlc")
Send("lecho wearing_time")
end
Send("lecho container_check "..ecnum+1)
Sound(GetInfo(67).."/sounds/reforge/lift.ogg")
Sound(GetInfo(67).."/sounds/skills/bls1.ogg")
Sound(GetInfo(67).."/sounds/skills/bls2.ogg")
Sound(GetInfo(67).."/sounds/necromancer/shield off.ogg")
rct["bone shield"]=true
rc("bone shield")
Sound(GetInfo(67).."/sounds/necromancer/barmor off.ogg")
rct["bone armor"]=true
rc("bone armor")
rct["bone shield"]=nil
Sound(GetInfo(67).."/sounds/necromancer/bone shield.ogg")
rct={}
Sound(GetInfo(67).."/sounds/necromancer/barmor2.ogg")
Sound(GetInfo(67).."/sounds/necromancer/barmor4.ogg")
Sound(GetInfo(67).."/sounds/necromancer/barmor6.ogg")
Sound(GetInfo(67).."/sounds/necromancer/barmor5.ogg")
Sound(GetInfo(67).."/sounds/necromancer/shield invoque.ogg")
Send("wear bone shield")
rct["bone shield"]=nil
Sound(GetInfo(67).."/sounds/necromancer/barmor3.ogg")
Sound(GetInfo(67).."/sounds/necromancer/barmor11.ogg")
rct["bone armor"]=nil
DoAfterSpecial(0.2,'Sound(GetInfo(67).."/sounds/necromancer/barmor12.ogg")',12)
rct={}
DoAfterSpecial(0.5,'Sound(GetInfo(67).."/sounds/slots/better luck.ogg")',12)
DoAfterSpecial(0.5,'Sound(GetInfo(67).."/sounds/slots/no jackpot.ogg")',12)
DoAfterSpecial(0.5,'Sound(GetInfo(67).."/sounds/slots/quiet bell.ogg")',12)
DoAfterSpecial(0.5,'Sound(GetInfo(67).."/sounds/slots/loud bell.ogg")',12)
DoAfterSpecial(0.5,'Sound(GetInfo(67).."/sounds/slots/winner.ogg")',12)
Sound(GetInfo(67).."/sounds/notifications/random.ogg")
Sound(GetInfo(67).."/sounds/notifications/you get gift.ogg")
Execute("history_add all=%1 has given you a gift!")
Sound(GetInfo(67).."/sounds/notifications/friend gets gift.ogg")
Sound(GetInfo(67).."/sounds/notifications/advent.ogg")
ppi.stop(wheel3)
Note("The final wheel stops at %1!")
wheel3s=ppi.play(sdir.."/sounds/slots/%1.ogg",0,100)
ppi.stop(wheel1)
Note("The first wheel stops at %1!")
wheel1s=ppi.play(sdir.."/sounds/slots/%1.ogg",0,-100)
swheel=2
swheel=1
swheel=3
ppi.stop(wheel2)
Note("The second wheel stops at %1!")
wheel2s=ppi.play(sdir.."/sounds/slots/%1.ogg",0,0)
ppi.stop(wheel4)
Sound(GetInfo(67).."/sounds/slots/wheelstop.ogg")
wheel4=ppi.play(sdir.."/sounds/slots/jackpotwheel.ogg",0,0)
ppi.play(GetInfo(67).."/sounds/slots/wheels appear.ogg",0,0,90)
wheel1=ppi.play(GetInfo(67).."sounds/slots/wheelsound.ogg",1,-100)
wheel2=ppi.play(GetInfo(67).."sounds/slots/wheelsound.ogg",1,0)
wheel3=ppi.play(GetInfo(67).."sounds/slots/wheelsound.ogg",1,100)
ppi.play(GetInfo(67).."/sounds/slots/wheels appear.ogg",0,0,90)
wheel1=ppi.play(GetInfo(67).."sounds/slots/wheelmore.ogg",1,-100)
wheel2=ppi.play(GetInfo(67).."sounds/slots/wheelmore.ogg",1,0)
wheel3=ppi.play(GetInfo(67).."sounds/slots/wheelmore.ogg",1,100)
wheel1=ppi.play(GetInfo(67).."sounds/slots/wheelmore.ogg",1,-100)
wheel2=ppi.play(GetInfo(67).."sounds/slots/wheelmore.ogg",1,100)
ppi.play(GetInfo(67).."/sounds/slots/wheels appear.ogg",0,0,90)
Sound(GetInfo(67).."/sounds/slots/offergold2.ogg")
DoAfterSpecial(0.2,'Sound(GetInfo(67).."/sounds/slots/offergold1.ogg")',12)
rankname="%1"
Send("who combat | prefix crank")
epoints={}
DoAfterSpecial(0.2,[[
require "tprint"
ts = {} -- table to hold the keys
table.foreach (epoints, function (k, v) table.insert (ts, v) end )
table.sort(ts,
function (k,v)
if k>v then
return true
end
end
)
name=string.lower(rankname)
points=epoints[name]
if points==nil then
return
end
table.foreach(ts,
function(k,v)
if v==points then
rank=k
end
end
)
Note(name.." has "..points.." explorer points, rank "..rank)
]],12)
epoints[string.lower("%1")]=tonumber("%2")
points={}
DoAfterSpecial(0.2,[[
require "tprint"
ts = {} -- table to hold the keys
table.foreach (points, function (k, v) table.insert (ts, v) end )
table.sort(ts,
function (k,v)
if k>v then
return true
end
end
)
name=string.lower(rankname)
points=points[name]
if points==nil then
Note("Something's gone awry! Make sure you entered a full character name.")
return
end
table.foreach(ts,
function(k,v)
if v==points then
rank=k
end
end
)
Note(name.." has "..points.." combat points, rank "..rank)
Send("who explorer | prefix erank")
]],12)
points[string.lower("%1")]=tonumber("%2")
Execute("history_add all=You can now learn %2!")
Execute("history_add learn=You can now learn %2!")
brewing=1
recipe={}
ritems=0
Note("nod")
DoAfterSpecial(0.2,"process_recipe()",12)
DoAfterSpecial(3,"brewing=0",12)
Sound(GetInfo(67).."/sounds/brewing/start.ogg")
brewing=0
DoAfterSpecial(3,'Sound(GetInfo(67).."sounds/brewing/bell.ogg")',12)
if (gs("brewlog")==true) then
AppendToNotepad("brews", "Successful recipe of "..#recipe.." ingredients:\\r\\n")
for i,v in pairs(recipe) do
AppendToNotepad("brews",v.."\\r\\n")
end
end
ac=" ac %2 "
Has %1 of %2 pounds.
Sound(GetInfo(67).."/sounds/necromancer/consume bone.ogg")
Sound(GetInfo(67).."/sounds/misc/eat corpse.ogg")
Sound(GetInfo(67).."/sounds/necromancer/consume flesh.ogg")
Sound(GetInfo(67).."/sounds/necromancer/mist2.ogg")
Sound(GetInfo(67).."/sounds/necromancer/mparry1.ogg")
DoAfterSpecial(0.2,'Sound(GetInfo(67).."/sounds/necromancer/mparry2.ogg")',12)
Sound(GetInfo(67).."/sounds/necromancer/wparry1.ogg")
DoAfterSpecial(0.2,'Sound(GetInfo(67).."/sounds/necromancer/wparry2.ogg")',12)
Sound(GetInfo(67).."/sounds/spells/turnf2.ogg")
Sound(GetInfo(67).."/sounds/spells/feeble mind.ogg")
Sound(GetInfo(67).."/sounds/spells/psionic.ogg")
Sound(GetInfo(67).."/sounds/spells/roots start.ogg")
Sound(GetInfo(67).."/sounds/spells/storm2.ogg")
Sound(GetInfo(67).."/sounds/necromancer/vamp bite.ogg")
Sound(GetInfo(67).."/sounds/necromancer/vamp scream.ogg")
Sound(GetInfo(67).."/sounds/necromancer/vamp int.ogg")
Sound(GetInfo(67).."/sounds/spells/roots more.ogg")
Sound(GetInfo(67).."/sounds/notifications/rebootnow.ogg")
Execute("history_add all=rebooting, everyone please recall and save")
Sound(GetInfo(67).."/sounds/notifications/reboot.ogg")
Execute("history_add all=reboot in %1 minutes!")
Sound(GetInfo(67).."/sounds/spells/sunstorm.ogg")
Sound(GetInfo(67).."/sounds/spells/storm1.ogg")
Sound(GetInfo(67).."/sounds/spells/storm1.ogg")
Sound(GetInfo(67).."/sounds/spells/flameblade.ogg")
Sound(GetInfo(67).."/sounds/spells/crystal shield.ogg")
rct["darken"]=false
Sound(GetInfo(67).."/sounds/spells/darken on.ogg")
Sound(GetInfo(67).."/sounds/spells/sunstorm.ogg")
Sound(GetInfo(67).."/sounds/spells/flamestrike.ogg")
Sound(GetInfo(67).."/sounds/necromancer/preserve.ogg")
rc("water breathing")
if kspells["waterbreathing"]==1 then
rct["water breathing"]=true
end
Sound(GetInfo(67).."/sounds/spells/water off.ogg")
rc("detect poison")
if kspells["detectpoison"]==1 then
rct["detect poison"]=true
end
Sound(GetInfo(67).."/sounds/spells/dpoison off.ogg")
Sound(GetInfo(67).."/sounds/skills/whirl off.ogg")
Sound(GetInfo(67).."/sounds/skills/victory.ogg")
Sound(GetInfo(67).."/sounds/shadow/strike1.ogg")
Sound(GetInfo(67).."/sounds/spells/turnf4.ogg")
Sound(GetInfo(67).."/sounds/spells/turnf1.ogg")
Sound(GetInfo(67).."/sounds/spells/turnf3.ogg")
Sound(GetInfo(67).."/sounds/spells/farsee.ogg")
Sound(GetInfo(67).."/sounds/skills/valor1.ogg")
Sound(GetInfo(67).."/sounds/skills/valor2.ogg")
Sound(GetInfo(67).."/sounds/skills/valor3.ogg")
Sound(GetInfo(67).."/sounds/necromancer/tap begin.ogg")
Sound(GetInfo(67).."/sounds/skills/bquench.ogg")
Sound(GetInfo(67).."/sounds/necromancer/tap stop.ogg")
Sound(GetInfo(67).."/sounds/spells/holyweapon.ogg")
Sound(GetInfo(67).."/sounds/spells/blizzard.ogg")
Sound(GetInfo(67).."/sounds/necromancer/mist2.ogg")
Sound(GetInfo(67).."/sounds/skills/whirl on.ogg")
rct["water breathing"]=nil
Sound(GetInfo(67).."/sounds/spells/water on.ogg")
rct["detect poison"]=nil
Sound(GetInfo(67).."/sounds/spells/dpoison on.ogg")
DoAfterSpecial(0.4,'Sound(GetInfo(67).."/sounds/shadow/strike2.ogg")',12)
Execute("eql wear %2")
Execute("eql remove %2")
Execute("eql create %2")
Sound(GetInfo(67).."/sounds/kick/kick1.ogg")
Sound(GetInfo(67).."/sounds/kick/kick3.ogg")
Sound(GetInfo(67).."/sounds/kick/kick2.ogg")
Sound(GetInfo(67).."/sounds/kick/kick4.ogg")
Sound(GetInfo(67).."/sounds/kick/kickdodge.ogg")
Sound(GetInfo(67).."/sounds/spells/feeble you.ogg")
Sound(GetInfo(67).."/sounds/spells/ice prison.ogg")
Sound(GetInfo(67).."/sounds/spells/feeble off.ogg")
Sound(GetInfo(67).."/sounds/necromancer/soulforge.ogg")
Sound(GetInfo(67).."/sounds/spells/tap.ogg")
Sound(GetInfo(67).."/sounds/spells/store.ogg")
Sound(GetInfo(67).."/sounds/spells/clums.ogg")
Sound(GetInfo(67).."/sounds/spells/mass conf.ogg")
Sound(GetInfo(67).."/sounds/necromancer/bone prison.ogg")
Sound(GetInfo(67).."/sounds/spells/enchantarmor.ogg")
Sound(GetInfo(67).."/sounds/necromancer/sphere3.ogg")
Sound(GetInfo(67).."/sounds/spells/clums.ogg")
Sound(GetInfo(67).."/sounds/spells/sacred1.ogg")
Sound(GetInfo(67).."/sounds/spells/leth.ogg")
Sound(GetInfo(67).."/sounds/spells/sacred1.ogg")
Sound(GetInfo(67).."/sounds/spells/leth off.ogg")
Sound(GetInfo(67).."/sounds/necromancer/sphere4.ogg")
Sound(GetInfo(67).."/sounds/shadow/bindfree.ogg")
Sound(GetInfo(67).."/sounds/spells/leth.ogg")
Sound(GetInfo(67).."/sounds/shadow/bindmiss.ogg")
Sound(GetInfo(67).."/sounds/necromancer/sphere1.ogg")
Sound(GetInfo(67).."/sounds/spells/rem poison.ogg")
Sound(GetInfo(67).."/sounds/spells/haven2.ogg")
Sound(GetInfo(67).."/sounds/necromancer/sphere2.ogg")
Sound(GetInfo(67).."/sounds/spells/wall of ice.ogg")
Sound(GetInfo(67).."/sounds/shadow/blades.ogg")
Sound(GetInfo(67).."/sounds/shadow/bind.ogg")
Sound(GetInfo(67).."/sounds/spells/slow on.ogg")
Sound(GetInfo(67).."/sounds/spells/haven3.ogg")
Sound(GetInfo(67).."/sounds/spells/presence off.ogg")
rc("presence")
Sound(GetInfo(67).."/sounds/shadow/asylum.ogg")
Sound(GetInfo(67).."/sounds/spells/haven1.ogg")
Sound(GetInfo(67).."/sounds/spells/slow off.ogg")
Sound(GetInfo(67).."/sounds/spells/presence on.ogg")
Sound(GetInfo(67).."/sounds/necromancer/soulbind.ogg")
Sound(GetInfo(67).."/sounds/kick/kick2.ogg")
Sound(GetInfo(67).."/sounds/kick/kick4.ogg")
Sound(GetInfo(67).."/sounds/kick/kick3.ogg")
Sound(GetInfo(67).."/sounds/kick/kick1.ogg")
Sound(GetInfo(67).."/sounds/necromancer/vampire form.ogg")
Sound(GetInfo(67).."/sounds/channelcast/light.ogg")
Sound(GetInfo(67).."/sounds/channelcast/crystal.ogg")
Sound(GetInfo(67).."/sounds/channelcast/frost.ogg")
Sound(GetInfo(67).."/sounds/stomp/crunch.ogg")
Sound(GetInfo(67).."/sounds/stomp/crunch.ogg")
Sound(GetInfo(67).."/sounds/stomp/miss1.ogg")
Sound(GetInfo(67).."/sounds/stomp/miss1.ogg")
Sound(GetInfo(67).."/sounds/stomp/toes.ogg")
Sound(GetInfo(67).."/sounds/stomp/toes.ogg")
Sound(GetInfo(67).."/sounds/stomp/toes.ogg")
Sound(GetInfo(67).."/sounds/stomp/miss2.ogg")
Sound(GetInfo(67).."/sounds/stomp/miss2.ogg")
table.insert(kxwts,"%1")
dbn("%1")
Execute("history_add all=%2")
Note("Mush-z News! %2")
ppi.play(GetInfo(67).."/sounds/notifications/news.ogg",0,0,ppi.getVolume()+30)
Sound(GetInfo(67).."/sounds/notifications/fame.ogg")
Sound(GetInfo(67).."/sounds/channelcast/begin.ogg")
Sound(GetInfo(67).."/sounds/channelcast/fire.ogg")
rct["dying breath"]=nil
Sound(sdir.."/sounds/spells/dying breath on.ogg")
Sound(sdir.."/sounds/necromancer/vampire hiss.ogg")
Sound(sdir.."/sounds/spells/faith on.ogg")
rct["faith shield"]=nil
Sound(sdir.."/sounds/spells/faith off.ogg")
rct["faith shield"]=true
rc("faith shield")
Sound(GetInfo(67).."/sounds/spells/icefog.ogg")
Sound(GetInfo(67).."/sounds/pick/"..math.random(1,rpick)..".ogg")
Sound(GetInfo(67).."/sounds/lock/"..math.random(1,rpick)..".ogg")
Sound(sdir.."/sounds/misc/blue glow self.ogg")
if not gag.misc then Note("You scan the surrounding area...") end
contr all consume corpse
ss("container","%1")
Note("Container set to %1")
if gs("dcomps")==true then
Send("drop bladder")
Send("sac bladder")
end
if gs("dcomps")==true then
Send("drop vial bile fluid yellow brown")
Send("sac bile")
end
if gs("dcomps")==true then
Send("drop stone")
Send("sac stone")
end
if gs("dcomps")==true then
Send("drop bladder bile black")
Send("sac bladd")
end
bsac corpse
settings["%1"].status=true
Note("ok")
Sound(GetInfo(67).."/sounds/notifications/friend quest.ogg")
Execute("history_add friends=%1 completed quest %2")
Execute("history_add all=%1 completed quest %2")
if "%1"=="release" then
sclear()
release()
return
elseif "%1"=="custom" then
sclear()
custom()
return
elseif "%1"=="clear" then
sclear()
return
elseif settings["%1"]==nil then
Note("Unrecognized setting - Type config for a list.")
return
else
settingtables()
confname="%1"
if settings["%1"].status==true then
settings["%1"].status=false
Note("%1 disabled.")
if "%1"=="areamusic" then
ppi.slideVol(0,areaid,2000)
DoAfterSpecial(3,'ppi.stop(areaid)',12)
end
if "%1"=="ambience" then
ppi.slideVol(0,ambid,2000)
DoAfterSpecial(3,'ppi.stop(ambid)',12)
end
return
elseif settings["%1"].status==false then
settings["%1"].status=true
Note("%1 on")
if "%1"=="areamusic" then
if (FileExists(sdir.."/sounds/music/area/"..area..".ogg")==true) then
areaid=ppi.playLooped(sdir.."/sounds/music/area/"..area..".ogg")
ppi.setVol(5,areaid)
resetvol()
end
end
return
end
edit_option("%1")
end
look in %1 | prefix contcheck
Send("look in %1 | prefix contcheck | grep %2")
checkfor="%2"
if container["%1"]~=nil then
container["%1"]=container["%1"]+1
else
container["%1"]=1
end
Note("There is no container with such name.")
require "wait"
wait.make(function()
container={}
wait.time(1)
Note("%2 has in it:")
for i,v in pairs(container) do
if not (checkfor=="") then
if string.match (i,checkfor) then
if v>1 then
Note(v.."("..i..")") end
if v==1 then Note(i) end
end
else
if v>1 then
Note(v.."("..i..")") end
if v==1 then Note(i) end
end
end
container={}
checkfor=""
end)
if gs("areamusic")==true then
if ppi.isPlaying(areaid)==1 then
if gs("vol_areaid")~= nil then
ppi.slideVol(tonumber(gs("vol_areaid")),areaid)
else
ppi.slideVol(ppi.getVolume(),areaid)
end
else
if (FileExists(sdir.."/sounds/music/area/"..area..".ogg")==true) then
areaid=ppi.playLooped(sdir.."/sounds/music/area/"..area..".ogg")
else
areaid=ppi.playLooped(sdir.."/sounds/music/area/global.ogg")
end
resetvol()
end
end
if (gs("music") == true) then
ppi.fadeout(battleid)
battleplaying=0
end
fight = 0
nfight=0
fnames={}
fc=0
EnableGroup("combat",0)
prevfc=0
mvalarm=0
dmg=0
gold=tonumber("%1")
if prevgold>gold then
if goldlog==1 then
Note("Your gold decreased from "..prevgold.." to "..gold)
end
end
prevgold=gold
pose="stand"
if nfight==1 then return end
if "%1"=="sitting" then pose="rest"
elseif "%1"=="sleeping" then pose="sleep"
elseif "%1"=="standing" then pose="stand"
else Note("%1") end
Sound(GetInfo(67).."/sounds/notifications/exp thwack.ogg")
volup()
voldown()
voltoggle(areaid,ambid)
if autogo==1 then
autogo=0
Note("auto move off.")
end
autogo=1
Send("look")
newchar=1
ss("me","new")
Note("Creating a new character. Please say yes when the game asks you if you want to enable screen reader mode.")
Sound(GetInfo(67).."/sounds/notifications/ep.ogg")
Sound(GetInfo(67).."/sounds/necromancer/mage form.ogg")
if autosac==true then
autosac=false
Send("sac corpse")
end
if autosac==true then
autosac=false
Send("sac corpse")
end
if teeth~=0 then
if gs("dteeth")==true then
Send("drop "..teeth.." teeth")
end
Note("You extract "..teeth.." teeth.")
end
if dteeth~=0 then
Note("You extract "..dteeth.." dragon teeth.")
end
teeth=0
dteeth=0
if autosac==true then
autosac=false
Send("sac corpse")
end
if teeth~=0 then
if gs("dteeth")==true then
Send("drop "..teeth.." teeth")
end
Note("You extract "..teeth.." teeth.")
end
if dteeth~=0 then
Note("You extract "..dteeth.." dragon teeth.")
end
teeth=0
dteeth=0
eql[act[2]]={}
eql[act[2]].container=act[3]
eql[act[2]].mode=creatingmode
Send("remove "..act[3])
Execute("eqlt")
Note("set created.")
eql[act[2]]={}
eql[act[2]].mode=creatingmode
eql[act[2]].container=act[3]
Execute("eqlt")
Note("set created.")
cmi=0
SetClipboard(cmistr)
cmistr=""
Note("Error - You don't have "..act[3].." in your inventory.")
for i,v in pairs(eql.setnames) do
if v==act[2] then
table.remove(eql.setnames,i)
end
end
creatingset=false
creating=false
if eql.creating then
eql.creating=false
Note("You can't make a set out of nothing!")
eql[act[2]]=nil
return
else
if eql.wearing then
moving=false
weareq(moving)
end
end
Sound(GetInfo(67).."/sounds/notifications/get point.ogg")
if not gag.spells then Note("With the last soulstone, A prepared %1 corpse is fully prepared.") end
Sound(GetInfo(67).."/sounds/necromancer/prepare full.ogg")
--if not gag.spells then Note("You chant a spell to magically bind %1 to A prepared %2 corpse.") end
Sound(GetInfo(67).."/sounds/necromancer/prepare soul.ogg")
Sound(GetInfo(67).."/sounds/undead talk/ghoul/"..math.random(1,ghoultalk)..".ogg")
Sound(GetInfo(67).."/sounds/undead talk/ghoul/"..math.random(1,ghoultalk)..".ogg")
Sound(GetInfo(67).."/sounds/undead/skw-assist.ogg")
if not gag.minions then Note("A ghoul rips and tears into %1 with filthy, diseased claws!")
end
Sound(GetInfo(67).."/sounds/undead/ghoulclaws.ogg")
Sound(GetInfo(67).."/sounds/undead talk/ghoul/"..math.random(1,ghoultalk)..".ogg")
if not gag.minions then Note("A ghoul bites %1 with diseased, razor sharp teeth!")
end
Sound(GetInfo(67).."/sounds/undead/ghoulbite.ogg")
Sound(GetInfo(67).."/sounds/undead talk/ghoul/"..math.random(1,ghoultalk)..".ogg")
if not gag.minions then Note("A ghoul bites %1 with diseased, razor sharp teeth!")
end
Sound(GetInfo(67).."/sounds/undead talk/ghoul/"..math.random(1,ghoultalk)..".ogg")
Sound(GetInfo(67).."/sounds/undead/ghoulbite.ogg")
if not gag.minions then Note("A ghoul jumps at %1 clawing and biting!")
end
Sound(GetInfo(67).."/sounds/undead/ghoulclaws2.ogg")
Sound(GetInfo(67).."/sounds/undead talk/ghoul/"..math.random(1,ghoultalk)..".ogg")
if not gag.spells then Note("A skeletal mage throws a bolt of fire at %1!") end
Sound(GetInfo(67).."/sounds/necromancer/magefire/"..math.random(1,magefire)..".ogg")
if not gag.spells then Note("A skeletal mage throws a bolt of ice at %1!") end
Sound(GetInfo(67).."/sounds/necromancer/mageice/"..math.random(1,mageice)..".ogg")
if not gag.spells then Note("A skeletal mage throws a bolt of lightning at %1!") end
Sound(GetInfo(67).."/sounds/necromancer/magezap/"..math.random(1,magezap)..".ogg")
Sound(GetInfo(67).."/sounds/necromancer/s-circle.ogg")
minion=true
DoAfterSpecial(2,'Sound(GetInfo(67).."/sounds/necromancer/accept offer.ogg")',12)
minion=true
DoAfterSpecial(1,'Sound(GetInfo(67).."/sounds/necromancer/green demon.ogg")',12)
if gs("soulsteal")==true then
if kspells["soulsteal"]==1 then
stealnext=true
end
end
Sound(GetInfo(67).."/sounds/necromancer/near death.ogg")
if not gag.spells then Note("You throw a ball of freezing unfire at %1") end
yspell("coldfire")
if not gag.minions then Note("A clay man forms from nearby dirt and clay to serve you.") end
minion=true
noreclay=true
Sound(GetInfo(67).."/sounds/necromancer/clay man.ogg")
if (grouped==1) and (Pose~="stand") then
PSend("stand")
end
afk=1
afk=1
editing=1
afk=0
editing=0
if pose~="stand" then
Send("stand")
end
Sound(GetInfo(67).."/sounds/spells/chimes.ogg")
Sound(GetInfo(67).."/sounds/spells/sickening touch.ogg")
Sound(GetInfo(67).."/sounds/spells/sickening touch.ogg")
if not gag.spells then Note("You cast the spell to separate soul from body, and pull %1 essence into a %2 soulstone!")
else
Note("You obtain %1 %2 soulstone!")
end
soulstone=true
if gs("container")~=nil then
Send("put soulstone "..gs("container"))
end
Sound(sdir.."/sounds/spells/soulsteal/"..math.random(1,rsoul)..".ogg")
soulstone=true
Send("put soulstone "..gs("container"))
Sound(sdir.."/sounds/necromancer/soul struggle.ogg")
Sound(GetInfo(67).."/sounds/spells/deathly sleep on.ogg")
Sound(GetInfo(67).."/sounds/spells/deathly sleep off.ogg")
Sound(GetInfo(67).."/sounds/spells/free spirit.ogg")
Sound(GetInfo(67).."/sounds/spells/free return.ogg")
editing=0
afk=0
grouped=0
Sound(sdir.."/sounds/notifications/friend dies.ogg")
Execute("history_add all=(friend) %1 died to %2!")
Execute("history_add friends=(friend) %1 died to %2!")
newver="%1"
if gs("version")~=GetVariable("version") then
ss("version",GetVariable("version"))
end
if(newver==GetVariable("version")) then
Note("You are using the latest version of mush-z.")
else
utils.msgbox("It might be time to update! Your version doesn't match the version on the server. The server says "..newver..". Your current version is "..GetVariable("version")..".","Update time!")
--utils.msgbox("There's a new update for MUSH-Z!"..newver..". Your current version is "..GetVariable("version")..". To get the most up to date version, use the updater.","Wait a sec there buddy")
end
tnl_prac=%1
tnl_cleric=tonumber(removespaces("%1"))
tnl_mage=tonumber(removespaces("%1"))
tnl_necro=tonumber(removespaces("%1"))
tnl_exp=exp
arr_max={}
if(tnl_prac==nil) then
tnl_prac=2000000
end
str=""
if tnl_mage<100 then str=str.."m "..tnl_mage.." " end
if tnl_cleric<100 then str=str.."c "..tnl_cleric.." " end
if tnl_thief<100 then str=str.."t "..tnl_thief.." " end
if tnl_warrior<100 then str=str.."w "..tnl_warrior.." " end
if tnl_necro<100 then str=str.."n "..tnl_necro.." " end
if ((tnl_exp/tnl_prac*100)<100) then
prac="prac "..(tnl_exp/tnl_prac*100)
str=str..prac
end
Note(str)
tnl_thief=tonumber(removespaces("%1"))
tnl_warrior=tonumber(removespaces("%1"))
eventregen=0
eventregen=1
autotick | prefix scr
if gs("shortid")==1 then return end
iacapply=nil
Note("a %1 weapon.")
if gs("shortid")==1 then return end
if "%1"~="weapon" then
iacapply="%3"
Note ("a %1 made of %2")
else
iacapply=nil
Note("This item is a %2 weapon.")
end
Note("This weapon needs %3 strength to wield.")
if(afk==0) then
PSend("aff | grep Spell | grep minutes | prefix spfl")
end
if(gs("ticksounds")==true) then
Sound(sdir.."/sounds/notifications/tick.ogg")
DoAfterSpecial(25,'Sound(sdir.."/sounds/notifications/tick5.ogg")',12)
end
Note("speed %1")
if not gag.spells then Note("You link hands with %1 to the right.") end
ppi.play(sdir.."/sounds/spells/gcast/link2.ogg",0,50)
if not gag.spells then Note("You link hands with %1 to the left.") end
ppi.play(sdir.."/sounds/spells/gcast/link1.ogg",0,-50)
if not gag.spells then Note("%1 lead%2 the group in the casting of a spell...") end
DoAfterSpecial(0.4,'Sound(sdir.."/sounds/spells/gcast/circle.ogg")',12)
if not gag.spells then Note("You feel power coursing through your body as the spell is cast.") end
DoAfterSpecial(1.3,'Sound(sdir.."/sounds/spells/gcast/energy.ogg")',12)
PSend("autodoor")
Note("Configuring autodoor.")
PSend("condition %2")
if not gag.spells then Note("You suddenly feel less tired and more refreshed!") end
play("skills/secondwind",0)
play("skills/secondwind charge",0)
play("skills/secondwind fail",0)
if not gag.spells then Note("You try to push beyond the boundries of your endurance, but nothing happens!") end
play("skills/secondwind fail",0)
exptnl=tonumber("%1")
classtnl="%2"
Note("Next class you should level is "..classtnl.." for "..exptnl)
levtnl="%3"
EnableGroup("show",0)
afk=1
afk=1
Note("timers disabled.")
afk=1
afk=1
afk=0
afk=0
afk=1
afk=0
afk=1
afk=0
spell="%1"
mins=tonumber("%2")
if (mins==nil) then
return
end
if (mins<21) then
if (mins==20) then
if (warned3[spell]~=1) then
Note("Warning - "..spell.." will fall in 3.")
warned3[spell]=1
DoAfterSpecial(45,"warned3[spell]=0",12)
warned2[spell]=0
warned1[spell]=0
end
elseif (mins==10) then
if (warned2[spell]~=1) then
Note("Warning - "..spell.." will fall in 2.")
warned2[spell]=1
warned1[spell]=0
DoAfterSpecial(45,"warned2[spell]=0",12)
end
elseif (mins==0) then
if (warned1[spell]~=1) then
warned1[spell]=1
Note("Warning - "..spell.." is about to fall.")
if (grouped==1) and (gs("swarn")==true) then
PSend("sub "..spell.." in 1.")
end
warned3[spell]=0
warned2[spell]=0
DoAfterSpecial(45,"warned1[spell]=0",12)
end
end
end
casting=""
s_dex=tonumber("%3")
s_sz="%5"
if (s_dex~=s_prevdex) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your dex is now "..s_dex)
end
end
s_prevdex=s_dex
end
if (s_sz~=s_prevsz) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your zap save is now "..s_sz)
end
end
s_prevsz=s_sz
end
s_ac="%1"
if (s_ac~=s_prevac) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Armor: "..s_ac)
end
end
s_prevac=s_ac
end
s_chr=tonumber("%2")
s_sp="%4"
if (s_chr~=s_prevchr) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your chr is now "..s_chr)
end
end
s_prevchr=s_chr
end
if (s_sp~=s_prevsp) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your poison save is now "..s_sp)
end
end
s_prevsp=s_sp
end
s_hit=tonumber("%1")
if (s_hit~=s_prevhit) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your hitroll is now "..s_hit)
end
end
s_prevhit=s_hit
end
s_dam=tonumber("%2")
if (s_dam~=s_prevdam) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your damage is now "..s_dam)
end
end
s_prevdam=s_dam
end
s_hit="%1"
if (s_hit~=s_prevhit) then
if (jli==0) then
if (gs("autostat")==true) then
Note("your hitroll is now"..s_hit)
end
end
s_prevhit=s_hit
end
s_speed="%2"
if (s_speed~=s_prevspeed) then
if (jli==0) then
if (gs("autostat")==true) then
Note("your speed is now "..s_speed)
end
end
s_prevspeed=s_speed
end
s_str=tonumber("%3")
s_ss="%5"
if (s_str~=s_prevstr) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your strength is now "..s_str)
end
end
s_prevstr=s_str
end
if (s_ss~=s_prevss) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your spell save is now "..s_ss)
end
end
s_prevss=s_ss
end
s_con=tonumber("%2")
s_sb="%4"
if (s_con~=s_prevcon) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your con is now "..s_con)
end
end
s_prevcon=s_con
end
if (s_sb~=s_prevsb) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your breath save is now "..s_sb)
end
end
s_prevsb=s_sb
end
s_int=tonumber("%3")
s_sf="%5"
if (s_int~=s_prevint) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your intelligence is now "..s_int)
end
end
s_prevint=s_int
end
if (s_sf~=s_prevsf) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your fire save is now "..s_sf)
end
end
s_prevsf=s_sf
end
s_wis=tonumber("%3")
s_sc="%5"
if (s_wis~=s_prevwis) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your wisdom is now "..s_wis)
end
end
s_prevwis=s_wis
end
if (s_sc~=s_prevsc) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your cold save is now "..s_sc)
end
end
s_prevsc=s_sc
end
s_sn="%3"
if (s_sn~=s_prevsn) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your physical save is now "..s_sn)
end
end
s_prevsn=s_sn
end
s_sm="%3"
s_enc="%4"
if (s_sm~=s_prevsm) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your magic res is now "..s_sm)
end
end
s_prevsm=s_sm
end
if (s_enc~=s_prevenc) then
if (jli==0) then
if (gs("autostat")==true) then
Note("Your encumbrance is now "..s_enc)
end
end
s_prevenc=s_enc
end
counters.frescue=counters.frescue+1
PSend("rescue "..res)
Sound(sdir.."/sounds/grouping/fail res.ogg")
Sound(sdir.."/sounds/combat/special/male/"..math.random(1,mspecial)..".ogg")
bfight("%2")
if not gag.combat then Note("You heroically rescue %1!") end
Sound(sdir.."/sounds/grouping/rescue.ogg")
counters.rescue=counters.rescue+1
if (grouped==1) then
end
if (grouped==1) then
PSend("gt nosum.")
end
Sound(sdir.."/sounds/spells/dispel you.ogg")
if not gag.spells then Note("You feel the threads of magic about you begin to unravel.") end
Sound(sdir.."/sounds/spells/dispel yourself.ogg")
Sound(sdir.."/sounds/spells/dispel other.ogg")
if (dispelling==1) then
PSend("c dispel "..dtarget)
dispelled="%1"
end
Sound(sdir.."/sounds/spells/dispel weaken.ogg")
sk="%1"
sk=string.gsub(sk, " ", "", 50)
kskills[sk]=1
sp="%1"
sp=string.gsub(sp, " ", "", 50)
kspells[sp]=1
--print("you know "..sp)
require "wait"
wait.make(function()
wait.time(2)
if (kspells["curelightwounds"]==1) then
spells["heal"]="cure light"
end
if (kspells["cureseriouswounds"]==1) then
spells["heal"]="cure serious"
end
if (kspells["curecriticalwounds"]==1) then
spells["heal"]="cure critical"
end
if (kspells["heal"]==1) then
spells["heal"]="heal"
end
end)
spellfall("displace", "%1")
if (kspells["stoneskin"]==1) then
spellfall("stoneskin", "%1")
end
EnableGroup("ways", 1)
Sound(sdir.."/sounds/grouping/beckon.ogg")
if (gs("autofollow") == false) then
return
else
PSend("follow %1")
end
if not gag.misc then Note("You * into your hiding spot.") end
Sound(sdir.."/sounds/skills/hide1.ogg")
Note("You %1.")
if not gag.spells then Note("You throw your own personal rainbow at %1, who is momentarily blinded and awestruck by its beauty.") end
Sound(sdir.."/sounds/spells/colorspray.ogg")
Sound(sdir.."/sounds/spells/shower of sparks.ogg")
Sound(sdir.."/sounds/brewing/bottle.ogg")
require "wait"
wait.make(function()
Sound(sdir.."/sounds/brewing/fumble.ogg")
wait.time(0.6)
Sound(sdir.."/sounds/brewing/nasty mess.ogg")
end)
if not gag.misc then Note("You try to move stealthily, but fail!") end
Sound(sdir.."/sounds/skills/fail stealth.ogg")
if (leader~="%1") then
return
end
if (pose~="stand") then
PSend("stand")
prevpose=pose
end
if (leader~="%1") then
return
end
if (pose~="sleep") then
PSend("sleep")
end
if (leader~="%1") then
return
end
if (pose~="sleep") then
PSend("sleep")
end
Sound(sdir.."/sounds/movement/glow-appear.ogg")
Sound(sdir.."/sounds/movement/glow vanish.ogg")
PSend("sub I will now try to protect %1 in battle.")
if (leader~="%1") then
return
end
Send("wake")
if (gs("automove")==true) then
if ("%1"==leader) then
Send("enter %2")
end
end
if (gs("automove")==true) then
if ("%1"==leader) then
Send("look at %2")
end
end
if (gs("automove")==true) then
if ("%1"==leader) then
Send("climb %3")
end
end
if (job=="hitter") then
PSend("berserk")
end
if (leader~="%1") then
return
end
PSend("run")
if (gs("autosleep")==true) then
if (grouped==1) then
string="%1"
if (leader~="%1") then
return
end --if not leader
if(pose~="sleep") then
PSend("sleep")
end --pose
end --group
end --auto sleep
if (FileExists(sdir.."/sounds/%2.ogg")==true) then
Sound(sdir.."/sounds/%2.ogg")
PSend("tell %1 playing | prefix mzc")
else
PSend("tell %1 file not found! | prefix mzc")
end
job="%1"
Note("%2")
if (grouped==0) then
Note("You are not yet advanced enough in your training.")
return
else
if (spells["heal"]==nil) then
else
PSend("c "..spells["heal"].." "..gname)
casting=spells["heal"].." %2"
end
end
string="%1"
for i, remove in pairs (group) do
if string.match (remove, string) then
table.remove(group, i)
end
end
Sound(sdir.."/sounds/grouping/leave group.ogg")
string="%1"
for i, remove in pairs (group) do
if string.match (remove, string) then
table.remove(group, i)
end
end
Sound(sdir.."/sounds/grouping/leave group.ogg")
table.insert(group, "%1")
table.insert(group, "%1")
table.insert(group, "%1")
Sound(sdir.."/sounds/grouping/sense death.ogg")
Execute("history_add all=You sense the death of %1!")
Execute("history_add group=You sense the death of %1!")
table.insert(group, "%1")
Sound(sdir.."/sounds/grouping/new member.ogg")
Execute("history_add group=%1 is now a member of the group.")
Execute("history_add all=%1 is now a member of the group.")
Sound(sdir.."/sounds/grouping/open.ogg")
Execute("history_add group=the group is now open to members")
Execute("history_add all=the group is now open to members")
Sound(sdir.."/sounds/grouping/groupsum.ogg")
Sound(sdir.."/sounds/grouping/noshow.ogg")
Execute("history_add group=the group is now closed to members")
Execute("history_add all=the group is now closed to members")
group={}
require "wait"
wait.make(function()
wait.time(1.2)
--PSend("gt now watching "..#group.." members: "..table.concat(group, ", "))
end)
notank=1
if (gs("tts") == true) then
Execute("tts_stop")
end
restime=1
Sound(sdir.."/sounds/skills/%1.ogg")
tank off.
Defensive off
tank | prefix tankoff
def | prefix tankoff
tank | prefix tankon
def | prefix tankon
Tank on.
Defensive on.
if not gag.combat then Note("%1 turns to attack you!") end
Sound(sdir.."/sounds/skills/taunt/taunted2.ogg")
if not gag.combat then Note("You taunt %1, and %2 attacks you!") end
Sound(sdir.."/sounds/skills/taunt/taunted.ogg")
if not gag.combat then Note("You attempt to goad %1 into attacking you.") end
Sound(sdir.."/sounds/skills/taunt/fail.ogg")
if not gag.combat then Note("You shout a challenge to everyone nearby.") end
Sound(sdir.."/sounds/skills/taunt/area.ogg")
Sound(sdir.."/sounds/items/get gold container.ogg")
Sound(sdir.."/sounds/items/get gold container.ogg")
gg=tonumber(%1)
counters.steal=counters.steal+gg
Sound(sdir.."/sounds/items/get gold container.ogg")
gg=tonumber(%1)
counters.steal=counters.steal+gg
table.insert(inv, "%1")
table.insert(inv, "the lantern")
if (#inv< 1) then
Note("You aren't carrying anything.")
else
Note("You are carrying the following "..#inv.." items:")
if (#inv>1) then
count=#inv-1
Note(table.concat(inv, ", ", 1, count)..", and "..inv[#inv]..".")
else
Note(table.concat(inv, ", "))
end
end
inv={}
Sound(sdir.."/sounds/notifications/abort.ogg")
Sound(sdir.."/sounds/notifications/welcome back.ogg")
Execute("tts_stop")
if not gag.misc then Note("You reel in an %1") end
if gs("donfish")==true then
PSend("don fish")
end
Sound(sdir.."/sounds/misc/fishcatch.ogg")
cleric=%1
Sound(sdir.."/sounds/spells/stoneskin off.ogg")
if kspells["stoneskin"]==1 then
rct["stone skin"]=true
end
rc("stone")
Sound(sdir.."/sounds/spells/foulblood off.ogg")
rct["foulblood"]=true
rc("foulblood")
Sound(sdir.."/sounds/spells/rancid flesh off.ogg")
rc("rancid flesh")
rct["rancid flesh"]=true
Sound(sdir.."/sounds/necromancer/dread portent off.ogg")
rc("dread portent")
rct["dread portent"]=true
Sound(sdir.."/sounds/spells/dying breath off.ogg")
rc("dying breath")
rct["dying breath"]=true
if not gag.misc then Note("You reel in your line and recast it.") end
Sound(sdir.."/sounds/misc/fishcast.ogg")
mage=%1
if not gag.spells then Note("Your skin turns to a stone like substance.") end
rct["stone skin"]=nil
Sound(sdir.."/sounds/spells/stone skin.ogg")
if not gag.spells then Note("You %1 a %2 fireball at %3"
) end
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/spells/fireball.ogg",0,50)
theygrunt()
end)
Sound(sdir.."/sounds/auction/item sold.ogg")
You reply to %1, %2
if minion then
minion=false
Sound(sdir.."/sounds/grouping/minion joins.ogg")
table.insert(group, "%1")
else
Sound(sdir.."/sounds/grouping/you add someone.ogg")
if (grouped==0) then
group={}
table.insert(group, "%1")
grouped=1
EnableGroup("group", 1)
EnableGroup("cgroup", 1)
else
table.insert(group, "%1")
end
end
Sound(sdir.."/sounds/grouping/new member.ogg")
table.insert(group, "%1")
name=string.lower("%2")
cname=string.lower("%1")
if (name == gs("me")) then
if (gs("chist") == true) then
Execute("history_add channels=%1 %2: %3")
Execute("history_add all=%1 %2: %3")
end
if (gs("chans") == 1) then
Sound(sdir.."/sounds/channels/"..cname..".ogg")
Note("%1 %2: %3")
elseif (gs("chans") == 2) then
Sound(sdir.."\sounds/channels/"..cname..".ogg")
Execute("tts_note %1 %2: %3")
elseif (gs("chans") == 3) then
Sound(sdir.."/sounds/channels/"..cname..".ogg")
end
else
Note("%1 %2: %3")
Execute("history_add all=%1 %2: %3")
Execute("history_add channels=%1 %2: %3")
Sound(sdir.."/sounds/channels/"..cname..".ogg")
end
Sound(sdir.."/sounds/auction/auction bell1.ogg")
if not gag.spells then Note("You start healing %1") end
Sound(sdir.."/sounds/spells/healing touch1.ogg")
Sound(sdir.."/sounds/auction/auction bell3.ogg")
if not gag.combat then Note("You stealthily move into position...") end
Sound(sdir.."/sounds/skills/thief/backstab1.ogg")
EnableGroup("stab", 1)
if not gag.spells then Note("You fail to cast the spell%1") end
Sound(sdir.."/sounds/spells/fail/"..math.random(1,fspell)..".ogg")
if(nfight==1) then
return
end
if (gs("castfail") == true) then
Note("recasting "..casting)
fail=1
DoAfterSpecial(1,'fail=0',12)
if (pose~="stand") then
prevpose=pose
PSend("stand")
end--stand
Execute("c "..casting)
end--castfail
grouped=0
gclear()
group={}
EnableGroup("group", 0)
EnableGroup("cgroup", 0)
grouped=0
EnableGroup("group", 0)
EnableGroup("cgroup", 0)
if not gag.misc then Note("You fail to pick the lock.") end
Sound(sdir.."/sounds/doors/fail pick2.ogg")
if (gs("autopick") == true) then
Execute("pick " .. pick)
end
checkstats()
if not gag.misc then Note("You stop using %1.") end
checkstats()
Sound(sdir.."/sounds/combat/unwield.ogg")
notify on.
Sound(sdir.."/sounds/spells/peace.ogg")
if not gag.spells then Note("You feel a light touch, %1") end
Sound(sdir.."/sounds/spells/chill touch.ogg")
Sound(sdir.."/sounds/spells/res1.ogg")
Sound(sdir.."/sounds/spells/sancoff.ogg")
if (dispelling==1) and (dispelled=="%1") then
dispelling=0
dispelled=0
PSend("gt dispelling accomplished.")
PSend("brag gt mana")
end
spellfall("sanctuary", "%1")
autosize | prefix scr
Sound(sdir.."/sounds/spells/bless off.ogg")
if (grouped==1) and (gs("swarn") == true) then
PSend("sub bless out.")
end
rc("bless")
if kspells["bless"]==1 then
rct["bless"]=true
end
if not gag.combat then Note("%1 parries your attack.") end
ppi.play(sdir.."/sounds/combat/parry/" ..math.random(1, tparry).. ".ogg",0,50)
counters.parryc=counters.parryc+1
sac corpse
stand
EnableGroup("stats", 0)
rct["bless"]=nil
Sound(sdir.."/sounds/spells/bless.ogg")
Sound(sdir.."/sounds/socials/poke.ogg")
if not gag.combat then Note("%1 quickly avoids your backstab.") end
Sound(sdir.."/sounds/skills/backstab/avoided.ogg")
EnableGroup("stab", 0)
Sound(sdir.."/sounds/skills/backstab/avoided.ogg")
bfight("%2")
auto unhide configured.
EnableGroup("show",1)
PSend("show cost")
Send("level | grep cap | prefix showcap")
Sound(sdir .. "/sounds/level/%2.ogg")
Sound(GetInfo(67).."/sounds/notifications/quest complete.ogg")
classtnl="practice"
exptnl=2000000
Execute("tnp")
Sound(sdir.."/sounds/misc/recognized murderer.ogg")
thief=%1
%1 - it contains:
if (gs("tts") == true) then
world.Execute ("tts_stop")
else
Note("You run away from the battle like a yellow bellied coward!!")
end
EnableGroup("combat",0)
counters.flee=counters.flee+1
Sound(sdir.."/sounds/combat/flee2.ogg")
warrior=%1
if not gag.spells then Note("You are coated by a thin film of electrically conductive magic.") end
Sound(sdir.."/sounds/spells/ground on.ogg")
rct["ground"]=nil
checkstats()
if not gag.spells then Note("You are protected by a magical layer of fire.") end
Sound(sdir.."/sounds/spells/fireshield on.ogg")
rct["fire shield"]=nil
checkstats()
if not gag.spells then Note("You are protected by a magical film of ice.") end
Sound(sdir.."/sounds/spells/iceshield on.ogg")
rct["ice shield"]=nil
checkstats()
if not gag.combat then Note("You scramble to retrieve %1!") end
Sound(sdir.."/sounds/combat/scramble disarmed.ogg")
table.insert(vbad, "%1")
Sound(sdir.."/sounds/misc/drown2.ogg")
table.insert(vbad, "%1")
Note("arena %1 died to %2.")
play("channels/arenadeath",0)
if (gs("logpk")==true) then
Execute("history_add arena=%1 died to %2.")
Execute("history_add all=%1 died to %2.")
end
Note("pk %1 died to %2 in %4.")
play("channels/pkdeath",0)
if (gs("logpk")==true) then
Execute("history_add arena=%1 died to %2 in %4.")
Execute("history_add all=%1 died to %2 in %4.")
end
Sound(sdir.."/sounds/auction/auction bell2.ogg")
table.insert(players, "invis")
Sound(sdir.."/sounds/items/drop/" .. math.random(1,drops)..".ogg")
Sound(sdir.."/sounds/spells/fully healed.ogg")
Note("New auction: %1, %2 gold.")
Execute("history_add auction=new: %1 for %2 gold")
Sound(sdir.."/sounds/auction/start auction.ogg")
Sound(sdir.."/sounds/doors/unlock.ogg")
Sound(sdir.."/sounds/auction/item sold.ogg")
Sound(sdir.."/sounds/misc/drown1.ogg")
sold by %1
Sound(sdir.."/sounds/misc/drown1.ogg")
Sound(sdir.."/sounds/channels/notify.ogg")
Execute("history_add all=notify %1")
Execute("history_add misc=notify %1")
if not gag.spells then Note("You struggle with the spell, and the line of frost zips randomly across the%1") end
Sound(sdir.."/sounds/spells/frost4.ogg")
Sound(sdir.."/sounds/spells/pfe off.ogg")
rc("PFE")
if kspells["protectionfromevil"]==1 then
--print("Oh good you know it.")
rct["protection from evil"]=true
else
--print("uh-oh, you don't!")
--rct["protection from evil"]=true
end
You tell %1, %2
Sound(sdir.."/sounds/spells/armor off.ogg")
if (grouped==1) and (gs("swarn") == true) then
PSend("sub armor out.")
end
rc("armor")
if kspells["armor"]==1 then
rct["armor"]=true
end
if not gag.misc then Note("You think you got a nibble, but you aren't sure...") end
autosplit | prefix scr
if not gag.spells then Note("You feel less tired.") end
Sound(sdir.."/sounds/spells/refresh self.ogg")
announce_move=true
if (map==1) then
AppendToNotepad("map", "c refresh;")
end
mvalarm=0
autosize | prefix scr
if not gag.spells then Note("You feel righteous.") end
rct["protection from evil"]=nil
Sound(sdir.."/sounds/spells/pfe.ogg")
Note("%1 replies, %2")
Execute("history_add tells=%1 replied, %2")
Execute("history_add all=%1 replied, %2")
Sound(sdir.."/sounds/channels/reply.ogg")
autosi | prefix scr
if not gag.spells then Note("You feel %1 protecting you.") end
rct["armor"]=nil
Sound(sdir.."/sounds/spells/armor on.ogg")
rct["rancid flesh"]=nil
Sound(sdir.."/sounds/spells/rancid on.ogg")
rct["foulblood"]=nil
Sound(sdir.."/sounds/spells/foulblood on.ogg")
rct["infravision"]=nil
Sound(sdir.."/sounds/spells/infra on.ogg")
rct["detect invisibility"]=nil
Sound(sdir.."/sounds/spells/dinvis on.ogg")
Sound(sdir.."/sounds/spells/tensor pop.ogg")
rct["sense life"]=nil
Sound(sdir.."/sounds/spells/sl on.ogg")
Execute("history_add all=%1 restored you to full health.")
Sound(sdir.."/sounds/misc/god restore.ogg")
autosplit configured.
if (gs("tts") == true) then
world.Execute ("tts_interrupt %1 rushes forward to defend you!")
else
Note("%1 rushes forward to defend you!")
end
size display configured.
Sound(sdir.."/sounds/condition/"..gs("scheme").."/scratches.ogg")
Sound(sdir.."/sounds/misc/eat corpse.ogg")
rct={}
require "wait"
wait.make(function()
Sound(sdir.."/sounds/combat/killed.ogg")
wait.time(1.2)
Sound(sdir.."/sounds/combat/pkmsgs/" ..math.random (1, pkmsg).. ".ogg")
end)
prevhp = 0
prevmn = 0
%1 thinks %2 like you aren't welcome here.
table.insert(vgood, "%1")
table.insert(poor, "%1")
Sound(sdir.."/sounds/items/random.ogg")
table.insert(uniques,"%1")
Execute("history_add misc=%1 randomed!")
Execute("history_add all=%1 randomed!")
Sound(sdir.."/sounds/condition/"..gs("scheme").."/big nasty.ogg")
table.insert(vgood, "%1")
Sound(sdir.."/sounds/condition/"..gs("scheme").."/awful.ogg")
table.insert(poor, "%1")
mnrnote = 0
hprnote = 0
hpnote = 0
mnnote = 0
mvnote = 0
mvrnote=0
if (gfighting==0) then
fight = 0
fc = 0
Sound(sdir.."/sounds/misc/uncrouch.ogg")
Execute("show regen | prefix scr:")
fc = 0
end
Sound(sdir.."/sounds/misc/rest.ogg")
Note("You have lost "..ntrunk("%1").." experience so far due to deaths.")
table.insert(players, "lostsoul")
Sound(sdir.."/sounds/condition/"..gs("scheme").."/excellent.ogg")
if (#vbad~=0) then
Note("Very bad stuff ("..#vbad.." skills:")
Note(table.concat(vbad, ", "))
vbad={}
end
if (#bad~=0) then
Note("Bad stuff ("..#bad.." skills:")
Note(table.concat(bad, ", "))
bad={}
end
if (#poor~=0) then
Note("Poor stuff ("..#poor.." skills:")
Note(table.concat(poor, ", "))
poor={}
end
if (#fair~=0) then
Note("Fair stuff ("..#fair.." skills:")
Note(table.concat(fair, ", "))
fair={}
end
if (#moderate~=0) then
Note("Moderate stuff ("..#moderate.." skills:")
Note(table.concat(moderate, ", "))
moderate={}
end
if (#avg~=0) then
Note("Average stuff ("..#avg.." skills:")
Note(table.concat(avg, ", "))
avg={}
end
if (#good~=0) then
Note("Good stuff ("..#good.." skills:")
Note(table.concat(good, ", "))
good={}
end
if (#vgood~=0) then
Note("Very good stuff ("..#vgood.." skills:")
Note(table.concat(vgood, ", "))
vgood={}
end
if (#exceptional~=0) then
Note("Exceptional stuff ("..#exceptional.." skills:")
Note(table.concat(exceptional, ", "))
exceptional={}
end
if (#perfect~=0) then
Note("Perfect stuff ("..#perfect.." skills:")
Note(table.concat(perfect, ", "))
perfect={}
end
Sound(sdir.."/sounds/spells/haste off.ogg")
goldhand="%1"
goldhand=1
goldhand=0
goldbank=tonumber("%1")
if(goldbank>0) then
if(bwithdraw==1) then
PSend("bank withdraw "..goldbank)
bwithdraw=0
return
end
end
bwithdraw=0
if(goldhand==0) then
if(goldbank==0) then
Note("You have no gold at all.")
else
Note("You have no gold in hand and "..goldbank.." in bank")
end
else
if(goldbank==0) then
Note("You have "..goldhand.." in hand and nothing in the bank.")
else
Note("You have "..goldhand.." in hand and "..goldbank.." in the bank.")
end
end
goldbank=0
if(goldhand==0) then
if(goldbank==0) then
Note("You have no gold at all.")
else
Note("You have no gold in hand and "..goldbank.." in bank")
end
else
if(goldbank==0) then
Note("You have "..goldhand.." in hand and nothing in the bank.")
else
Note("You have "..goldhand.." in hand and "..goldbank.." in the bank.")
end
end
table.insert(players, "angelbaby")
Sound(sdir.."/sounds/condition/"..gs("scheme").."/8.ogg")
EnableGroup("ranks", 1)
if (grouped==1) and (gs("swarn") == true) then
PSend("warn invis out!")
end
Sound(sdir.."/sounds/spells/invis off.ogg")
rc("invis")
if kspells["invisibility"]==1 then
rct["invisibility"]=true
end
table.insert(players, "Groan")
if (gs("tts") == true) then
world.Execute ("tts_interrupt Logging in %1.")
else
Note("Logging in %1.")
end
ss("me", "%1")
login()
Note("Logged in %1.")
ss("me", "%1")
if (loggedin==0) then
PSend("channel listen zt | prefix mzc")
login()
end
EnableGroup("fishing", 0)
Note("%1 thinks you are a thief!")
Sound(sdir.."/sounds/misc/recognized thief.ogg")
rct["invisibility"]=nil
Sound(sdir.."/sounds/spells/invis.ogg")
if (gs("chans") ==1) then
Sound(sdir.."/sounds/channels/%1.ogg")
Note("You %1, %2")
elseif (gs("chans") ==2) then
Sound(sdir.."/sounds/channels/%1.ogg")
Execute("tts_note you %1, %2")
elseif (gs("chans") ==3) then
Sound(sdir.."/sounds/channels/%1.ogg")
end
Sound(sdir.."/sounds/grouping/you join.ogg")
ss("antideath",false)
grouped=1
Note("Note: To learn to use the group bots, use the '!help' command.")
EnableGroup("group", 1)
EnableGroup("cgroup", 1)
PSend("group | prefix grm")
Sound(sdir.."/sounds/spells/blind on.ogg")
exp=%2
toprac=%1
Note("You still need "..toprac-exp.." experience to train a practice. It costs "..toprac..".")
if (gs("tts") == true) then
world.Execute ("tts_interrupt %1 is about to attack you!")
else
Note("%1 aproaches as if to attack, then hesitates.")
end
Sound(sdir.."/sounds/skills/pickpocket/nothing2.ogg")
Sound(sdir.."/sounds/skills/berserk no.ogg")
Sound(sdir.."/sounds/skills/berserk another target.ogg")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
Sound(sdir.."/sounds/spells/ball lightning.ogg")
theygrunt()
end)
Execute("history_add all=%1 auctioned, %2")
Execute("history_add channels=%1 auctioned, %2")
Sound(sdir.."/sounds/channels/auction.ogg")
Note("%1 auctions, %2")
Sound(sdir.."/sounds/channels/on.ogg")
Sound(sdir.."/sounds/channels/off.ogg")
myspecial()
Sound(sdir.."/sounds/spells/strength.ogg")
Execute("show str")
myspecial()
require "wait"
wait.make(function()
wait.time(0.3)
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,50)
else
Sound(sdir.."/sounds/skills/you trip.ogg")
end
theygrunt()
end)
Sound(sdir.."/sounds/mining/find nothing.ogg")
PSend("c cure crit")
Sound(sdir.."/sounds/mining/find nothing.ogg")
Sound(sdir.."/sounds/combat/you fail to disarm.ogg")
autounhide | prefix scr
table.insert(bad, "%1")
if (gs("tts") == true) then
world.Execute ("tts_stop")
else
Note("You flee from combat!")
end
counters.flee=counters.flee+1
EnableGroup("combat",0)
Sound(sdir.."/sounds/combat/flee2.ogg")
Execute("history_add say=%1 whispered, %2")
Execute("history_add all=%1 whispered, %2")
Sound(sdir.."/sounds/channels/whisper.ogg")
Note("%1 whispers, %2")
Execute("history_add misc=%1 gave you %2")
Sound(sdir.."/sounds/items/they give.ogg")
Sound(sdir.."/sounds/socials/nudge.ogg")
Sound(sdir.."/sounds/socials/cackle.ogg")
play("socials/cackle",0)
play("socials/cough",0)
play("socials/yawn1",0)
play("socials/yawn2",0)
play("socials/puke",0)
play("socials/snicker1",0)
play("socials/sigh1",0)
play("socials/laugh2",0)
play("socials/raa",0)
play("socials/sigh2",0)
play("socials/rofl",0)
play("socials/rofl",0)
Sound(sdir.."/sounds/items/you give.ogg")
Execute("history_add say=%1 says, %2")
Execute("history_add all=%1 says, %2")
Sound(sdir.."/sounds/channels/say.ogg")
Note("%1 says, %2")
table.insert(bad, "%1")
Note("+"..ntrunk("%1").." xp!")
Sound(sdir.."/sounds/skills/backstab/7.ogg")
bfight("%2")
Sound(sdir.."/sounds/skills/backstab/7.ogg")
EnableGroup("stab", 0)
Note("screams in pain.")
Sound(sdir.."/sounds/spells/haste on.ogg")
Sound(sdir.."/sounds/items/coins.ogg")
table.insert(avg, "%1")
Sound(sdir.."/sounds/skills/thief/pickpocket item.ogg")
if gag.expert then
Note("You got %2!")
else
Note("%1 seems to have dropped %2!%3")
end
table.insert(avg, "%1")
Sound(sdir.."/sounds/condition/"..gs("scheme").."/quite a few.ogg")
Sound(sdir.."/sounds/skills/they avoid your trip.ogg")
Sound(sdir.."/sounds/spells/out of mana.ogg")
Sound(sdir.."/sounds/spells/chill shiver.ogg")
table.insert(players, "Fia")
Sound(sdir.."/sounds/items/coin.ogg")
knowheal=1
knowref=1
knowstone=1
Sound(sdir.."/sounds/condition/"..gs("scheme").."/small wounds.ogg")
table.insert(players, "Kensei")
Sound(sdir.."/sounds/condition/"..gs("scheme").."/pretty hurt.ogg")
Note("You have spent "..ntrunk("%1").." experience so far.")
Note("the corpse of %2")
srand("steps/corpse",scorpse)
if (gs("tts") == true) then
world.Execute ("tts_interrupt You are rescued by %1!")
end
EnableGroup("combat",0)
if (gs("tts") == true) then
world.Execute ("tts_interrupt You are rescued by %1!")
end
EnableGroup("combat",0)
Sound(sdir.."/sounds/spells/healing touch2.ogg")
%1 casts %2
Note("%2's corpse")
srand("steps/corpse",scorpse)
Sound(sdir.."/sounds/misc/waypoint gap.ogg")
table.insert(players, "samon")
rct["shield"]=nil
Sound(sdir.."/sounds/spells/shield on.ogg")
Sound(sdir.."/sounds/skills/bashtrip.ogg")
Note("avoid trip.")
require "wait"
wait.make(function()
wait.time(0.3)
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,-50)
else
ppi.play(sdir.."/sounds/skills/you trip.ogg",0,-50)
end
if (gender=="male") then
ppi.play(sdir.."/sounds/combat/grunts/2/"..mg.."/"..math.random(1,mgrunt[3])..".ogg",0,50)
elseif (gender=="female") then
ppi.play(sdir.."/sounds/combat/grunts/2/"..mg.."/"..math.random(1,fgrunt[3])..".ogg",0,50)
elseif (gender=="neuter") then
ppi.play(sdir.."/sounds/combat/grunts/2/"..mg.."/"..math.random(1,ngrunt[3])..".ogg",0,50)
end
end)
1 low level limit %1
table.insert(players, "%1 fighting")
Sound(sdir.."/sounds/spells/sanc on.ogg")
rct["sanctuary"]=nil
Sound(sdir.."/sounds/skills/bash4.ogg")
Note("avoided.")
2 high level limit %1
table.insert(players, "%1 sleeping")
Sound(sdir.."/sounds/notifications/leave game.ogg")
Sound(sdir.."/sounds/skills/turn/target.ogg")
Sound(sdir.."/sounds/skills/turn/repel.ogg")
You try to talk to %1
table.insert(players, "%1")
Sound(sdir.."/sounds/spells/blind off.ogg")
Sound(sdir.."/sounds/doors/unlock.ogg")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/spells/prism.ogg",0,50)
theygrunt()
end)
Sound(sdir.."/sounds/misc/xp spellcasting.ogg")
Note("+"..ntrunk("%1").." xp!")
Sound(sdir.."/sounds/skills/turn/repel.ogg")
Sound(sdir.."/sounds/skills/leap1.ogg")
mnrnote = 0
hprnote = 0
hpnote = 0
mnnote = 0
mvnote = 0
mvrnote=0
fight = 0
fc = 0
Sound(sdir.."/sounds/misc/uncrouch.ogg")
Execute("show regen | prefix scr:")
table.insert(exceptional, "%1")
require "wait"
wait.make(function()
table.insert(getitems, "%1")
if not (getblock==1) then
Sound(sdir.."/sounds/items/get item.ogg")
end
getblock=1
getcount=getcount+1
wait.time(0.4)
if (getsay==0) then
getsay=1
for i,v in pairs(getitems) do
if IsInTable(uniques,v)==0 then
if gs("items")~=3 then
length=0
word=""
for w in string.gmatch(v, "%S+") do
if string.len(w)>length then
if IsInTable(banned,w)==0 then
word=w
length=string.len(w)
end
end
end
if gs("items")==1 then
if gs("container")~=nil then
Send("put "..word.." "..gs("container"))
end
elseif gs("items")==2 then
Send("drop "..word)
Send("sac "..word)
elseif gs("items")==4 then
Send("donate "..word)
end --gs items
elseif gs("items")==5 then
Send("storage put "..word)
end
else
if gs("container")~=nil then
Send("put "..v.." "..gs("container"))
end
end
end
if getcount<1 then
elseif getcount==1 then
Note("you get %1.")
elseif getcount>1 then
Note("You get "..getcount.." items: "..table.concat(getitems, ", "))
end
getsay=0
getblock=0
getcount=0
end
getitems={}
uniques={}
end)
table.insert(exceptional, "%1")
hpregen = 0
mnregen = 0
mnrnote = 0
hprnote = 0
hpnote = 0
mnnote = 0
mvnote = 0
mvrnote=0
Sound(sdir.."/sounds/misc/sleep.ogg")
Execute("show regen | prefix scr:")
Sound(sdir.."/sounds/channels/shout.ogg")
Execute("history_add all=%1 shouts, %2")
Execute("history_add channels=%1 shouts, %2")
table.insert(fair, "%1")
Sound(sdir.."/sounds/skills/thief/steal gold.ogg")
gg=tonumber(%1)
counters.steal=counters.steal+gg
Sound(sdir.."/sounds/skills/turn/target.ogg")
Sound(sdir.."/sounds/skills/turn/repel.ogg")
Sound(sdir.."/sounds/notifications/command wrong.ogg")
table.insert(fair, "%1")
Sound(sdir.."/sounds/skills/thief/slip from shadows.ogg")
ppi.play(sdir.."/sounds/combat/armor/"..math.random(1,armor)..".ogg",0,50)
table.insert(good, "%1")
Sound(sdir.."/sounds/misc/hit ground.ogg")
srand("combat/stand/"..mg,stand[mg])
Sound(sdir.."/sounds/combat/assist.ogg")
Sound(sdir.."/sounds/grouping/ask join.ogg")
Execute("history_add all=%1 would like to join your group.")
Execute("history_add group=%1 would like to join your group.")
Sound(sdir.."/sounds/grouping/joining.ogg")
if not minion then
Sound(sdir.."/sounds/grouping/start following.ogg")
end
if (gs("chist") == true) then
Execute("history_add all=you %1, %2")
Execute("history_add channels=you %1, %2")
end
if (gs("chans") ==1) then
Sound(sdir.."/sounds/channels/%1.ogg")
Note("You %1, %2")
elseif (gs("chans") ==2) then
Sound(sdir.."/sounds/channels/%1.ogg")
Execute("tts_note you %1, %2")
elseif (gs("chans") ==3) then
Sound(sdir.."/sounds/channels/%1.ogg")
end
Sound(sdir.."/sounds/misc/target.ogg")
if (gs("chist") == true) then
Execute("history_add all=you %1, %2")
Execute("history_add channels=you %1, %2")
end
if (gs("chans") ==1) then
Sound(sdir.."/sounds/channels/%1.ogg")
Note("You %1: %2")
elseif (gs("chans") ==2) then
Sound(sdir.."/sounds/channels/%1.ogg")
Execute("tts_note you %1: %2")
elseif (gs("chans") ==3) then
Sound(sdir.."/sounds/channels/%1.ogg")
end
Sound(sdir.."/sounds/spells/faerie fire you.ogg")
name=string.lower("%2")
cname=string.lower("%1")
if (name == gs("me")) then
if (gs("chist") == true) then
Execute("history_add channels=%1 %2: %3")
Execute("history_add all=%1 %2: %3")
end
if (gs("chans") ==1) then
Sound(sdir.."/sounds/channels/"..cname..".ogg")
Note("%1 %2: %3")
elseif (gs("chans") ==2) then
Sound(sdir.."/sounds/channels/"..cname..".ogg")
Execute("tts_note %1 %2: %3")
elseif (gs("chans") ==3) then
Sound(sdir.."/sounds/channels/"..cname..".ogg")
end
else
Note("%1 %2: %3")
Execute("history_add channels=%1 %2: %3")
Execute("history_add all=%1 %2: %3")
Sound(sdir.."/sounds/channels/"..cname..".ogg")
end
myspecial()
require "wait"
wait.make(function()
wait.time(0.3)
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,50)
else
Sound(sdir.."/sounds/skills/you trip.ogg")
end
theygrunt()
end)
3 required kills %1
Sound(sdir.."/sounds/misc/fishbig.ogg")
if (gs("donfish") == true) then
PSend("donate fish")
end
4 max players %1
table.insert(players, "%1 resting")
Sound(sdir.."/sounds/combat/stopmelee.ogg")
5 allow grouping %1
table.insert(players, "%1")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/bash2.ogg",0,50)
theygrunt()
end)
Note("full tilt!")
casting=""
6 recall players when killed %1
table.insert(players, "%1 resting")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/bash6.ogg",0,50)
theygrunt()
end)
Note("headfirst.")
Sound(sdir.."/sounds/skills/thief/caught pickpocket.ogg")
7 allow same clan embers to kill each other %1
table.insert(players, "%1 fighting")
Sound(sdir.."/sounds/skills/turn/target.ogg")
Sound(sdir.."/sounds/skills/turn/repel.ogg")
table.insert(players, "%1 sleeping")
Sound(sdir.."/sounds/combat/disarmed.ogg")
if (gs("tts") == true) then
Execute("tts_interrupt %1 disarms you!")
else
Note("%1 disarms you and sends your weapon flying!")
end
if (kskills["trip"]==1) then
hitting="trip"
end
if (kskills["bash"]==1) then
hitting="bash"
end
if (kskills["kick"]==1) then
hitting="kick"
end
Sound(sdir.."/sounds/notifications/command wrong.ogg")
Sound(sdir.."/sounds/items/can't find item.ogg")
counters.theydodge=counters.theydodge+1
if (mg=="male") then
drnd = math.random(1, mdodge)
elseif (mg=="female") then
drnd = math.random(1, fdodge)
elseif (mg=="neuter") then
drnd = math.random(1,mdodge)
end
Sound(sdir.."/sounds/combat/dodge/"..mg.."/"..drnd .. ".ogg")
checkstats()
Sound(sdir.."/sounds/wear/feet.ogg")
checkstats()
Sound(sdir.."/sounds/wear/ring.ogg")
checkstats()
Sound(sdir.."/sounds/wear/shield.ogg")
checkstats()
Sound(sdir.."/sounds/wear/about_body.ogg")
Sound(sdir.."/sounds/spells/frost3.ogg")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/spells/crystal spear.ogg",0,50)
theygrunt()
end)
checkstats()
Sound(sdir.."/sounds/wear/wrist2.ogg")
Execute("afk idle")
Sound(sdir.."/sounds/misc/inactivity.ogg")
pg=tonumber(%1)
counters.steal=counters.steal+pg
Note(pg .." gold.")
if (pg<=10) then
Sound(sdir.."/sounds/skills/pickpocket/2.ogg")
end
if (pg>10) and (pg<=50) then
Sound(sdir.."/sounds/skills/pickpocket/1.ogg")
end
if (pg>50) and (pg<=70) then
Sound(sdir.."/sounds/skills/pickpocket/6.ogg")
end
if (pg>70) and (pg<=100) then
Sound(sdir.."/sounds/skills/pickpocket/3.ogg")
end
if (pg>100) and (pg<=150) then
Sound(sdir.."/sounds/skills/pickpocket/5.ogg")
end
if (pg>150) then
Sound(sdir.."/sounds/skills/pickpocket/4.ogg")
end
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/spells/icebolt.ogg",0,50)
theygrunt()
end)
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/spells/cause crit.ogg",0,50)
theygrunt()
end)
myspecial()
ppi.play(sdir.."/sounds/spells/cone.ogg",0,50)
theygrunt()
myspecial()
ppi.play(sdir.."/sounds/spells/cone.ogg",0,50)
theygrunt()
checkstats()
Sound(sdir.."/sounds/wear/neck.ogg")
table.insert(good, "%1")
Note("You have "..ntrunk("%1").." experience.")
Sound(sdir.."/sounds/spells/shards.ogg")
leader members levels rating flags
table.insert(moderate, "%1")
Note("You have "..ntrunk("%1").." experience.")
Sound(sdir.."/sounds/grouping/stop following.ogg")
if #group<2 then
grouped=0
end
Sound(GetInfo(67).."/sounds/spells/spectral cold.ogg")
Sound(GetInfo(67).."/sounds/spells/spectral hand.ogg")
require "wait"
wait.make(function()
wait.time(0.5);
Send("cont")
end)
Sound(GetInfo(67).."/sounds/necromancer/wood woad death.ogg")
Sound(GetInfo(67).."/sounds/necromancer/skeleton warrior death.ogg")
Sound(GetInfo(67).."/sounds/necromancer/skeletal mage death.ogg")
Execute("history_add all=someone's %1 minion died!")
Execute("history_add minions=someone's %1 minion died!")
Sound(GetInfo(67).."/sounds/mdeath/grminion.ogg")
Sound(GetInfo(67).."/sounds/mdeath/%1.ogg")
table.insert(kxwts,"minion %1")
Execute("history_add all=%1 minion died!")
Execute("history_add minions=%1 minion died!")
Sound(GetInfo(67).."/sounds/mdeath/yourminion.ogg")
Sound(GetInfo(67).."/sounds/mdeath/%1.ogg")
if IsInTable(toreclay,"%1")==1 then
if gs("reclay")~=nil then
if gs("reclay")==true then
Execute("abort")
DoAfter(0.1,"c clay man")
end --reclay
end --reclay2
else
table.insert(kxwts,"minion %1")
end --minion if
Sound(GetInfo(67).."/sounds/necromancer/dread portent.ogg")
rct["dread portent"]=nil
teeth=teeth+1
if not gag.misc then Note("You carefully extract one of the teeth and put it in your bag.") end
Sound(GetInfo(67).."/sounds/necromancer/get teeth.ogg")
if counters.teeth==nil then
counters.teeth=1
else
counters.teeth=counters.teeth+1
end
if not gag.misc then Note("You carefully extract one dragon tooth and put it in your bag.") end
dteeth=dteeth+1
Sound(GetInfo(67).."/sounds/necromancer/get teeth.ogg")
if not gag.skills then Note("You sacrifice blood from the corpse of %1, drawing power from it!") end
Sound(GetInfo(67).."/sounds/necromancer/blood sac.ogg")
if not gag.misc then Note("You shatter one of the teeth attempting to remove it.") end
Sound(GetInfo(67).."/sounds/necromancer/break teeth.ogg")
if counters.bteeth==nil then
counters.bteeth=1
else
counters.bteeth=counters.bteeth+1
end
No visible players.
table.insert(moderate, "%1")
Execute("history_add misc=You have %1 new email messages.")
Execute("history_add all=You have %1 new email messages.")
Sound(sdir.."/sounds/notifications/email.ogg")
Execute("history_add all=%1 sent you an email.")
Execute("history_add misc=%1 sent you an email.")
Sound(sdir.."/sounds/notifications/newemail.ogg")
Sound(sdir.."/sounds/combat/you are backstabbed.ogg")
table.insert(perfect, "%1")
Note("%1 tells the clan, %2")
Sound(sdir.."/sounds/channels/clan tell.ogg")
Execute("history_add clan=%1 tells the clan, %2")
Execute("history_add all=%1 tells the clan, %2")
Sound(sdir.."/sounds/misc/fishescape.ogg")
table.insert(perfect, "%1")
Sound(sdir.."/sounds/skills/leap2.ogg")
Note("%1 tells the group, %2")
Sound(sdir.."/sounds/channels/group.ogg")
Execute("history_add group=%1 tells the group, %2")
Execute("history_add all=%1 tells the group, %2")
Note("%1 tells the subgroup, %2")
Sound(sdir.."/sounds/channels/subgroup.ogg")
Execute("history_add group=%1 tells the subgroup, %2")
Execute("history_add all=%1 tells the subgroup, %2")
Note("%1 warns the group, %2")
Sound(sdir.."/sounds/channels/groupwarn.ogg")
Execute("history_add group=%1 warns the group, %2")
Execute("history_add all=%1 warns the group, %2")
Sound(sdir.."/sounds/misc/fishlinepull.ogg")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/kick1.ogg",0,50)
theygrunt()
end)
Note("%1 tells you, %2")
if "%1" ~= "Soul Eater" then
Sound(sdir.."/sounds/channels/tell.ogg")
Execute("history_add tells=%1 tells you, %2")
Execute("history_add all=%1 tells you, %2")
end
Sound(sdir.."/sounds/misc/fishcatch.ogg")
if (gs("donfish") == true) then
PSend("donate fish")
end
Note("More adept at %1")
Execute("history_add misc=adept at %1")
Execute("history_add all=adept at %1")
counters.betterats=counters.betterats+1
better_at()
better_at()
counters.betterats=counters.betterats+1
Execute("history_add misc=better at %1")
Execute("history_add all=better at %1")
Note("better at %1")
Sound(sdir.."/sounds/notifications/achievement.ogg")
Execute("history_add misc=You have completed the achievement %1")
Execute("history_add all=You have completed the achievement %1")
Sound(sdir.."/sounds/skills/berserk on.ogg")
berserk=1
Sound(sdir.."/sounds/spells/ball lightning.ogg")
Sound(sdir.."/sounds/combat/weapon sounds/they miss leap.ogg")
better_at()
Execute("history_add misc=much better at %1")
Execute("history_add all=much better at %1")
counters.betterats=counters.betterats+1
better_at()
Execute("history_add misc=You become much better at %1")
Execute("history_add all=You become much better at %1")
counters.betterats=counters.betterats+1
Note("much better at %1")
Execute("history_add all=when you died, you lost knowledge of %1.")
Execute("history_add misc=when you died, you lost knowledge of %1.")
Sound(sdir.."/sounds/spells/continual light.ogg")
Sound(sdir.."/sounds/skills/pickpocket/nothing.ogg")
myspecial()
Sound(sdir.."/sounds/spells/fireweb.ogg")
Sound(sdir.."/sounds/spells/healing touch1.ogg")
%1 has nothing to say.
myspecial()
Sound(sdir.."/sounds/spells/firefield.ogg")
cleric=%1
checkstats()
Sound(sdir.."/sounds/wear/wrist1.ogg")
mage=%1
donate meat
donate skin
Sound(sdir.."/sounds/kick/kickdodge.ogg")
checkstats()
Sound(sdir.."/sounds/wear/on_body.ogg")
Sound(sdir.."/sounds/spells/detect nothing magical.ogg")
Sound(sdir.."/sounds/skills/bash5.ogg")
Note("gets in a good hit.")
checkstats()
Sound(sdir.."/sounds/wear/arms.ogg")
Execute("put stone disc")
Sound(sdir.."/sounds/mining/find stone.ogg")
checkstats()
Sound(sdir.."/sounds/wear/hands.ogg")
Sound(sdir.."/sounds/mining/find clay.ogg")
Note("%1 assists %2")
bfight("%2")
checkstats()
Sound(sdir.."/sounds/wear/head.ogg")
it's a %1.
Sound(sdir.."/sounds/MINING/find iron.ogg")
ppi.play(sdir.."/sounds/combat/armor/"..math.random(1,armor)..".ogg",0,-50)
counters.absorb=counters.absorb+1
Sound(sdir.."/sounds/combat/couldn't flee.ogg")
Sound(sdir.."/sounds/combat/weapon sounds/they fail disarm.ogg")
deadmob=1
stealnext=false
DoAfterSpecial(1,'deadmob=0',12)
EnableGroup("combat", 0)
require "wait"
wait.make(function()
if pose~="stand" then
PSend("stand")
end
if (gs("randoms")==true) then
if grouped==0 then
Execute("licr")
else
if (gs("grandoms")==true or leader==gs("me")) then
Execute("licr")
end --if group randoms
end --if grouped
end
wait.time(0.2)
if (gs("musictype")==2) and (gs("music")==true) then
if nfight==1 then
Sound("stop="..sdir.."/sounds/music/2/dying.ogg")
Sound(sdir.."/sounds/music/2/died.ogg")
end
end
gclear()
gfighting=0
if (job=="healer") and (gname~=nil) then
if (kskills["healingtouch"]==1) then
PSend("heal "..gname)
end
end
counters.kills=counters.kills+1
if (pose~="stand") then
PSend("stand")
end
if soulstone then
soulstone=false
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,0)
end
else
wait.time(0.7)
if (mg=="male") then
Sound(sdir.."/sounds/combat/deaths/male/"..math.random(1,mdeaths)..".ogg")
end
if (mg=="female") then
Sound(sdir.."/sounds/combat/deaths/female/"..math.random(1,fdeaths)..".ogg")
end
if (mg=="neuter") then
Sound(sdir.."/sounds/combat/deaths/neuter/"..math.random(1,ndeaths)..".ogg")
end
end
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,0)
end
wait.time(2)
if (gs("playquotes")==true) then
Sound(sdir.."/sounds/combat/pkmsgs/" .. math.random(1,pkmsg).. ".ogg")
end
end)
players listening are:
Sound(sdir.."/sounds/skills/they fail to trip you.ogg")
theyspecial()
require "wait"
wait.make(function()
wait.time(0.3)
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,-50)
else
Sound(sdir.."/sounds/skills/you trip.ogg")
end
yougrunt()
end)
Sound(sdir.."/sounds/spells/fully healed.ogg")
A board is here for posting.
Sound(sdir.."/sounds/skills/turn/target.ogg")
Sound(sdir.."/sounds/skills/turn/attack.ogg")
ppi.play(sdir.."/sounds/combat/armor/"..math.random(1,armor)..".ogg",0,-50)
counters.absorb=counters.absorb+1
practice 8mill xp
Sound(sdir.."/sounds/doors/unlock.ogg")
Sound(sdir.."/sounds/combat/weapon sounds/they leap.ogg")
Sound(sdir.."/sounds/misc/buy something.ogg")
Sound(sdir.."/sounds/combat/weapon swings/slice/"..math.random(1,swings["slice"])..".ogg")
counters.theydodge=counters.theydodge+1
Note("You miss.")
Sound(sdir.."/sounds/spells/noxious cloud.ogg")
if pose~="stand" then
Send("stand")
end
if (carryblock==1) then
else
Sound(sdir.."/sounds/items/arms full.ogg")
end
require "wait"
wait.make(function()
carryblock=1
carrycount=carrycount+1
wait.time(1)
if (carrysay==0) then
carrysay=1
Note("You can't carry any more, "..carrycount.." items left.")
wait.time(3)
carrysay=0
end
carryblock=0
carrycount=0
end)
Sound(sdir.."/sounds/spells/shocking grasp on.ogg")
Sound(sdir.."/sounds/spells/shocking grasp on.ogg")
thief=%1
require "wait"
wait.make(function()
Sound(sdir.."/sounds/items/can't lift weight.ogg")
carryblock=1
wait.time(2)
carryblock=0
end)
Sound(sdir.."/sounds/spells/refresh area.ogg")
Sound(sdir.."/sounds/spells/refresh area.ogg")
Sound(sdir.."/sounds/spells/refresh area.ogg")
warrior=%1
Sound(sdir.."/sounds/doors/fail pick1.ogg")
if (gs("autopick") == true) then
Execute("pick " ..pick)
end
%1 is sanced.
Sound(sdir.."/sounds/spells/burning hands on.ogg")
Sound(sdir.."/sounds/spells/burning hands on.ogg")
Sound(sdir.."/sounds/spells/refresh someone.ogg")
Sound(sdir.."/sounds/skills/berserk other.ogg")
if (job=="hitter") then
PSend("berserk")
end
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
Sound(sdir.."/sounds/spells/shower of sparks.ogg")
theygrunt()
end)
hpregen =tonumber(%1)
mregen=tonumber(%2)
mvregen=tonumber(%3)
Sound(sdir.."/sounds/gold/deposit.ogg")
checkstats()
Sound(sdir.."/sounds/wear/waist.ogg")
hpregen =tonumber(%1)
mregen=tonumber(%2)
mvregen=tonumber(%3)
Note("You disarm %1!")
counters.disarm=counters.disarm+1
Sound(sdir.."/sounds/combat/you disarm.ogg")
if (grouped==1) and (job=="hitter") then
if (kskills["trip"]==1) then
hitting="trip"
end
if (kskills["bash"]==1) then
hitting="bash"
end
if (kskills["kick"]==1) then
hitting="kick"
end
end
Sound(sdir.."/sounds/gold/withdraw.ogg")
checkstats()
Sound(sdir.."/sounds/wear/legs.ogg")
Sound(sdir.."/sounds/notifications/command wrong.ogg")
Execute("history_add channels=%1 gossips, %2")
Execute("history_add all=%1 gossips, %2")
Sound(sdir.."/sounds/channels/gossip.ogg")
Note("%1 gossips, %2")
Execute("history_add channels=%1 chats, %2")
Execute("history_add all=%1 chats, %2")
Sound(sdir.."/sounds/channels/chat.ogg")
Note("%1 chats, %2")
if "%1"~=gs("me") then
Execute("history_add channels=%1 posted: %2")
Execute("history_add all=%1 posted: %2")
end
Sound(sdir.."/sounds/channels/friend.ogg")
Execute("history_add channels=%1 jokes, %2")
Execute("history_add all=%1 jokes, %2")
Sound(sdir.."/sounds/channels/joke.ogg")
Note("%1 jokes, %2")
Sound(sdir.."/sounds/items/can't find item.ogg")
checkstats()
Sound(sdir.."/sounds/combat/wield/"..math.random(1,wield)..".ogg")
Sound(sdir.."/sounds/misc/fishsnap.ogg")
counters.dodge=counters.dodge+1
if (gender=="male") then
Sound(sdir.."/sounds/combat/dodge/male/" ..math.random(1,mdodge) .. ".ogg")
end
if (gender=="female") then
Sound(sdir.."/sounds/combat/dodge/female/" .. math.random(1,fdodge) .. ".ogg")
end
if (gender=="neuter") then
Sound(sdir.."/sounds/combat/dodge/male/" .. math.random(1,mdodge) .. ".ogg")
end
Note("You dodge.")
require "wait"
if stealnext then
Execute("c soulsteal")
stealnext=false
end
wait.make(function()
if (mort==0) then
mort=1
if (mg=="male") then
Sound(sdir.."/sounds/combat/mort/male/"..math.random(1,mmort)..".ogg")
end
if (mg=="female") then
Sound(sdir.."/sounds/combat/mort/female/"..math.random(1,fmort)..".ogg")
end
if (mg=="neuter") then
Sound(sdir.."/sounds/combat/mort/neuter/"..math.random(1,nmort)..".ogg")
end
if (IsInTable(group, "%1")==1) then
Sound(GetInfo(67).."/sounds/grouping/mort.ogg")
Execute("tts_interrupt %1 is mortally wounded!")
Execute("history_add all=%1 is mortally wounded!")
Execute("history_add group=%1 is mortally wounded!")
end
wait.time(2)
mort=0
end
end)
Sound(sdir.."/sounds/spells/out of mana.ogg")
if (grouped==1) then
if gs("swarn") then
if (safety~=1) then
PSend("warn ~ROOM")
safety=1
DoAfterSpecial(3,"safety=0",12)
end
end
end
if (job=="blaster") or (job=="healer") or (job=="healblast") or (job=="areaman") then
EnableTimer("grtimer", false)
end
Sound(sdir.."/sounds/spells/fireweb fire.ogg")
Sound(sdir.."/sounds/combat/that really did hurt!.ogg")
if (gs("tts") == true) then
Execute("tts_interrupt %1 is ready to go!")
else
Note("%1 is ready to go, but you would be left behind!")
end
Sound(sdir.."/sounds/notifications/alert1.ogg")
if (pose~="stand") then
PSend("stand")
end
if k_move<=10 then
if kspells["refresh"]==1 then
Send("c refresh")
end --know ref
end --move low
Sound(sdir.."/sounds/doors/it is closed.ogg")
Sound(sdir.."/sounds/spells/faerie fire someone.ogg")
Sound(sdir.."/sounds/spells/faerfog.ogg")
Sound(sdir.."/sounds/spells/someone summoned out.ogg")
Sound(sdir.."/sounds/spells/sanc on.ogg")
Sound(sdir.."/sounds/doors/open.ogg")
if mtime then
Note("To add this door to your map, type zmap door or zmd open doorname and optional direction if necessary. Do it before you move! Example: zmd open gates n")
end
End of list.
counters.parry=counters.parry+1
ppi.play(sdir.."/sounds/combat/parry/" .. math.random(1, tparry) .. ".ogg",0,-50)
Sound(sdir.."/sounds/channels/yell.ogg")
Execute("history_add channels=%1 yells, %2")
Execute("history_add all=%1 yells, %2")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/bash3.ogg",0,50)
theygrunt()
end)
Note("off center.")
Sound(sdir.."/sounds/skills/backstab/4.ogg")
bfight("%1")
Sound(sdir.."/sounds/skills/backstab/4.ogg")
Sound(sdir.."/sounds/spells/frost2.ogg")
Sound(sdir.."/sounds/spells/dex on.ogg")
PSend("show dex")
freak 2!
if (map==1) then
AppendToNotepad("map", "recall;")
end
EnableGroup("combat",0)
Sound(sdir.."/sounds/misc/recall.ogg")
if (map==1) then
AppendToNotepad("map", "recall;")
end
EnableGroup("combat",0)
Sound(sdir.."/sounds/spells/word.ogg")
if (gs("shortid")==1) then
Note("%1 by %2")
return
end
if (gs("shortid")==3) then
Note("%1 by %2")
end
if affs["%1"]~=nil then
iaffects=iaffects.." "..affs["%1"].." %2"
else
iaffects=iaffects.." %1 %2"
end
Sound(sdir.."/sounds/spells/shield off.ogg")
rc("shield")
if kspells["shield"]==1 then
rct["shield"]=true
end
Sound(sdir.."/sounds/skills/hide.ogg")
Note("This magical armor gives %2 ac")
ac=" ac %2 "
if (gs("donfish") == true) then
PSend("donate fish")
end
Sound(sdir.."/sounds/misc/fishcatch.ogg")
exp=%1
rct["displacement"]=nil
Sound(sdir.."/sounds/spells/displacement.ogg")
rct["fly"]=nil
Sound(sdir.."/sounds/spells/fly.ogg")
Sound(sdir.."/sounds/doors/close.ogg")
if (gs("tts") == true) then
world.Execute ("tts_interrupt %1 growls at you.")
else
Note("%1 growls at you, warning you away.")
end
Sound(sdir.."/sounds/movement/wrong exit/"..terrain..".ogg")
pcost=%1
prac=exp/pcost*100
prac=tostring(prac)
dot=string.find(prac, "%p")
dot2=dot+1
prac=string.sub(prac, 1,dot)..string.sub(prac,dot2,dot2)
Note("you are "..prac.." percent to training a prac.")
if (gs("praccing")==true) then
exptnl=pcost
classtnl="practice"
end
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/kick3.ogg",0,50)
theygrunt()
end)
Note("full circle!")
sac corpse
stand
Sound(sdir.."/sounds/spells/lightning bolt.ogg")
if (IsInTable(group, "%1")==1) then
Sound(sdir.."/sounds/combat/die group.ogg")
Execute("history_add group=%1 has died!")
Execute("history_add all=%1 has died!")
else
Sound(sdir.."/sounds/combat/pkmsgs/" ..math.random (1, pkmsg) .. ".ogg")
end
Sound(sdir.."/sounds/combat/die player.ogg")
casting=""
Sound(sdir.."/sounds/channels/enter.ogg")
Execute("history_add friends=%1 logged in.")
Execute("history_add all=%1 logged in.")
Sound(sdir.."/sounds/combat/arena/someone joins arena.ogg")
Execute("history_add arena=%1 joined the arena.")
Execute("history_add all=%1 joined the arena.")
Sound(sdir.."/sounds/combat/arena/someone joins arena.ogg")
Execute("history_add all=%1 recalled from the arena.")
Execute("history_add arena=%1 recalled from the arena.")
ppi.play(sdir.."/sounds/combat/armor/"..math.random(1,armor)..".ogg",0,50)
Sound(sdir.."/sounds/notifications/command wrong.ogg")
ppi.play(sdir.."/sounds/combat/armor/"..math.random(1,armor)..".ogg",0,50)
Sound(sdir.."/sounds/spells/earthquake.ogg")
gender="%1"
%1 is darkened.
Sound(sdir.."/sounds/combat/arrow miss.ogg")
Sound(sdir.."/sounds/skills/berserk pass.ogg")
berserk=0
Sound(sdir.."/sounds/items/drop/" .. math.random(1,drops)..".ogg")
theyspecial()
require "wait"
wait.make(function()
wait.time(0.3)
if (trip[terrain]~=nil) then
ppi.play(sdir.."/sounds/skills/trip/"..terrain.."/"..math.random(1,trip[terrain])..".ogg",0,-50)
else
Sound(sdir.."/sounds/skills/you trip.ogg")
end
yougrunt()
end)
Sound(sdir.."/sounds/skills/berserk interrupted OMV.ogg")
berserk=0
EnableGroup("lvl", 1)
Sound(sdir.."/sounds/skills/turn/target.ogg")
Sound(sdir.."/sounds/skills/turn/laugh.ogg")
Sound(sdir.."/sounds/skills/backstab/6.ogg")
EnableGroup("stab", 0)
Note("mildly annoyed.")
Sound(sdir.."/sounds/skills/backstab/6.ogg")
bfight("%2")
Sound(sdir.."/sounds/skills/backstab/3.ogg")
bfight("%2")
Sound(sdir.."/sounds/skills/backstab/3.ogg")
EnableGroup("stab", 0)
Note("strange noise.")
Execute("history_add channels=%1 brailles: %2")
Execute("history_add all=%1 brailles: %2")
Sound(sdir.."/sounds/channels/braille.ogg")
if (map==1) then
AppendToNotepad("map", "recall;")
end
Sound(sdir.."/sounds/spells/word.ogg")
Sound(sdir.."/sounds/spells/sancoff.ogg")
if (grouped==1) and (gs("swarn") == true) then
PSend("warn sanc out!")
end
rc("sanc")
if kspells["sanctuary"]==1 then
rct["sanctuary"]=true
end
Sound(sdir.."/sounds/spells/fly off.ogg")
if (grouped==1) and (gs("swarn") == true) then
PSend("sub fly down.")
end
rc("fly")
if kspells["fly"]==1 then
rc("fly")
rct["fly"]=true
end
if brewing==1 then
ritems=ritems+1
table.insert(recipe,"%1")
else
Sound(sdir.."/sounds/misc/put in container.ogg")
end
Sound(sdir.."/sounds/misc/put in locker.ogg")
Sound(sdir.."/sounds/items/drop/dropgold.ogg")
Sound(sdir.."/sounds/misc/variable set.ogg")
%1
Sound(sdir.."/sounds/spells/frost1.ogg")
EnableGroup("frostbite", 1)
require "wait"
wait.make(function()
table.insert(getitems, "%1")
if not (getblock==1) then
Sound(sdir.."/sounds/items/get item container.ogg")
end
getblock=1
getcount=getcount+1
wait.time(0.4)
if (getsay==0) then
getsay=1
for i,v in pairs(getitems) do
if IsInTable(uniques,v)==0 then
if gs("items")~=3 then
length=0
word=""
for w in string.gmatch(v, "%S+") do
if string.len(w)>length then
word=w
length=string.len(w)
end
end
if gs("items")==1 then
if gs("container")~=nil then
Send("put "..word.." "..gs("container"))
end
elseif gs("items")==2 then
Send("drop "..word)
Send("sac "..word)
elseif gs("items")==4 then
Send("donate "..word)
elseif gs("items")==5 then
Send("storage put "..word)
end
end
end
end
if getcount<1 then
elseif getcount==1 then
Note("you get %1 from %2.")
elseif getcount>1 then
Note("You get "..getcount.." items from %2: "..table.concat(getitems, ", "))
end
getsay=0
getblock=0
getcount=0
end
getitems={}
uniques={}
end)
iworn=""
s = "%1"
for w in string.gmatch(s, "%S+") do
if (gs("shortid")==1) then
Note("-"..w)
return
end
if (gs("shortid")==3) then
Note("-"..w)
end
iworn=iworn.." "..w
end
Note("You receive "..ntrunk("%1").." experience.")
Sound(sdir.."/sounds/misc/fishsnap.ogg")
Note("%1")
Note("You receive "..ntrunk("%2").." experience.")
if deadmob~=1 then return end
Execute("ggc")
gclear()
if k_cap==nil then
else
nowexp=tonumber("%2")
if nowexp>=k_cap/2 then
if kskills["cryofvictory"]==1 then
Send("victory")
end --if cry of victory
end --if half cap
if nowexp==k_cap then
Sound(GetInfo(67).."/sounds/notifications/cap.ogg")
elseif nowexp<k_cap and nowexp>=k_cap/2 then
ppi.play(GetInfo(67).."/sounds/notifications/halfcap.ogg",0,0,100)
elseif nowexp<k_cap/2 then
ppi.play(GetInfo(67).."/sounds/notifications/crapexp.ogg",0,0,ppi.getVolume()+25)
end --cap sounds
end --if cap is nil
Sound(sdir.."/sounds/spells/magic missile.ogg")
Sound(sdir.."/sounds/auction/auction bell1.ogg")
Sound(sdir.."/sounds/spells/ground off.ogg")
checkstats()
rc("ground")
if kspells["ground"]==1 then
rct["ground"]=true
end
Sound(sdir.."/sounds/spells/fireshield off.ogg")
checkstats()
rc("fire shield")
rct["fire shield"]=true
Sound(sdir.."/sounds/spells/iceshield off.ogg")
checkstats()
rc("ice shield")
rct["ice shield"]=true
Sound(sdir.."/sounds/channels/leave.ogg")
Execute("history_add friends=%1 logged out.")
Execute("history_add all=%1 logged out.")
Sound(sdir.."/sounds/auction/auction bell2.ogg")
flystatus="walking"
Sound(sdir.."/sounds/spells/shocking grasp blast.ogg")
Sound(sdir.."/sounds/channels/reconnected.ogg")
Execute("history_add friends=%1 reconnected.")
Execute("history_add all=%1 reconnected.")
Sound(sdir.."/sounds/channels/leave linkdead.ogg")
Execute("history_add all=%1 lost %2 link.")
Note("%1 bids %2.")
Sound(sdir.."/sounds/auction/bid.ogg")
gg=tonumber(%1)
counters.steal=counters.steal-gg
if(safety~=1) then
Note("%1 requests your mush-z version...")
safety=1
PSend("tell %1 pong! "..GetVariable("version").." | prefix mzc")
DoAfterSpecial(10,"safety=0",12)
end
Sound(sdir.."/sounds/spells/burning hands blast.ogg")
Execute("redo")
Note("Auction finished, sold to %2")
Execute("history_add auction=finished: %1 sold to %2 for %3.")
Sound(sdir.."/sounds/auction/item sold.ogg")
Sound(sdir.."/sounds/combat/arrow strike.ogg")
Sound(sdir.."/sounds/brewing/dump container.ogg")
DoAfterSpecial(0.6,'Sound(sdir.."/sounds/spells/youres2.ogg")',12)
DoAfterSpecial(1,'Sound(sdir.."/sounds/spells/youres3.ogg")',12)
Sound(sdir.."/sounds/spells/youres1.ogg")
Sound(sdir.."/sounds/spells/got summoned.ogg")
Sound(sdir.."/sounds/skills/backstab/2.ogg")
Sound(sdir.."/sounds/misc/stand.ogg")
Sound(sdir.."/sounds/misc/stand.ogg")
pose = "stand"
Note("You earn "..ntrunk("%1").." experience.")
Sound(sdir.."/sounds/combat/arena/win arena.ogg")
Sound(sdir.."/sounds/misc/fishcast.ogg")
EnableGroup("fishing", 1)
Sound(sdir.."/sounds/brewing/nasty mess.ogg")
Execute("empty mortar")
if mtime then
Note("To add this to your map use zmd open * or zmap door open *. For example, zmd open gates")
end
if (map==1) then
AppendToNotepad("map", "enter %1;")
end
Note("You enter %1")
if mtime then
Note("To add this to your map use zmd enter * or zmap door enter *.")
else
Note("You enter %1")
end
Sound(sdir.."/sounds/movement/enter portal.ogg")
if (map==1) then
AppendToNotepad("map", "climb %1;")
end
if mtime==true then
table.insert(curmap,"climb %1")
end
Sound(sdir.."/sounds/movement/climb.ogg")
counters.dodge=counters.dodge+1
if (mg=="male") then
Note("he misses.")
end
if (mg=="female") then
Note("she misses.")
end
if (mg=="neuter") then
Note("it misses.")
end
Sound(sdir.."/sounds/combat/weapon swings/slice/"..math.random(1,swings["slice"])..".ogg")
Sound(sdir.."/sounds/spells/displacement off.ogg")
if (grouped==1) and (gs("swarn") == true) then
PSend("sub displace out.")
end
rc("displace")
if kspells["displacement"]==1 then
rct["displacement"]=true
end
Sound(sdir.."/sounds/spells/infra off.ogg")
rc("infra")
if kspells["infravision"]==1 then
rct["infravision"]=true
end
Sound(sdir.."/sounds/spells/dinvis off.ogg")
rc("detect invis")
if kspells["detectinvisibility"]==1 then
rct["detect invisibility"]=true
end
Sound(sdir.."/sounds/spells/sl off.ogg")
rc("sense life")
if kspells["senselife"]==1 then
rct["sense life"]=true
end
The leader is rated as %2
Sound(sdir.."/sounds/doors/pick door.ogg")
PSend("open "..pick)
Execute("history_add channels=%1 mehs, %2")
Execute("history_add all=%1 mehs, %2")
Sound(sdir.."/sounds/channels/meh.ogg")
Note("%1 mehs, %2")
Execute("history_add all=%1 musics, %2")
Execute("history_add channels=%1 musics, %2")
Sound(sdir.."/sounds/channels/music.ogg")
Note("%1 musics, %2")
blasting="greater"
Note("No affect, too much ac")
blasting="greater fireball"
Sound(sdir.."/sounds/spells/crystal spear shatter.ogg")
notify | prefix scr
Execute("history_add all=%1 newbies, %2")
Execute("history_add channels=%1 newbies, %2")
Sound(sdir.."/sounds/channels/newbie.ogg")
Note("%1 newbies, %2")
Sound(sdir.."/sounds/spells/fails utterly.ogg")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/kick2.ogg",0,50)
theygrunt()
end)
if (gs("sacsplit") == true) and (grouped == 1) then
Execute("split %1")
end
gg=tonumber(%1)
counters.steal=counters.steal+gg
Sound(sdir.."/sounds/misc/sacrifice corpse.ogg")
Sound(sdir.."/sounds/skills/backstab/1.ogg")
EnableGroup("stab", 0)
if (gs("donfish") == true) then
PSend("donate fish")
end
Sound(sdir.."/sounds/misc/fishcatch.ogg")
myspecial()
require "wait"
wait.make(function()
wait.time(0.4)
ppi.play(sdir.."/sounds/skills/kick4.ogg",0,50)
theygrunt()
end)
Note("Could have been better.")
Sound(sdir.."/sounds/notifications/random.ogg")
cmi=1
cmistr=""
idname="%1"
Note("%1")
EnableGroup("compare",true)
DoAfterSpecial(1,'EnableGroup("compare",false)',12)
ac=""
uuid="%4"
PSend("get "..uuid.." corpse")
if gs("container")~=nil then
PSend("put "..uuid.." "..gs("container"))
end
Execute("eql")
Execute("eql %1")
The eqlist command is a powerful tool you can use to manage equipment sets.
Options are:
eqlist help - This help screen.
eqlist create <name> <container> [mode] - Make an equipment set with specified name, container and mode
eqlist mode mode - change the global mode. Possible modes are: Meticulous, fast, lightning.
eqlist mode set mode change the mode for a set.
eqlist delete <name> - Delete an equipment set
eqlist clear - clear/delete all your sets.
eqlist list - List your current equipment sets
eqlist show <set name> - Show eq in a given set
eqlist wear <name> - Wear a set
eqlist remove <name> - Remove/unwear all items from a set
eqlist move <name> <new_container> - moves a set from one container to another (including storage) make sure that if you're moving from a bag or another object it is in your inventory as this does not check for errors and could mess up things badly. If this happens, use the eqlist change command to change it to the container that it was originally in.
eqlist export - export your sets to a backup file.
eqlist import - import sets from backup.
To update a set, recreate it. It will just replace itself.
Note about containers: the container can either be something on your inventory or the word <storage> which puts a set in your storage locker. For storage locker sets, you'll need to be in recall.
Important note about tensor disks and lightning mode: If you are using tensor disks make sure that you are using tensor as the container name and not any shortened word such as t, tens, or any other keywords such as disk or floating. This is important due to lightning mode checks.
For more information about eqlists, read the eqlist section of the mushclient readme file.
Send("stand")
Send("insult -all | prefix eqlc")
Note(md5f("%1"))
Note("ok.")
gag["%1"]=true
settingtables()
config_options()
recast_options()
for i in pairs(gag) do
if gag[i]==true then status="enabled" end
if gag[i]==false then status="disabled" end
Note(i.." - "..status)
end
if "%1"=="release" then
Note("OK, configured.")
gag.misc=false
gag.minions=false
gag.spells=false
gag.combat=true
gag.condition=false
return
elseif "%1"=="all" then
gag.misc=true
gag.minions=true
gag.spells=true
gag.combat=true
gag.condition=true
gag.skills=true
gag.fights=true
Note("Ok, all filters enabled.")
return
elseif "%1"=="none" then
gag.misc=false
gag.fights=false
gag.minions=false
gag.skills=false
gag.spells=false
gag.combat=false
gag.condition=false
Note("All filters disabled.")
return
end
if gag["%1"] then
gag["%1"]=false
Note("filter %1 off.")
elseif gag["%1"]==nil then
Note("Unrecognized filter option - type filter for a list.")
elseif not gag["%1"] then
gag["%1"]=true
Note("filter %1 on.")
end
Note("matched "..s_found.." uuids, with "..s_errors.." errors.")
s_found=0
s_errors=0
require "wait"
wait.make(function()
txt={}
s_errors=0
s_found=0
table.insert(txt,"cast.txt")
table.insert(txt,"align.txt")
table.insert(txt,"age.txt")
table.insert(txt,"enchant.txt")
table.insert(txt,"enchanted.txt")
table.insert(txt,"hit.txt")
table.insert(txt,"hide sneak.txt")
table.insert(txt,"hpregen.txt")
table.insert(txt,"luck.txt")
table.insert(txt,"misc.txt")
table.insert(txt,"thief.txt")
table.insert(txt,"saves.txt")
table.insert(txt,"sell.txt")
table.insert(txt,"size.txt")
table.insert(txt,"spc.txt")
table.insert(txt,"tank.txt")
table.insert(txt,"stats.txt")
f_uuids={}
found=0
errors=0
s_uuids={}
dir="f:/eq/sets/"
for i in pairs(txt) do
file=io.input(dir..txt[i])
line=file:read("*l") -- read one line
while line do -- if not end of file (EOF)
str=string.match(line,"(%w+)%.")
if str~=nil then
table.insert(f_uuids,str)
str=nil
end
line=file:read ("*l") -- read one line
end
file:close()
end
Note("Total: "..#f_uuids.." uuids in files.")
Execute("stll -head -insult | prefix storecheck")
wait.time(2);
Execute("stll -neck -insult | prefix storecheck")
wait.time(2);
Execute("stll -arms -insult | prefix storecheck")
wait.time(2);
Execute("stll -wrist -insult | prefix storecheck")
wait.time(2);
Execute("stll -hands -insult | prefix storecheck")
wait.time(2);
Execute("stll -finger -insult | prefix storecheck")
wait.time(2);
Execute("stll -on_body -insult | prefix storecheck")
wait.time(2);
Execute("stll -about -insult | prefix storecheck")
wait.time(2);
Execute("stll -waist -insult | prefix storecheck")
wait.time(2);
Execute("stll -legs -insult | prefix storecheck")
wait.time(2);
Execute("stll -feet -insult | prefix storecheck")
wait.time(2);
Execute("stll -held -insult | prefix storecheck")
wait.time(2);
Execute("stll -shield -insult | prefix storecheck")
wait.time(2);
Execute("stll -weapon -insult | prefix storecheck")
end)
if not mark then
mark=true
exm=exp
Note("exp mark on.")
else
mark=false
Note("Your exp changed by "..exp-exm)
end
if(goldlog==1) then
goldlog=0
Note("gold log is off")
else
goldlog=1
Note("gold log is on")
end
bwithdraw=1
PSend("gold")
require "wait"
wait.make(function()
local c1 = os.clock()
--do stuff
local c1 = os.clock()
Send("lagcheck | prefix lagcheck")
wait.match("lagcheckHuh?",100)
Note('done: ',os.clock()-c1..'s')
end)
require "wait"
wait.make(function()
local c1 = os.clock()
--do stuff
local c1 = os.clock()
Send("lagcheck | prefix lagcheck")
wait.match("lagcheckHuh?",100)
Send('%1 I currently have a connection lag of ',os.clock()-c1..'s')
end)
Simulate("%1\\r\\n")
ach | grep Yes | wc
ach | grep No | wc
look in corpse -insult -random | prefix random
str="%1"
PSend("scan | grep "..string.lower(str))
PSend("scan | grep "..string.upper(string.sub(str,1,1))..string.sub(str,2,#str))
str="%1"
PSend("deed | grep "..string.lower(str))
PSend("deed | grep "..string.upper(string.sub(str,1,1))..string.sub(str,2,#str))
str="$k"
PSend("scan | grep "..string.lower(str))
PSend("scan | grep "..string.upper(string.sub(str,1,1))..string.sub(str,2,#str))
Note("This does nothing for now.")
lazymoving=1
PSend("look")
way="%1"
if (ways[way]~=nil) then
PSend("recall")
PSend("way "..ways[way])
else
Note("unknown waypoint: Waypoints you can use are "..table.concat(ways2, ", "))
end
ss("botname", "%1")
Note("Your bot's name is now "..gs("botname"))
botname=gs("botname")
PSend("sub My bot's name is now "..gs("botname"))
if (grouped==1) then
PSend("rest")
else
PSend("sleep")
end
t="%1"
item="%2"
t[item]=nil
for i,v in pairs(rct) do
if v==true then
Note(i)
end
end
if (cspells==0) then
cspells=1
Note("recast on.")
return
end
if (cspells==1) then
cspells=0
Note("recast off.")
return
end
var hit %1
wield %1
Welcome to the group bots!
For now, the following commands are available.
!job <healer, blaster, hitter or tank> sets your own job.
!recast toggles whether you will recast tank and hitters falling spells.
Note that the healer job will always try to cast heal, and area when requested.
The blaster spell has to be indicated with the !blast command.
blasting="%1"
Note("Blasting set to %1.")
PSend("sub I will now use "..blasting.." to blast.")
if nobot then
Note("sorry, bots are disabled.")
return
end
if ("%1"=="healer") then
job="healer"
PSend("sub Job set to healer.")
Note("You are now a healer.")
blasting=""
return
elseif ("%1"=="areaman") then
job="areaman"
PSend("sub I am now the areaman of the group.")
Note("You are now the area man.")
blasting=""
return
elseif ("%1"=="none") then
job="none"
Note("Bots disabled.")
PSend("sub bots disabled.")
return
elseif ("%1"=="") then
Note("Job is currently set to "..job)
return
elseif ("%1"=="healblast") then
job="healblast"
PSend("sub Job set to blaster healer.")
Note("You are now a blaster healer, use the !blast spellname command to set the blasting spell you want to use.")
blasting="greater fireball"
PSend("sub I will use "..blasting.." to blast.")
return
elseif ("%1"=="blaster") then
Note("You are now a blaster, use the !blast spellname command to set the blasting spell you want to use.")
job="blaster"
PSend("sub job set to blaster.")
blasting="greater fireball"
PSend("sub I will use "..blasting.." to blast.")
return
elseif ("%1"=="tank") then
if (kskills["tanking"]==1) then
PSend("tank | prefix tankon")
Note("You are now a proper tank.")
else
notank=1
Note("You are now a tank, even though you don't know the skill, but...")
if (kskills["rescue"]==1) then
Note("You know rescue. good.")
else
Note("You don't even know rescue! You can't tank!")
Send("sub I can't tank, I don't know rescue.")
return
end --res
end --tanking
job="tank"
PSend("sub job set to tank.")
if (kskills["defensivefighting"]==1) then
PSend("def | prefix tankon")
else
Note("Well you dont know defensive fighting, as a tank you should know it, but oh well. Go learn it.")
end
return
elseif ("%1"=="hitter") then
job="hitter"
PSend("sub job set to hitter.")
zerking=0
PSend("tank | prefix tankoff")
PSend("def | prefix tankoff")
assisting=0
Note("You are now a hitter. Use the !zerk command to configure whether you want to berserk during battles. Note that the hitter can stab if someone types gt stab mobname, and it will switch weapons after stabbing. for that, the variables $hit and $stab have to be set to the name to the weapon you're gonna use I.e: var hit sword, var stab dagger. It will also rewield the $hit weapon after disarmed.")
return
else
Note("Unknown job, type !help for details.")
end
if (zerk==1) then
zerk=0
Note("You will not zerk in battles.")\
return
end
if (zerk==0) then
zerk=1
Note("You will zerk in battles.")
return
end
inv | prefix invcheck
abort | prefix invcheck
inv | prefix invcheck
abort | prefix invcheck
PSend("gr | prefix groupm")
require "wait"
wait.make(function()
wait.time(0.8)
if (issues~=1) then
Note("No one in the group seems to be in trouble.")
end
issues=0
end)
reply %1
sleep | prefix force
Note("reloading...")
clear()
login()
jli=1
--grouped=1
DoAfterSpecial(12, 'jli=0', 12)
EnableGroup("group",1)
PSend("group | prefix grm")
Note("reloading")
DoAfterSpecial(1,"UnloadPlugin('553a883096da345ce6897740')","14")
DoAfterSpecial(2,"ReloadPlugin('553a883096da345ce6897740')","14")
counters={}
Note("Counters reset.")
counters.date=os.date("%B %d %H:%M:%S")
counters.teeth=0
counters.bteeth=0
counters.hits=0
counters.dodge=0
counters.parry=0
counters.theydodge=0
counters.enemyhits=0
counters.parryc=0
counters.absorb=0
counters.kills=0
counters.flee=0
counters.cast=0
counters.betterats=0
counters.disarm=0
counters.rescue=0
counters.frescue=0
counters.steal=0
Note("Counters since "..counters.date)
Note("You have been hit "..counters.hits.." times, dodged "..counters.dodge..", and parried "..counters.parry..". Which means you avoided "..math.floor((counters.parry+counters.dodge)/(counters.hits+counters.parry+counters.dodge)*100).."percent of hits.")
Note("You attacked "..counters.enemyhits.." times. Mobs dodged "..counters.theydodge..", and parried "..counters.parryc..". "..math.floor((counters.parryc+counters.theydodge)/(counters.enemyhits+counters.parryc+counters.theydodge)*100) .."percent of your attacks avoided.")
Note("Your armor absorbed "..counters.absorb.." hits.")
Note("You've killed "..counters.kills.." mobs this session, and fled "..counters.flee.." times.")
Note("You've casted a total of "..counters.cast.." spells.")
Note("You have disarmed a total of "..counters.disarm.." mobs.")
if counters.rescue~=0 then
if counters.frescue~=0 then
Note("You have rescued "..counters.rescue.." times, and failed "..counters.frescue.." times!")
else
Note("You have rescued "..counters.rescue.." times.")
end
end
Note("You got a total of "..counters.steal.." gold this session.")
Note("You became better "..counters.betterats.." times.")
Note("You got "..counters.teeth.." necromancer teeth, and shattered "..counters.bteeth..".")
Note("To reset the counters, type scm reset.")
SendNoEcho("%1 Counters since "..counters.date)
SendNoEcho("%1 I have been hit "..counters.hits.." times, dodged "..counters.dodge..", and parried "..counters.parry..". Which means I avoided "..math.floor((counters.parry+counters.dodge)/(counters.hits+counters.parry+counters.dodge)*100) .."percent of hits.")
SendNoEcho("%1 I attacked "..counters.enemyhits.." times. Mobs dodged "..counters.theydodge..", and parried "..counters.parryc..". "..math.floor((counters.parryc+counters.theydodge)/(counters.enemyhits+counters.parryc+counters.theydodge)*100) .."percent of my attacks avoided.")
SendNoEcho("%1 I've killed "..counters.kills.." mobs this session, and fled "..counters.flee.." times.")
if counters.rescue~=0 then
if counters.frescue~=0 then
Send("%1 I have rescued "..counters.rescue.." times, and failed "..counters.frescue.." times!")
else
SendNoEcho("%1 I have rescued "..counters.rescue.." times.")
end
end
SendNoEcho("%1 I have disarmed a total of "..counters.disarm.." mobs.")
SendNoEcho("%1 I became better "..counters.betterats.." times.")
skill | grep %1
spell | grep %1
shopkeep %1
var $res $v2
rescue $v2
skin corpse
var $res $v3
rescue $v3
sleep
res="%1"
Send("res %1")
if not (pose == "stand") then
PSend("stand")
prevpose=pose
end
PSend("c "..spells["heal"].." $t")
casting=spells["heal"].." $t"
if(prevpose~="stand") then
PSend(prevpose)
prevpose="stand"
end
stand
if not (pose == "stand") then
PSend("stand")
prevpose=pose
end
PSend("c "..spells["heal"].." $v")
casting=spells["heal"].." $v"
if(prevpose~="stand") then
PSend(prevpose)
prevpose="stand"
end
target $k
storage get %1
storage llist %1
storage put %1
c m $k
tar noone
condition
target $v
pickpocket 11.$k
require "tprint"
tprint(backtrack)
Note("rooms time!")
tprint(rooms)
Note(leader)
Note(trackarea)
Note(terrain)
--Note(area)
--Note(time)
--Note(timenum)
Note(timestr)
;require "tprint"
tprint(cup)
tprint(kxwts)
pickpocket 12.$k
train | prefix tnl | grep each
level | prefix tnl
autosize | prefix scr
autosplit | prefix scr
autotick | prefix scr
notify | prefix scr
set prompt off
autodoor | prefix scr
set blind on | prefix mzc
set pageb none | prefix mzc
pickpocket 13.$k
if (map==0) then
map=1
Note("map on.")
Sound(sdir.."/sounds/luaaudio/on.ogg")
elseif (map==1) then
map=0
Note("map mode off.")
Sound(sdir.."/sounds/luaaudio/off.ogg")
end
if (stealth==0) then
stealth=1
Note("Stealth mode on.")
Sound(sdir.."/sounds/luaaudio/on.ogg")
elseif (stealth==1) then
stealth=0
Note("Stealth mode off.")
Sound(sdir.."/sounds/luaaudio/off.ogg")
end
pickpocket 14.$k
pickpocket 2.$k
PSend("rescue $v")
res="$v"
PSend("res%1 %2")
res="%2"
replay | tail
mnrnote = 0
hprnote = 0
hpnote = 0
mnnote = 0
mvnote = 0
mvrnote=0
Execute("show regen | prefix scr:")
condition %1
if (gs("tts") == true) then
tts_stop
end
condition $v2
if (gs("tts") == true) then
tts_stop
end
condition $v3
level | grep %1
if (gs("tts") == true) then
Execute("tts_stop")
end
Execute("condition $k")
level | grep experience | prefix tnp
train | grep each | prefix tnp
if (gs("tts") == true) then
Execute("tts_stop")
end
Execute("condition $t")
train prac
pickpocket 3.$k
pickpocket 4.$k
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "u;")
end
if (stealth==1) then
PSend("sneak u")
return
end
PSend("u")
pickpocket 5.$k
pickpocket 6.$k
pickpocket 7.$k
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "s;")
end
if (stealth==1) then
PSend("sneak s")
return
end
PSend("s")
if (pose ~= "stand") then
PSend("stand")
Execute("sac corpse")
else
Execute("sac corpse")
end
Execute("c sanc $t")
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "se;")
end
if (stealth==1) then
PSend("sneak se")
return
end
PSend("se")
use bow %1
rem lantern
drop lantern
sac lantern
use bow $k
c lig bolt $k
use box mouse
pickpocket 8.$k
look in corpse
use frog %1
con $k
pickpocket 9.$k
light lantern
use frog $k
PSend("c crystal spear $k")
casting="crystal spear $k"
list all | grep R
PSend("friend list | grep %1")
if not (pose == "stand") then
PSend("stand")
prevpose=pose
end
PSend("c "..spells["heal"])
casting=spells["heal"].." %1"
if(prevpose~="stand") then
PSend(prevpose)
prevpose="stand"
end
if not (pose == "stand") then
PSend("stand")
prevpose=pose
end
PSend("c "..spells["heal"].." %1")
casting=spells["heal"].." %1"
if(prevpose~="stand") then
PSend(prevpose)
prevpose="stand"
end
rem %1
get shielding amulet box
wear amulet
use amulet
rem amulet
p amulet box
wear %1
bank deposit %1000
unlock %1
open %1
%stat %1 | grep count
Execute("abort")
Execute("cast "..casting)
use lantern
PSend("c cure crit $v")
casting="cure crit $v"
os.Execute("Notepad "..sdir.."texts/notes.txt")
var
PSend("c cure s $t")
casting="cure s $t"
os.Execute("Notepad "..sdir.."texts/quotes.txt")
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "d;")
end
if (stealth==1) then
PSend("sneak d")
return
end
PSend("d")
c dispel $k
disarm $k
c harm $k
heal $v2
bank withdraw %1000
heal $v3
heal $me
%Send $chan %1
heal $t
spell list | grep %1
skill list | grep %1
nod
var %1
Note("Notepad "..sdir.."texts/sets/%1.txt")
require "wait"
wait.make(function()
autosac=true
PSend("get all corpse")
wait.time(0.5)
if (carryblock==1) then
Note("Corpse is not empty. Not sacrificing.")
else
if kskills["consume"]==1 then
Send("control all consume corpse")
end
if kskills["bloodsacrifice"]==1 then
Send("bloodsac corpse")
end
if kskills["corpsecutter"]==1 then
Send("harv spellcomp corpse")
end
if kskills["harvestteeth"]==1 then
Send("harv teeth corpse")
else
Send("sac corpse")
end
end
end)
autosac=true
if kskills["consume"]==1 then
Send("control all consume corpse")
end
if kskills["bloodsacrifice"]==1 then
Send("bloodsac corpse")
end
if kskills["corpsecutter"]==1 then
Send("harv spellcomp corpse")
end
if kskills["harvestteeth"]==1 then
Send("harv teeth corpse")
else
Send("sac corpse")
end
var gold %1
mana
var k %1
drop %1
sac %1
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", 'e;')
end
if (stealth==1) then
PSend("sneak e")
return
end
PSend("e")
movement
c fireweb
c fireweb %1
heal $v
follow $k
steal gold %1
idle $k
c frost $k
steal gold 10.$k
if (gs("tts") == true) then
if gs("imove") then Execute("tts_stop") end
if (map==1) then
AppendToNotepad("map", "backward;")
end
PSend("backward")
end
kick $k
c flamestrike $k
bank deposit %1
Execute("bank deposit " .. gold)
var t %1
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "n;")
end
if (stealth==1) then
PSend("sneak n")
return
end
PSend("n")
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "w;")
end
if (stealth==1) then
PSend("sneak w")
return
end
PSend("w")
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "ne;")
end
if (stealth==1) then
PSend("sneak ne")
return
end
PSend("ne")
%1 | wc
drop gold
get gold
count emerald disc
slist | grep not learned
c enchant armor %1
c id %1
c entangl $k
steal gold 11.$k
c fireweb $k
steal gold 12.$k
c fireweb $k
steal gold 13.$k
get all
steal gold 14.$k
bank withdraw %1
get all %1
steal gold 2.$k
bid %1000
get all corpse
c icebolt $k
steal %1 $k
rem $hit
wield $stab
bs $k
rem $stab
wield $hit
where $k
stor list
c nox $k
stor list %1
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "nw;")
end
if (stealth==1) then
PSend("sneak nw")
return
end
PSend("nw")
stor put %1
order followers %1
for w in string.gmatch("%1", "%a+") do
PSend("tell "..w.." %2")
end
ent portal
who -level | grep offset
open door
exting lantern
friend add %1
steal gold 3.$k
gather firewood
steal gold 4.$k
steal gold 5.$k
steal gold 6.$k
rem $hit
rem $held
wield $stab
bs %1
rem $stab
hold $held
wield $hit
get coins corpse ground
steal gold 7.$k
remove dagger
wield sword
butcher corpse
rest
give %2000 gold %3
calc %1*1000
stor get %1
drop %1
sac %1
calc %1*1000000
br pot submit i
PSend("c ball lightning $k")
casting="ball lightning $k"
c sum $sum
open door %1
c summon $k
Execute("condition $v")
open gate
if (gs("tts") == true) then
if gs("imove")==true then Execute("tts_stop") end
end
if (map==1) then
AppendToNotepad("map", "sw;")
end
if (stealth==1) then
PSend("sneak sw")
return
end
PSend("sw")
open gates
c faerie fire $k
scan
who fame | grep %1
pray here
remove %1
c flame blade %1
wield %1
c frost $k
flee
c firefield
steal gold 8.$k
Execute("give " .. gold .. " gold %1")
steal gold 9.$k
steal gold $k
give %1 $alt
Send("abort")
sf(tonumber("%1"),sdir.."/sounds/spells/ball lightning.ogg")
PSend("c cone $k")
casting="cone $k"
skills | prefix skl
spells | prefix skl
uabort | prefix skl
PSend("c cry spear")
casting="crystal spear"
gr purpose noshow
PSend("c gre $k")
casting="greater fireball $k"
c heal $2
say yo, heal %1
c heal$3
pick="%1"
PSend("pick %1")
pickpocket %1
time | grep Current
pickpocket $k
pickpocket 10.$k
pickpocket 10.$k
if not amins then amins=0 else amins=amins+1
end
if (gs("showtips")==true) then
if not f then return end
s = f:read ("*l") -- read one line
if s then -- if not end of file (EOF)
require "wait"
wait.make(function()
Sound(sdir.."/sounds/notifications/showtip.ogg")
Note("Tip!")
wait.time(1)
print (s) -- print that line
print("Type config showtips to disable these tips.")
end)
end
end