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 thwack1.ogg") Sound(GetInfo(67).."/sounds/notifications/exp thwack2.ogg") Execute("ggc") gclear() 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