Upload files to "/"
This commit is contained in:
parent
3a1da4fd76
commit
9498f0333b
1 changed files with 239 additions and 0 deletions
239
bore.af
Normal file
239
bore.af
Normal file
|
|
@ -0,0 +1,239 @@
|
|||
~~ {
|
||||
~~ FOR AUTO-COMPLETION ASSISTANCE: testvar getvar setvar touchvar clearallvars clearvar getcharintprop getchardoubleprop getcharquadprop getcharboolprop getcharstringprop getisspellknown getcancastspell_hunt getcancastspell_buff getcharvital_base getcharvital_current getcharvital_buffedmax getcharskill_traininglevel getcharskill_base getcharskill_buffed getplayerlandcell getplayercoordinates coordinategetns coordinategetwe coordinategetz coordinatetostring coordinateparse coordinatedistancewithz coordinatedistanceflat wobjectgetphysicscoordinates wobjectgetname wobjectgetobjectclass wobjectgettemplatetype wobjectgetisdooropen wobjectfindnearestmonster wobjectfindnearestdoor wobjectfindnearestbyobjectclass wobjectfindininventorybytemplatetype wobjectfindininventorybyname wobjectfindininventorybynamerx wobjectgetselection wobjectgetplayer wobjectfindnearestbynameandobjectclass actiontryselect actiontryuseitem actiontryapplyitem actiontrygiveitem actiontryequipanywand actiontrycastbyid actiontrycastbyidontarget chatbox chatboxpaste statushud statushudcolored uigetcontrol uisetlabel isfalse istrue iif randint cstr strlen getobjectinternaltype cstrf stopwatchcreate stopwatchstart stopwatchstop stopwatchelapsedseconds cnumber floor ceiling round abs getworldname getitemcountininventorybyname getheading getitemcountininventorybynamerx getheadingto actiontrygiveprofile vitae getfellowshipstatus getfellowshipname getfellowshipisopen getfellowshipisleader getfellowshipleaderid getfellowshipcanrecruit getfellowid getfellowshipcount getfellowshiplocked getfellowname getfellowshipisfull sin cos tan sqrt asin acos atan atan2 sinh cosh tanh vtsetmetastate getregexmatch echo chr ord wobjectgetid wobjectgethealth wobjectfindbyid wobjectgetintprop wobjectfindnearestbytemplatetype wobjectgetopencontainer testquestflag getquestktprogress isrefreshingquests getquestktrequired getqueststatus getisday getgamehour getgamehourname getisnight getgameday getgameticks getminutesuntilday getgamemonth getgamemonthname getminutesuntilnight getgameyear uisetvisible uiviewvisible uiviewexists getgvar touchgvar getpvar touchpvar setgvar cleargvar setpvar clearpvar testgvar clearallgvars testpvar clearallpvars dictgetitem dictcreate dicthaskey dictadditem dictkeys dictremovekey dictvalues dictclear dictsize dictcopy listgetitem listpop listcreate listcontains listremove listadd listindexof listremoveat listinsert listlastindexof listclear listcopy listcount listreverse
|
||||
|
||||
~~
|
||||
~~ File auto-generated by metaf, a program created by Eskarina of Morningthaw/Coldeve.
|
||||
~~ Get metaf here: https://github.com/JJEII/metaf/
|
||||
~~
|
||||
~~ All recognized structural designators:
|
||||
~~ STATE: DO:
|
||||
~~ IF: NAV:
|
||||
~~
|
||||
~~ All recognized CONDITION (IF:) operation keywords:
|
||||
~~ Never NavEmpty MobsInDist_Priority Not
|
||||
~~ Always Death NeedToBuff PSecsInStateGE
|
||||
~~ All VendorOpen NoMobsInDist SecsOnSpellGE
|
||||
~~ Any VendorClosed BlockE BuPercentGE
|
||||
~~ ChatMatch ItemCountLE CellE DistToRteGE
|
||||
~~ MainSlotsLE ItemCountGE IntoPortal Expr
|
||||
~~ SecsInStateGE MobsInDist_Name ExitPortal ChatCapture
|
||||
~~
|
||||
~~ All recognized ACTION (DO:) operation keywords:
|
||||
~~ None EmbedNav ChatExpr SetOpt
|
||||
~~ SetState CallState SetWatchdog CreateView
|
||||
~~ Chat Return ClearWatchdog DestroyView
|
||||
~~ DoAll DoExpr GetOpt DestroyAllViews
|
||||
~~
|
||||
~~ All recognized NAV types:
|
||||
~~ circular follow
|
||||
~~ linear once
|
||||
~~
|
||||
~~ All recognized NAV NODE types:
|
||||
~~ flw vnd
|
||||
~~ pnt ptl
|
||||
~~ rcl tlk
|
||||
~~ pau chk
|
||||
~~ cht jmp
|
||||
~~ prt (deprecated in VTank)
|
||||
~~ }
|
||||
|
||||
~~ /ub mexec setvar[navNumber,VILKETNUMMER]
|
||||
STATE: {combat} ~~ {
|
||||
IF: Always
|
||||
DO: Chat {/vt opt set enablecombat true}
|
||||
IF: SecsInStateGE 60
|
||||
DO: SetState {ring_fail}
|
||||
IF: NoMobsInDist 5
|
||||
DO: SetState {hunt}
|
||||
IF: All
|
||||
Expr {setvar[portal, wobjectfindnearestbyobjectclass[14]]}
|
||||
Expr {coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[getvar[portal]]] <= 8}
|
||||
Not Expr {wobjectgetname[wobjectfindnearestbyobjectclass[14]]==Singularity Caul}
|
||||
Not Expr {wobjectgetname[wobjectfindnearestbyobjectclass[14]]#Destroyed.*}
|
||||
Expr {wobjectisvalid[getvar[portal]]}
|
||||
Expr {setvar[portalHeading, getheadingto[getvar[portal]]]}
|
||||
Expr {setvar[playerHeading, getheading[wobjectgetplayer[]]]}
|
||||
Expr {setvar[relativeAngle, abs[getvar[portalHeading] - getvar[playerHeading]]]}
|
||||
Expr {setvar[relativeAngle, iif[getvar[relativeAngle] > 180, 360 - getvar[relativeAngle], getvar[relativeAngle]]]}
|
||||
Expr {setvar[turnDirection, iif[randint[0,2] == 0, -90, 90]]}
|
||||
Expr {getvar[relativeAngle] <= 11.25}
|
||||
Expr {setvar[newHeading, abs[getvar[playerHeading] + getvar[turnDirection]]]}
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablenav false}
|
||||
Chat {/vt opt set enablecombat false}
|
||||
SetState {avoid_portal}
|
||||
IF: All
|
||||
ChatCapture {^(?<name>['A-Za-z ]+) (?<text>has discovered the .*!)$} {}
|
||||
Expr {$capturegroup_name==getcharstringprop[1]}
|
||||
DO: DoAll
|
||||
ChatExpr {\/a +getvar[capturegroup_text]}
|
||||
~~ }
|
||||
STATE: {death} ~~ {
|
||||
IF: Always
|
||||
DO: Chat {/vt nav load death_pause}
|
||||
IF: Always
|
||||
DO: Chat {/vt opt set enablenav true}
|
||||
IF: NavEmpty
|
||||
DO: SetState {navbore}
|
||||
~~ }
|
||||
STATE: {hunt} ~~ {
|
||||
IF: Always
|
||||
DO: Chat {/vt opt set enablecombat false}
|
||||
IF: Always
|
||||
DO: Chat {/vt opt set enablelooting true}
|
||||
IF: Death
|
||||
DO: DoAll
|
||||
Chat {/a I died! But I will comeback!}
|
||||
SetState {death}
|
||||
IF: All
|
||||
ItemCountLE 100 {Prismatic Taper}
|
||||
NoMobsInDist 5
|
||||
DO: DoAll
|
||||
Chat {/fellowship Out of tapers! Recomping.}
|
||||
SetState {recomp}
|
||||
IF: Always
|
||||
DO: SetWatchdog 3 120 {stuck}
|
||||
IF: Always
|
||||
DO: SetWatchdog 3 600 {really_stuck}
|
||||
IF: DistToRteGE 1000
|
||||
DO: SetState {really_stuck}
|
||||
IF: All
|
||||
Expr {coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[wobjectfindnearestbyobjectclass[14]]]<=4}
|
||||
Not Expr {wobjectgetname[wobjectfindnearestbyobjectclass[14]]==Singularity Caul}
|
||||
DO: DoAll
|
||||
ChatExpr {\/me is to close to +wobjectgetname[wobjectfindnearestbyobjectclass[14]]}
|
||||
ChatExpr {\/me at +coordinatetostring[getplayercoordinates[]]}
|
||||
IF: MobsInDist_Name 2 6 {}
|
||||
DO: SetState {combat}
|
||||
IF: All
|
||||
Expr {stopwatchelapsedseconds[getvar[lootclock]]>21600}
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablecombat true}
|
||||
Chat {/vt opt set lootonlyrarecorpses false}
|
||||
Chat {/vt opt set lootpriorityboost false}
|
||||
SetState {loot}
|
||||
|
||||
~~ }
|
||||
STATE: {Default} ~~ {
|
||||
IF: All
|
||||
DO: DoAll
|
||||
ChatExpr {\/vt nav load bore_circuit+getvar[navNumber]}
|
||||
Chat {/ub opt set VTank.PatchExpressionEngine true}
|
||||
Chat {/vt opt set enablenav true}
|
||||
Chat {/vt opt set buffprofile_prots 2}
|
||||
Chat {/vt opt set buffprofile_banes 5}
|
||||
Chat {/vt opt set enablelooting true}
|
||||
Chat {/vt opt set navpriorityboost false}
|
||||
Chat {/vt opt set lootonlyrarecorpses true}
|
||||
DoExpr {setvar[lootclock,stopwatchcreate[]]}
|
||||
DoExpr {stopwatchstart[getvar[lootclock]]}
|
||||
SetState {hunt}
|
||||
~~ }
|
||||
STATE: {avoid_portal} ~~ {
|
||||
IF: SecsInStateGE 1
|
||||
DO: ChatExpr {\/me portalHeading \= +getvar[portalHeading]}
|
||||
IF: SecsInStateGE 2
|
||||
DO: ChatExpr {\/me playerHeading \= +getvar[playerHeading]}
|
||||
IF: SecsInStateGE 3
|
||||
DO: ChatExpr {\/me relativeAngle \= +getvar[relativeAngle]}
|
||||
IF: SecsInStateGE 4
|
||||
DO: ChatExpr {\/me Portal detected ahead\! Avoiding now\!}
|
||||
IF: SecsInStateGE 5
|
||||
DO: ChatExpr {\/me is too close to +wobjectgetname[wobjectfindnearestbyobjectclass[14]]}
|
||||
IF: SecsInStateGE 6
|
||||
DO: ChatExpr {\/me at +coordinatetostring[getplayercoordinates[]]}
|
||||
IF: SecsInStateGE 7
|
||||
DO: ChatExpr {\/ub face +getvar[newHeading]}
|
||||
IF: SecsInStateGE 9
|
||||
DO: ChatExpr {\/ub setmotion forward 1}
|
||||
IF: SecsInStateGE 11
|
||||
DO: ChatExpr {\/ub setmotion forward 0}
|
||||
IF: SecsInStateGE 12
|
||||
DO: ChatExpr {\/ub face +getvar[playerHeading]}
|
||||
IF: SecsInStateGE 14
|
||||
DO: ChatExpr {\/ub setmotion forward 1}
|
||||
IF: SecsInStateGE 16
|
||||
DO: ChatExpr {\/ub setmotion forward 0}
|
||||
IF: SecsInStateGE 17
|
||||
DO: ChatExpr {\/vt opt set enablenav true}
|
||||
IF: SecsInStateGE 18
|
||||
DO: ChatExpr {\/vt setmetastate hunt}
|
||||
~~ }
|
||||
STATE: {navbore} ~~ {
|
||||
IF: Always
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablecombat false}
|
||||
IF: Always
|
||||
DO: ChatExpr {\/vt nav load bore_route+getvar[navNumber]}
|
||||
IF: Always
|
||||
DO: Chat {/vt opt set enablebuffing true}
|
||||
IF: Always
|
||||
DO: SetWatchdog 3 300 {navbore}
|
||||
IF: NavEmpty
|
||||
DO: DoAll
|
||||
ChatExpr {\/vt nav load bore_circuit+getvar[navNumber]}
|
||||
SetState {hunt}
|
||||
~~ }
|
||||
STATE: {really_stuck} ~~ {
|
||||
IF: Always
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablecombat false}
|
||||
SetState {navbore}
|
||||
Chat {/a Help me Jeebus, i'm in whirlwind of vortexes}
|
||||
~~ }
|
||||
STATE: {recomp} ~~ {
|
||||
IF: NavEmpty
|
||||
DO: SetState {navbore}
|
||||
IF: Always
|
||||
DO: SetWatchdog 3 300 {navbore}
|
||||
IF: Always
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablecombat false}
|
||||
Chat {/vt opt set enablebuffing false}
|
||||
Chat {/vt nav load ah_recomp}
|
||||
~~ }
|
||||
STATE: {ring_fail} ~~ {
|
||||
IF: Always
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablecombat false}
|
||||
SetWatchdog 100 3 {hunt}
|
||||
~~ }
|
||||
STATE: {stuck} ~~ {
|
||||
IF: Always
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablenav false}
|
||||
Chat {/vt reverseroute}
|
||||
ChatExpr {\/vt nav load bore_circuit+getvar[navNumber]}
|
||||
Chat {/vt opt set enablenav true}
|
||||
SetState {hunt}
|
||||
~~ }
|
||||
STATE: {loot} ~~ {
|
||||
IF: SecsInStateGE 300
|
||||
DO: DoAll
|
||||
Chat {/vt opt set lootonlyrarecorpses true}
|
||||
Chat {/vt opt set lootpriorityboost true}
|
||||
DoExpr {setvar[lootclock,stopwatchcreate[]]}
|
||||
DoExpr {stopwatchstart[getvar[lootclock]]}
|
||||
SetState {hunt}
|
||||
IF: All
|
||||
Expr {setvar[portal, wobjectfindnearestbyobjectclass[14]]}
|
||||
Expr {coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[getvar[portal]]] <= 8}
|
||||
Not Expr {wobjectgetname[wobjectfindnearestbyobjectclass[14]]==Singularity Caul}
|
||||
Not Expr {wobjectgetname[wobjectfindnearestbyobjectclass[14]]#Destroyed.*}
|
||||
Expr {wobjectisvalid[getvar[portal]]}
|
||||
Expr {setvar[portalHeading, getheadingto[getvar[portal]]]}
|
||||
Expr {setvar[playerHeading, getheading[wobjectgetplayer[]]]}
|
||||
Expr {setvar[relativeAngle, abs[getvar[portalHeading] - getvar[playerHeading]]]}
|
||||
Expr {setvar[relativeAngle, iif[getvar[relativeAngle] > 180, 360 - getvar[relativeAngle], getvar[relativeAngle]]]}
|
||||
Expr {setvar[turnDirection, iif[randint[0,2] == 0, -90, 90]]}
|
||||
Expr {getvar[relativeAngle] <= 11.25}
|
||||
Expr {setvar[newHeading, abs[getvar[playerHeading] + getvar[turnDirection]]]}
|
||||
DO: DoAll
|
||||
Chat {/vt opt set enablenav false}
|
||||
Chat {/vt opt set lootonlyrarecorpses true}
|
||||
Chat {/vt opt set lootpriorityboost true}
|
||||
Chat {/vt opt set enablelooting false}
|
||||
DoExpr {setvar[lootclock,stopwatchcreate[]]}
|
||||
DoExpr {stopwatchstart[getvar[lootclock]]}
|
||||
SetState {avoid_portal}
|
||||
~~ }
|
||||
Loading…
Add table
Add a link
Reference in a new issue