By a private inquiry, I decided to cut this sub off from my main scripts and publish it as a stand alone script. It still uses the same sub with just a simple mainloop, so integrating this into your other scripts is very easy as well. The script has all the comments and as this is a very simple cut off, I'm not giving any more instructions for setup.
Code: Select all
; Shindaril's mainloop cut #1
; No version info available for this one
;
; Backpack and bag opener sub from one of my main scripts
; with a very simple mainloop. That 1s delay shouldn't matter
; but can be easily adjusted.
; This script should be very straight forward, so I won't be
; Adding any better instructions how to set it up for you
; Remember the EasyUO's info area on the right, in the
; Container Info, you can easily find the coordinates of
; the currently active gump to set up the sub
set %CurrentFacet #CursKind ; Save current facet
set %LBoH BGLWNPD ; I have three containers...
set %BPouch1 MHAWWTD ; which I wish to keep allways open...
set %SBoK WFXMOMD ; along with my backpack, so IDs here
gosub OpenContainers ; Call the sub at the start to open them all
while #True
{
if #CursKind <> %CurrentFacet ; Check if the player has changed facets
{
gosub OpenContainers ; Open them again
set %CurrentFacet #CursKind ; Save current facet
}
wait 1s
}
sub OpenContainers
wait 15
set %LastObject #lObjectID ; Let's save the #lObjectID
set #NextCPosX 738 ; You have to change all these coordinates
set #NextCPosY 610 ; to match your preferances on the locations
event macro 8 7 ; Open backpack
wait 15
set #NextCPosX 563
set #NextCPosY 610
set #LObjectID %LBoH
event macro 17 0
wait 15
set #NextCPosX 389 ; You can add or remove containers
set #NextCPosY 610 ; by adding or removing sections here
set #LObjectID %BPouch1
event macro 17 0
wait 15
set #NextCPosX 245
set #NextCPosY 610
set #LObjectID %SBoK
event macro 17 0
wait 15
set #nextCPosX 656
set #nextCPosY 388
set #lObjectId %LastObject ; So we can restore it in the end
return