Home » Archimedes archive » Acorn User » AU 1997-07 A.adf » Extras » BootPlus/!Bootplus/!Runimage
BootPlus/!Bootplus/!Runimage
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Archimedes archive » Acorn User » AU 1997-07 A.adf » Extras |
Filename: | BootPlus/!Bootplus/!Runimage |
Read OK: | ✔ |
File size: | C71A bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
10REM><Bootplus$dir>.!Runimage 500DIMTlms%16 510DIMTloi%24 520DIMBuf1%128 530DIMBuf2%512 540DIMBlck%512 550DIMOdat$(50,5) 560DIMOflg%(50,5) 640DIMOptr%(50) 650DIMRusr$(20) 660DIMRdir$(20) 670DIMRtim$(20) 680DIMBoot_Type$(20,3) 690DIMStandard$(20,2) 700DIMWeekdays$(7) 710DIMDirdat$(50) 720DIMDirflg%(50) 730DIMSublist%(3,6) 830DIMTdir$(100,1) 840DIMTypt%(100) 850DIMTnpt%(100) 860DIMTflg%(100,1) 870MP%=20 880PROCtoolbox_values 890PROCinitialise 900Quit%=FALSE 910ONERRORVDU4:PRINTREPORT$;" at line ";ERL:END 920REPEAT 930IF(Sequence$="LOGON")OR(Sequence$="PROMPTING")THEN 940SYS"Wimp_PollIdle",0,Blck%,25TOreason% 950ELSE 960SYS"Wimp_Poll",1,Blck%TOreason% 970ENDIF 980PROCdo 990UNTILQuit% 1000SYS"Wimp_CloseDown",Thdl%,&48534154 1010END 1080DEFPROCtoolbox_values 1160E_ABS%=&82881 1170E_TOAC%=&44ec1 1180E_WATBS%=&82880 1190E_WHBH%=&82890 1200E_WFVC%=&82885 1210E_DDE%=&82888 1220E_MSM%=&828C2 1230E_MATBS%=&828c0 1240E_MHBH%=&828c1 1250E_MS%=&828c3 1260E_SSVC%=&8288E 1270E_SSATBS%=&8288f 1280E_PUATBS%=&8288b 1290E_NRVC%=&8288d 1330E_UQA%=1 1370M_D_SS%=644 1380M_D_SSP%=640 1390M_D_ST%=642 1400M_RB_GS%=389 1440T_TOMO%=&44ec6 1450T_TSO%=&44ec3 1460T_TTLU%=&44EFB 1470T_THO%=&44ec4 1510XBIT%=&20000 1520ENDPROC 1590DEFPROCinitialise 1630LOCALexists%,a% 1650PROCinit_globals 1690a%=0 1700b%=10 1710Zzzzpass_Status%=0 1720Zzzzchk_Status%=0 1730Zzzzpass_Informed%=FALSE 1740REPEAT 1750SYS"TaskManager_EnumerateTasks",a%,Buf1%,16TOa% 1760IFFNindirect(Buf1%!4)="zzzzpass"THEN 1770Zzzzpass_Status%=3 1780Zzzzpass_Handle%=Buf1%!0 1790ENDIF 1800IFFNindirect(Buf1%!4)="zzzzchk"THEN 1810Zzzzchk_Status%=3 1820Zzzzchk_Handle%=Buf1%!0 1830ENDIF 1840UNTILa%<0 1880PROCinit_files 1920Buf1%!0=0 1930Buf2%!0=0 1940SYS"Toolbox_Initialise",0,310,Buf2%,Buf1%,"<Bootplus$Dir>",Tlms%,Tloi%TO,Thdl%,sprt% 1980IFAuto_Prompt%AND Passwords_Enabled%THEN 1990Sequence$="LOGON" 2000ELSE 2010Sequence$="NORMAL" 2020ENDIF 2060Owner$=FNget_message("OWN","","","","") 2100PROCread_filedefs 2110ENDPROC 2180DEFPROCinit_globals 2220LOCALa$,a%,b% 2240Bootplus_Version$="3.1" 2250Started%=FALSE 2260Logged_User$="" 2270Logon_ID%=-1 2280Ownerpass_ID%=-1 2290Objs%=0 2300Ntrs%=0 2310Rusers%=0 2320Rusr%=1 2330Password_ID%=0 2340Passmenu_ID%=0 2350Optfile$="<bootplus$dir>.Resources.Options" 2360T_Optfile$="<bootplus$dir>.Resources.Optxxx" 2370Accessfile$="<bootplus$dir>.Resources.Access" 2380T_Accessfile$="<bootplus$dir>.Resources.Accessxxx" 2390Timesfile$="<bootplus$dir>.Resources.Times" 2400T_Timesfile$="<bootplus$dir>.Resources.Timesxxx" 2410Passfile$="<bootplus$dir>.Resources.password" 2420Thieffile$="<Bootplus$Dir>.Resources.killriscpc" 2430Logfile$="<Bootplus$dir>.Resources.logfile" 2440Ologfile$="<Bootplus$dir>.Resources.oldlogfile" 2450Ownerfile$="<Bootplus$dir>.Resources.owner" 2460Autoclose%=FALSE 2470Edit_Type$="" 2480Alias_WH%=0 2490Font_Lh%=44 2500Font_Name$="Homerton.Medium" 2510Editors%=0 2520Tdirs%=0 2530Tydir%=0 2540Tndir%=0 2550Dustbin_ID%=0 2560Drag_Reason$="" 2570Drag_Object%=0 2580Drag_Into%=0 2590Saved%=TRUE 2600Sequence$="BOOT" 2610ENDPROC 2680DEFPROCread_filedefs 2720READBoot_Types% 2730FORa%=1TOBoot_Types% 2740READBoot_Type$(a%,1) 2750READBoot_Type$(a%,2) 2760READa$ 2770Boot_Type$(a%,3)=FNget_message(a$,"","","","") 2780NEXTa% 2820READStandards% 2830FORa%=1TOStandards% 2840FORb%=1TO2 2850READStandard$(a%,b%) 2860NEXTb% 2870NEXTa% 2890FORa%=1TO7 2900READWeekdays$(a%) 2910NEXTa% 2920ENDPROC 2990DEFPROCinit_files 3030LOCALf%,id% 3070PROCget_options(a%,a%,a%,a%,a%,a%,Guest_Logins%,Y%,Full_Owner_Access%,Y%,Passwords_Enabled%,Auto_Prompt%) 3110PROCget_useraccess 3150PROCget_usertimes 3190SYS"OS_File",20,"<Wimp$ScrapDir>.Bootplus"TOf% 3200IFf%=0THEN 3210*CDIR <Wimp$ScrapDir>.Bootplus 3220ENDIF 3230SYS"XOS_FSControl",27,"<Wimp$ScrapDir>.Bootplus.*",,&18 3240ENDPROC 3310DEFPROCdo 3361CASEreason%OF 3370WHEN0 3380CASESequence$OF 3390WHEN"LOGON" 3430SYST_TSO%,0,Password_ID%,0,0,Passmenu_ID%,7 3440Sequence$="PROMPTING" 3450WHEN"PROMPTING" 3490PROClock_mouse(TRUE) 3500ENDCASE 3510WHEN1 3520PROCredraw_window 3530WHEN2 3540PROCopen_window 3550WHEN6 3560PROCmouse_click 3570WHEN7 3580PROCdrag_stopped 3590WHEN10 3600PROCscroll_request 3610WHEN17,18,19 3620PROCwimp_messages 3630WHEN&200 3640PROCtoolbox_events 3650ENDCASE 3660ENDPROC 3730DEFPROCredraw_window 3770CASEBlck%!0OF 3780WHENSublist%(1,2) 3820PROCdraw_main(1,2) 3830WHENSublist%(1,1) 3870PROCdraw_sub(1,2,FALSE,0) 3880WHENSublist%(2,2) 3920PROCdraw_main(2,2) 3930WHENSublist%(2,1) 3970PROCdraw_sub(2,2,FALSE,0) 3980WHENSublist%(3,1) 4020PROCdraw_sub(3,2,FALSE,0) 4030ENDCASE 4040ENDPROC 4110DEFPROCopen_window 4150LOCALbh% 4170bh%=Blck%!28 4180CASEBlck%!0OF 4190WHENSublist%(1,2) 4230Blck%!28=Sublist%(1,1) 4240SYS"Wimp_OpenWindow",,Blck% 4250PROCdraw_sub(1,3,FALSE,bh%) 4260WHENSublist%(1,1) 4300SYS"Wimp_OpenWindow",,Blck% 4310WHENSublist%(2,2) 4350Blck%!28=Sublist%(2,1) 4360SYS"Wimp_OpenWindow",,Blck% 4370PROCdraw_sub(2,3,FALSE,bh%) 4380PROCdraw_sub(3,3,FALSE,bh%) 4390WHENSublist%(2,1) 4430SYS"Wimp_OpenWindow",,Blck% 4440WHENSublist%(3,1) 4480SYS"Wimp_OpenWindow",,Blck% 4490ENDCASE 4500ENDPROC 4570DEFPROCmouse_click 4610LOCALwk_my%,os_wy%,tr%,p% 4630CASETRUEOF 4640WHEN(Blck%!8=4)AND(Blck%!12=Sublist%(1,1)) 4680PROCbootlist_clicked 4690WHEN(Blck%!8=4)AND(Blck%!12=Sublist%(2,1)) 4730PROCdirlist_clicked("Y",Sublist%(2,1),Tydirs%,Typt%(),Sublist%(3,1)) 4740WHEN(Blck%!8=4)AND(Blck%!12=Sublist%(3,1)) 4780PROCdirlist_clicked("N",Sublist%(3,1),Tndirs%,Tnpt%(),Sublist%(2,1)) 4790ENDCASE 4800ENDPROC 4870DEFPROCbootlist_clicked 4910LOCALos_mx%,os_my%,wk_my%,tr%,ot$ 4930os_mx%=Blck%!0 4940os_my%=Blck%!4 4980Blck%!0=Sublist%(1,1) 4990SYS"Wimp_GetWindowState",,Blck% 5000wk_my%=os_my%-(Blck%!16-Blck%!24) 5010tr%=INT(-wk_my%/Font_Lh%)+1 5020IFtr%<=Objs%THEN 5060p%=Optr%(tr%) 5070IF(Oflg%(p%,5)AND 64)=0THEN 5110CASEOdat$(p%,3)OF 5120WHEN"1000" 5130ot$=FNget_message("DM1","","","","") 5140WHEN"2000" 5150ot$=FNget_message("DM2","","","","") 5160OTHERWISE 5170ot$=FNget_message("DM3",Odat$(p%,3),"","","") 5180ENDCASE 5190Buf2%!0=os_mx%-16:Buf2%!4=os_my%-16 5200Buf2%!8=os_mx%+18:Buf2%!12=os_my%+18 5210SYS"DragASprite_Start",&5,1,ot$,Buf2% 5220Drag_Reason$="Delete" 5230Drag_Object%=tr% 5240ELSE 5280IFOdat$(p%,1)="!Bootplus"OROdat$(p%,1)="!zzzzpass"THEN 5290PROCerror_message("EM1","","","",0,K%) 5300ELSE 5310PROCerror_message("EM2","","","",0,K%) 5320ENDIF 5330ENDIF 5340ENDIF 5350ENDPROC 5420DEFPROCdirlist_clicked(fr$,fid%,frct%,frpt%(),tid%) 5460LOCALos_mx%,os_my%,wk_my%,tr%,p% 5480os_mx%=Blck%!0 5490os_my%=Blck%!4 5530Blck%!0=fid% 5540SYS"Wimp_GetWindowState",,Blck% 5550wk_my%=os_my%-(Blck%!16-Blck%!24) 5560Drag_Object%=INT(-wk_my%/Font_Lh%)+1 5570IFDrag_Object%<=frct%THEN 5610p%=frpt%(Drag_Object%) 5620IF((Tflg%(p%,1)AND&40)=&40)AND(Rusr$(Rusr%)<>Owner$)THEN 5660PROCerror_message("EM3","","","",0,K%) 5670ELSE 5710Drag_Reason$="Move" 5720Drag_From$=fr$ 5730Drag_Into%=tid% 5740Buf2%!0=os_mx%-16:Buf2%!4=os_my%-16 5750Buf2%!8=os_mx%+18:Buf2%!12=os_my%+18 5760SYS"DragASprite_Start",&5,1,"directory",Buf2% 5770ENDIF 5780ENDIF 5790ENDPROC 5860DEFPROCdrag_stopped 5900SYS"Wimp_GetPointerInfo",,Blck% 5910CASETRUEOF 5920WHEN(Blck%!16=Dustbin_ID%)AND(Drag_Reason$="Delete") 5960PROCdrag_stopped_bin 5970WHEN(Blck%!12=Drag_Into%)AND(Drag_Reason$="Move") 6010IFDrag_From$="Y"THEN 6050PROCdrag_stopped_dir(Tydirs%,Typt%(),Tndirs%,Tnpt%()) 6060ELSE 6100PROCdrag_stopped_dir(Tndirs%,Tnpt%(),Tydirs%,Typt%()) 6110ENDIF 6120Saved%=FALSE 6160PROCset_list_extent(2,TRUE) 6170PROCdraw_sub(2,2,FALSE,0) 6180PROCset_list_extent(3,TRUE) 6190PROCdraw_sub(3,2,FALSE,0) 6200ENDCASE 6210SYS"DragASprite_Stop" 6220Drag_Reason$="" 6230ENDPROC 6300DEFPROCdrag_stopped_bin 6340LOCALp% 6360p%=Optr%(Drag_Object%) 6370Oflg%(p%,5)=16 6380FORp%=Drag_Object%TOObjs% 6390Optr%(p%)=Optr%(p%+1) 6400NEXTp% 6410Objs%-=1 6420Saved%=FALSE 6460PROCset_list_extent(1,TRUE) 6470PROCdraw_sub(1,2,FALSE,0) 6480ENDPROC 6550DEFPROCdrag_stopped_dir(RETURNfrc%,RETURNfrp%(),RETURNtoc%,RETURNtop%()) 6590LOCALp%,a% 6610p%=frp%(Drag_Object%) 6620toc%+=1 6630a%=toc% 6640WHILE(top%(a%-1)>p%)AND(a%>1) 6650top%(a%)=top%(a%-1) 6660a%-=1 6670ENDWHILE 6680top%(a%)=p% 6720frc%-=1 6730IFDrag_Object%<=frc%THEN 6740FORa%=Drag_Object%TOfrc% 6750frp%(a%)=frp%(a%+1) 6760NEXTa% 6770ENDIF 6780frp%(frc%+1)=0 6790ENDPROC 6860DEFPROCscroll_request 6900LOCALr%,bh% 6920bh%=Blck%!28 6930CASEBlck%!0OF 6940WHENSublist%(1,1) 6990r%=INT((Blck%!16-Blck%!8)/Font_Lh%)-1 7000CASEBlck%!36OF 7010WHEN-2 7020Blck%!24-=Font_Lh%*r% 7030WHEN-1 7040Blck%!24-=Font_Lh% 7050WHEN1 7060Blck%!24+=Font_Lh% 7070WHEN2 7080Blck%!24+=Font_Lh%*r% 7090ENDCASE 7100SYS"Wimp_OpenWindow",,Blck% 7110WHENSublist%(2,1) 7150WHENSublist%(2,2) 7190CASEBlck%!36OF 7200WHEN-2 7210Blck%!24-=128 7220WHEN-1 7230Blck%!24-=16 7240WHEN1 7250Blck%!24+=16 7260WHEN2 7270Blck%!24+=128 7280ENDCASE 7290SYS"Wimp_OpenWindow",,Blck% 7300PROCdraw_sub(2,3,FALSE,bh%) 7310PROCdraw_sub(3,3,FALSE,bh%) 7320ENDCASE 7330ENDPROC 7400DEFPROCtoolbox_events 7440Event_Size%=Blck%!0 7450Event_Reference%=Blck%!4 7460Event_Code%=Blck%!8 7470Event_Flags%=Blck%!12 7480Event_Block%=Blck%!20 7520PROCcallers(0,Ancestor_ID%,Ancestor_Name$,Ancestor_Component%) 7530PROCcallers(8,Parent_ID%,Parent_Name$,Parent_Component%) 7540PROCcallers(16,Self_ID%,Self_Name$,Self_Component%) 7590CASESelf_Name$OF 7600WHEN"Alias" 7610PROChandle_alias 7620WHEN"Automenu" 7630PROChandle_automenu 7640WHEN"Ibarmenu" 7650PROChandle_ibarmenu 7660WHEN"Iconbar" 7670PROChandle_iconbar 7680WHEN"Mainlist" 7690PROChandle_mainlist 7700WHEN"Maintenance" 7710PROChandle_maintenance 7720WHEN"Options" 7730PROChandle_options 7740WHEN"Nodir" 7750PROChandle_nodir 7760WHEN"Passmenu" 7770PROChandle_passmenu 7780WHEN"Password" 7790PROChandle_password 7800WHEN"Sublist" 7810PROChandle_sublist 7820WHEN"Thieftrap" 7830PROChandle_thieftrap 7840WHEN"Useraccess" 7850PROChandle_useraccess 7860WHEN"Yesdir" 7870PROChandle_yesdir 7880WHEN"Wmi" 7890PROChandle_wmi 7900ENDCASE 7910ENDPROC 7980DEFPROCwimp_messages 8020LOCALstate%,a%,al%,dur%,b% 8040CASEBlck%!16OF 8050WHEN0 8060Quit%=TRUE 8070WHEN1 8120Source$=FNindirect(Blck%+44) 8130IF(Blck%!20=Sublist%(1,1))AND(Source$="Pinboard")AND(Edit_Type$="autorun")THEN 8180Blck%!12=Blck%!8 8190Blck%!16=2 8200Blck%!36=128 8210$(Blck%+44)="<Wimp$ScrapDir>.Bootplus.Pinboard" 8220SYS"Wimp_SendMessage",17,Blck%,Blck%!4 8230ENDIF 8240WHEN2 8280path$=FNindirect(Blck%+44) 8290IFApplication$="!Thieftrap"THEN 8330PROCmake_thieftrap(path$) 8340ELSE 8380PROCmake_alias(path$) 8390ENDIF 8400WHEN3 8440Source$=FNindirect(Blck%+44) 8450CASEBlck%!20OF 8460WHENAlias_WH% 8470PROCdragged_to_alias 8480WHENSublist%(1,1) 8490PROCdragged_to_edit 8500ENDCASE 8510WHEN&400C2 8550CASEFNindirect(Blck%+28)OF 8560WHEN"zzzzpass" 8570IFPasswords_Enabled%THEN 8610Zzzzpass_Status%=3 8620Zzzzpass_Handle%=Blck%!4 8630IFLogged_User$<>""THEN 8670PROCuser_times(Logged_User$,al%,dur%,a%,b%) 8680PROCinform_zzzzpass(dur%) 8690ENDIF 8700ELSE 8750PROCpause_logins 8760PROCremove_logins 8770ENDIF 8780WHEN"zzzzchk" 8790Zzzzchk_Status%=3 8800Zzzzchk_Handle%=Blck%!4 8810ENDCASE 8820WHEN&400c4 8840Started%=TRUE 8850WHEN&808c0 8890IFBlck%!4=Zzzzpass_Handle%THEN 8930SYS"Wimp_TransferBlock",Zzzzpass_Handle%,Blck%!24,Thdl%,Buf1%,Blck%!20 8940CASE!Buf1%OF 8950WHEN1 8990PROClogin_user($(Buf1%+4),FALSE) 9000Blck%!0=32:Blck%!12=Blck%!8:Blck%!16=&808c0 9010Blck%!20=4:Blck%!24=Buf2% 9020!Buf2%=2 9030SYS"Wimp_SendMessage",17,Blck%,Zzzzpass_Handle% 9040IFSequence$="LOGON"THEN 9080Sequence$="NORMAL" 9090ENDIF 9100WHEN2 9150Quit%=Autoclose% 9160WHEN4 9200Logged_User$="" 9210ENDCASE 9220ENDIF 9230ENDCASE 9240ENDPROC 9310DEFPROCdragged_to_alias 9350IFBlck%!40<>&2000THEN 9390PROCerror_message("EM4",Source$,STR$~(Blck%!40),"",0,K%) 9400ELSE 9440a%=LEN(Source$)-1 9450REPEAT:a%-=1:UNTILMID$(Source$,a%,1)="." 9460Application$=MID$(Source$,a%+1) 9470SYST_TOMO%,0,Alias_ID%,M_D_SSP%,0,Application$ 9480SYST_TOMO%,0,Alias_ID%,M_D_ST%,0,Application$ 9500ENDIF 9510ENDPROC 9580DEFPROCdragged_to_edit 9620LOCALa%,p%,a$,b$,c$,leaf$,duplicate% 9640CASETRUEOF 9650WHEN(Blck%!40<>&2000)AND(Edit_Type$="boot") 9660PROCerror_message("EM5",Source$,"","",0,K%) 9670WHEN(Blck%!40<>&2000)AND(Edit_Type$="resources") 9680PROCerror_message("EM6",Source$,"","",0,K%) 9690OTHERWISE 9730a%=LEN(Source$)-1 9740REPEAT:a%-=1:UNTILMID$(Source$,a%,1)="." 9750leaf$=MID$(Source$,a%+1) 9760duplicate%=FALSE 9770FORa%=1TOObjs% 9780IFleaf$=Odat$(Optr%(a%),1)THEN 9790duplicate%=TRUE 9800p%=a% 9810ENDIF 9820NEXTa% 9830IFduplicate%THEN 9870IFleaf$="Pinboard"THEN 9910Odat$(p%,5)="<Wimp$ScrapDir>.Bootplus.Pinboard" 9920FORa%=1TO4 9930Oflg%(p%,a%)=(Oflg%(p%,a%)AND&FFFFFFF0)OR13 9940NEXTa% 9950Oflg%(p%,5)=32 9960Saved%=FALSE 9970ELSE 10010PROCerror_message("EM7",leaf$,"","",0,K%) 10020ENDIF 10030ELSE 10070Saved%=FALSE 10080Ontr%+=1 10090Objs%+=1 10100Optr%(Objs%)=Ontr% 10110Odat$(Ontr%,1)=leaf$ 10120CASEBlck%!40OF 10130WHEN&2000 10170CASEEdit_Type$OF 10180WHEN"autorun" 10190Odat$(Ontr%,2)=FNget_message("DM4","","","","") 10200WHEN"boot" 10210Odat$(Ontr%,2)=FNget_message("DM5","","","","") 10220WHEN"resources" 10230Odat$(Ontr%,2)=FNget_message("DM5","","","","") 10240WHEN"predesk" 10250Odat$(Ontr%,2)=FNget_message("DM6","","","","") 10260ENDCASE 10270Odat$(Ontr%,3)="2000" 10280WHEN&1000 10320Odat$(Ontr%,2)=FNget_message("DM1","","","","") 10330Odat$(Ontr%,3)="1000" 10340OTHERWISE 10350SYS"OS_ConvertHex4",Blck%!40,Buf2%,128TO,p% 10360?p%=13 10370IFBuf2%?0=48THEN 10380Odat$(Ontr%,3)=RIGHT$($Buf2%,3) 10390ELSE 10400Odat$(Ontr%,3)=$Buf2% 10410ENDIF 10420SYS"XOS_ReadVarVal","File$Type_"+Odat$(Ontr%,3),Buf1%,128,0,3TO,,l% 10430IFl%=0THEN 10470Odat$(Ontr%,2)="&"+Odat$(Ontr%,3) 10480ELSE 10520Buf1%?l%=13 10530Odat$(Ontr%,2)=$Buf1% 10540ENDIF 10550ENDCASE 10590Odat$(Ontr%,4)="" 10600c%=0 10610REPEAT 10620c%+=1 10630IF(Boot_Type$(c%,1)=Edit_Type$)AND((Boot_Type$(c%,2)=Odat$(Ontr%,3))OR(Boot_Type$(c%,2)="*"))THEN 10640Odat$(Ontr%,4)=Boot_Type$(c%,3) 10650ENDIF 10660UNTIL(c%=Boot_Types%)OR(Odat$(Ontr%,4)<>"") 10700IFSource$="Pinboard"THEN 10740Odat$(Ontr%,5)="<Wimp$ScrapDir>.Bootplus.Pinboard" 10750ELSE 10760Odat$(Ontr%,5)=Source$ 10770ENDIF 10780Oflg%(Ontr%,1)=(24<<16)OR&100OR13 10790Oflg%(Ontr%,2)=(200<<16)OR&100OR13 10800Oflg%(Ontr%,3)=8 10810CASEEdit_Type$OF 10820WHEN"boot" 10830Oflg%(Ontr%,4)=(512<<16)OR&100OR13 10840WHEN"resources" 10850Oflg%(Ontr%,4)=(512<<16)OR&100OR13 10860WHEN"autorun" 10870Oflg%(Ontr%,4)=(480<<16)OR&100OR13 10880WHEN"predesk" 10890Oflg%(Ontr%,4)=(400<<16)OR&100OR13 10900ENDCASE 10910Oflg%(Ontr%,5)=32 10920ENDIF 10930ENDCASE 10970PROCset_list_extent(1,TRUE) 10980PROCdraw_sub(1,2,FALSE,0) 10990ENDPROC 11060DEFPROCcallers(offset%,RETURNid%,RETURNid$,RETURNcpnt%) 11150LOCALptr% 11170ptr%=Tloi%+offset% 11180id%=!ptr% 11190IFid%<>0THEN 11200SYS"Toolbox_GetTemplateName",0,id%,Buf1%,128 11210id$=FNindirect(Buf1%) 11220ELSE 11230id$="" 11240ENDIF 11250cpnt%=ptr%!4 11260ENDPROC 11330DEFPROChandle_iconbar 11340ENDPROC 11410DEFPROChandle_alias 11450LOCALstate%,bo%,p% 11470CASEEvent_Code%OF 11480WHENE_TOAC% 11520Alias_ID%=Self_ID% 11530SYST_TOMO%,0,Alias_ID%,0TOAlias_WH% 11540WHENE_WATBS% 11580Application$="" 11590SYST_TOMO%,0,Alias_ID%,640,0,"!Bootplus" 11600SYST_TOMO%,0,Alias_ID%,642,0,"<none>" 11610WHENE_DDE% 11650IFApplication$<>""THEN 11690Buf2%!0=64 11700Buf2%!12=0:Buf2%!16=1:Buf2%!20=Blck%!16 11710Buf2%!28=Blck%!24:Buf2%!32=Blck%!28:Buf2%!36=128 11720Buf2%!40=&2000:$(Buf2%+44)=Application$ 11730SYS"Wimp_SendMessage",17,Buf2%,Blck%!16 11740ENDIF 11750ENDCASE 11760ENDPROC 11830DEFPROChandle_automenu 11870CASEEvent_Code%OF 11880WHENE_MS% 11920PROCcheck_if_applied 11960IFSelf_Component%=&dTHEN 12000a%=FNget_task_id("Pinboard") 12010IFa%=0THEN 12050PROCerror_message("EM8","","","",0,K%) 12060ELSE 12100Buf2%!0=64 12110Buf2%!12=0:Buf2%!16=1:Buf2%!20=0 12120Buf2%!28=0:Buf2%!32=0:Buf2%!36=128 12130Buf2%!40=&feb:$(Buf2%+44)="Pinboard" 12140SYS"Wimp_SendMessage",17,Buf2%,a% 12150ENDIF 12160ELSE 12200CASESelf_Component%OF 12210WHEN&9 12250Edit_Type$="autorun" 12260WHEN&b 12300Edit_Type$="boot" 12310WHEN&5 12350Edit_Type$="resources" 12360WHEN&c 12400Edit_Type$="predesk" 12410ENDCASE 12420PROCget_applist 12430PROCdraw_main(1,0) 12440ENDIF 12450ENDCASE 12460ENDPROC 12530DEFPROChandle_ibarmenu 12570CASEEvent_Code%OF 12580WHENE_TOAC% 12620Ibarmenu_ID%=Self_ID% 12630WHENE_MATBS% 12670CASETRUEOF 12680WHEN(NOTPasswords_Enabled%) 12720PROCibarmenu_greys(1,0,0,0,"Bootplus") 12730WHEN((Logged_User$=Owner$)AND Passwords_Enabled%) 12770PROCibarmenu_greys(0,0,0,0,"Logged : OWNER") 12780WHEN((Logged_User$="")AND Passwords_Enabled%) 12820PROCibarmenu_greys(0,1,1,1,"Bootplus") 12830WHEN((Logged_User$="LOGOFF")AND Passwords_Enabled%) 12870PROCibarmenu_greys(0,1,1,1,"Logged Off") 12880OTHERWISE 12920PROCibarmenu_greys(0,1,1,0,"Logged : "+Logged_User$) 12930ENDCASE 12940WHENE_UQA% 12980Quit%=TRUE 12990ENDCASE 13000ENDPROC 13070DEFPROChandle_mainlist 13090LOCALK% 13110CASEEvent_Code%OF 13120WHENE_TOAC% 13160Mainlist_ID%=Self_ID% 13170SYST_TOMO%,0,Mainlist_ID%,0TOSublist%(1,2) 13180SYST_TOMO%,0,Mainlist_ID%,68,5,Buf2%,128 13190Dustbin_ID%=!Buf2% 13200WHENE_ABS% 13240CASESelf_Component%OF 13250WHEN3 13290PROCget_applist 13300PROCset_list_extent(1,TRUE) 13310PROCdraw_sub(1,2,FALSE,0) 13320WHEN4 13360PROCapply_edit_changes 13370Saved%=TRUE 13380ENDCASE 13390WHENE_WHBH% 13430SYST_THO%,0,Sublist_ID% 13440PROCcheck_if_applied 13450ENDCASE 13460ENDPROC 13530DEFPROChandle_maintenance 13570LOCALbt% 13590CASEEvent_Code%OF 13600WHENE_MATBS% 13640IFPasswords_Enabled%THEN 13680SYST_TOMO%,0,Self_ID%,2,0,0 13690SYST_TOMO%,0,Self_ID%,2,1,0 13700SYST_TOMO%,0,Self_ID%,2,&c,0 13710SYST_TOMO%,0,Self_ID%,2,&d,0 13720ELSE 13760SYST_TOMO%,0,Self_ID%,2,0,1 13770SYST_TOMO%,0,Self_ID%,2,1,1 13780SYST_TOMO%,0,Self_ID%,2,&c,1 13790SYST_TOMO%,0,Self_ID%,2,&d,1 13800ENDIF 13810WHENE_MS% 13850CASESelf_Component%OF 13860WHEN0 13900SYS"OS_File",6,Ologfile$ 13910SYS"OS_FSControl",25,Logfile$,Ologfile$ 13920SYS"OS_File",11,Logfile$,&FFF 13930WHEN1 13970OSCLI("*Filer_Run "+Logfile$) 13980WHEN&d 14020PROCkill_thieftraps 14030WHEN&11 14070PROCboot_install("CHECK",bt%) 14080IFbt%THEN 14120*Filer_Run <Boot$Dir>.Utils.DeskrunO 14130ELSE 14160*Filer_Run <Boot$dir>.Utils.Deskrun 14170ENDIF 14180ENDCASE 14190ENDCASE 14200ENDPROC 14270DEFPROChandle_nodir 14310CASEEvent_Code%OF 14320WHENE_TOAC% 14360Nodir_ID%=Self_ID% 14370SYST_TOMO%,0,Nodir_ID%,0TOSublist%(3,1) 14380Sublist%(3,3)=352 14390Sublist%(3,4)=-280 14400Sublist%(3,5)=244 14410Sublist%(3,6)=-232 14420ENDCASE 14430ENDPROC 14500DEFPROChandle_options 14540LOCALa%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%,bt% 14560CASEEvent_Code%OF 14570WHENE_TOAC% 14610Options_ID%=Self_ID% 14620WHENE_WATBS% 14660PROCget_options(a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%) 14670SYST_TOMO%,0,Options_ID%,512,3,STR$(a%) 14680SYST_TOMO%,0,Options_ID%,512,1,STR$(b%) 14690SYST_TOMO%,0,Options_ID%,512,2,STR$(c%) 14700SYST_TOMO%,0,Options_ID%,196,9,-d% 14710SYST_TOMO%,0,Options_ID%,196,&a,-e% 14720SYST_TOMO%,0,Options_ID%,196,&c,-f% 14730SYST_TOMO%,0,Options_ID%,196,&d,-g% 14740SYST_TOMO%,0,Options_ID%,196,&14,-h% 14750SYST_TOMO%,0,Options_ID%,196,&15,-i% 14760SYST_TOMO%,0,Options_ID%,196,&16,-j% 14770SYST_TOMO%,0,Options_ID%,196,&17,-k% 14780SYST_TOMO%,0,Options_ID%,196,&18,-l% 14790PROCboot_install("CHECK",bt%) 14800SYST_TOMO%,0,Options_ID%,65,&1B,bt%AND&80000000 14810SYST_TOMO%,0,Options_ID%,65,&1C,(NOTbt%)AND&80000000 14820WHENE_ABS% 14860SYST_TOMO%,0,Options_ID%,513,3,Buf1%,128TO,,,,,l% 14870Buf1%?l%=13:a%=VAL($Buf1%) 14880SYST_TOMO%,0,Options_ID%,513,1,Buf1%,128TO,,,,,l% 14890Buf1%?l%=13:b%=VAL($Buf1%) 14900SYST_TOMO%,0,Options_ID%,513,2,Buf1%,128TO,,,,,l% 14910Buf1%?l%=13:c%=VAL($Buf1%) 14920SYST_TOMO%,0,Options_ID%,197,9TOd% 14930SYST_TOMO%,0,Options_ID%,197,&aTOe% 14940SYST_TOMO%,0,Options_ID%,197,&cTOf% 14950SYST_TOMO%,0,Options_ID%,197,&dTOg% 14960SYST_TOMO%,0,Options_ID%,197,&14TOh% 14970SYST_TOMO%,0,Options_ID%,197,&15TOi% 14980SYST_TOMO%,0,Options_ID%,197,&16TOj% 14990SYST_TOMO%,0,Options_ID%,197,&17TOk% 15000SYST_TOMO%,0,Options_ID%,197,&18TOl% 15010CASESelf_Component%OF 15020WHEN&1a 15060PROCboot_install("OUT",bt%) 15070PROCkill_thieftraps 15080PROCpause_logins 15090PROCremove_logins 15100PROCsave_options(a%,b%,c%,(d%=1),(e%=1),(f%=1),(g%=1),(h%=1),(i%=1),(j%=1),0,0) 15110PROCclear_edits 15120WHEN&1b 15160PROCboot_install("IN",bt%) 15170SYST_TOMO%,0,Options_ID%,65,&1B,&80000000 15180SYST_TOMO%,0,Options_ID%,65,&1C,0 15190WHEN&1C 15230PROCboot_install("OUT",bt%) 15240SYST_TOMO%,0,Options_ID%,65,&1B,0 15250SYST_TOMO%,0,Options_ID%,65,&1C,&80000000 15260WHEN&11 15300PROCsave_options(a%,b%,c%,(d%=1),(e%=1),(f%=1),(g%=1),(h%=1),(i%=1),(j%=1),(k%=1),(l%=1)) 15340IF(k%=1)ANDNOTPasswords_Enabled%THEN 15410Parent_Name$="Options" 15420PROCshowing_password 15430SYST_TSO%,0,Password_ID%,0,0,Options_ID%,0 15440Passwords_Enabled%=TRUE 15450Sequence$="ENABLING PASSWORDS" 15460ELSE 15470IF(k%=0)AND Passwords_Enabled%THEN 15510PROCpause_logins 15520PROCremove_logins 15530Passwords_Enabled%=FALSE 15540Logged_User$="" 15550ENDIF 15560ENDIF 15570Guest_Logins%=(g%=1) 15580Full_Owner_Access%=(i%=1) 15590Passwords_Enabled%=(k%=1) 15600Auto_Prompt%=(l%=1) 15610ENDCASE 15620ENDCASE 15630ENDPROC 15700DEFPROChandle_passmenu 15740LOCALl%,l$,a% 15760CASEEvent_Code%OF 15770WHENE_TOAC% 15810Passmenu_ID%=Self_ID% 15820WHENE_MATBS% 15860CASELogged_User$OF 15870WHEN"" 15910PROCpassmenu_greys(0,1,1,1,1,1) 15920WHENOwner$ 15960PROCpassmenu_greys(0,0,0,0,0,0) 15970WHEN"LOGOFF" 16010PROCpassmenu_greys(0,1,1,1,1,1) 16020OTHERWISE 16060PROCpassmenu_greys(0,0,0,1,1,1) 16070ENDCASE 16080WHENE_MS% 16120CASESelf_Component%OF 16130WHEN&D 16170Logged_User$="LOGOFF" 16180IF(Zzzzpass_Status%=3)THEN 16220PROCinform_zzzzpass(0) 16230ENDIF 16240IFAuto_Prompt%THEN 16280SYST_TSO%,0,Password_ID%,0,0,Passmenu_ID%,7 16290Sequence$="PROMPTING" 16300ENDIF 16310WHEN&C 16360Rusr%=1 16370PROCmake_dirlist 16410l$="" 16420FORa%=1TORusers% 16430l$+=Rusr$(a%) 16440IFa%<Rusers%THENl$+="," 16450NEXTa% 16460SYST_TOMO%,0,Useraccess_ID%,896,&1b,l$ 16470SYST_TOMO%,1,Useraccess_ID%,898,&1b,0 16480PROCuser_gadgets 16490PROCdraw_main(2,0) 16500ENDCASE 16510ENDCASE 16520ENDPROC 16590DEFPROChandle_password 16630LOCALa%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%,wh% 16650CASEEvent_Code%OF 16660WHENE_TOAC% 16700Password_ID%=Self_ID% 16710WHENE_WATBS% 16750PROCshowing_password 16760IFSequence$="PROMPTING"THEN 16810PROClock_mouse(TRUE) 16820ELSE 16830PROClock_mouse(FALSE) 16840ENDIF 16850WHENE_WHBH% 16890CASESequence$OF 16900WHEN"ENABLING PASSWORDS" 16940PROCget_options(a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%) 16950PROCsave_options(a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,FALSE,l%) 16960Passwords_Enabled%=FALSE 16970Sequence$="NORMAL" 16980WHEN"PROMPTING" 17020IFLogged_User$=""THEN 17060SYST_TSO%,0,Password_ID%,0,0,Passmenu_ID%,7 17070ENDIF 17080WHEN"NORMAL" 17120SYS"OS_ReadModeVariable",-1,4TO,,a% 17130SYS"OS_ReadModeVariable",-1,11TO,,b% 17140SYS"OS_ReadModeVariable",-1,5TO,,c% 17150SYS"OS_ReadModeVariable",-1,12TO,,d% 17160MOUSERECTANGLE0,0,(b%+1)<<a%,(d%+1)<<c% 17170ENDIF 17180ENDCASE 17190WHENE_ABS% 17230CASESelf_Component%OF 17240WHEN8 17280PROCaction_ok_password 17290WHEN9 17330SYST_TSO%,0,Password_ID%,0,0,Parent_ID%,Parent_Component% 17340ENDCASE 17350ENDCASE 17360ENDPROC 17430DEFPROChandle_sublist 17470CASEEvent_Code%OF 17480WHENE_TOAC% 17520Sublist_ID%=Self_ID% 17530SYST_TOMO%,0,Sublist_ID%,0TOSublist%(1,1) 17540Sublist%(1,3)=64 17550Sublist%(1,4)=-64 17560Sublist%(1,5)=812 17570Sublist%(1,6)=-232 17580ENDCASE 17590ENDPROC 17660DEFPROChandle_thieftrap 17700CASEEvent_Code%OF 17710WHENE_TOAC% 17750Thieftrap_ID%=Self_ID% 17760WHENE_WATBS% 17800SYST_TOMO%,0,Thieftrap_ID%,M_D_SS%,2,1 17810Source$="<BootPlus$Dir>.Resources.Thieftrap" 17820Application$="!Thieftrap" 17830WHENE_DDE% 17870Buf2%!0=64 17880Buf2%!12=0:Buf2%!16=1:Buf2%!20=Blck%!16 17890Buf2%!28=Blck%!24:Buf2%!32=Blck%!28:Buf2%!36=128 17900Buf2%!40=&2000:$(Buf2%+44)=Application$ 17910SYS"Wimp_SendMessage",17,Buf2%,Blck%!16 17920ENDCASE 17930ENDPROC 18000DEFPROChandle_useraccess 18040LOCALl$,a%,ov% 18060CASEEvent_Code%OF 18070WHENE_TOAC% 18110Useraccess_ID%=Self_ID% 18120SYST_TOMO%,0,Useraccess_ID%,0TOSublist%(2,2) 18130Sublist%(3,2)=Sublist%(2,2) 18140WHENE_SSVC% 18180SYST_TOMO%,1,Useraccess_ID%,899,&1b,Buf1%,128TOa% 18190Rusr%=a%+1 18230PROCuser_gadgets 18240PROCset_list_extent(2,TRUE) 18250PROCdraw_sub(2,2,FALSE,0) 18260PROCset_list_extent(3,TRUE) 18270PROCdraw_sub(3,2,FALSE,0) 18280WHENE_ABS% 18320CASESelf_Component%OF 18330WHEN&18 18370PROCmodify_useraccess 18380PROCsave_useraccess 18390PROCsave_usertimes 18400Saved%=TRUE 18410ENDCASE 18420WHENE_WHBH% 18460SYST_THO%,0,Yesdir_ID% 18470SYST_THO%,0,Nodir_ID% 18480IFNOTSaved%THEN 18490PROCerror_message("EM9","","","ET3",&13,k%) 18500IFk%=1THEN 18540PROCmodify_useraccess 18550PROCsave_useraccess 18560PROCsave_usertimes 18570ENDIF 18580ENDIF 18590Saved%=TRUE 18600ENDCASE 18610ENDPROC 18680DEFPROChandle_yesdir 18720CASEEvent_Code%OF 18730WHENE_TOAC% 18770Yesdir_ID%=Self_ID% 18780SYST_TOMO%,0,Yesdir_ID%,0TOSublist%(2,1) 18790Sublist%(2,3)=44 18800Sublist%(2,4)=-280 18810Sublist%(2,5)=244 18820Sublist%(2,6)=-232 18830ENDCASE 18840ENDPROC 18910DEFPROChandle_wmi 18950LOCALnm$,st$,tn$,pc$,tp$ 18970CASEEvent_Code%OF 18980WHENE_WATBS% 19020OSCLI("*ACCESS "+Ownerfile$+" WR/R") 19030f%=OPENIN(Ownerfile$) 19040FORa%=1TO5 19050a$=GET$#f% 19060SYST_TOMO%,0,Self_ID%,512,a%+4,a$ 19070NEXTa% 19080CLOSE#f% 19090OSCLI("*ACCESS "+Ownerfile$+" L/") 19100WHENE_ABS% 19140IFSelf_Component%=10THEN 19150OSCLI("*ACCESS "+Ownerfile$+" WR/R") 19160f%=OPENUP(Ownerfile$) 19170FORa%=1TO5 19180SYST_TOMO%,0,Self_ID%,513,a%+4,Buf1%,128TO,,,,,l% 19190Buf1%?l%=13 19200BPUT#f%,$Buf1% 19210NEXTa% 19220CLOSE#f% 19230OSCLI("*ACCESS "+Ownerfile$+" L/") 19240ENDIF 19250ENDCASE 19260ENDPROC 19330DEFPROCmake_thieftrap(dest$) 19370LOCALf%,a%,a$,p% 19390p%=INSTR(dest$,".!Thieftrap") 19400OSCLI("*Access "+Thieffile$+" WR/R") 19410f%=OPENUP(Thieffile$) 19420a%=1 19430REPEAT 19440a%+=1 19450a$=GET$#f% 19460UNTILEOF#f% 19470a$=LEFT$(dest$,p%)+"!Trap_"+STR$(a%) 19510BPUT#f%,"*WIPE "+a$+" FR~C~V" 19520CLOSE#f% 19530OSCLI("*Access "+Thieffile$+" L/") 19570OSCLI("*COPY <BootPlus$Dir>.Resources.Thieftrap "+a$+" ~C~VR") 19610OSCLI("*COPY <BootPlus$Dir>.Resources.!zzzzpass "+a$+".!zzzzpass ~C~VR") 19630ENDPROC 19710DEFPROCkill_thieftraps 19750LOCALa%,a$,f% 19770OSCLI("*ACCESS "+Thieffile$+" WR/R") 19780OSCLI("*OBEY "+Thieffile$) 19790OSCLI("*WIPE "+Thieffile$+" ~C~V") 19800f%=OPENOUT(Thieffile$) 19810BPUT#f%,"| Files for killing" 19820CLOSE#f% 19830OSCLI("*SetType "+Thieffile$+" &FEB") 19840OSCLI("*ACCESS "+Thieffile$+" L/") 19850ENDPROC 19930DEFPROClock_mouse(lockmouse) 19970LOCALa%,b%,w%,h% 19980SYS"OS_ReadModeVariable",-1,4TO,,a% 19990SYS"OS_ReadModeVariable",-1,11TO,,b% 20000w%=(b%+1)<<a% 20010SYS"OS_ReadModeVariable",-1,5TO,,a% 20020SYS"OS_ReadModeVariable",-1,12TO,,b% 20030h%=(b%+1)<<a% 20040SYST_TOMO%,0,Password_ID%,0TOBlck%!0 20050SYS"Wimp_GetWindowState",,Blck% 20060IFlockmouseTHEN 20100MOUSERECTANGLEBlck%!4,Blck%!8,Blck%!12-Blck%!4,Blck%!16-Blck%!8 20110ENDIF 20120Blck%!4=(w%-608)/2:Blck%!8=(h%-464)/2 20130Blck%!12=Blck%!4+608:Blck%!16=Blck%!8+464 20140SYS"Wimp_OpenWindow",,Blck% 20150ENDPROC 20220DEFPROCshowing_password 20260CASEParent_Name$OF 20270WHEN"Iconbar" 20310PROCclear_fields("CF1","","","","",0,0,&80000000,&80000000) 20320Autoclose%=TRUE 20330WHEN"Options" 20370PROCclear_fields("CF2",Owner$,"","","",&80000000,&80000000,0,0) 20380WHEN"Passmenu" 20390CASEParent_Component%OF 20400WHEN3 20440PROCclear_fields("CF3",Owner$,"","","",0,0,&80000000,&80000000) 20450Username$=Owner$ 20460WHEN8 20500PROCclear_fields("CF3",Owner$,"","","",0,0,&80000000,&80000000) 20510Username$=Owner$ 20520WHEN7 20560PROCclear_fields("CF4","","","","",0,0,&80000000,&80000000) 20570WHEN6 20610IFLogged_User$=""THEN 20620PROCerror_message("EM10","","","",0,K%) 20630ELSE 20640PROCclear_fields("CF5",Logged_User$,"","","",&80000000,0,0,0) 20650Username$=Logged_User$ 20660ENDIF 20670ENDCASE 20680Autoclose%=FALSE 20690WHEN"Password" 20700CASEParent_Component%OF 20710WHEN100 20750PROCclear_fields("CF6","","","","",0,&80000000,0,0) 20760WHEN101 20800PROCclear_fields("CF7","","","","",0,&80000000,0,0) 20810WHEN102 20850PROCclear_fields("CF8",Owner$,"","","",&80000000,&80000000,0,0) 20860Username$=Owner$ 20870ENDCASE 20880Autoclose%=FALSE 20890ENDCASE 20900ENDPROC 20970DEFPROCvalchange_password 21010IFBlck%!16=0THEN 21050PROCerror_message("EM11","","","",0,K%) 21060ELSE 21070CASESelf_Component%OF 21080WHEN4 21090Username$=FNindirect(Blck%+16) 21100WHEN5 21110Password$=FNindirect(Blck%+16) 21120WHEN6 21130Newpassword$=FNindirect(Blck%+16) 21140WHEN7 21150Verify$=FNindirect(Blck%+16) 21160ENDCASE 21170ENDIF 21180ENDPROC 21250DEFPROCaction_ok_password 21290LOCALu$,p$,valid%,verify%,exists% 21310SYST_TOMO%,0,Password_ID%,513,&4,Buf1%,256 21320u$=FNindirect(Buf1%) 21330SYST_TOMO%,0,Password_ID%,513,&5,Buf1%,256 21340p$=FNindirect(Buf1%) 21350SYST_TOMO%,0,Password_ID%,513,&6,Buf1%,256 21360n$=FNindirect(Buf1%) 21370SYST_TOMO%,0,Password_ID%,513,&7,Buf1%,256 21380v$=FNindirect(Buf1%) 21390valid%=FNcheck_user(u$,p$,exists%) 21400verify%=(n$=v$) 21410CASEParent_Name$OF 21420WHEN"Iconbar" 21460IFvalid%THEN 21470PROClogin_user(u$,TRUE) 21480ELSE 21490IFexists%THEN 21500PROCerror_message("EM12","","","",0,K%) 21510ELSE 21520PROCerror_message("EM13","","","",0,K%) 21530ENDIF 21540ENDIF 21550WHEN"Options" 21590IFNOTverify%THEN 21600PROCerror_message("EM14","","","",0,K%) 21610SYST_TSO%,0,Password_ID%,0,0,Options_ID%,0 21620ELSE 21630IFLEN(n$)<4THEN 21640PROCerror_message("EM15","","","",0,K%) 21650SYST_TSO%,0,Password_ID%,0,0,Options_ID%,0 21660ELSE 21670IFexists%THEN 21680PROCmodify_user(u$,n$) 21690ELSE 21700PROCadd_user(u$,n$) 21710ENDIF 21750PROClogin_user(u$,TRUE) 21760PROCinstall_logins 21770Sequence$="NORMAL" 21780ENDIF 21790ENDIF 21800WHEN"Passmenu" 21840CASEParent_Component%OF 21850WHEN3 21890IFvalid%THEN 21900SYST_TSO%,0,Password_ID%,0,0,Password_ID%,100 21910ELSE 21920PROCerror_message("EM16","","","",0,K%) 21930ENDIF 21940WHEN8 21980IFvalid%THEN 21990SYST_TSO%,0,Password_ID%,0,0,Password_ID%,101 22000ELSE 22010PROCerror_message("EM16","","","",0,K%) 22020ENDIF 22030WHEN7 22070IFvalid%THEN 22080PROClogin_user(u$,TRUE) 22090Sequence$="NORMAL" 22100ELSE 22110IFexists%THEN 22120PROCerror_message("EM12","","","",0,K%) 22130ELSE 22140PROCerror_message("EM13","","","",0,K%) 22150ENDIF 22160ENDIF 22170WHEN6 22210IFvalid%THEN 22220IFverify%THEN 22230IFLEN(n$)<4THEN 22240PROCerror_message("EM15","","","",0,K%) 22250ELSE 22260IFn$=p$THEN 22270PROCerror_message("EM17","","","",0,K%) 22280ELSE 22290PROCmodify_user(u$,n$) 22300ENDIF 22310ENDIF 22320ELSE 22330PROCerror_message("EM14","","","",0,K%) 22340ENDIF 22350ELSE 22360PROCerror_message("EM18","","","",0,K%) 22370ENDIF 22380ENDCASE 22390WHEN"Password" 22430CASEParent_Component%OF 22440WHEN100 22480IFexists%THEN 22490PROCerror_message("EM19",u$,"","",0,K%) 22500ELSE 22510IFverify%THEN 22520IFLEN(n$)<4THEN 22530PROCerror_message("EM15","","","",0,K%) 22540ELSE 22550PROCadd_user(u$,n$) 22560ENDIF 22570ELSE 22580PROCerror_message("EM14","","","",0,K%) 22590SYST_TSO%,0,Password_ID%,0,0,Password_ID%,100 22600ENDIF 22610ENDIF 22620WHEN101 22660IFNOTexists%THEN 22670PROCerror_message("EM20",u$,"","",0,K%) 22680ELSE 22690IFverify%THEN 22700IFLEN(n$)<4THEN 22710PROCerror_message("EM15","","","",0,K%) 22720ELSE 22730PROCmodify_user(u$,n$) 22740ENDIF 22750ELSE 22760PROCerror_message("EM14","","","",0,K%) 22770SYST_TSO%,0,Password_ID%,0,0,Password_ID%,101 22780ENDIF 22790ENDIF 22800WHEN102 22840IFverify%THEN 22850PROCadd_user(Owner$,Newpassword$) 22860PROClogin_user(Owner$,TRUE) 22870ELSE 22880PROCerror_message("EM14","","","",0,K%) 22890SYST_TSO%,0,Password_ID%,0,0,Password_ID%,102 22900ENDIF 22910ENDCASE 22920ENDCASE 22930ENDPROC 23000DEFPROCget_options(RETURNat%,RETURNwt%,RETURNdt%,RETURNts%,RETURNtq%,RETURNda%,RETURNgl%,RETURNtm%,RETURNfo%,RETURNwo%,RETURNpe%,RETURNap%) 23140LOCALf%,a$,a% 23180wo%=FALSE 23190pe%=FALSE 23200ap%=FALSE 23220SYS"OS_File",4,Optfile$,,,,3 23230f%=OPENIN(Optfile$) 23240u%=0 23250REPEAT 23260a$=GET$#f% 23270a%=INSTR(a$,":") 23280CASELEFT$(a$,a%-2)OF 23290WHEN"Allow Time" 23300at%=VAL(MID$(a$,a%+2)) 23310WHEN"Warn Time" 23320wt%=VAL(MID$(a$,a%+2)) 23330WHEN"Die Time" 23340dt%=VAL(MID$(a$,a%+2)) 23350WHEN"Task Starting" 23360ts%=(MID$(a$,a%+2)="Y") 23370WHEN"Task Quitting" 23380tq%=(MID$(a$,a%+2)="Y") 23390WHEN"Directory Access" 23400da%=(MID$(a$,a%+2)="Y") 23410WHEN"Guest Logins" 23420gl%=(MID$(a$,a%+2)="Y") 23430WHEN"Test Mode Logins" 23440tm%=(MID$(a$,a%+2)="Y") 23450WHEN"Full Owner Access" 23460fo%=(MID$(a$,a%+2)="Y") 23470WHEN"Watchdog Off" 23480wo%=(MID$(a$,a%+2)="Y") 23490WHEN"Passwords Enabled" 23500pe%=(MID$(a$,a%+2)="Y") 23510WHEN"Auto Prompt" 23520ap%=(MID$(a$,a%+2)="Y") 23530ENDCASE 23540UNTILEOF#f% 23550CLOSE#f% 23560SYS"OS_File",4,Optfile$,,,,9 23570ENDPROC 23650DEFPROCget_useraccess 23690LOCALf%,a$,a% 23710SYS"OS_File",4,Accessfile$,,,,3 23720f%=OPENIN(Accessfile$) 23730Rusers%=0 23740REPEAT 23750a$=GET$#f% 23760a%=INSTR(a$,":") 23770Rusers%+=1 23780Rusr$(Rusers%)=LEFT$(a$,a%-2) 23790Rdir$(Rusers%)=MID$(a$,a%+2) 23800UNTILEOF#f% 23810CLOSE#f% 23820SYS"OS_File",4,Accessfile$,,,,9 23830ENDPROC 23900DEFPROCget_usertimes 23940LOCALf%,a$,a% 23960SYS"OS_File",4,Timesfile$,,,,3 23970f%=OPENIN(Timesfile$) 23980Rusers%=0 23990REPEAT 24000a$=GET$#f% 24010a%=INSTR(a$,":") 24020Rusers%+=1 24030Rtim$(Rusers%)=MID$(a$,a%+2) 24040UNTILEOF#f% 24050CLOSE#f% 24060SYS"OS_File",4,Timesfile$,,,,9 24070ENDPROC 24140DEFPROCsave_options(at%,wt%,dt%,ts%,tq%,da%,gl%,tm%,fo%,wo%,pe%,ap%) 24300LOCALf% 24320SYS"OS_File",4,Optfile$,,,,3 24330f%=OPENOUT(T_Optfile$) 24340BPUT#f%,"Allow Time : "+STR$(at%) 24350BPUT#f%,"Warn Time : "+STR$(wt%) 24360BPUT#f%,"Die Time : "+STR$(dt%) 24370BPUT#f%,"Task Starting : "+CHR$(-89*ts%-78*(NOTts%)) 24380BPUT#f%,"Task Quitting : "+CHR$(-89*tq%-78*(NOTtq%)) 24390BPUT#f%,"Directory Access : "+CHR$(-89*da%-78*(NOTda%)) 24400BPUT#f%,"Guest Logins : "+CHR$(-89*gl%-78*(NOTgl%)) 24410BPUT#f%,"Test Mode Logins : "+CHR$(-89*tm%-78*(NOTtm%)) 24420BPUT#f%,"Full Owner Access : "+CHR$(-89*fo%-78*(NOTfo%)) 24430BPUT#f%,"Watchdog Off : "+CHR$(-89*wo%-78*(NOTwo%)) 24440BPUT#f%,"Passwords Enabled : "+CHR$(-89*pe%-78*(NOTpe%)) 24450BPUT#f%,"Auto Prompt : "+CHR$(-89*ap%-78*(NOTap%)) 24460CLOSE#f% 24470SYS"OS_File",6,Optfile$ 24480SYS"OS_FSControl",25,T_Optfile$,Optfile$ 24490SYS"OS_File",4,Optfile$,,,,9 24500ENDPROC 24590DEFPROCsave_useraccess 24640LOCALf%,a% 24660SYS"OS_File",4,Accessfile$,,,,3 24670f%=OPENOUT(T_Accessfile$) 24680FORa%=1TORusers% 24690BPUT#f%,Rusr$(a%)+" : "+Rdir$(a%) 24700NEXTa% 24710CLOSE#f% 24720SYS"OS_File",6,Accessfile$ 24730SYS"OS_FSControl",25,T_Accessfile$,Accessfile$ 24740SYS"OS_File",4,Accessfile$,,,,9 24750ENDPROC 24830DEFPROCsave_usertimes 24870LOCALf%,a% 24890SYS"OS_File",4,Timesfile$,,,,3 24900f%=OPENOUT(T_Timesfile$) 24910FORa%=1TORusers% 24920BPUT#f%,Rusr$(a%)+" : "+Rtim$(a%) 24930NEXTa% 24940CLOSE#f% 24950SYS"OS_File",6,Timesfile$ 24960SYS"OS_FSControl",25,T_Timesfile$,Timesfile$ 24970SYS"OS_File",4,Timesfile$,,,,9 24980ENDPROC 25050DEFPROCmake_dirlist 25090LOCALpntr%,spntr%,a% 25110Tdirs%=0 25150a%=0 25160REPEAT 25170SYS"OS_GBPB",12,"<Boot$dir>.^",Buf1%,1,a%,256,"*"TO,,,,a% 25180IF(a%<>-1)AND(Buf1%!20>&fff)THEN 25220Tdirs%+=1 25230Tdir$(Tdirs%,1)=FNindirect(Buf1%+24) 25240IFRusr$(Rusr%)<>Owner$AND(Tdir$(Tdirs%,1)="!Boot"ORLEFT$(Tdir$(Tdirs%,1),6)="!Trap_")THEN 25280Tflg%(Tdirs%,1)=&7OR&100OR(24<<16)OR&40 25290ELSE 25330Tflg%(Tdirs%,1)=&7OR&100OR(24<<16) 25340ENDIF 25350ENDIF 25360UNTILa%=-1 25370Tnpt%()=0 25380Typt%()=0 25390ENDPROC 25470DEFPROCuser_gadgets 25510LOCALa%,d%,l%,r%,e1%,e2%,t$ 25530Tydirs%=0 25540Tndirs%=0 25550FORa%=1TOTdirs% 25560IFINSTR(Rdir$(Rusr%),"|"+Tdir$(a%,1)+"|")>0THEN 25600Tydirs%+=1 25610Typt%(Tydirs%)=a% 25620ELSE 25660Tndirs%+=1 25670Tnpt%(Tndirs%)=a% 25680ENDIF 25720IF(Tflg%(a%,1)AND&40)=&40THEN 25760IFRusr$(Rusr%)=Owner$THEN 25770Tflg%(a%,1)=(Tflg%(a%,1)AND&FFFFFFFC)OR&7 25780ELSE 25790Tflg%(a%,1)=(Tflg%(a%,1)AND&FFFFFFFC)OR&5 25800ENDIF 25810ENDIF 25820NEXTa% 25860t$=Rtim$(Rusr%) 25870l%=1 25880FORd%=1TO7 25890r%=INSTR(t$,"|",l%+1) 25900e1%=INSTR(t$,"=",l%+1) 25910e2%=INSTR(t$,"=",e1%+1) 25950IFMID$(t$,l%+3,1)="Y"THEN 25960SYST_TOMO%,0,Useraccess_ID%,196,d%+&3,1 25970ELSE 25980SYST_TOMO%,0,Useraccess_ID%,196,d%+&3,0 25990ENDIF 26030SYST_TOMO%,0,Useraccess_ID%,832,d%+&23,VAL(MID$(t$,e1%+1,e2%-e1%-1)) 26070SYST_TOMO%,0,Useraccess_ID%,832,d%+&30,VAL(MID$(t$,e2%+1,r%-e2%-1)) 26080l%=r% 26090r%=INSTR(t$,"|",l%+1) 26100NEXTd% 26110ENDPROC 26180DEFPROCmodify_useraccess 26220LOCALa$,a%,b,t$ 26260a$="|" 26270FORa%=1TOTydirs% 26280a$+=Tdir$(Typt%(a%),1)+"|" 26290NEXTa% 26300Rdir$(Rusr%)=a$ 26340a$="|" 26350FORd%=1TO7 26360a$+=Weekdays$(d%) 26370SYST_TOMO%,0,Useraccess_ID%,197,&3+d%TOa% 26380IFa%=1THEN 26390a$+="Y" 26400ELSE 26410a$+="N" 26420ENDIF 26430SYST_TOMO%,0,Useraccess_ID%,833,d%+&23TOa% 26440a$+="="+STR$(a%) 26480SYST_TOMO%,0,Useraccess_ID%,833,d%+&30TOa% 26490a$+="="+STR$(a%)+"|" 26500NEXTd% 26510Rtim$(Rusr%)=a$ 26520ENDPROC 26590DEFPROCpassmenu_greys(i1%,i2%,i3%,i4%,i5%,i6%) 26700SYST_TOMO%,0,Passmenu_ID%,2,7,i1% 26710SYST_TOMO%,0,Passmenu_ID%,2,&d,i2% 26720SYST_TOMO%,0,Passmenu_ID%,2,6,i3% 26730SYST_TOMO%,0,Passmenu_ID%,2,3,i4% 26740SYST_TOMO%,0,Passmenu_ID%,2,8,i5% 26750SYST_TOMO%,0,Passmenu_ID%,2,&c,i6% 26760ENDPROC 26830DEFPROCibarmenu_greys(i1%,i2%,i3%,i4%,bt$) 26910SYST_TOMO%,0,Ibarmenu_ID%,2,5,i1% 26920SYST_TOMO%,0,Ibarmenu_ID%,2,6,i2% 26930SYST_TOMO%,0,Ibarmenu_ID%,2,&a,i3% 26940SYST_TOMO%,0,Ibarmenu_ID%,2,&b,i4% 26950SYST_TOMO%,0,Ibarmenu_ID%,24,bt$ 26960ENDPROC 27030DEFPROCclear_fields(lb$,t1$,t2$,t3$,t4$,fd1%,fd2%,fd3%,fd4%) 27170a$=FNget_message(lb$,"","","","") 27180SYST_TOMO%,0,Password_ID%,448,&a,a$ 27190SYST_TOMO%,0,Password_ID%,512,4,t1$ 27200SYST_TOMO%,0,Password_ID%,512,5,t2$ 27210SYST_TOMO%,0,Password_ID%,512,6,t3$ 27220SYST_TOMO%,0,Password_ID%,512,7,t3$ 27230SYST_TOMO%,0,Password_ID%,65,0,fd1% 27240SYST_TOMO%,0,Password_ID%,65,4,fd1% 27250SYST_TOMO%,0,Password_ID%,65,1,fd2% 27260SYST_TOMO%,0,Password_ID%,65,5,fd2% 27270SYST_TOMO%,0,Password_ID%,65,2,fd3% 27280SYST_TOMO%,0,Password_ID%,65,6,fd3% 27290SYST_TOMO%,0,Password_ID%,65,3,fd4% 27300SYST_TOMO%,0,Password_ID%,65,7,fd4% 27310ENDPROC 27380DEFPROCinstall_logins 27450LOCALl%,bootplusdir$ 27460SYS"OS_ReadVarVal","Bootplus$Dir",Buf1%,128,0,0TO,,l% 27470Buf1%?l%=13 27480bootplusdir$=$Buf1% 27490Application$="!zzzzpass" 27500Source$=bootplusdir$+".resources.!zzzzpass" 27510PROCmake_alias("<Boot$ToBeTasks>.!zzzzpass") 27520Application$="!Bootplus" 27530Source$=bootplusdir$ 27540PROCmake_alias("<Boot$ToBeTasks>.!Bootplus") 27550Edit_Type$="boot" 27560PROCmodify_boot_file(bootplusdir$,"remove",TRUE) 27570PROCmodify_boot_file(bootplusdir$,"insert",TRUE) 27580Edit_Type$="" 27590*Filer_Run <Bootplus$Dir>.Resources.!zzzzpass 27600ENDPROC 27670DEFPROCremove_logins 27720LOCALl%,bootplusdir$ 27740SYS"OS_ReadVarVal","Bootplus$Dir",Buf1%,128,0,0TO,,l% 27750Buf1%?l%=13 27760bootplusdir$=$Buf1% 27770SYS"XOS_FSControl",27,"<Boot$ToBeTasks>.!zzzzpass",,3 27780SYS"XOS_FSControl",27,"<Boot$ToBeTasks>.!bootplus",,3 27790Edit_Type$="boot" 27800PROCmodify_boot_file(bootplusdir$,"remove",TRUE) 27810Edit_Type$="" 27820ENDPROC 27890DEFPROCpause_logins 27930LOCALid% 27950id%=FNget_task_id("zzzzpass") 27960IFid%>0THEN 28000Blck%!0=28:Blck%!12=0:Blck%!16=&808c0 28010Blck%!20=4:Blck%!24=Buf2% 28020!Buf2%=3 28030SYS"Wimp_SendMessage",17,Blck%,id% 28040ENDIF 28050id%=FNget_task_id("zzzzchk") 28060IFid%>0THEN 28100Blck%!0=28:Blck%!12=0:Blck%!16=&808c0 28110Blck%!20=4:Blck%!24=Buf2% 28120!Buf2%=3 28130SYS"Wimp_SendMessage",17,Blck%,id% 28140ENDIF 28150ENDPROC 28250DEFFNencode(pswd$) 28320LOCALencd$,a%,b%,c%,d% 28340encd$="" 28350a%=LEN(pswd$) 28360FORe%=1TOa% 28370b%=ASC(MID$(pswd$,e%,1)) 28380c%=ASC(MID$(pswd$,a%-e%+1,1)) 28390d%=(b%*(c%+1))AND&FF 28400IFd%<32THENd%+=32 28410IFd%>=127AND d%<=139THENd%+=23 28420encd$+=CHR$(d%) 28430NEXTe% 28460=encd$ 28530DEFFNcheck_user(usnm$,pass$,RETURNnami%) 28650LOCALencd$,ntry$,f%,ok%,pnam$,ppas$,p1$ 28670IFusnm$="GUEST"THEN 28710ok%=((pass$="GUEST")AND Guest_Logins%) 28720nami%=TRUE 28730ELSE 28770a%=0 28780p1$=FNencode(pass$) 28790encd$=FNencode(p1$) 28800ok%=FALSE 28810nami%=FALSE 28820SYS"OS_File",4,Passfile$,,,,3 28830f%=OPENIN(Passfile$) 28840WHILENOT(EOF#f%ORok%) 28850ntry$=GET$#f% 28860tab1%=INSTR(ntry$,CHR$(9)) 28870tab2%=INSTR(ntry$,CHR$(9),tab1%+1) 28880pnam$=LEFT$(ntry$,tab1%-1) 28890ppas$=MID$(ntry$,tab1%+1,tab2%-tab1%-1) 28900a%+=1 28910ok%=((usnm$=pnam$)AND(encd$=ppas$)) 28920IFusnm$=pnam$THENnami%=TRUE 28930ENDWHILE 28940CLOSE#f% 28950SYS"OS_File",4,Passfile$,,,,9 28960ENDIF 28980=ok% 29050DEFPROCadd_user(usnm$,pass$) 29120LOCALencd$,pad%,p1$,bd$,f%,l% 29160p1$=FNencode(pass$) 29170encd$=FNencode(p1$) 29180pad%=35-(LEN(usnm$)+LEN(encd$)+2) 29190SYS"OS_File",4,Passfile$,,,,3 29200f%=OPENUP(Passfile$) 29210WHILENOTEOF#f% 29220ntry$=GET$#f% 29230ENDWHILE 29240BPUT#f%,usnm$+CHR$(9)+encd$+CHR$(9)+STRING$(pad%,"x") 29250CLOSE#f% 29260SYS"OS_File",4,Passfile$,,,,9 29320SYS"OS_ReadVarVal","Boot$Dir",Buf1%,128,0,0TO,,l% 29330l%-=6 29340Buf1%?l%=13 29350bd$=$Buf1% 29370SYS"OS_File",20,bd$+".Groups"TOf% 29380IFf%=0THEN 29420SYS"OS_File",8,bd$+".Groups" 29430ENDIF 29440SYS"OS_File",20,bd$+".Groups."+usnm$TOf% 29450IFf%=0THEN 29490SYS"OS_File",8,bd$+".Groups."+usnm$ 29500ENDIF 29510Rusers%+=1 29520Rusr$(Rusers%)=usnm$ 29530Rdir$(Rusers%)="|Apps|Diversions|Images|Public|Sound|Tutorials|Utilities|Video|" 29540bd$="|" 29550FORb%=1TO7 29560bd$+=Weekdays$(b%)+"Y=8=17|" 29570NEXTb% 29580Rtim$(Rusers%)=bd$ 29590PROCsave_useraccess 29600PROCsave_usertimes 29610ENDPROC 29680DEFPROCmodify_user(usnm$,pass$) 29750LOCALencd$,ntyr$,pad%,tab1%,tab2%,pnam$,p1$ 29770p1$=FNencode(pass$) 29780encd$=FNencode(p1$) 29790pad%=35-(LEN(usnm$)+LEN(encd$)+2) 29800SYS"OS_File",4,Passfile$,,,,3 29810f%=OPENUP(Passfile$) 29820REPEAT 29830posn%=PTR#f% 29840ntry$=GET$#f% 29850tab1%=INSTR(ntry$,CHR$(9)) 29860tab2%=INSTR(ntry$,CHR$(9),tab1%+1) 29870pnam$=LEFT$(ntry$,tab1%-1) 29880UNTILpnam$=usnm$ 29890PTR#f%=posn% 29900BPUT#f%,usnm$+CHR$(9)+encd$+CHR$(9)+STRING$(pad%,"x") 29910CLOSE#f% 29920SYS"OS_File",4,Passfile$,,,,9 29930ENDPROC 30000DEFPROClogin_user(usnm$,inform%) 30070LOCALa%,al%,dur%,sh%,eh% 30090IFLogged_User$<>usnm$THEN 30130PROCuser_times(usnm$,al%,dur%,sh%,eh%) 30140CASEal%OF 30150WHEN1 30190SYST_TOMO%,0,Ibarmenu_ID%,2,6,0 30200Logged_User$=usnm$ 30240IF(Zzzzpass_Status%=3)AND inform%THEN 30280PROCinform_zzzzpass(dur%) 30290ENDIF 30300WHEN2 30340PROCerror_message("EM21","","","ET1",0,K%) 30350WHEN3 30390PROCerror_message("EM22",STR$(sh%),STR$(eh%),"ET1",0,K%) 30400ENDCASE 30410ELSE 30450PROCerror_message("EM23","","","ET2",0,K%) 30460ENDIF 30470ENDPROC 30550DEFPROCuser_times(usern$,RETURNallowed%,RETURNduration%,RETURNsh%,RETURNeh%) 30590LOCALa%,th%,mn%,wd%,e1%,e2%,b% 30630FORa%=1TORusers% 30640IFRusr$(a%)=usnm$THEN 30650Rusr%=a% 30660ENDIF 30670NEXTa% 30680IFusern$=Owner$THEN 30720allowed%=1 30730ELSE 30770!Buf1%=3 30780SYS"OS_Word",14,Buf1% 30790SYS&c1,Buf1%,Buf2%,128,"%24"TO,a% 30800?a%=13 30810th%=VAL($Buf2%) 30820SYS&c1,Buf1%,Buf2%,128,"%WN"TO,a% 30830?a%=13 30840wd%=VAL($Buf2%) 30850SYS&c1,Buf1%,Buf2%,128,"%MI"TO,a% 30860?a%=13 30870mn%=VAL($Buf2%) 30880a%=INSTR(Rtim$(Rusr%),Weekdays$(wd%),1) 30890duration%=0 30900IFMID$(Rtim$(Rusr%),a%+2,1)="Y"THEN 30940e1%=INSTR(Rtim$(Rusr%),"=",a%+3) 30950e2%=INSTR(Rtim$(Rusr%),"=",e1%+2) 30960b%=INSTR(Rtim$(Rusr%),"|",e2%+2) 30970sh%=VAL(MID$(Rtim$(Rusr%),e1%+1,e2%-e1%-1)) 30980eh%=VAL(MID$(Rtim$(Rusr%),e2%+1,b%-e2%-1)) 30990IF(th%>=sh%AND th%<=eh%)THEN 31000allowed%=1 31010duration%=(eh%-th%+1)*60-mn% 31020ELSE 31030allowed%=3 31040ENDIF 31050ELSE 31060allowed%=2 31070ENDIF 31080ENDIF 31090ENDPROC 31170DEFPROCinform_zzzzpass(duration%) 31220LOCALp%,a% 31370p%=20 31380!Buf2%=1 31390Buf2%!4=p% 31400$(Buf2%+20)=Logged_User$+CHR$(13) 31410p%+=LEN(Logged_User$)+2 31420Buf2%!12=p% 31430IFLogged_User$="LOGOFF"THEN 31440$(Buf2%+Buf2%!12)="||" 31450P%+=2 31460ELSE 31470$(Buf2%+Buf2%!12)=Rdir$(Rusr%) 31480p%+=LEN(Rdir$(Rusr%)) 31490ENDIF 31500Buf2%!16=duration% 31540Blck%!0=32:Blck%!12=0:Blck%!16=&808c0 31550Blck%!20=p%:Blck%!24=Buf2% 31560IFLogged_User$="LOGOFF"THEN 31570Blck%!20=Buf2%!12+4 31580ELSE 31590Blck%!20=Buf2%!12+LEN(Rdir$(Rusr%))+2 31600ENDIF 31610SYS"Wimp_SendMessage",17,Blck%,Zzzzpass_Handle% 31620ENDPROC 31690DEFPROCboot_install(type$,RETURNcf%) 31730LOCALf%,a$,bv$,n% 31770cf%=FALSE 31780f%=OPENIN("<Boot$Dir>.Utils.Deskrun") 31790REPEAT 31800a$=GET$#f% 31810cf%=(INSTR(a$,"!Bootplus")>0) 31820UNTILEOF#f%ORcf% 31830CLOSE#f% 31870SYS"OS_ReadVarVal","Bootplus$Dir",Buf1%,128,0,0TO,,n% 31880Buf1%?n%=13 31890CASETRUEOF 31900WHEN((type$="IN")ANDNOTcf%) 31940SYS"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","WR/WR" 31950SYS"OS_FSControl",25,"<Boot$Dir>.Utils.Deskrun","<Boot$Dir>.Utils.DeskrunO" 31960SYS"OS_FSControl",24,"<Boot$Dir>.Utils.DeskrunO","LR/R" 31970f%=OPENOUT("<Boot$Dir>.Utils.Deskrun") 31980BPUT#f%,"IFTHERE "+$Buf1%+".!Run THEN Filer_Run "+$Buf1%+" ELSE ERROR !Bootplus has moved. Run it from the current location and re-install into !Boot" 31990CLOSE#f% 32000SYS"OS_File",18,"<Boot$Dir>.Utils.Deskrun",&FEB 32010SYS"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","LR/R" 32020WHEN((type$="OUT")AND cf%) 32060SYS"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","WR/WR" 32070SYS"OS_FSControl",24,"<Boot$Dir>.Utils.DeskrunO","WR/WR" 32080SYS"OS_File",6,"<Boot$Dir>.Utils.Deskrun" 32090SYS"OS_FSControl",25,"<Boot$Dir>.Utils.DeskrunO","<Boot$Dir>.Utils.Deskrun" 32100SYS"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","LR/R" 32110ENDCASE 32120ENDPROC 32210DEFPROCdraw_main(mid%,reason%) 32290LOCALa% 32330Blck%!0=Sublist%(mid%,2) 32340SYS"Wimp_GetWindowState",,Blck% 32350CASEreason%OF 32360WHEN0 32400CASEmid%OF 32410WHEN1 32450CASEEdit_Type$OF 32460WHEN"autorun" 32470SYST_TOMO%,0,Mainlist_ID%,11,"Edit Autorun Files" 32480WHEN"boot" 32490SYST_TOMO%,0,Mainlist_ID%,11,"Edit Autobooted Applications" 32500WHEN"resources" 32510SYST_TOMO%,0,Mainlist_ID%,11,"Edit Resource Applications" 32520WHEN"predesk" 32530SYST_TOMO%,0,Mainlist_ID%,11,"Edit Predesk Files" 32540ENDCASE 32580ENDCASE 32590SYS"Wimp_OpenWindow",,Blck% 32600WHEN2 32610SYS"Wimp_RedrawWindow",,Blck% 32620ENDCASE 32660IFmid%=2THEN 32700PROCdraw_sub(2,reason%,TRUE,0) 32710PROCdraw_sub(3,reason%,TRUE,0) 32720ELSE 32760PROCdraw_sub(1,reason%,TRUE,0) 32770ENDIF 32810Blck%!0=Sublist%(mid%,2) 32820SYS"Wimp_GetWindowState",,Blck% 32830Blck%!28=Sublist%(mid%,1) 32840SYS"Wimp_OpenWindow",,Blck% 32850ENDPROC 33000DEFPROCdraw_sub(sid%,reason%,main%,bh%) 33090LOCALa%,r%,os_wx%,os_wy% 33120IFreason%<>2THEN 33160Buf1%!0=Sublist%(sid%,2) 33170SYS"Wimp_GetWindowState",,Buf1% 33180os_wx%=(Buf1%!4-Buf1%!20) 33190os_wy%=(Buf1%!16-Buf1%!24) 33200Buf2%!0=Sublist%(sid%,1) 33210SYS"Wimp_GetWindowState",,Buf2% 33220Buf2%!4=os_wx%+Sublist%(sid%,3) 33230Buf2%!8=os_wy%+Sublist%(sid%,4)+Sublist%(sid%,6) 33240Buf2%!12=os_wx%+Sublist%(sid%,3)+Sublist%(sid%,5) 33250Buf2%!16=os_wy%+Sublist%(sid%,4) 33260ENDIF 33300CASEreason%OF 33310WHEN0 33490Buf2%!28=-1 33500SYS"Wimp_OpenWindow",,Buf2% 33520PROCset_list_extent(sid%,TRUE) 33530CASEsid%OF 33540WHEN1 33580PROCdraw_list(1,Objs%,Optr%(),Odat$(),Oflg%()) 33590WHEN2 33630PROCdraw_list(2,Tydirs%,Typt%(),Tdir$(),Tflg%()) 33640WHEN3 33680PROCdraw_list(3,Tndirs%,Tnpt%(),Tdir$(),Tflg%()) 33690ENDCASE 33710WHEN2 33750CASEsid%OF 33760WHEN1 33800PROCdraw_list(1,Objs%,Optr%(),Odat$(),Oflg%()) 33810WHEN2 33850PROCdraw_list(2,Tydirs%,Typt%(),Tdir$(),Tflg%()) 33860WHEN3 33900PROCdraw_list(3,Tndirs%,Tnpt%(),Tdir$(),Tflg%()) 33910ENDCASE 33920WHEN3 33960Buf2%!28=bh% 33970SYS"Wimp_OpenWindow",,Buf2% 33980ENDCASE 33990ENDPROC 34090DEFPROCset_list_extent(sid%,redraw%) 34130Blck%!0=Sublist%(sid%,1) 34140SYS"Wimp_GetWindowInfo",,(Blck%OR&1) 34150CASEsid%OF 34160WHEN1 34170Blck%!48=-Font_Lh%*Objs% 34180WHEN2 34190Blck%!48=-Font_Lh%*Tydirs% 34200WHEN3 34210Blck%!48=-Font_Lh%*Tndirs% 34220ENDCASE 34230IFBlck%!48>(Blck%!8-Blck%!16)THEN 34240Blck%!48=Blck%!8-Blck%!16 34250ENDIF 34260SYS"Wimp_SetExtent",Blck%!0,Blck%+44 34270IFredraw%THEN 34320SYS"Wimp_OpenWindow",,Blck% 34330ENDIF 34340ENDPROC 34410DEFPROCdraw_list(sid%,ntrs%,ptrs%(),sdata$(),flags%()) 34540LOCALfh%,m%,os_wl%,os_wt%,wk_rl%,wk_rt%,wk_rb%,tt%,tb%,r%,e%,cls%,xpos% 34560cls%=DIM(sdata$(),2) 34570SYS"Font_FindFont",,Font_Name$,192,192,0,0TOfh% 34580SYS"Font_ReadInfo",fh%TO,,fb%,,ft% 34590Font_Lh%=ft%-fb%+4 34600Blck%!0=Sublist%(sid%,1) 34610SYS"Wimp_RedrawWindow",,Blck%TOm% 34620REPEAT 34660IF(Blck%!36>Blck%!28)AND(Blck%!40>Blck%!32)THEN 34700os_wl%=(Blck%!4-Blck%!20) 34710os_wt%=(Blck%!16-Blck%!24) 34760wk_rl%=Blck%!28-os_wl% 34770wk_rt%=Blck%!40-os_wt% 34780wk_rb%=Blck%!32-os_wt% 34820tt%=INT(-wk_rt%/Font_Lh%)+1 34830tb%=INT(-wk_rb%/Font_Lh%)+1 34900FORr%=tt%TOtb% 34950p%=ptrs%(r%) 34960IFp%>0THEN 35000FORc%=1TOcls% 35010IF(flags%(p%,c%)AND&100)=&100THEN 35050xpos%=(flags%(p%,c%)AND&ffff0000)>>16 35060SYS"Wimp_SetFontColours",,0,(flags%(p%,c%)AND 15) 35070SYS"Font_Paint",fh%,sdata$(p%,c%),16,os_wl%+xpos%,os_wt%-r%*Font_Lh%-fb%-4 35080ENDIF 35090NEXTc% 35100ENDIF 35110NEXTr% 35120ENDIF 35130IFm%<>0THEN 35170SYS"Wimp_GetRectangle",,Blck%TOm% 35180ENDIF 35190UNTILm%=0 35200ENDPROC 35270DEFPROCget_applist 35420LOCALaline$,f1%,p%,offset%,app$,found%,r% 35460Objs%=0 35470Oflg%()=7 35480Optr%()=0 35490Odat$()="" 35500CASEEdit_Type$OF 35510WHEN"resources" 35550PROCget_filelisted("<choices$write>.Boot.PreDeskTop","AddApp") 35560WHEN"boot" 35600PROCget_filelisted("<choices$write>.Boot.Desktop","Filer_Boot") 35610WHEN"autorun" 35650PROCget_dirlisted("<Boot$ToBeTasks>") 35660WHEN"predesk" 35700PROCget_dirlisted("<Boot$ToBeLoaded>") 35710ENDCASE 35750Ontr%=Objs% 35760FORr%=1TOObjs% 35770Optr%(r%)=r% 35780Oflg%(r%,1)=Oflg%(r%,1)OR(24<<16)OR&100 35790Oflg%(r%,2)=Oflg%(r%,2)OR(200<<16)OR&100 35800CASEEdit_Type$OF 35810WHEN"boot" 35820Oflg%(r%,4)=Oflg%(r%,4)OR(512<<16)OR&100 35830WHEN"resources" 35840Oflg%(r%,4)=Oflg%(r%,4)OR(512<<16)OR&100 35850WHEN"autorun" 35860Oflg%(r%,4)=Oflg%(r%,4)OR(480<<16)OR&100 35870WHEN"predesk" 35880Oflg%(r%,4)=Oflg%(r%,4)OR(400<<16)OR&100 35890ENDCASE 35900NEXTr% 35910ENDPROC 35980DEFPROCget_filelisted(file$,com$) 36020LOCALf1%,aline$,p% 36040f1%=OPENIN(file$) 36050REPEAT 36060aline$=GET$#f1% 36070UNTIL(INSTR(aline$,"|Start")>0ANDINSTR(aline$,"Mars")>0ANDINSTR(aline$,"!Bootplus")>0ANDINSTR(aline$,Edit_Type$)>0)OREOF#f1% 36080IFNOTEOF#f1%THEN 36120REPEAT 36130aline$=GET$#f1% 36140IFINSTR(aline$,com$)=1THEN 36150p%=INSTR(aline$,".!") 36160IFp%>0THEN 36170Objs%+=1 36180Odat$(Objs%,1)=MID$(aline$,p%+1) 36190Odat$(Objs%,2)="App (reference)" 36200Odat$(Objs%,3)="2000" 36240p%=INSTR(aline$," ") 36250Odat$(Objs%,5)=MID$(aline$,p%+1) 36260SYS"OS_File",23,Odat$(Objs%,5)TOp% 36270IFp%=0THEN 36280Odat$(Objs%,4)="Original Missing" 36290Oflg%(Objs%,4)=11 36300ENDIF 36310PROCcheck_standard_entry 36320ENDIF 36330ENDIF 36340UNTILINSTR(aline$,"|End")>0OREOF#f1% 36350ENDIF 36360CLOSE#f1% 36370ENDPROC 36440DEFPROCget_dirlisted(dir$) 36480LOCALfile$,offset%,found%,l%,p%,l$,f%,a$,b$,c$,a%,c% 36500offset%=0 36510REPEAT 36520SYS"OS_GBPB",12,dir$,Buf1%,1,offset%,128,0TO,,,,offset% 36530IFoffset%<>-1AND Buf1%!20<>-1THEN 36540CASEBuf1%!20OF 36550WHEN&1000 36590Objs%+=1 36600Odat$(Objs%,1)=FNindirect(Buf1%+24) 36610Odat$(Objs%,2)="Directory" 36620Odat$(Objs%,3)="1000" 36630CASEEdit_Type$OF 36650ENDCASE 36660Odat$(Objs%,4)="" 36670Odat$(Objs%,5)=dir$+"."+Odat$(Objs%,1) 36680WHEN&2000 36720Objs%+=1 36730Odat$(Objs%,1)=FNindirect(Buf1%+24) 36740Odat$(Objs%,5)=dir$+"."+Odat$(Objs%,1) 36750SYS"OS_GBPB",10,dir$+"."+Odat$(Objs%,1),Buf1%,10,0,200,"!Sprites*"TO,,,found% 36760IFfound%=0THEN 36800SYS"OS_File",20,dir$+"."+Odat$(Objs%,1)+".!Run"TOf% 36810IFf%=0THEN 36850Odat$(Objs%,2)="App (full?)" 36860Odat$(Objs%,4)="No !run file" 36870Oflg%(Objs%,4)=11 36880ELSE 36920Odat$(Objs%,2)="App (alias)" 36930f%=OPENIN(dir$+"."+Odat$(Objs%,1)+".!Run") 36940l$=GET$#f% 36950CLOSE#f% 36960l$=MID$(l$,11) 36970SYS"OS_File",23,l$TOp% 36980IFp%=0THEN 36990Odat$(Objs%,4)="Original Missing" 37000Oflg%(Objs%,4)=11 37010ENDIF 37020ENDIF 37030ELSE 37070Odat$(Objs%,2)="App (full)" 37080ENDIF 37090Odat$(Objs%,3)="2000" 37100OTHERWISE 37140Objs%+=1 37150Odat$(Objs%,1)=FNindirect(Buf1%+24) 37160Odat$(Objs%,5)=dir$+"."+Odat$(Objs%,1) 37170SYS"OS_ConvertHex4",Buf1%!20,Buf2%,128TO,p% 37180?p%=13 37190Odat$(Objs%,3)=RIGHT$($Buf2%,3) 37200SYS"XOS_ReadVarVal","File$Type_"+Odat$(Objs%,3),Buf1%,128,0,3TO,,l% 37210IFl%=0THEN 37250Odat$(Objs%,2)="&"+Odat$(Objs%,3) 37260ELSE 37300Buf1%?l%=13 37310Odat$(Objs%,2)=$Buf1% 37320ENDIF 37330ENDCASE 37370IFOdat$(Objs%,4)=""THEN 37380c%=0 37390REPEAT 37400c%+=1 37410IF(Boot_Type$(c%,1)=Edit_Type$)AND((Boot_Type$(c%,2)=Odat$(Objs%,3))OR(Boot_Type$(c%,2)="*"))THEN 37420Odat$(Objs%,4)=Boot_Type$(c%,3) 37430ENDIF 37440UNTIL(c%=Boot_Types%)OR(Odat$(Objs%,4)<>"") 37450ENDIF 37460PROCcheck_standard_entry 37470ENDIF 37480UNTILoffset%=-1 37490ENDPROC 37570DEFPROCcheck_standard_entry 37610LOCALc% 37630FORc%=1TOStandards% 37640IF(Standard$(c%,1)=Edit_Type$)AND(Standard$(c%,2)=Odat$(Objs%,1))THEN 37680Oflg%(Objs%,1)=5 37690Oflg%(Objs%,2)=5 37700Oflg%(Objs%,3)=5 37710Oflg%(Objs%,4)=5 37720Oflg%(Objs%,5)=64 37730ENDIF 37740NEXTc% 37750ENDPROC 37820DEFPROCcheck_if_applied 37840LOCALk% 37860IFNOTSaved%THEN 37870PROCerror_message("EM24",Edit_Type$,"","ET3",&13,k%) 37880IFk%=1THEN 37920PROCapply_edit_changes 37930ENDIF 37940ENDIF 37950Saved%=TRUE 37960ENDPROC 38040DEFPROCapply_edit_changes 38080LOCALr% 38100FORr%=1TOOntr% 38110CASEOflg%(r%,5)OF 38120WHEN16 38160PROCmodify_boot(r%,"remove",FALSE) 38170WHEN32 38210PROCmodify_boot(r%,"insert",FALSE) 38220OTHERWISE 38260ENDCASE 38270NEXTr% 38280ENDPROC 38350DEFPROCmodify_boot(ntry%,mode$,nomess%) 38400LOCAL 38420CASEEdit_Type$OF 38430WHEN"autorun" 38440PROCmodify_boot_dir(ntry%,"<Boot$ToBeTasks>",mode$) 38450WHEN"resources" 38460PROCmodify_boot_file(Odat$(ntry%,5),mode$,nomess%) 38470WHEN"boot" 38480PROCmodify_boot_file(Odat$(ntry%,5),mode$,nomess%) 38490WHEN"predesk" 38500PROCmodify_boot_dir(ntry%,"<Boot$ToBeLoaded>",mode$) 38510ENDCASE 38520ENDPROC 38610DEFPROCmake_alias(pathname$) 38670LOCALf%,l% 38690SYS"OS_File",8,pathname$,0,0,0 38700SYS"OS_File",11,pathname$+".!Run",&FEB,0,0 38710SYS"OS_File",11,pathname$+".!Boot",&FEB,0,0 38720SYS"OS_File",11,pathname$+".!Help",&FFF,0,0 38770IFLEFT$(Source$,1)="<"ANDRIGHT$(Source$,1)=">"THEN 38780SYS"OS_ReadVarVal",MID$(Source$,2,LEN(Source$)-2),Buf1%,128,0,0TO,,l% 38790Buf1%?l%=13 38800Source$=$Buf1% 38810ENDIF 38850f%=OPENUP(pathname$+".!Run") 38860BPUT#f%,"Filer_Run "+Source$ 38870CLOSE#f% 38910f%=OPENUP(pathname$+".!Boot") 38920BPUT#f%,"IfThere "+Source$+".!Sprites Then IconSprites "+Source$+".!Sprites" 38930BPUT#f%,"IfThere "+Source$+".!Boot Then Filer_Run "+Source$+".!Boot" 38940CLOSE#f% 38980f%=OPENUP(pathname$+".!Help") 38990BPUT#f%,"Alias for application "+Application$ 39000BPUT#f%,"Which can be found at location "+Source$ 39010CLOSE#f% 39020ENDPROC 39090DEFPROCmodify_boot_dir(ntry%,dest$,mode$) 39130CASEmode$OF 39140WHEN"insert" 39150IFOdat$(ntry%,3)="2000"THEN 39190Source$=Odat$(ntry%,5) 39200Application$=Odat$(ntry%,1) 39210PROCmake_alias(dest$+"."+Odat$(ntry%,1)) 39220ELSE 39260IFLEFT$(Odat$(ntry%,5),25)="<Wimp$ScrapDir>.Bootplus."THEN 39310OSCLI("*COPY "+Odat$(ntry%,5)+" "+dest$+"."+Odat$(ntry%,1)+" ~V~P~CFD") 39320ELSE 39360OSCLI("*COPY "+Odat$(ntry%,5)+" "+dest$+"."+Odat$(ntry%,1)+" ~V~P~C") 39370ENDIF 39380ENDIF 39390WHEN"remove" 39430OSCLI("*WIPE "+Odat$(ntry%,5)+" ~VF~CR") 39440ENDCASE 39490*ACCESS <Bootplus$dir>.Resources.changelist WR/R 39500f%=OPENIN("<Bootplus$dir>.Resources.changelist") 39510g%=OPENOUT("<Bootplus$dir>.Resources.changenew") 39520X%=10 39530REPEAT 39540a$=GET$#f% 39550X%+=4 39560IFmode$="insert"ORINSTR(a$,Odat$(ntry%,5),1)=0THEN 39570BPUT#g%,a$ 39580ENDIF 39590UNTILEOF#f% 39600IFmode$="insert"THEN 39610BPUT#g%,"*WIPE "+dest$+"."+Odat$(ntry%,1)+" ~VF~CR" 39620ENDIF 39630CLOSE#f% 39640CLOSE#g% 39650*WIPE <Bootplus$dir>.Resources.changelist ~C~V 39660*RENAME <Bootplus$dir>.Resources.changenew <Bootplus$dir>.Resources.changelist 39670*SETTYPE <Bootplus$dir>.Resources.changelist &FEB 39680*ACCESS <Bootplus$dir>.Resources.changelist L/ 39690ENDPROC 39750DEFPROCmodify_boot_file(app$,mode$,nomess%) 39830LOCALf1%,f2%,aline$,bootname$,ftyp%,oldname$,tempname$ 39840LOCALfound%,done%,ftyp%,bootname$,tempname$,oldname$,f1%,f2%,aline$ 39880found%=FALSE 39890done%=FALSE 39900start%=FALSE 39910CASEEdit_Type$OF 39920WHEN"resources" 39930ftyp%=&feb 39940bootname$="<choices$write>.boot.PreDesktop" 39950tempname$="<choices$write>.boot.PreDesknew" 39960oldname$="<choices$write>.boot.PreDeskold" 39970WHEN"boot" 39980ftyp%=&fea 39990bootname$="<choices$write>.boot.Desktop" 40000tempname$="<choices$write>.boot.Desktopnew" 40010oldname$="<choices$write>.boot.Desktopold" 40020ENDCASE 40060SYS"OS_File",6,tempname$ 40070SYS"OS_File",11,tempname$,ftyp% 40080f1%=OPENUP(tempname$) 40090f2%=OPENIN(bootname$) 40100REPEAT 40110aline$=GET$#f2% 40120IFNOTstart%THEN 40160start%=(INSTR(aline$,"|Start")>0ANDINSTR(aline$,"Mars")>0ANDINSTR(aline$,"!Bootplus")>0ANDINSTR(aline$,Edit_Type$)>0) 40170BPUT#f1%,aline$ 40180ELSE 40220CASEmode$OF 40230WHEN"remove" 40240IF(app$="all"ANDINSTR(aline$,".!")>0AND start%)OR(INSTR(aline$,app$)>0AND start%)THEN 40280found%=TRUE 40290done%=TRUE 40300ELSE 40340BPUT#f1%,aline$ 40350ENDIF 40360WHEN"insert" 40370IF(INSTR(aline$,app$)>0)AND start%THEN 40380found%=TRUE 40390IFNOTnomess%THENPROCerror_message("EM25",app$,"","",0,K%) 40400ENDIF 40410IF(INSTR(aline$,"|End")>0)AND start%AND(NOTfound%)THEN 40450CASEEdit_Type$OF 40460WHEN"resources" 40470BPUT#f1%,"AddApp "+app$ 40480WHEN"boot" 40490BPUT#f1%,"Filer_Boot "+app$ 40500ENDCASE 40510done%=TRUE 40520ENDIF 40530BPUT#f1%,aline$ 40540ENDCASE 40550ENDIF 40560UNTILEOF#f2% 40570IF(NOTstart%)AND(mode$="insert")THEN 40610CASEEdit_Type$OF 40620WHEN"resources" 40630BPUT#f1%,"" 40640BPUT#f1%,"|Start Mars !Bootplus "+Bootplus_Version$+" resources" 40650BPUT#f1%,"| ----------------------" 40660BPUT#f1%,"|" 40670BPUT#f1%,"| resources" 40680BPUT#f1%,"|" 40690BPUT#f1%,"| ----------------------" 40700BPUT#f1%,"| Insert Resources apps directory additions" 40710BPUT#f1%,"| INserted by Bootplus" 40720BPUT#f1%,"|" 40730BPUT#f1%,"AddApp "+app$ 40740BPUT#f1%,"|End" 40750WHEN"boot" 40760BPUT#f1%,"" 40770BPUT#f1%,"|Start Mars !Bootplus "+Bootplus_Version$+" boot" 40780BPUT#f1%,"| ----------------------" 40790BPUT#f1%,"|" 40800BPUT#f1%,"| boot" 40810BPUT#f1%,"|" 40820BPUT#f1%,"| ----------------------" 40830BPUT#f1%,"| Booted applications" 40840BPUT#f1%,"| Inserted by Bootplus" 40850BPUT#f1%,"|" 40860BPUT#f1%,"Filer_Boot "+app$ 40870BPUT#f1%,"|End" 40880ENDCASE 40890done%=TRUE 40900ENDIF 40910CLOSE#f1% 40920CLOSE#f2% 40960IFdone%THEN 40970SYS"OS_File",6,oldname$ 40980SYS"OS_FSControl",25,bootname$,oldname$ 40990SYS"OS_FSControl",25,tempname$,bootname$ 41000ELSE 41040SYS"OS_File",6,tempname$ 41050ENDIF 41060ENDPROC 41130DEFPROCclear_edits 41170LOCALf1%,f2%,a$,f% 41220SYS"OS_File",6,"<choices$write>.boot.PreDeskNew" 41230SYS"OS_File",11,"<choices$write>.boot.PreDeskNew",&FEB 41240f1%=OPENUP("<choices$write>.boot.PreDeskNew") 41250f2%=OPENIN("<choices$write>.boot.PreDesktop") 41260REPEAT 41270a$=GET$#f2% 41280IF(INSTR(a$,"|Start")>0)AND(INSTR(a$,"Mars")>0)AND(INSTR(a$,"!Bootplus")>0)THEN 41281REPEAT 41300a$=GET$#f2% 41310UNTILa$="|End" 41320ELSE 41330BPUT#f1%,a$ 41340ENDIF 41350UNTILEOF#f2% 41360CLOSE#f1% 41370CLOSE#f2% 41380SYS"OS_File",6,"<choices$write>.boot.PreDesktop" 41390SYS"OS_FSControl",25,"<choices$write>.boot.PreDeskNew","<choices$write>.boot.PreDesktop" 41430SYS"OS_File",6,"<choices$write>.boot.DeskNew" 41440SYS"OS_File",11,"<choices$write>.boot.DeskNew",&FEA 41450f1%=OPENUP("<choices$write>.boot.DeskNew") 41460f2%=OPENIN("<choices$write>.boot.Desktop") 41470REPEAT 41480a$=GET$#f2% 41490IFINSTR(a$,"|Start")>0ANDINSTR(a$,"Mars")>0ANDINSTR(a$,"!Bootplus")>0THEN 41500REPEAT 41510a$=GET$#f2% 41520UNTILa$="|End" 41530ELSE 41540BPUT#f1%,a$ 41550ENDIF 41560UNTILEOF#f2% 41570CLOSE#f1% 41580CLOSE#f2% 41590SYS"OS_File",6,"<choices$write>.boot.Desktop" 41600SYS"OS_FSControl",25,"<choices$write>.boot.DeskNew","<choices$write>.boot.Desktop" 41640*ACCESS <Bootplus$dir>.Resources.changelist WR/R 41650*OBEY <Bootplus$dir>.Resources.changelist 41660*WIPE <Bootplus$dir>.Resources.changelist ~C~V 41670f%=OPENOUT("<Bootplus$Dir>.Resources.changelist") 41680BPUT#f%,"| files added to predesk and tasks" 41690CLOSE#f% 41700*SETTYPE <Bootplus$dir>.Resources.changelist &FEB 41710*ACCESS <Bootplus$dir>.Resources.changelist L/ 41750ENDPROC 41820DEFFNget_task_id(tnm$) 41860LOCALa%,tid%,ntn$ 41880a%=0 41890tid%=0 41900ntn$="" 41910REPEAT 41920SYS"TaskManager_EnumerateTasks",a%,Buf1%,16TOa% 41930IF(a%>0)AND((Buf1%!12AND 1)=0)AND(tnm$=FNindirect(Buf1%!4))THEN 41970tid%=Buf1%!0 41980a%=-1 41990ENDIF 42000UNTILa%<0 42010=tid% 42080DEFFNindirect(pntr%) 42140LOCALansw$ 42160SYS"OS_WriteN",pntr%,0TOansw$ 42170=answ$ 42240DEFFNget_message(token$,p1$,p2$,p3$,p4$) 42280LOCALs% 42300SYS"MessageTrans_Lookup",Tlms%,token$,Blck%,128,p1$,p2$,p3$,p4$TO,,,s% 42310Blck%?s%=13 42320=$Blck% 42390DEFPROCerror_message(message$,p1$,p2$,etitle$,flags%,RETURNkeyc%) 42480LOCALs%,t$,e$ 42500e$=FNget_message(message$,p1$,p2$,"","") 42510IFetitle$=""THENetitle$="ET4" 42520t$=FNget_message(etitle$,"","","","") 42530$(Blck%+4)=e$ 42540Blck%!0=0 42550SYS"Wimp_ReportError",Blck%,flags%,t$TO,keyc% 42560ENDPROC 42640DATA 9 42650DATA "predesk","FEB","EW1" 42660DATA "predesk","FF8","EW2" 42670DATA "predesk","FF9","EW3" 42680DATA "predesk","FFA","EW4" 42690DATA "predesk","FFB","EW5" 42700DATA "predesk","FFC","EW2" 42710DATA "predesk","1000","EW6" 42720DATA "predesk","*","EW7" 42730DATA "autorun","*","EW8" 42770DATA 9 42780DATA "predesk","ARPlayer" 42790DATA "predesk","BandLimit" 42800DATA "predesk","SetUpNet" 42810DATA "predesk","Configure" 42820DATA "autorun","Configure" 42830DATA "autorun","~CDReinit" 42840DATA "autorun","!zzzzpass" 42850DATA "autorun","!Bootplus" 42860DATA "boot","!Bootplus" 42900DATA Su,Mo,Tu,We,Th,Fr,Sa
�><Bootplus$dir>.!Runimage ��Tlms%16 ��Tloi%24 �Buf1%128 �Buf2%512 �Blck%512 &�Odat$(50,5) 0�Oflg%(50,5) ��Optr%(50) ��Rusr$(20) ��Rdir$(20) ��Rtim$(20) ��Boot_Type$(20,3) ��Standard$(20,2) ��Weekdays$(7) ��Dirdat$(50) ��Dirflg%(50) ��Sublist%(3,6) >�Tdir$(100,1) H�Typt%(100) R�Tnpt%(100) \�Tflg%(100,1) f MP%=20 p�toolbox_values z�initialise �Quit%=� ���4:�$;" at line ";�:� �� �1�(Sequence$="LOGON")�(Sequence$="PROMPTING")� �(ș"Wimp_PollIdle",0,Blck%,25�reason% �� �!ș"Wimp_Poll",1,Blck%�reason% �� ��do � �Quit% �&ș"Wimp_CloseDown",Thdl%,&48534154 �� 8��toolbox_values �E_ABS%=&82881 �E_TOAC%=&44ec1 �E_WATBS%=&82880 �E_WHBH%=&82890 �E_WFVC%=&82885 �E_DDE%=&82888 �E_MSM%=&828C2 �E_MATBS%=&828c0 �E_MHBH%=&828c1 �E_MS%=&828c3 �E_SSVC%=&8288E �E_SSATBS%=&8288f E_PUATBS%=&8288b E_NRVC%=&8288d 2E_UQA%=1 ZM_D_SS%=644 dM_D_SSP%=640 nM_D_ST%=642 xM_RB_GS%=389 �T_TOMO%=&44ec6 �T_TSO%=&44ec3 �T_TTLU%=&44EFB �T_THO%=&44ec4 �XBIT%=&20000 �� 6��initialise ^�exists%,a% r�init_globals �a%=0 � b%=10 �Zzzzpass_Status%=0 �Zzzzchk_Status%=0 �Zzzzpass_Informed%=� �� �1ș"TaskManager_EnumerateTasks",a%,Buf1%,16�a% �#�indirect(Buf1%!4)="zzzzpass"� �Zzzzpass_Status%=3 �Zzzzpass_Handle%=Buf1%!0 �� "�indirect(Buf1%!4)="zzzzchk"� Zzzzchk_Status%=3 Zzzzchk_Handle%=Buf1%!0 &� 0 �a%<0 X�init_files � Buf1%!0=0 � Buf2%!0=0 �Vș"Toolbox_Initialise",0,310,Buf2%,Buf1%,"<Bootplus$Dir>",Tlms%,Tloi%�,Thdl%,sprt% �&�Auto_Prompt%� Passwords_Enabled%� �Sequence$="LOGON" �� �Sequence$="NORMAL" �� *Owner$=�get_message("OWN","","","","") 4�read_filedefs >� ���init_globals � �a$,a%,b% �Bootplus_Version$="3.1" �Started%=� �Logged_User$="" �Logon_ID%=-1 �Ownerpass_ID%=-1 �Objs%=0 �Ntrs%=0 Rusers%=0 Rusr%=1 Password_ID%=0 $Passmenu_ID%=0 ./Optfile$="<bootplus$dir>.Resources.Options" 80T_Optfile$="<bootplus$dir>.Resources.Optxxx" B1Accessfile$="<bootplus$dir>.Resources.Access" L6T_Accessfile$="<bootplus$dir>.Resources.Accessxxx" V/Timesfile$="<bootplus$dir>.Resources.Times" `4T_Timesfile$="<bootplus$dir>.Resources.Timesxxx" j1Passfile$="<bootplus$dir>.Resources.password" t4Thieffile$="<Bootplus$Dir>.Resources.killriscpc" ~/Logfile$="<Bootplus$dir>.Resources.logfile" �3Ologfile$="<Bootplus$dir>.Resources.oldlogfile" �/Ownerfile$="<Bootplus$dir>.Resources.owner" �Autoclose%=� �Edit_Type$="" �Alias_WH%=0 �Font_Lh%=44 � Font_Name$="Homerton.Medium" �Editors%=0 �Tdirs%=0 �Tydir%=0 �Tndir%=0 �Dustbin_ID%=0 Drag_Reason$="" Drag_Object%=0 Drag_Into%=0 Saved%=� (Sequence$="BOOT" 2� x��read_filedefs ��Boot_Types% ��a%=1�Boot_Types% ��Boot_Type$(a%,1) ��Boot_Type$(a%,2) ��a$ �1Boot_Type$(a%,3)=�get_message(a$,"","","","") ��a% �Standards% �a%=1�Standards% �b%=1�2 "�Standard$(a%,b%) ,�b% 6�a% J�a%=1�7 T�Weekdays$(a%) ^�a% h� ���init_files ��f%,id% �j�get_options(a%,a%,a%,a%,a%,a%,Guest_Logins%,Y%,Full_Owner_Access%,Y%,Passwords_Enabled%,Auto_Prompt%) &�get_useraccess N�get_usertimes v0ș"OS_File",20,"<Wimp$ScrapDir>.Bootplus"�f% � �f%=0� �"*CDIR <Wimp$ScrapDir>.Bootplus �� �:ș"XOS_FSControl",27,"<Wimp$ScrapDir>.Bootplus.*",,&18 �� ���do !Ȏreason%� *�0 4ȎSequence$� >�"LOGON" f.șT_TSO%,0,Password_ID%,0,0,Passmenu_ID%,7 pSequence$="PROMPTING" z�"PROMPTING" ��lock_mouse(�) �� ��1 ��redraw_window ��2 ��open_window ��6 ��mouse_click ��7 ��drag_stopped �10 �scroll_request �17,18,19 $�wimp_messages . �&200 8�toolbox_events B� L� ���redraw_window �ȎBlck%!0� ��Sublist%(1,2) ��draw_main(1,2) ��Sublist%(1,1) �draw_sub(1,2,�,0) (�Sublist%(2,2) P�draw_main(2,2) Z�Sublist%(2,1) ��draw_sub(2,2,�,0) ��Sublist%(3,1) ��draw_sub(3,2,�,0) �� �� ��open_window 6�bh% Jbh%=Blck%!28 TȎBlck%!0� ^�Sublist%(1,2) �Blck%!28=Sublist%(1,1) �ș"Wimp_OpenWindow",,Blck% ��draw_sub(1,3,�,bh%) ��Sublist%(1,1) �ș"Wimp_OpenWindow",,Blck% ��Sublist%(2,2) �Blck%!28=Sublist%(2,1) ș"Wimp_OpenWindow",,Blck% �draw_sub(2,3,�,bh%) �draw_sub(3,3,�,bh%) &�Sublist%(2,1) Nș"Wimp_OpenWindow",,Blck% X�Sublist%(3,1) �ș"Wimp_OpenWindow",,Blck% �� �� ���mouse_click �wk_my%,os_wy%,tr%,p% Ȏ�� )�(Blck%!8=4)�(Blck%!12=Sublist%(1,1)) H�bootlist_clicked R)�(Blck%!8=4)�(Blck%!12=Sublist%(2,1)) zE�dirlist_clicked("Y",Sublist%(2,1),Tydirs%,Typt%(),Sublist%(3,1)) �)�(Blck%!8=4)�(Blck%!12=Sublist%(3,1)) �E�dirlist_clicked("N",Sublist%(3,1),Tndirs%,Tnpt%(),Sublist%(2,1)) �� �� ��bootlist_clicked .!�os_mx%,os_my%,wk_my%,tr%,ot$ Bos_mx%=Blck%!0 Los_my%=Blck%!4 tBlck%!0=Sublist%(1,1) ~"ș"Wimp_GetWindowState",,Blck% �%wk_my%=os_my%-(Blck%!16-Blck%!24) �tr%=�(-wk_my%/Font_Lh%)+1 ��tr%<=Objs%� �p%=Optr%(tr%) ��(Oflg%(p%,5)� 64)=0� �ȎOdat$(p%,3)� �"1000" 'ot$=�get_message("DM1","","","","") �"2000" 'ot$=�get_message("DM2","","","","") ( 20ot$=�get_message("DM3",Odat$(p%,3),"","","") <� F'Buf2%!0=os_mx%-16:Buf2%!4=os_my%-16 P(Buf2%!8=os_mx%+18:Buf2%!12=os_my%+18 Z(ș"DragASprite_Start",&5,1,ot$,Buf2% dDrag_Reason$="Delete" nDrag_Object%=tr% x� �5�Odat$(p%,1)="!Bootplus"�Odat$(p%,1)="!zzzzpass"� �'�error_message("EM1","","","",0,K%) �� �'�error_message("EM2","","","",0,K%) �� �� �� �� ,2��dirlist_clicked(fr$,fid%,frct%,frpt%(),tid%) T �os_mx%,os_my%,wk_my%,tr%,p% hos_mx%=Blck%!0 ros_my%=Blck%!4 �Blck%!0=fid% �"ș"Wimp_GetWindowState",,Blck% �%wk_my%=os_my%-(Blck%!16-Blck%!24) �&Drag_Object%=�(-wk_my%/Font_Lh%)+1 ��Drag_Object%<=frct%� �p%=frpt%(Drag_Object%) �4�((Tflg%(p%,1)�&40)=&40)�(Rusr$(Rusr%)<>Owner$)� '�error_message("EM3","","","",0,K%) &� NDrag_Reason$="Move" XDrag_From$=fr$ bDrag_Into%=tid% l'Buf2%!0=os_mx%-16:Buf2%!4=os_my%-16 v(Buf2%!8=os_mx%+18:Buf2%!12=os_my%+18 �0ș"DragASprite_Start",&5,1,"directory",Buf2% �� �� �� ���drag_stopped "ș"Wimp_GetPointerInfo",,Blck% Ȏ�� 3�(Blck%!16=Dustbin_ID%)�(Drag_Reason$="Delete") H�drag_stopped_bin R0�(Blck%!12=Drag_Into%)�(Drag_Reason$="Move") z�Drag_From$="Y"� �6�drag_stopped_dir(Tydirs%,Typt%(),Tndirs%,Tnpt%()) �� �6�drag_stopped_dir(Tndirs%,Tnpt%(),Tydirs%,Typt%()) �� �Saved%=� �set_list_extent(2,�) �draw_sub(2,2,�,0) $�set_list_extent(3,�) .�draw_sub(3,2,�,0) 8� Bș"DragASprite_Stop" LDrag_Reason$="" V� ���drag_stopped_bin ��p% �p%=Optr%(Drag_Object%) �Oflg%(p%,5)=16 ��p%=Drag_Object%�Objs% �Optr%(p%)=Optr%(p%+1) �p% Objs%-=1 Saved%=� <�set_list_extent(1,�) F�draw_sub(1,2,�,0) P� �3��drag_stopped_dir(�frc%,�frp%(),�toc%,�top%()) � �p%,a% �p%=frp%(Drag_Object%) �toc%+=1 �a%=toc% �ȕ(top%(a%-1)>p%)�(a%>1) �top%(a%)=top%(a%-1) a%-=1 � top%(a%)=p% @frc%-=1 J�Drag_Object%<=frc%� T�a%=Drag_Object%�frc% ^frp%(a%)=frp%(a%+1) h�a% r� |frp%(frc%+1)=0 �� ���scroll_request ��r%,bh% bh%=Blck%!28 ȎBlck%!0� �Sublist%(1,1) N'r%=�((Blck%!16-Blck%!8)/Font_Lh%)-1 XȎBlck%!36� b�-2 lBlck%!24-=Font_Lh%*r% v�-1 �Blck%!24-=Font_Lh% ��1 �Blck%!24+=Font_Lh% ��2 �Blck%!24+=Font_Lh%*r% �� �ș"Wimp_OpenWindow",,Blck% ��Sublist%(2,1) ��Sublist%(2,2) ȎBlck%!36� �-2 *Blck%!24-=128 4�-1 >Blck%!24-=16 H�1 RBlck%!24+=16 \�2 fBlck%!24+=128 p� zș"Wimp_OpenWindow",,Blck% ��draw_sub(2,3,�,bh%) ��draw_sub(3,3,�,bh%) �� �� ���toolbox_events Event_Size%=Blck%!0 Event_Reference%=Blck%!4 $Event_Code%=Blck%!8 .Event_Flags%=Blck%!12 8Event_Block%=Blck%!20 `?�callers(0,Ancestor_ID%,Ancestor_Name$,Ancestor_Component%) j9�callers(8,Parent_ID%,Parent_Name$,Parent_Component%) t4�callers(16,Self_ID%,Self_Name$,Self_Component%) �ȎSelf_Name$� ��"Alias" ��handle_alias ��"Automenu" ��handle_automenu ��"Ibarmenu" ��handle_ibarmenu ��"Iconbar" ��handle_iconbar �"Mainlist" �handle_mainlist �"Maintenance" �handle_maintenance (�"Options" 2�handle_options <�"Nodir" F�handle_nodir P�"Passmenu" Z�handle_passmenu d�"Password" n�handle_password x�"Sublist" ��handle_sublist ��"Thieftrap" ��handle_thieftrap ��"Useraccess" ��handle_useraccess � �"Yesdir" ��handle_yesdir � �"Wmi" ��handle_wmi �� �� ,��wimp_messages T�state%,a%,al%,dur%,b% hȎBlck%!16� r�0 |Quit%=� ��1 �Source$=�indirect(Blck%+44) �J�(Blck%!20=Sublist%(1,1))�(Source$="Pinboard")�(Edit_Type$="autorun")� �Blck%!12=Blck%!8 �Blck%!16=2 Blck%!36=128 3$(Blck%+44)="<Wimp$ScrapDir>.Bootplus.Pinboard" )ș"Wimp_SendMessage",17,Blck%,Blck%!4 &� 0�2 Xpath$=�indirect(Blck%+44) b�Application$="!Thieftrap"� ��make_thieftrap(path$) �� ��make_alias(path$) �� ��3 �Source$=�indirect(Blck%+44) !ȎBlck%!20� !�Alias_WH% !�dragged_to_alias ! �Sublist%(1,1) !*�dragged_to_edit !4� !>�&400C2 !fȎ�indirect(Blck%+28)� !p�"zzzzpass" !z�Passwords_Enabled%� !�Zzzzpass_Status%=3 !�Zzzzpass_Handle%=Blck%!4 !��Logged_User$<>""� !�,�user_times(Logged_User$,al%,dur%,a%,b%) !��inform_zzzzpass(dur%) !�� !�� ".�pause_logins "8�remove_logins "B� "L�"zzzzchk" "VZzzzchk_Status%=3 "`Zzzzchk_Handle%=Blck%!4 "j� "t�&400c4 "�Started%=� "��&808c0 "��Blck%!4=Zzzzpass_Handle%� "�Iș"Wimp_TransferBlock",Zzzzpass_Handle%,Blck%!24,Thdl%,Buf1%,Blck%!20 "� Ȏ!Buf1%� "��1 #�login_user($(Buf1%+4),�) #(/Blck%!0=32:Blck%!12=Blck%!8:Blck%!16=&808c0 #2Blck%!20=4:Blck%!24=Buf2% #<!Buf2%=2 #F2ș"Wimp_SendMessage",17,Blck%,Zzzzpass_Handle% #P�Sequence$="LOGON"� #xSequence$="NORMAL" #�� #��2 #�Quit%=Autoclose% #��4 #�Logged_User$="" #�� $� $� $� $^��dragged_to_alias $��Blck%!40<>&2000� $�6�error_message("EM4",Source$,�~(Blck%!40),"",0,K%) $�� $�a%=�(Source$)-1 $��:a%-=1:��Source$,a%,1)="." $�Application$=�Source$,a%+1) $�1șT_TOMO%,0,Alias_ID%,M_D_SSP%,0,Application$ %0șT_TOMO%,0,Alias_ID%,M_D_ST%,0,Application$ %� %&� %l��dragged_to_edit %�$�a%,p%,a$,b$,c$,leaf$,duplicate% %�Ȏ�� %�*�(Blck%!40<>&2000)�(Edit_Type$="boot") %�,�error_message("EM5",Source$,"","",0,K%) %�/�(Blck%!40<>&2000)�(Edit_Type$="resources") %�,�error_message("EM6",Source$,"","",0,K%) %� &a%=�(Source$)-1 &�:a%-=1:��Source$,a%,1)="." &leaf$=�Source$,a%+1) & duplicate%=� &*�a%=1�Objs% &4�leaf$=Odat$(Optr%(a%),1)� &>duplicate%=� &H p%=a% &R� &\�a% &f�duplicate%� &��leaf$="Pinboard"� &�3Odat$(p%,5)="<Wimp$ScrapDir>.Bootplus.Pinboard" &��a%=1�4 &�,Oflg%(p%,a%)=(Oflg%(p%,a%)�&FFFFFFF0)�13 &��a% &�Oflg%(p%,5)=32 &�Saved%=� &�� '*�error_message("EM7",leaf$,"","",0,K%) '$� '.� 'VSaved%=� '`Ontr%+=1 'jObjs%+=1 'tOptr%(Objs%)=Ontr% '~Odat$(Ontr%,1)=leaf$ '�ȎBlck%!40� '� �&2000 '�ȎEdit_Type$� '��"autorun" '�2Odat$(Ontr%,2)=�get_message("DM4","","","","") '��"boot" '�2Odat$(Ontr%,2)=�get_message("DM5","","","","") '��"resources" '�2Odat$(Ontr%,2)=�get_message("DM5","","","","") (�"predesk" ( 2Odat$(Ontr%,2)=�get_message("DM6","","","","") (� (Odat$(Ontr%,3)="2000" (( �&1000 (P2Odat$(Ontr%,2)=�get_message("DM1","","","","") (ZOdat$(Ontr%,3)="1000" (d (n-ș"OS_ConvertHex4",Blck%!40,Buf2%,128�,p% (x ?p%=13 (��Buf2%?0=48� (�Odat$(Ontr%,3)=�$Buf2%,3) (�� (�Odat$(Ontr%,3)=$Buf2% (�� (�Eș"XOS_ReadVarVal","File$Type_"+Odat$(Ontr%,3),Buf1%,128,0,3�,,l% (� �l%=0� (�%Odat$(Ontr%,2)="&"+Odat$(Ontr%,3) (�� )Buf1%?l%=13 )"Odat$(Ontr%,2)=$Buf1% ),� )6� )^Odat$(Ontr%,4)="" )hc%=0 )r� )| c%+=1 )�^�(Boot_Type$(c%,1)=Edit_Type$)�((Boot_Type$(c%,2)=Odat$(Ontr%,3))�(Boot_Type$(c%,2)="*"))� )�#Odat$(Ontr%,4)=Boot_Type$(c%,3) )�� )�*�(c%=Boot_Types%)�(Odat$(Ontr%,4)<>"") )��Source$="Pinboard"� )�6Odat$(Ontr%,5)="<Wimp$ScrapDir>.Bootplus.Pinboard" )�� *Odat$(Ontr%,5)=Source$ *� *#Oflg%(Ontr%,1)=(24<<16)�&100�13 *&$Oflg%(Ontr%,2)=(200<<16)�&100�13 *0Oflg%(Ontr%,3)=8 *:ȎEdit_Type$� *D�"boot" *N$Oflg%(Ontr%,4)=(512<<16)�&100�13 *X�"resources" *b$Oflg%(Ontr%,4)=(512<<16)�&100�13 *l�"autorun" *v$Oflg%(Ontr%,4)=(480<<16)�&100�13 *��"predesk" *�$Oflg%(Ontr%,4)=(400<<16)�&100�13 *�� *�Oflg%(Ontr%,5)=32 *�� *�� *��set_list_extent(1,�) *��draw_sub(1,2,�,0) *�� +4'��callers(offset%,�id%,�id$,�cpnt%) +� �ptr% +�ptr%=Tloi%+offset% +� id%=!ptr% +��id%<>0� +�/ș"Toolbox_GetTemplateName",0,id%,Buf1%,128 +�id$=�indirect(Buf1%) +�� +� id$="" +�� +�cpnt%=ptr%!4 +�� ,B��handle_iconbar ,L� ,���handle_alias ,��state%,bo%,p% ,�ȎEvent_Code%� ,��E_TOAC% -Alias_ID%=Self_ID% - %șT_TOMO%,0,Alias_ID%,0�Alias_WH% - �E_WATBS% -<Application$="" -F+șT_TOMO%,0,Alias_ID%,640,0,"!Bootplus" -P(șT_TOMO%,0,Alias_ID%,642,0,"<none>" -Z�E_DDE% -��Application$<>""� -�Buf2%!0=64 -�+Buf2%!12=0:Buf2%!16=1:Buf2%!20=Blck%!16 -�4Buf2%!28=Blck%!24:Buf2%!32=Blck%!28:Buf2%!36=128 -�+Buf2%!40=&2000:$(Buf2%+44)=Application$ -�*ș"Wimp_SendMessage",17,Buf2%,Blck%!16 -�� -�� -�� .6��handle_automenu .^ȎEvent_Code%� .h �E_MS% .��check_if_applied .��Self_Component%=&d� .�a%=�get_task_id("Pinboard") .� �a%=0� /'�error_message("EM8","","","",0,K%) /� /DBuf2%!0=64 /N$Buf2%!12=0:Buf2%!16=1:Buf2%!20=0 /X&Buf2%!28=0:Buf2%!32=0:Buf2%!36=128 /b(Buf2%!40=&feb:$(Buf2%+44)="Pinboard" /l$ș"Wimp_SendMessage",17,Buf2%,a% /v� /�� /�ȎSelf_Component%� /��&9 /�Edit_Type$="autorun" /��&b 0Edit_Type$="boot" 0�&5 0>Edit_Type$="resources" 0H�&c 0pEdit_Type$="predesk" 0z� 0��get_applist 0��draw_main(1,0) 0�� 0�� 0�� 0���handle_ibarmenu 1ȎEvent_Code%� 1$�E_TOAC% 1LIbarmenu_ID%=Self_ID% 1V �E_MATBS% 1~Ȏ�� 1��(�Passwords_Enabled%) 1�'�ibarmenu_greys(1,0,0,0,"Bootplus") 1�0�((Logged_User$=Owner$)� Passwords_Enabled%) 1�-�ibarmenu_greys(0,0,0,0,"Logged : OWNER") 1�,�((Logged_User$="")� Passwords_Enabled%) 2'�ibarmenu_greys(0,1,1,1,"Bootplus") 22�((Logged_User$="LOGOFF")� Passwords_Enabled%) 2F)�ibarmenu_greys(0,1,1,1,"Logged Off") 2P 2x5�ibarmenu_greys(0,1,1,0,"Logged : "+Logged_User$) 2�� 2��E_UQA% 2�Quit%=� 2�� 2�� 3��handle_mainlist 3"�K% 36ȎEvent_Code%� 3@�E_TOAC% 3hMainlist_ID%=Self_ID% 3r,șT_TOMO%,0,Mainlist_ID%,0�Sublist%(1,2) 3|+șT_TOMO%,0,Mainlist_ID%,68,5,Buf2%,128 3�Dustbin_ID%=!Buf2% 3��E_ABS% 3�ȎSelf_Component%� 3��3 3��get_applist 3��set_list_extent(1,�) 3��draw_sub(1,2,�,0) 4�4 40�apply_edit_changes 4:Saved%=� 4D� 4N�E_WHBH% 4vșT_THO%,0,Sublist_ID% 4��check_if_applied 4�� 4�� 4���handle_maintenance 5�bt% 5ȎEvent_Code%� 5 �E_MATBS% 5H�Passwords_Enabled%� 5pșT_TOMO%,0,Self_ID%,2,0,0 5zșT_TOMO%,0,Self_ID%,2,1,0 5�șT_TOMO%,0,Self_ID%,2,&c,0 5�șT_TOMO%,0,Self_ID%,2,&d,0 5�� 5�șT_TOMO%,0,Self_ID%,2,0,1 5�șT_TOMO%,0,Self_ID%,2,1,1 5�șT_TOMO%,0,Self_ID%,2,&c,1 5�șT_TOMO%,0,Self_ID%,2,&d,1 5�� 5� �E_MS% 6ȎSelf_Component%� 6$�0 6Lș"OS_File",6,Ologfile$ 6V*ș"OS_FSControl",25,Logfile$,Ologfile$ 6` ș"OS_File",11,Logfile$,&FFF 6j�1 6��("*Filer_Run "+Logfile$) 6��&d 6��kill_thieftraps 6��&11 6��boot_install("CHECK",bt%) 7 �bt%� 7((*Filer_Run <Boot$Dir>.Utils.DeskrunO 72� 7P'*Filer_Run <Boot$dir>.Utils.Deskrun 7Z� 7d� 7n� 7x� 7���handle_nodir 7�ȎEvent_Code%� 7��E_TOAC% 8Nodir_ID%=Self_ID% 8")șT_TOMO%,0,Nodir_ID%,0�Sublist%(3,1) 8,Sublist%(3,3)=352 86Sublist%(3,4)=-280 8@Sublist%(3,5)=244 8JSublist%(3,6)=-232 8T� 8^� 8���handle_options 8�,�a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%,bt% 8�ȎEvent_Code%� 8��E_TOAC% 9Options_ID%=Self_ID% 9 �E_WATBS% 9D5�get_options(a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%) 9N'șT_TOMO%,0,Options_ID%,512,3,�(a%) 9X'șT_TOMO%,0,Options_ID%,512,1,�(b%) 9b'șT_TOMO%,0,Options_ID%,512,2,�(c%) 9l%șT_TOMO%,0,Options_ID%,196,9,-d% 9v&șT_TOMO%,0,Options_ID%,196,&a,-e% 9�&șT_TOMO%,0,Options_ID%,196,&c,-f% 9�&șT_TOMO%,0,Options_ID%,196,&d,-g% 9�'șT_TOMO%,0,Options_ID%,196,&14,-h% 9�'șT_TOMO%,0,Options_ID%,196,&15,-i% 9�'șT_TOMO%,0,Options_ID%,196,&16,-j% 9�'șT_TOMO%,0,Options_ID%,196,&17,-k% 9�'șT_TOMO%,0,Options_ID%,196,&18,-l% 9��boot_install("CHECK",bt%) 9�0șT_TOMO%,0,Options_ID%,65,&1B,bt%�&80000000 9�3șT_TOMO%,0,Options_ID%,65,&1C,(�bt%)�&80000000 9��E_ABS% :3șT_TOMO%,0,Options_ID%,513,3,Buf1%,128�,,,,,l% :Buf1%?l%=13:a%=�($Buf1%) : 3șT_TOMO%,0,Options_ID%,513,1,Buf1%,128�,,,,,l% :*Buf1%?l%=13:b%=�($Buf1%) :43șT_TOMO%,0,Options_ID%,513,2,Buf1%,128�,,,,,l% :>Buf1%?l%=13:c%=�($Buf1%) :H$șT_TOMO%,0,Options_ID%,197,9�d% :R%șT_TOMO%,0,Options_ID%,197,&a�e% :\%șT_TOMO%,0,Options_ID%,197,&c�f% :f%șT_TOMO%,0,Options_ID%,197,&d�g% :p&șT_TOMO%,0,Options_ID%,197,&14�h% :z&șT_TOMO%,0,Options_ID%,197,&15�i% :�&șT_TOMO%,0,Options_ID%,197,&16�j% :�&șT_TOMO%,0,Options_ID%,197,&17�k% :�&șT_TOMO%,0,Options_ID%,197,&18�l% :�ȎSelf_Component%� :��&1a :��boot_install("OUT",bt%) :��kill_thieftraps :��pause_logins :��remove_logins :�P�save_options(a%,b%,c%,(d%=1),(e%=1),(f%=1),(g%=1),(h%=1),(i%=1),(j%=1),0,0) ;�clear_edits ;�&1b ;8�boot_install("IN",bt%) ;B,șT_TOMO%,0,Options_ID%,65,&1B,&80000000 ;L$șT_TOMO%,0,Options_ID%,65,&1C,0 ;V�&1C ;~�boot_install("OUT",bt%) ;�$șT_TOMO%,0,Options_ID%,65,&1B,0 ;�,șT_TOMO%,0,Options_ID%,65,&1C,&80000000 ;��&11 ;�Z�save_options(a%,b%,c%,(d%=1),(e%=1),(f%=1),(g%=1),(h%=1),(i%=1),(j%=1),(k%=1),(l%=1)) ;� �(k%=1)��Passwords_Enabled%� <2Parent_Name$="Options" <<�showing_password <F-șT_TSO%,0,Password_ID%,0,0,Options_ID%,0 <PPasswords_Enabled%=� <Z"Sequence$="ENABLING PASSWORDS" <d� <n �(k%=0)� Passwords_Enabled%� <��pause_logins <��remove_logins <�Passwords_Enabled%=� <�Logged_User$="" <�� <�� <�Guest_Logins%=(g%=1) <�Full_Owner_Access%=(i%=1) <�Passwords_Enabled%=(k%=1) <�Auto_Prompt%=(l%=1) <�� =� =� =T��handle_passmenu =| �l%,l$,a% =�ȎEvent_Code%� =��E_TOAC% =�Passmenu_ID%=Self_ID% =� �E_MATBS% =�ȎLogged_User$� =��"" >& �passmenu_greys(0,1,1,1,1,1) >0�Owner$ >X �passmenu_greys(0,0,0,0,0,0) >b �"LOGOFF" >� �passmenu_greys(0,1,1,1,1,1) >� >� �passmenu_greys(0,0,0,1,1,1) >�� >� �E_MS% >�ȎSelf_Component%� ?�&D ?*Logged_User$="LOGOFF" ?4�(Zzzzpass_Status%=3)� ?\�inform_zzzzpass(0) ?f� ?p�Auto_Prompt%� ?�.șT_TSO%,0,Password_ID%,0,0,Passmenu_ID%,7 ?�Sequence$="PROMPTING" ?�� ?��&C ?�Rusr%=1 ?��make_dirlist @ l$="" @$�a%=1�Rusers% @.l$+=Rusr$(a%) @8�a%<Rusers%�l$+="," @B�a% @L)șT_TOMO%,0,Useraccess_ID%,896,&1b,l$ @V(șT_TOMO%,1,Useraccess_ID%,898,&1b,0 @`�user_gadgets @j�draw_main(2,0) @t� @~� @�� @���handle_password @�,�a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%,wh% A ȎEvent_Code%� A�E_TOAC% A<Password_ID%=Self_ID% AF �E_WATBS% An�showing_password Ax�Sequence$="PROMPTING"� A��lock_mouse(�) A�� A��lock_mouse(�) A�� A��E_WHBH% A�ȎSequence$� B�"ENABLING PASSWORDS" B,5�get_options(a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,k%,l%) B65�save_options(a%,b%,c%,d%,e%,f%,g%,h%,i%,j%,�,l%) B@Passwords_Enabled%=� BJSequence$="NORMAL" BT�"PROMPTING" B|�Logged_User$=""� B�.șT_TSO%,0,Password_ID%,0,0,Passmenu_ID%,7 B�� B� �"NORMAL" B�%ș"OS_ReadModeVariable",-1,4�,,a% B�&ș"OS_ReadModeVariable",-1,11�,,b% B�%ș"OS_ReadModeVariable",-1,5�,,c% B�&ș"OS_ReadModeVariable",-1,12�,,d% C!ȗȓ0,0,(b%+1)<<a%,(d%+1)<<c% C� C� C&�E_ABS% CNȎSelf_Component%� CX�8 C��action_ok_password C��9 C�<șT_TSO%,0,Password_ID%,0,0,Parent_ID%,Parent_Component% C�� C�� C�� D��handle_sublist D>ȎEvent_Code%� DH�E_TOAC% DpSublist_ID%=Self_ID% Dz+șT_TOMO%,0,Sublist_ID%,0�Sublist%(1,1) D�Sublist%(1,3)=64 D�Sublist%(1,4)=-64 D�Sublist%(1,5)=812 D�Sublist%(1,6)=-232 D�� D�� D���handle_thieftrap E$ȎEvent_Code%� E.�E_TOAC% EVThieftrap_ID%=Self_ID% E` �E_WATBS% E�)șT_TOMO%,0,Thieftrap_ID%,M_D_SS%,2,1 E�0Source$="<BootPlus$Dir>.Resources.Thieftrap" E�Application$="!Thieftrap" E��E_DDE% E�Buf2%!0=64 E�+Buf2%!12=0:Buf2%!16=1:Buf2%!20=Blck%!16 E�4Buf2%!28=Blck%!24:Buf2%!32=Blck%!28:Buf2%!36=128 E�+Buf2%!40=&2000:$(Buf2%+44)=Application$ E�*ș"Wimp_SendMessage",17,Buf2%,Blck%!16 F� F � FP��handle_useraccess Fx�l$,a%,ov% F�ȎEvent_Code%� F��E_TOAC% F�Useraccess_ID%=Self_ID% F�.șT_TOMO%,0,Useraccess_ID%,0�Sublist%(2,2) F�Sublist%(3,2)=Sublist%(2,2) F��E_SSVC% G3șT_TOMO%,1,Useraccess_ID%,899,&1b,Buf1%,128�a% GRusr%=a%+1 G6�user_gadgets G@�set_list_extent(2,�) GJ�draw_sub(2,2,�,0) GT�set_list_extent(3,�) G^�draw_sub(3,2,�,0) Gh�E_ABS% G�ȎSelf_Component%� G��&18 G��modify_useraccess G��save_useraccess G��save_usertimes G�Saved%=� G�� G��E_WHBH% HșT_THO%,0,Yesdir_ID% H&șT_THO%,0,Nodir_ID% H0 �Saved%� H:,�error_message("EM9","","","ET3",&13,k%) HD �k%=1� Hl�modify_useraccess Hv�save_useraccess H��save_usertimes H�� H�� H�Saved%=� H�� H�� H���handle_yesdir I ȎEvent_Code%� I*�E_TOAC% IRYesdir_ID%=Self_ID% I\*șT_TOMO%,0,Yesdir_ID%,0�Sublist%(2,1) IfSublist%(2,3)=44 IpSublist%(2,4)=-280 IzSublist%(2,5)=244 I�Sublist%(2,6)=-232 I�� I�� I���handle_wmi J�nm$,st$,tn$,pc$,tp$ JȎEvent_Code%� J$ �E_WATBS% JL$�("*ACCESS "+Ownerfile$+" WR/R") JVf%=�(Ownerfile$) J`�a%=1�5 Jja$=�#f% Jt$șT_TOMO%,0,Self_ID%,512,a%+4,a$ J~�a% J��#f% J�"�("*ACCESS "+Ownerfile$+" L/") J��E_ABS% J��Self_Component%=10� J�$�("*ACCESS "+Ownerfile$+" WR/R") J�f%=�(Ownerfile$) J��a%=1�5 J�3șT_TOMO%,0,Self_ID%,513,a%+4,Buf1%,128�,,,,,l% J�Buf1%?l%=13 K�#f%,$Buf1% K �a% K�#f% K"�("*ACCESS "+Ownerfile$+" L/") K(� K2� K<� K���make_thieftrap(dest$) K��f%,a%,a$,p% K�p%=�dest$,".!Thieftrap") K�$�("*Access "+Thieffile$+" WR/R") K�f%=�(Thieffile$) K�a%=1 K�� K� a%+=1 K�a$=�#f% L ��#f% L a$=�dest$,p%)+"!Trap_"+�(a%) L6�#f%,"*WIPE "+a$+" FR~C~V" L@�#f% LJ"�("*Access "+Thieffile$+" L/") Lr>�("*COPY <BootPlus$Dir>.Resources.Thieftrap "+a$+" ~C~VR") L�H�("*COPY <BootPlus$Dir>.Resources.!zzzzpass "+a$+".!zzzzpass ~C~VR") L�� L���kill_thieftraps M& �a%,a$,f% M:$�("*ACCESS "+Thieffile$+" WR/R") MD�("*OBEY "+Thieffile$) MN"�("*WIPE "+Thieffile$+" ~C~V") MXf%=�(Thieffile$) Mb�#f%,"| Files for killing" Ml�#f% Mv%�("*SetType "+Thieffile$+" &FEB") M�"�("*ACCESS "+Thieffile$+" L/") M�� M���lock_mouse(lockmouse) N�a%,b%,w%,h% N%ș"OS_ReadModeVariable",-1,4�,,a% N&ș"OS_ReadModeVariable",-1,11�,,b% N w%=(b%+1)<<a% N*%ș"OS_ReadModeVariable",-1,5�,,a% N4&ș"OS_ReadModeVariable",-1,12�,,b% N>h%=(b%+1)<<a% NH&șT_TOMO%,0,Password_ID%,0�Blck%!0 NR"ș"Wimp_GetWindowState",,Blck% N\�lockmouse� N�9ȗȓBlck%!4,Blck%!8,Blck%!12-Blck%!4,Blck%!16-Blck%!8 N�� N�)Blck%!4=(w%-608)/2:Blck%!8=(h%-464)/2 N�-Blck%!12=Blck%!4+608:Blck%!16=Blck%!8+464 N�ș"Wimp_OpenWindow",,Blck% N�� N���showing_password O$ȎParent_Name$� O.�"Iconbar" OV<�clear_fields("CF1","","","","",0,0,&80000000,&80000000) O`Autoclose%=� Oj�"Options" O�@�clear_fields("CF2",Owner$,"","","",&80000000,&80000000,0,0) O��"Passmenu" O�ȎParent_Component%� O��3 O�@�clear_fields("CF3",Owner$,"","","",0,0,&80000000,&80000000) O�Username$=Owner$ O��8 P@�clear_fields("CF3",Owner$,"","","",0,0,&80000000,&80000000) PUsername$=Owner$ P(�7 PP<�clear_fields("CF4","","","","",0,0,&80000000,&80000000) PZ�6 P��Logged_User$=""� P�(�error_message("EM10","","","",0,K%) P�� P�>�clear_fields("CF5",Logged_User$,"","","",&80000000,0,0,0) P�Username$=Logged_User$ P�� P�� P�Autoclose%=� P��"Password" P�ȎParent_Component%� P��100 Q4�clear_fields("CF6","","","","",0,&80000000,0,0) Q�101 Q@4�clear_fields("CF7","","","","",0,&80000000,0,0) QJ�102 Qr@�clear_fields("CF8",Owner$,"","","",&80000000,&80000000,0,0) Q|Username$=Owner$ Q�� Q�Autoclose%=� Q�� Q�� Q���valchange_password R�Blck%!16=0� R:(�error_message("EM11","","","",0,K%) RD� RNȎSelf_Component%� RX�4 Rb!Username$=�indirect(Blck%+16) Rl�5 Rv!Password$=�indirect(Blck%+16) R��6 R�$Newpassword$=�indirect(Blck%+16) R��7 R�Verify$=�indirect(Blck%+16) R�� R�� R�� S��action_ok_password S*!�u$,p$,valid%,verify%,exists% S>-șT_TOMO%,0,Password_ID%,513,&4,Buf1%,256 SHu$=�indirect(Buf1%) SR-șT_TOMO%,0,Password_ID%,513,&5,Buf1%,256 S\p$=�indirect(Buf1%) Sf-șT_TOMO%,0,Password_ID%,513,&6,Buf1%,256 Spn$=�indirect(Buf1%) Sz-șT_TOMO%,0,Password_ID%,513,&7,Buf1%,256 S�v$=�indirect(Buf1%) S�%valid%=�check_user(u$,p$,exists%) S�verify%=(n$=v$) S�ȎParent_Name$� S��"Iconbar" S��valid%� S��login_user(u$,�) S�� S� �exists%� S�(�error_message("EM12","","","",0,K%) T� T(�error_message("EM13","","","",0,K%) T� T$� T.�"Options" TV�verify%� T`(�error_message("EM14","","","",0,K%) Tj-șT_TSO%,0,Password_ID%,0,0,Options_ID%,0 Tt� T~ �(n$)<4� T�(�error_message("EM15","","","",0,K%) T�-șT_TSO%,0,Password_ID%,0,0,Options_ID%,0 T�� T� �exists%� T��modify_user(u$,n$) T�� T��add_user(u$,n$) T�� T��login_user(u$,�) U�install_logins U Sequence$="NORMAL" U� U� U(�"Passmenu" UPȎParent_Component%� UZ�3 U��valid%� U�0șT_TSO%,0,Password_ID%,0,0,Password_ID%,100 U�� U�(�error_message("EM16","","","",0,K%) U�� U��8 U��valid%� U�0șT_TSO%,0,Password_ID%,0,0,Password_ID%,101 U�� U�(�error_message("EM16","","","",0,K%) V� V�7 V6�valid%� V@�login_user(u$,�) VJSequence$="NORMAL" VT� V^ �exists%� Vh(�error_message("EM12","","","",0,K%) Vr� V|(�error_message("EM13","","","",0,K%) V�� V�� V��6 V��valid%� V� �verify%� V� �(n$)<4� V�(�error_message("EM15","","","",0,K%) V�� V��n$=p$� V�(�error_message("EM17","","","",0,K%) W� W�modify_user(u$,n$) W� W&� W0� W:(�error_message("EM14","","","",0,K%) WD� WN� WX(�error_message("EM18","","","",0,K%) Wb� Wl� Wv�"Password" W�ȎParent_Component%� W��100 W� �exists%� W�(�error_message("EM19",u$,"","",0,K%) W�� W� �verify%� W� �(n$)<4� X(�error_message("EM15","","","",0,K%) X� X�add_user(u$,n$) X � X*� X4(�error_message("EM14","","","",0,K%) X>0șT_TSO%,0,Password_ID%,0,0,Password_ID%,100 XH� XR� X\�101 X��exists%� X�(�error_message("EM20",u$,"","",0,K%) X�� X� �verify%� X� �(n$)<4� X�(�error_message("EM15","","","",0,K%) X�� X��modify_user(u$,n$) X�� X�� X�(�error_message("EM14","","","",0,K%) X�0șT_TSO%,0,Password_ID%,0,0,Password_ID%,101 X�� Y� Y�102 Y8 �verify%� YB"�add_user(Owner$,Newpassword$) YL�login_user(Owner$,�) YV� Y`(�error_message("EM14","","","",0,K%) Yj0șT_TSO%,0,Password_ID%,0,0,Password_ID%,102 Yt� Y~� Y�� Y�� Y�N��get_options(�at%,�wt%,�dt%,�ts%,�tq%,�da%,�gl%,�tm%,�fo%,�wo%,�pe%,�ap%) Zd �f%,a$,a% Z� wo%=� Z� pe%=� Z� ap%=� Z�ș"OS_File",4,Optfile$,,,,3 Z�f%=�(Optfile$) Z�u%=0 Z�� Z�a$=�#f% Z�a%=�a$,":") Z�Ȏ�a$,a%-2)� Z��"Allow Time" [at%=�(�a$,a%+2)) [�"Warn Time" [wt%=�(�a$,a%+2)) ["�"Die Time" [,dt%=�(�a$,a%+2)) [6�"Task Starting" [@ts%=(�a$,a%+2)="Y") [J�"Task Quitting" [Ttq%=(�a$,a%+2)="Y") [^�"Directory Access" [hda%=(�a$,a%+2)="Y") [r�"Guest Logins" [|gl%=(�a$,a%+2)="Y") [��"Test Mode Logins" [�tm%=(�a$,a%+2)="Y") [��"Full Owner Access" [�fo%=(�a$,a%+2)="Y") [��"Watchdog Off" [�wo%=(�a$,a%+2)="Y") [��"Passwords Enabled" [�pe%=(�a$,a%+2)="Y") [��"Auto Prompt" [�ap%=(�a$,a%+2)="Y") [�� [� ��#f% [��#f% \ș"OS_File",4,Optfile$,,,,9 \� \b��get_useraccess \� �f%,a$,a% \�"ș"OS_File",4,Accessfile$,,,,3 \�f%=�(Accessfile$) \� Rusers%=0 \�� \�a$=�#f% \�a%=�a$,":") \�Rusers%+=1 \�Rusr$(Rusers%)=�a$,a%-2) \�Rdir$(Rusers%)=�a$,a%+2) \� ��#f% ]�#f% ]"ș"OS_File",4,Accessfile$,,,,9 ]� ]\��get_usertimes ]� �f%,a$,a% ]�!ș"OS_File",4,Timesfile$,,,,3 ]�f%=�(Timesfile$) ]� Rusers%=0 ]�� ]�a$=�#f% ]�a%=�a$,":") ]�Rusers%+=1 ]�Rtim$(Rusers%)=�a$,a%+2) ]� ��#f% ]��#f% ]�!ș"OS_File",4,Timesfile$,,,,9 ^� ^LC��save_options(at%,wt%,dt%,ts%,tq%,da%,gl%,tm%,fo%,wo%,pe%,ap%) ^��f% _ș"OS_File",4,Optfile$,,,,3 _ f%=�(T_Optfile$) _�#f%,"Allow Time : "+�(at%) _�#f%,"Warn Time : "+�(wt%) _(�#f%,"Die Time : "+�(dt%) _20�#f%,"Task Starting : "+�(-89*ts%-78*(�ts%)) _<0�#f%,"Task Quitting : "+�(-89*tq%-78*(�tq%)) _F3�#f%,"Directory Access : "+�(-89*da%-78*(�da%)) _P/�#f%,"Guest Logins : "+�(-89*gl%-78*(�gl%)) _Z3�#f%,"Test Mode Logins : "+�(-89*tm%-78*(�tm%)) _d4�#f%,"Full Owner Access : "+�(-89*fo%-78*(�fo%)) _n/�#f%,"Watchdog Off : "+�(-89*wo%-78*(�wo%)) _x4�#f%,"Passwords Enabled : "+�(-89*pe%-78*(�pe%)) _�.�#f%,"Auto Prompt : "+�(-89*ap%-78*(�ap%)) _��#f% _�ș"OS_File",6,Optfile$ _�+ș"OS_FSControl",25,T_Optfile$,Optfile$ _�ș"OS_File",4,Optfile$,,,,9 _�� `��save_useraccess `@ �f%,a% `T"ș"OS_File",4,Accessfile$,,,,3 `^f%=�(T_Accessfile$) `h�a%=1�Rusers% `r"�#f%,Rusr$(a%)+" : "+Rdir$(a%) `|�a% `��#f% `�ș"OS_File",6,Accessfile$ `�1ș"OS_FSControl",25,T_Accessfile$,Accessfile$ `�"ș"OS_File",4,Accessfile$,,,,9 `�� `���save_usertimes a& �f%,a% a:!ș"OS_File",4,Timesfile$,,,,3 aDf%=�(T_Timesfile$) aN�a%=1�Rusers% aX"�#f%,Rusr$(a%)+" : "+Rtim$(a%) ab�a% al�#f% avș"OS_File",6,Timesfile$ a�/ș"OS_FSControl",25,T_Timesfile$,Timesfile$ a�!ș"OS_File",4,Timesfile$,,,,9 a�� a���make_dirlist b�pntr%,spntr%,a% bTdirs%=0 b>a%=0 bH� bR;ș"OS_GBPB",12,"<Boot$dir>.^",Buf1%,1,a%,256,"*"�,,,,a% b\�(a%<>-1)�(Buf1%!20>&fff)� b� Tdirs%+=1 b�'Tdir$(Tdirs%,1)=�indirect(Buf1%+24) b�Q�Rusr$(Rusr%)<>Owner$�(Tdir$(Tdirs%,1)="!Boot"��Tdir$(Tdirs%,1),6)="!Trap_")� b�(Tflg%(Tdirs%,1)=&7�&100�(24<<16)�&40 b�� b�$Tflg%(Tdirs%,1)=&7�&100�(24<<16) b�� c� c �a%=-1 c Tnpt%()=0 c$ Typt%()=0 c.� c~��user_gadgets c��a%,d%,l%,r%,e1%,e2%,t$ c� Tydirs%=0 c� Tndirs%=0 c��a%=1�Tdirs% c�*�Rdir$(Rusr%),"|"+Tdir$(a%,1)+"|")>0� dTydirs%+=1 d Typt%(Tydirs%)=a% d� d<Tndirs%+=1 dFTnpt%(Tndirs%)=a% dP� dx�(Tflg%(a%,1)�&40)=&40� d��Rusr$(Rusr%)=Owner$� d�*Tflg%(a%,1)=(Tflg%(a%,1)�&FFFFFFFC)�&7 d�� d�*Tflg%(a%,1)=(Tflg%(a%,1)�&FFFFFFFC)�&5 d�� d�� d��a% et$=Rtim$(Rusr%) el%=1 e�d%=1�7 e"r%=�t$,"|",l%+1) e,e1%=�t$,"=",l%+1) e6e2%=�t$,"=",e1%+1) e^�t$,l%+3,1)="Y"� eh*șT_TOMO%,0,Useraccess_ID%,196,d%+&3,1 er� e|*șT_TOMO%,0,Useraccess_ID%,196,d%+&3,0 e�� e�AșT_TOMO%,0,Useraccess_ID%,832,d%+&23,�(�t$,e1%+1,e2%-e1%-1)) e�@șT_TOMO%,0,Useraccess_ID%,832,d%+&30,�(�t$,e2%+1,r%-e2%-1)) e� l%=r% e�r%=�t$,"|",l%+1) e��d% e�� fD��modify_useraccess fl�a$,a%,b,t$ f� a$="|" f��a%=1�Tydirs% f�a$+=Tdir$(Typt%(a%),1)+"|" f��a% f�Rdir$(Rusr%)=a$ f� a$="|" f��d%=1�7 f�a$+=Weekdays$(d%) g+șT_TOMO%,0,Useraccess_ID%,197,&3+d%�a% g �a%=1� ga$+="Y" g � g*a$+="N" g4� g>,șT_TOMO%,0,Useraccess_ID%,833,d%+&23�a% gHa$+="="+�(a%) gp,șT_TOMO%,0,Useraccess_ID%,833,d%+&30�a% gza$+="="+�(a%)+"|" g��d% g�Rtim$(Rusr%)=a$ g�� g�-��passmenu_greys(i1%,i2%,i3%,i4%,i5%,i6%) hL$șT_TOMO%,0,Passmenu_ID%,2,7,i1% hV%șT_TOMO%,0,Passmenu_ID%,2,&d,i2% h`$șT_TOMO%,0,Passmenu_ID%,2,6,i3% hj$șT_TOMO%,0,Passmenu_ID%,2,3,i4% ht$șT_TOMO%,0,Passmenu_ID%,2,8,i5% h~%șT_TOMO%,0,Passmenu_ID%,2,&c,i6% h�� h�)��ibarmenu_greys(i1%,i2%,i3%,i4%,bt$) i$șT_TOMO%,0,Ibarmenu_ID%,2,5,i1% i($șT_TOMO%,0,Ibarmenu_ID%,2,6,i2% i2%șT_TOMO%,0,Ibarmenu_ID%,2,&a,i3% i<%șT_TOMO%,0,Ibarmenu_ID%,2,&b,i4% iF#șT_TOMO%,0,Ibarmenu_ID%,24,bt$ iP� i�;��clear_fields(lb$,t1$,t2$,t3$,t4$,fd1%,fd2%,fd3%,fd4%) j"$a$=�get_message(lb$,"","","","") j,&șT_TOMO%,0,Password_ID%,448,&a,a$ j6&șT_TOMO%,0,Password_ID%,512,4,t1$ j@&șT_TOMO%,0,Password_ID%,512,5,t2$ jJ&șT_TOMO%,0,Password_ID%,512,6,t3$ jT&șT_TOMO%,0,Password_ID%,512,7,t3$ j^&șT_TOMO%,0,Password_ID%,65,0,fd1% jh&șT_TOMO%,0,Password_ID%,65,4,fd1% jr&șT_TOMO%,0,Password_ID%,65,1,fd2% j|&șT_TOMO%,0,Password_ID%,65,5,fd2% j�&șT_TOMO%,0,Password_ID%,65,2,fd3% j�&șT_TOMO%,0,Password_ID%,65,6,fd3% j�&șT_TOMO%,0,Password_ID%,65,3,fd4% j�&șT_TOMO%,0,Password_ID%,65,7,fd4% j�� j���install_logins k:�l%,bootplusdir$ kD7ș"OS_ReadVarVal","Bootplus$Dir",Buf1%,128,0,0�,,l% kNBuf1%?l%=13 kXbootplusdir$=$Buf1% kbApplication$="!zzzzpass" kl/Source$=bootplusdir$+".resources.!zzzzpass" kv-�make_alias("<Boot$ToBeTasks>.!zzzzpass") k�Application$="!Bootplus" k�Source$=bootplusdir$ k�-�make_alias("<Boot$ToBeTasks>.!Bootplus") k�Edit_Type$="boot" k�.�modify_boot_file(bootplusdir$,"remove",�) k�.�modify_boot_file(bootplusdir$,"insert",�) k�Edit_Type$="" k�1*Filer_Run <Bootplus$Dir>.Resources.!zzzzpass k�� l��remove_logins lH�l%,bootplusdir$ l\7ș"OS_ReadVarVal","Bootplus$Dir",Buf1%,128,0,0�,,l% lfBuf1%?l%=13 lpbootplusdir$=$Buf1% lz8ș"XOS_FSControl",27,"<Boot$ToBeTasks>.!zzzzpass",,3 l�8ș"XOS_FSControl",27,"<Boot$ToBeTasks>.!bootplus",,3 l�Edit_Type$="boot" l�.�modify_boot_file(bootplusdir$,"remove",�) l�Edit_Type$="" l�� l���pause_logins m�id% m. id%=�get_task_id("zzzzpass") m8�id%>0� m`)Blck%!0=28:Blck%!12=0:Blck%!16=&808c0 mjBlck%!20=4:Blck%!24=Buf2% mt!Buf2%=3 m~%ș"Wimp_SendMessage",17,Blck%,id% m�� m�id%=�get_task_id("zzzzchk") m��id%>0� m�)Blck%!0=28:Blck%!12=0:Blck%!16=&808c0 m�Blck%!20=4:Blck%!24=Buf2% m�!Buf2%=3 m�%ș"Wimp_SendMessage",17,Blck%,id% m�� m�� nZݤencode(pswd$) n��encd$,a%,b%,c%,d% n�encd$="" n�a%=�(pswd$) n��e%=1�a% n�b%=�(�pswd$,e%,1)) n�c%=�(�pswd$,a%-e%+1,1)) n�d%=(b%*(c%+1))�&FF n��d%<32�d%+=32 n��d%>=127� d%<=139�d%+=23 oencd$+=�(d%) o�e% o, =encd$ or$ݤcheck_user(usnm$,pass$,�nami%) o�'�encd$,ntry$,f%,ok%,pnam$,ppas$,p1$ o��usnm$="GUEST"� p&(ok%=((pass$="GUEST")� Guest_Logins%) p0nami%=� p:� pba%=0 plp1$=�encode(pass$) pvencd$=�encode(p1$) p� ok%=� p�nami%=� p� ș"OS_File",4,Passfile$,,,,3 p�f%=�(Passfile$) p�ȕ�(�#f%�ok%) p�ntry$=�#f% p�tab1%=�ntry$,�(9)) p�tab2%=�ntry$,�(9),tab1%+1) p�pnam$=�ntry$,tab1%-1) p�'ppas$=�ntry$,tab1%+1,tab2%-tab1%-1) p� a%+=1 p�%ok%=((usnm$=pnam$)�(encd$=ppas$)) p��usnm$=pnam$�nami%=� q� q�#f% q ș"OS_File",4,Passfile$,,,,9 q � q4=ok% qz��add_user(usnm$,pass$) q��encd$,pad%,p1$,bd$,f%,l% q�p1$=�encode(pass$) q�encd$=�encode(p1$) q�!pad%=35-(�(usnm$)+�(encd$)+2) r ș"OS_File",4,Passfile$,,,,3 rf%=�(Passfile$) rȕ��#f% r$ntry$=�#f% r.� r8)�#f%,usnm$+�(9)+encd$+�(9)+�pad%,"x") rB�#f% rL ș"OS_File",4,Passfile$,,,,9 r�3ș"OS_ReadVarVal","Boot$Dir",Buf1%,128,0,0�,,l% r� l%-=6 r�Buf1%?l%=13 r�bd$=$Buf1% r�#ș"OS_File",20,bd$+".Groups"�f% r� �f%=0� r�ș"OS_File",8,bd$+".Groups" r�� s*ș"OS_File",20,bd$+".Groups."+usnm$�f% s �f%=0� s2&ș"OS_File",8,bd$+".Groups."+usnm$ s<� sFRusers%+=1 sPRusr$(Rusers%)=usnm$ sZTRdir$(Rusers%)="|Apps|Diversions|Images|Public|Sound|Tutorials|Utilities|Video|" sdbd$="|" sn�b%=1�7 sx bd$+=Weekdays$(b%)+"Y=8=17|" s��b% s�Rtim$(Rusers%)=bd$ s��save_useraccess s��save_usertimes s�� s���modify_user(usnm$,pass$) t6+�encd$,ntyr$,pad%,tab1%,tab2%,pnam$,p1$ tJp1$=�encode(pass$) tTencd$=�encode(p1$) t^!pad%=35-(�(usnm$)+�(encd$)+2) th ș"OS_File",4,Passfile$,,,,3 trf%=�(Passfile$) t|� t�posn%=�#f% t�ntry$=�#f% t�tab1%=�ntry$,�(9)) t�tab2%=�ntry$,�(9),tab1%+1) t�pnam$=�ntry$,tab1%-1) t��pnam$=usnm$ t��#f%=posn% t�)�#f%,usnm$+�(9)+encd$+�(9)+�pad%,"x") t��#f% t� ș"OS_File",4,Passfile$,,,,9 t�� u0��login_user(usnm$,inform%) uv�a%,al%,dur%,sh%,eh% u��Logged_User$<>usnm$� u�'�user_times(usnm$,al%,dur%,sh%,eh%) u� Ȏal%� u��1 u�"șT_TOMO%,0,Ibarmenu_ID%,2,6,0 u�Logged_User$=usnm$ v #�(Zzzzpass_Status%=3)� inform%� vH�inform_zzzzpass(dur%) vR� v\�2 v�+�error_message("EM21","","","ET1",0,K%) v��3 v�3�error_message("EM22",�(sh%),�(eh%),"ET1",0,K%) v�� v�� v�+�error_message("EM23","","","ET2",0,K%) v�� w� wV7��user_times(usern$,�allowed%,�duration%,�sh%,�eh%) w~�a%,th%,mn%,wd%,e1%,e2%,b% w��a%=1�Rusers% w��Rusr$(a%)=usnm$� w�Rusr%=a% w�� w��a% w��usern$=Owner$� xallowed%=1 x � x2!Buf1%=3 x<ș"OS_Word",14,Buf1% xF#ș&c1,Buf1%,Buf2%,128,"%24"�,a% xP ?a%=13 xZth%=�($Buf2%) xd#ș&c1,Buf1%,Buf2%,128,"%WN"�,a% xn ?a%=13 xxwd%=�($Buf2%) x�#ș&c1,Buf1%,Buf2%,128,"%MI"�,a% x� ?a%=13 x�mn%=�($Buf2%) x�&a%=�Rtim$(Rusr%),Weekdays$(wd%),1) x�duration%=0 x��Rtim$(Rusr%),a%+2,1)="Y"� x�e1%=�Rtim$(Rusr%),"=",a%+3) x� e2%=�Rtim$(Rusr%),"=",e1%+2) x�b%=�Rtim$(Rusr%),"|",e2%+2) x�)sh%=�(�Rtim$(Rusr%),e1%+1,e2%-e1%-1)) y(eh%=�(�Rtim$(Rusr%),e2%+1,b%-e2%-1)) y�(th%>=sh%� th%<=eh%)� yallowed%=1 y" duration%=(eh%-th%+1)*60-mn% y,� y6allowed%=3 y@� yJ� yTallowed%=2 y^� yh� yr� y� ��inform_zzzzpass(duration%) y� �p%,a% z� p%=20 z�!Buf2%=1 z�Buf2%!4=p% z�"$(Buf2%+20)=Logged_User$+�(13) z�p%+=�(Logged_User$)+2 z�Buf2%!12=p% z��Logged_User$="LOGOFF"� z�$(Buf2%+Buf2%!12)="||" z� P%+=2 z�� z�"$(Buf2%+Buf2%!12)=Rdir$(Rusr%) z�p%+=�(Rdir$(Rusr%)) {� {Buf2%!16=duration% {4)Blck%!0=32:Blck%!12=0:Blck%!16=&808c0 {>Blck%!20=p%:Blck%!24=Buf2% {H�Logged_User$="LOGOFF"� {RBlck%!20=Buf2%!12+4 {\� {f'Blck%!20=Buf2%!12+�(Rdir$(Rusr%))+2 {p� {z2ș"Wimp_SendMessage",17,Blck%,Zzzzpass_Handle% {�� {���boot_install(type$,�cf%) {��f%,a$,bv$,n% | cf%=� |$$f%=�("<Boot$Dir>.Utils.Deskrun") |.� |8a$=�#f% |Bcf%=(�a$,"!Bootplus")>0) |L ��#f%�cf% |V�#f% |~7ș"OS_ReadVarVal","Bootplus$Dir",Buf1%,128,0,0�,,n% |�Buf1%?n%=13 |�Ȏ�� |��((type$="IN")��cf%) |�:ș"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","WR/WR" |�Nș"OS_FSControl",25,"<Boot$Dir>.Utils.Deskrun","<Boot$Dir>.Utils.DeskrunO" |�:ș"OS_FSControl",24,"<Boot$Dir>.Utils.DeskrunO","LR/R" |�$f%=�("<Boot$Dir>.Utils.Deskrun") |��#f%,"IFTHERE "+$Buf1%+".!Run THEN Filer_Run "+$Buf1%+" ELSE ERROR !Bootplus has moved. Run it from the current location and re-install into !Boot" |��#f% }2ș"OS_File",18,"<Boot$Dir>.Utils.Deskrun",&FEB } 9ș"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","LR/R" }�((type$="OUT")� cf%) }<:ș"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","WR/WR" }F;ș"OS_FSControl",24,"<Boot$Dir>.Utils.DeskrunO","WR/WR" }P,ș"OS_File",6,"<Boot$Dir>.Utils.Deskrun" }ZNș"OS_FSControl",25,"<Boot$Dir>.Utils.DeskrunO","<Boot$Dir>.Utils.Deskrun" }d9ș"OS_FSControl",24,"<Boot$Dir>.Utils.Deskrun","LR/R" }n� }x� }���draw_main(mid%,reason%) ~"�a% ~JBlck%!0=Sublist%(mid%,2) ~T"ș"Wimp_GetWindowState",,Blck% ~^Ȏreason%� ~h�0 ~�Ȏmid%� ~��1 ~�ȎEdit_Type$� ~��"autorun" ~�4șT_TOMO%,0,Mainlist_ID%,11,"Edit Autorun Files" ~��"boot" ~�>șT_TOMO%,0,Mainlist_ID%,11,"Edit Autobooted Applications" ~��"resources" ~�<șT_TOMO%,0,Mainlist_ID%,11,"Edit Resource Applications" �"predesk" 4șT_TOMO%,0,Mainlist_ID%,11,"Edit Predesk Files" � D� Nș"Wimp_OpenWindow",,Blck% X�2 b ș"Wimp_RedrawWindow",,Blck% l� ��mid%=2� ��draw_sub(2,reason%,�,0) ��draw_sub(3,reason%,�,0) �� ��draw_sub(1,reason%,�,0) �� �*Blck%!0=Sublist%(mid%,2) �4"ș"Wimp_GetWindowState",,Blck% �>Blck%!28=Sublist%(mid%,1) �Hș"Wimp_OpenWindow",,Blck% �R� ��&��draw_sub(sid%,reason%,main%,bh%) �B�a%,r%,os_wx%,os_wy% �`�reason%<>2� ��Buf1%!0=Sublist%(sid%,2) ��"ș"Wimp_GetWindowState",,Buf1% ��os_wx%=(Buf1%!4-Buf1%!20) ��os_wy%=(Buf1%!16-Buf1%!24) ��Buf2%!0=Sublist%(sid%,1) ��"ș"Wimp_GetWindowState",,Buf2% ��#Buf2%!4=os_wx%+Sublist%(sid%,3) ��4Buf2%!8=os_wy%+Sublist%(sid%,4)+Sublist%(sid%,6) ��5Buf2%!12=os_wx%+Sublist%(sid%,3)+Sublist%(sid%,5) ��$Buf2%!16=os_wy%+Sublist%(sid%,4) ��� �Ȏreason%� ��0 ��Buf2%!28=-1 ��ș"Wimp_OpenWindow",,Buf2% ���set_list_extent(sid%,�) ��Ȏsid%� ��1 �,/�draw_list(1,Objs%,Optr%(),Odat$(),Oflg%()) �6�2 �^1�draw_list(2,Tydirs%,Typt%(),Tdir$(),Tflg%()) �h�3 ��1�draw_list(3,Tndirs%,Tnpt%(),Tdir$(),Tflg%()) ��� ���2 ��Ȏsid%� ���1 �/�draw_list(1,Objs%,Optr%(),Odat$(),Oflg%()) ��2 �:1�draw_list(2,Tydirs%,Typt%(),Tdir$(),Tflg%()) �D�3 �l1�draw_list(3,Tndirs%,Tnpt%(),Tdir$(),Tflg%()) �v� ���3 ��Buf2%!28=bh% ��ș"Wimp_OpenWindow",,Buf2% ��� ��� �*#��set_list_extent(sid%,redraw%) �RBlck%!0=Sublist%(sid%,1) �\&ș"Wimp_GetWindowInfo",,(Blck%�&1) �fȎsid%� �p�1 �zBlck%!48=-Font_Lh%*Objs% ���2 ��Blck%!48=-Font_Lh%*Tydirs% ���3 ��Blck%!48=-Font_Lh%*Tndirs% ��� ��!�Blck%!48>(Blck%!8-Blck%!16)� ��Blck%!48=Blck%!8-Blck%!16 ��� ��'ș"Wimp_SetExtent",Blck%!0,Blck%+44 �� �redraw%� �ș"Wimp_OpenWindow",,Blck% �� �$� �j5��draw_list(sid%,ntrs%,ptrs%(),sdata$(),flags%()) ��G�fh%,m%,os_wl%,os_wt%,wk_rl%,wk_rt%,wk_rb%,tt%,tb%,r%,e%,cls%,xpos% �cls%=�(sdata$(),2) � 1ș"Font_FindFont",,Font_Name$,192,192,0,0�fh% �$ș"Font_ReadInfo",fh%�,,fb%,,ft% �Font_Lh%=ft%-fb%+4 �(Blck%!0=Sublist%(sid%,1) �2#ș"Wimp_RedrawWindow",,Blck%�m% �<� �d-�(Blck%!36>Blck%!28)�(Blck%!40>Blck%!32)� ��os_wl%=(Blck%!4-Blck%!20) ��os_wt%=(Blck%!16-Blck%!24) ��wk_rl%=Blck%!28-os_wl% ��wk_rt%=Blck%!40-os_wt% ��wk_rb%=Blck%!32-os_wt% �tt%=�(-wk_rt%/Font_Lh%)+1 �tb%=�(-wk_rb%/Font_Lh%)+1 �T�r%=tt%�tb% ��p%=ptrs%(r%) �� �p%>0� ���c%=1�cls% ���(flags%(p%,c%)�&100)=&100� ��'xpos%=(flags%(p%,c%)�&ffff0000)>>16 ��2ș"Wimp_SetFontColours",,0,(flags%(p%,c%)� 15) ��Mș"Font_Paint",fh%,sdata$(p%,c%),16,os_wl%+xpos%,os_wt%-r%*Font_Lh%-fb%-4 �� ��c% �� �&�r% �0� �:�m%<>0� �b#ș"Wimp_GetRectangle",,Blck%�m% �l� �v �m%=0 ��� ����get_applist �\)�aline$,f1%,p%,offset%,app$,found%,r% ��Objs%=0 �� Oflg%()=7 �� Optr%()=0 ��Odat$()="" ��ȎEdit_Type$� ���"resources" ��?�get_filelisted("<choices$write>.Boot.PreDeskTop","AddApp") ���"boot" �@�get_filelisted("<choices$write>.Boot.Desktop","Filer_Boot") ��"autorun" �B&�get_dirlisted("<Boot$ToBeTasks>") �L�"predesk" �t'�get_dirlisted("<Boot$ToBeLoaded>") �~� ��Ontr%=Objs% ���r%=1�Objs% ��Optr%(r%)=r% ��)Oflg%(r%,1)=Oflg%(r%,1)�(24<<16)�&100 ��*Oflg%(r%,2)=Oflg%(r%,2)�(200<<16)�&100 ��ȎEdit_Type$� ���"boot" ��*Oflg%(r%,4)=Oflg%(r%,4)�(512<<16)�&100 ���"resources" �*Oflg%(r%,4)=Oflg%(r%,4)�(512<<16)�&100 � �"autorun" �*Oflg%(r%,4)=Oflg%(r%,4)�(480<<16)�&100 ��"predesk" �(*Oflg%(r%,4)=Oflg%(r%,4)�(400<<16)�&100 �2� �<�r% �F� �� ��get_filelisted(file$,com$) ���f1%,aline$,p% ��f1%=�(file$) ��� ��aline$=�#f1% ��_�(�aline$,"|Start")>0��aline$,"Mars")>0��aline$,"!Bootplus")>0��aline$,Edit_Type$)>0)��#f1% ����#f1%� �� �"aline$=�#f1% �,�aline$,com$)=1� �6p%=�aline$,".!") �@ �p%>0� �JObjs%+=1 �T Odat$(Objs%,1)=�aline$,p%+1) �^$Odat$(Objs%,2)="App (reference)" �hOdat$(Objs%,3)="2000" ��p%=�aline$," ") �� Odat$(Objs%,5)=�aline$,p%+1) ��$ș"OS_File",23,Odat$(Objs%,5)�p% �� �p%=0� ��%Odat$(Objs%,4)="Original Missing" ��Oflg%(Objs%,4)=11 ��� ���check_standard_entry ��� ��� ����aline$,"|End")>0��#f1% ��� � �#f1% �� �X��get_dirlisted(dir$) ��4�file$,offset%,found%,l%,p%,l$,f%,a$,b$,c$,a%,c% �� offset%=0 ��� ��9ș"OS_GBPB",12,dir$,Buf1%,1,offset%,128,0�,,,,offset% ���offset%<>-1� Buf1%!20<>-1� ��ȎBuf1%!20� �� �&1000 ��Objs%+=1 ��&Odat$(Objs%,1)=�indirect(Buf1%+24) �Odat$(Objs%,2)="Directory" �Odat$(Objs%,3)="1000" �ȎEdit_Type$� �*� �4Odat$(Objs%,4)="" �>*Odat$(Objs%,5)=dir$+"."+Odat$(Objs%,1) �H �&2000 �pObjs%+=1 �z&Odat$(Objs%,1)=�indirect(Buf1%+24) ��*Odat$(Objs%,5)=dir$+"."+Odat$(Objs%,1) ��Oș"OS_GBPB",10,dir$+"."+Odat$(Objs%,1),Buf1%,10,0,200,"!Sprites*"�,,,found% ���found%=0� ��5ș"OS_File",20,dir$+"."+Odat$(Objs%,1)+".!Run"�f% �� �f%=0� �� Odat$(Objs%,2)="App (full?)" ��!Odat$(Objs%,4)="No !run file" �Oflg%(Objs%,4)=11 �� �8 Odat$(Objs%,2)="App (alias)" �B)f%=�(dir$+"."+Odat$(Objs%,1)+".!Run") �Ll$=�#f% �V�#f% �`l$=�l$,11) �jș"OS_File",23,l$�p% �t �p%=0� �~%Odat$(Objs%,4)="Original Missing" ��Oflg%(Objs%,4)=11 ��� ��� ��� ��Odat$(Objs%,2)="App (full)" ��� ��Odat$(Objs%,3)="2000" �� �Objs%+=1 �&Odat$(Objs%,1)=�indirect(Buf1%+24) �(*Odat$(Objs%,5)=dir$+"."+Odat$(Objs%,1) �2-ș"OS_ConvertHex4",Buf1%!20,Buf2%,128�,p% �< ?p%=13 �FOdat$(Objs%,3)=�$Buf2%,3) �PEș"XOS_ReadVarVal","File$Type_"+Odat$(Objs%,3),Buf1%,128,0,3�,,l% �Z �l%=0� ��%Odat$(Objs%,2)="&"+Odat$(Objs%,3) ��� ��Buf1%?l%=13 ��Odat$(Objs%,2)=$Buf1% ��� ��� ���Odat$(Objs%,4)=""� �c%=0 �� � c%+=1 �"^�(Boot_Type$(c%,1)=Edit_Type$)�((Boot_Type$(c%,2)=Odat$(Objs%,3))�(Boot_Type$(c%,2)="*"))� �,#Odat$(Objs%,4)=Boot_Type$(c%,3) �6� �@*�(c%=Boot_Types%)�(Odat$(Objs%,4)<>"") �J� �T�check_standard_entry �^� �h�offset%=-1 �r� ����check_standard_entry ���c% ���c%=1�Standards% �C�(Standard$(c%,1)=Edit_Type$)�(Standard$(c%,2)=Odat$(Objs%,1))� �0Oflg%(Objs%,1)=5 �:Oflg%(Objs%,2)=5 �DOflg%(Objs%,3)=5 �NOflg%(Objs%,4)=5 �XOflg%(Objs%,5)=64 �b� �l�c% �v� ����check_if_applied ���k% �� �Saved%� ��5�error_message("EM24",Edit_Type$,"","ET3",&13,k%) �� �k%=1� � �apply_edit_changes �*� �4� �>Saved%=� �H� ����apply_edit_changes ���r% ���r%=1�Ontr% ��ȎOflg%(r%,5)� ���16 ��modify_boot(r%,"remove",�) ��32 �B�modify_boot(r%,"insert",�) �L �t� �~�r% ��� ��&��modify_boot(ntry%,mode$,nomess%) �� �ȎEdit_Type$� ��"autorun" �(4�modify_boot_dir(ntry%,"<Boot$ToBeTasks>",mode$) �2�"resources" �<3�modify_boot_file(Odat$(ntry%,5),mode$,nomess%) �F�"boot" �P3�modify_boot_file(Odat$(ntry%,5),mode$,nomess%) �Z�"predesk" �d5�modify_boot_dir(ntry%,"<Boot$ToBeLoaded>",mode$) �n� �x� ����make_alias(pathname$) � �f%,l% �"!ș"OS_File",8,pathname$,0,0,0 �,-ș"OS_File",11,pathname$+".!Run",&FEB,0,0 �6.ș"OS_File",11,pathname$+".!Boot",&FEB,0,0 �@.ș"OS_File",11,pathname$+".!Help",&FFF,0,0 �r%�Source$,1)="<"��Source$,1)=">"� �|Aș"OS_ReadVarVal",�Source$,2,�(Source$)-2),Buf1%,128,0,0�,,l% ��Buf1%?l%=13 ��Source$=$Buf1% ��� ��f%=�(pathname$+".!Run") ���#f%,"Filer_Run "+Source$ ���#f% ��f%=�(pathname$+".!Boot") �M�#f%,"IfThere "+Source$+".!Sprites Then IconSprites "+Source$+".!Sprites" �E�#f%,"IfThere "+Source$+".!Boot Then Filer_Run "+Source$+".!Boot" ��#f% �Df%=�(pathname$+".!Help") �N.�#f%,"Alias for application "+Application$ �X2�#f%,"Which can be found at location "+Source$ �b�#f% �l� ��(��modify_boot_dir(ntry%,dest$,mode$) ��Ȏmode$� �� �"insert" ���Odat$(ntry%,3)="2000"� �Source$=Odat$(ntry%,5) � Application$=Odat$(ntry%,1) �*)�make_alias(dest$+"."+Odat$(ntry%,1)) �4� �\5�Odat$(ntry%,5),25)="<Wimp$ScrapDir>.Bootplus."� ��G�("*COPY "+Odat$(ntry%,5)+" "+dest$+"."+Odat$(ntry%,1)+" ~V~P~CFD") ��� ��E�("*COPY "+Odat$(ntry%,5)+" "+dest$+"."+Odat$(ntry%,1)+" ~V~P~C") ��� ��� �� �"remove" �(�("*WIPE "+Odat$(ntry%,5)+" ~VF~CR") �� �B4*ACCESS <Bootplus$dir>.Resources.changelist WR/R �L/f%=�("<Bootplus$dir>.Resources.changelist") �V.g%=�("<Bootplus$dir>.Resources.changenew") �` X%=10 �j� �ta$=�#f% �~ X%+=4 ��,�mode$="insert"��a$,Odat$(ntry%,5),1)=0� ���#g%,a$ ��� �� ��#f% ���mode$="insert"� ��4�#g%,"*WIPE "+dest$+"."+Odat$(ntry%,1)+" ~VF~CR" ��� ���#f% ���#g% ��2*WIPE <Bootplus$dir>.Resources.changelist ~C~V ��R*RENAME <Bootplus$dir>.Resources.changenew <Bootplus$dir>.Resources.changelist ��5*SETTYPE <Bootplus$dir>.Resources.changelist &FEB �2*ACCESS <Bootplus$dir>.Resources.changelist L/ � � �F*��modify_boot_file(app$,mode$,nomess%) ��6�f1%,f2%,aline$,bootname$,ftyp%,oldname$,tempname$ ��C�found%,done%,ftyp%,bootname$,tempname$,oldname$,f1%,f2%,aline$ ��found%=� ��done%=� ��start%=� ��ȎEdit_Type$� ���"resources" ��ftyp%=&feb �/bootname$="<choices$write>.boot.PreDesktop" �/tempname$="<choices$write>.boot.PreDesknew" �.oldname$="<choices$write>.boot.PreDeskold" �"�"boot" �,ftyp%=&fea �6,bootname$="<choices$write>.boot.Desktop" �@/tempname$="<choices$write>.boot.Desktopnew" �J.oldname$="<choices$write>.boot.Desktopold" �T� �|ș"OS_File",6,tempname$ ��"ș"OS_File",11,tempname$,ftyp% ��f1%=�(tempname$) ��f2%=�(bootname$) ��� ��aline$=�#f2% �� �start%� ��_start%=(�aline$,"|Start")>0��aline$,"Mars")>0��aline$,"!Bootplus")>0��aline$,Edit_Type$)>0) ���#f1%,aline$ ��� �Ȏmode$� �& �"remove" �0D�(app$="all"��aline$,".!")>0� start%)�(�aline$,app$)>0� start%)� �Xfound%=� �bdone%=� �l� ���#f1%,aline$ ��� �� �"insert" ���(�aline$,app$)>0)� start%� ��found%=� ��4�nomess%��error_message("EM25",app$,"","",0,K%) ��� ��+�(�aline$,"|End")>0)� start%�(�found%)� �ȎEdit_Type$� ��"resources" ��#f1%,"AddApp "+app$ � �"boot" �*�#f1%,"Filer_Boot "+app$ �4� �>done%=� �H� �R�#f1%,aline$ �\� �f� �p ��#f2% �z �(�start%)�(mode$="insert")� ��ȎEdit_Type$� ���"resources" ���#f1%,"" ��A�#f1%,"|Start Mars !Bootplus "+Bootplus_Version$+" resources" ��$�#f1%,"| ----------------------" �� �#f1%,"|" ���#f1%,"| resources" �� �#f1%,"|" ��$�#f1%,"| ----------------------" ��7�#f1%,"| Insert Resources apps directory additions" �"�#f1%,"| INserted by Bootplus" � �#f1%,"|" ��#f1%,"AddApp "+app$ �$�#f1%,"|End" �.�"boot" �8�#f1%,"" �B<�#f1%,"|Start Mars !Bootplus "+Bootplus_Version$+" boot" �L$�#f1%,"| ----------------------" �V �#f1%,"|" �`�#f1%,"| boot" �j �#f1%,"|" �t$�#f1%,"| ----------------------" �~!�#f1%,"| Booted applications" ��"�#f1%,"| Inserted by Bootplus" �� �#f1%,"|" ���#f1%,"Filer_Boot "+app$ ���#f1%,"|End" ��� ��done%=� ��� �� �#f1% �� �#f2% ��done%� � ș"OS_File",6,oldname$ �*ș"OS_FSControl",25,bootname$,oldname$ �+ș"OS_FSControl",25,tempname$,bootname$ �(� �Pș"OS_File",6,tempname$ �Z� �d� ����clear_edits ���f1%,f2%,a$,f% �3ș"OS_File",6,"<choices$write>.boot.PreDeskNew" �9ș"OS_File",11,"<choices$write>.boot.PreDeskNew",&FEB �,f1%=�("<choices$write>.boot.PreDeskNew") �",f2%=�("<choices$write>.boot.PreDesktop") �,� �6a$=�#f2% �@<�(�a$,"|Start")>0)�(�a$,"Mars")>0)�(�a$,"!Bootplus")>0)� �A� �Ta$=�#f2% �^�a$="|End" �h� �r�#f1%,a$ �|� �� ��#f2% �� �#f1% �� �#f2% ��3ș"OS_File",6,"<choices$write>.boot.PreDesktop" ��[ș"OS_FSControl",25,"<choices$write>.boot.PreDeskNew","<choices$write>.boot.PreDesktop" ��0ș"OS_File",6,"<choices$write>.boot.DeskNew" ��6ș"OS_File",11,"<choices$write>.boot.DeskNew",&FEA ��)f1%=�("<choices$write>.boot.DeskNew") ��)f2%=�("<choices$write>.boot.Desktop") ��� �a$=�#f2% �6�a$,"|Start")>0��a$,"Mars")>0��a$,"!Bootplus")>0� �� �&a$=�#f2% �0�a$="|End" �:� �D�#f1%,a$ �N� �X ��#f2% �b �#f1% �l �#f2% �v0ș"OS_File",6,"<choices$write>.boot.Desktop" ��Uș"OS_FSControl",25,"<choices$write>.boot.DeskNew","<choices$write>.boot.Desktop" ��4*ACCESS <Bootplus$dir>.Resources.changelist WR/R ��-*OBEY <Bootplus$dir>.Resources.changelist ��2*WIPE <Bootplus$dir>.Resources.changelist ~C~V ��/f%=�("<Bootplus$Dir>.Resources.changelist") ��-�#f%,"| files added to predesk and tasks" ���#f% ��5*SETTYPE <Bootplus$dir>.Resources.changelist &FEB ��2*ACCESS <Bootplus$dir>.Resources.changelist L/ �� �\ݤget_task_id(tnm$) ���a%,tid%,ntn$ ��a%=0 �� tid%=0 ��ntn$="" ��� ��1ș"TaskManager_EnumerateTasks",a%,Buf1%,16�a% ��8�(a%>0)�((Buf1%!12� 1)=0)�(tnm$=�indirect(Buf1%!4))� ��tid%=Buf1%!0 �� a%=-1 �� � �a%<0 � =tid% �`ݤindirect(pntr%) �� �answ$ ��ș"OS_WriteN",pntr%,0�answ$ �� =answ$ �)ݤget_message(token$,p1$,p2$,p3$,p4$) �(�s% �<Hș"MessageTrans_Lookup",Tlms%,token$,Blck%,128,p1$,p2$,p3$,p4$�,,,s% �FBlck%?s%=13 �P=$Blck% ��;��error_message(message$,p1$,p2$,etitle$,flags%,�keyc%) �� �s%,t$,e$ �+e$=�get_message(message$,p1$,p2$,"","") ��etitle$=""�etitle$="ET4" �(t$=�get_message(etitle$,"","","","") �"$(Blck%+4)=e$ �, Blck%!0=0 �6/ș"Wimp_ReportError",Blck%,flags%,t$�,keyc% �@� ��� 9 ��� "predesk","FEB","EW1" ��� "predesk","FF8","EW2" ��� "predesk","FF9","EW3" ��� "predesk","FFA","EW4" ��� "predesk","FFB","EW5" ��� "predesk","FFC","EW2" ��� "predesk","1000","EW6" ��� "predesk","*","EW7" ��� "autorun","*","EW8" �� 9 �� "predesk","ARPlayer" �&� "predesk","BandLimit" �0� "predesk","SetUpNet" �:� "predesk","Configure" �D� "autorun","Configure" �N� "autorun","~CDReinit" �X� "autorun","!zzzzpass" �b� "autorun","!Bootplus" �l� "boot","!Bootplus" ��� Su,Mo,Tu,We,Th,Fr,Sa �
00000000 0d 00 0a 1e f4 3e 3c 42 6f 6f 74 70 6c 75 73 24 |.....><Bootplus$| 00000010 64 69 72 3e 2e 21 52 75 6e 69 6d 61 67 65 0d 01 |dir>.!Runimage..| 00000020 f4 0c de 54 6c 6d 73 25 31 36 0d 01 fe 0c de 54 |...Tlms%16.....T| 00000030 6c 6f 69 25 32 34 0d 02 08 0d de 42 75 66 31 25 |loi%24.....Buf1%| 00000040 31 32 38 0d 02 12 0d de 42 75 66 32 25 35 31 32 |128.....Buf2%512| 00000050 0d 02 1c 0d de 42 6c 63 6b 25 35 31 32 0d 02 26 |.....Blck%512..&| 00000060 10 de 4f 64 61 74 24 28 35 30 2c 35 29 0d 02 30 |..Odat$(50,5)..0| 00000070 10 de 4f 66 6c 67 25 28 35 30 2c 35 29 0d 02 80 |..Oflg%(50,5)...| 00000080 0e de 4f 70 74 72 25 28 35 30 29 0d 02 8a 0e de |..Optr%(50).....| 00000090 52 75 73 72 24 28 32 30 29 0d 02 94 0e de 52 64 |Rusr$(20).....Rd| 000000a0 69 72 24 28 32 30 29 0d 02 9e 0e de 52 74 69 6d |ir$(20).....Rtim| 000000b0 24 28 32 30 29 0d 02 a8 15 de 42 6f 6f 74 5f 54 |$(20).....Boot_T| 000000c0 79 70 65 24 28 32 30 2c 33 29 0d 02 b2 14 de 53 |ype$(20,3).....S| 000000d0 74 61 6e 64 61 72 64 24 28 32 30 2c 32 29 0d 02 |tandard$(20,2)..| 000000e0 bc 11 de 57 65 65 6b 64 61 79 73 24 28 37 29 0d |...Weekdays$(7).| 000000f0 02 c6 10 de 44 69 72 64 61 74 24 28 35 30 29 0d |....Dirdat$(50).| 00000100 02 d0 10 de 44 69 72 66 6c 67 25 28 35 30 29 0d |....Dirflg%(50).| 00000110 02 da 12 de 53 75 62 6c 69 73 74 25 28 33 2c 36 |....Sublist%(3,6| 00000120 29 0d 03 3e 11 de 54 64 69 72 24 28 31 30 30 2c |)..>..Tdir$(100,| 00000130 31 29 0d 03 48 0f de 54 79 70 74 25 28 31 30 30 |1)..H..Typt%(100| 00000140 29 0d 03 52 0f de 54 6e 70 74 25 28 31 30 30 29 |)..R..Tnpt%(100)| 00000150 0d 03 5c 11 de 54 66 6c 67 25 28 31 30 30 2c 31 |..\..Tflg%(100,1| 00000160 29 0d 03 66 0a 4d 50 25 3d 32 30 0d 03 70 13 f2 |)..f.MP%=20..p..| 00000170 74 6f 6f 6c 62 6f 78 5f 76 61 6c 75 65 73 0d 03 |toolbox_values..| 00000180 7a 0f f2 69 6e 69 74 69 61 6c 69 73 65 0d 03 84 |z..initialise...| 00000190 0b 51 75 69 74 25 3d a3 0d 03 8e 1c ee 85 ef 34 |.Quit%=........4| 000001a0 3a f1 f6 24 3b 22 20 61 74 20 6c 69 6e 65 20 22 |:..$;" at line "| 000001b0 3b 9e 3a e0 0d 03 98 05 f5 0d 03 a2 31 e7 28 53 |;.:.........1.(S| 000001c0 65 71 75 65 6e 63 65 24 3d 22 4c 4f 47 4f 4e 22 |equence$="LOGON"| 000001d0 29 84 28 53 65 71 75 65 6e 63 65 24 3d 22 50 52 |).(Sequence$="PR| 000001e0 4f 4d 50 54 49 4e 47 22 29 8c 0d 03 ac 28 c8 99 |OMPTING")....(..| 000001f0 22 57 69 6d 70 5f 50 6f 6c 6c 49 64 6c 65 22 2c |"Wimp_PollIdle",| 00000200 30 2c 42 6c 63 6b 25 2c 32 35 b8 72 65 61 73 6f |0,Blck%,25.reaso| 00000210 6e 25 0d 03 b6 05 cc 0d 03 c0 21 c8 99 22 57 69 |n%........!.."Wi| 00000220 6d 70 5f 50 6f 6c 6c 22 2c 31 2c 42 6c 63 6b 25 |mp_Poll",1,Blck%| 00000230 b8 72 65 61 73 6f 6e 25 0d 03 ca 05 cd 0d 03 d4 |.reason%........| 00000240 07 f2 64 6f 0d 03 de 0a fd 51 75 69 74 25 0d 03 |..do.....Quit%..| 00000250 e8 26 c8 99 22 57 69 6d 70 5f 43 6c 6f 73 65 44 |.&.."Wimp_CloseD| 00000260 6f 77 6e 22 2c 54 68 64 6c 25 2c 26 34 38 35 33 |own",Thdl%,&4853| 00000270 34 31 35 34 0d 03 f2 05 e0 0d 04 38 14 dd f2 74 |4154.......8...t| 00000280 6f 6f 6c 62 6f 78 5f 76 61 6c 75 65 73 0d 04 88 |oolbox_values...| 00000290 11 45 5f 41 42 53 25 3d 26 38 32 38 38 31 0d 04 |.E_ABS%=&82881..| 000002a0 92 12 45 5f 54 4f 41 43 25 3d 26 34 34 65 63 31 |..E_TOAC%=&44ec1| 000002b0 0d 04 9c 13 45 5f 57 41 54 42 53 25 3d 26 38 32 |....E_WATBS%=&82| 000002c0 38 38 30 0d 04 a6 12 45 5f 57 48 42 48 25 3d 26 |880....E_WHBH%=&| 000002d0 38 32 38 39 30 0d 04 b0 12 45 5f 57 46 56 43 25 |82890....E_WFVC%| 000002e0 3d 26 38 32 38 38 35 0d 04 ba 11 45 5f 44 44 45 |=&82885....E_DDE| 000002f0 25 3d 26 38 32 38 38 38 0d 04 c4 11 45 5f 4d 53 |%=&82888....E_MS| 00000300 4d 25 3d 26 38 32 38 43 32 0d 04 ce 13 45 5f 4d |M%=&828C2....E_M| 00000310 41 54 42 53 25 3d 26 38 32 38 63 30 0d 04 d8 12 |ATBS%=&828c0....| 00000320 45 5f 4d 48 42 48 25 3d 26 38 32 38 63 31 0d 04 |E_MHBH%=&828c1..| 00000330 e2 10 45 5f 4d 53 25 3d 26 38 32 38 63 33 0d 04 |..E_MS%=&828c3..| 00000340 ec 12 45 5f 53 53 56 43 25 3d 26 38 32 38 38 45 |..E_SSVC%=&8288E| 00000350 0d 04 f6 14 45 5f 53 53 41 54 42 53 25 3d 26 38 |....E_SSATBS%=&8| 00000360 32 38 38 66 0d 05 00 14 45 5f 50 55 41 54 42 53 |288f....E_PUATBS| 00000370 25 3d 26 38 32 38 38 62 0d 05 0a 12 45 5f 4e 52 |%=&8288b....E_NR| 00000380 56 43 25 3d 26 38 32 38 38 64 0d 05 32 0c 45 5f |VC%=&8288d..2.E_| 00000390 55 51 41 25 3d 31 0d 05 5a 0f 4d 5f 44 5f 53 53 |UQA%=1..Z.M_D_SS| 000003a0 25 3d 36 34 34 0d 05 64 10 4d 5f 44 5f 53 53 50 |%=644..d.M_D_SSP| 000003b0 25 3d 36 34 30 0d 05 6e 0f 4d 5f 44 5f 53 54 25 |%=640..n.M_D_ST%| 000003c0 3d 36 34 32 0d 05 78 10 4d 5f 52 42 5f 47 53 25 |=642..x.M_RB_GS%| 000003d0 3d 33 38 39 0d 05 a0 12 54 5f 54 4f 4d 4f 25 3d |=389....T_TOMO%=| 000003e0 26 34 34 65 63 36 0d 05 aa 11 54 5f 54 53 4f 25 |&44ec6....T_TSO%| 000003f0 3d 26 34 34 65 63 33 0d 05 b4 12 54 5f 54 54 4c |=&44ec3....T_TTL| 00000400 55 25 3d 26 34 34 45 46 42 0d 05 be 11 54 5f 54 |U%=&44EFB....T_T| 00000410 48 4f 25 3d 26 34 34 65 63 34 0d 05 e6 10 58 42 |HO%=&44ec4....XB| 00000420 49 54 25 3d 26 32 30 30 30 30 0d 05 f0 05 e1 0d |IT%=&20000......| 00000430 06 36 10 dd f2 69 6e 69 74 69 61 6c 69 73 65 0d |.6...initialise.| 00000440 06 5e 0f ea 65 78 69 73 74 73 25 2c 61 25 0d 06 |.^..exists%,a%..| 00000450 72 11 f2 69 6e 69 74 5f 67 6c 6f 62 61 6c 73 0d |r..init_globals.| 00000460 06 9a 08 61 25 3d 30 0d 06 a4 09 62 25 3d 31 30 |...a%=0....b%=10| 00000470 0d 06 ae 16 5a 7a 7a 7a 70 61 73 73 5f 53 74 61 |....Zzzzpass_Sta| 00000480 74 75 73 25 3d 30 0d 06 b8 15 5a 7a 7a 7a 63 68 |tus%=0....Zzzzch| 00000490 6b 5f 53 74 61 74 75 73 25 3d 30 0d 06 c2 18 5a |k_Status%=0....Z| 000004a0 7a 7a 7a 70 61 73 73 5f 49 6e 66 6f 72 6d 65 64 |zzzpass_Informed| 000004b0 25 3d a3 0d 06 cc 05 f5 0d 06 d6 31 c8 99 22 54 |%=.........1.."T| 000004c0 61 73 6b 4d 61 6e 61 67 65 72 5f 45 6e 75 6d 65 |askManager_Enume| 000004d0 72 61 74 65 54 61 73 6b 73 22 2c 61 25 2c 42 75 |rateTasks",a%,Bu| 000004e0 66 31 25 2c 31 36 b8 61 25 0d 06 e0 23 e7 a4 69 |f1%,16.a%...#..i| 000004f0 6e 64 69 72 65 63 74 28 42 75 66 31 25 21 34 29 |ndirect(Buf1%!4)| 00000500 3d 22 7a 7a 7a 7a 70 61 73 73 22 8c 0d 06 ea 16 |="zzzzpass".....| 00000510 5a 7a 7a 7a 70 61 73 73 5f 53 74 61 74 75 73 25 |Zzzzpass_Status%| 00000520 3d 33 0d 06 f4 1c 5a 7a 7a 7a 70 61 73 73 5f 48 |=3....Zzzzpass_H| 00000530 61 6e 64 6c 65 25 3d 42 75 66 31 25 21 30 0d 06 |andle%=Buf1%!0..| 00000540 fe 05 cd 0d 07 08 22 e7 a4 69 6e 64 69 72 65 63 |......"..indirec| 00000550 74 28 42 75 66 31 25 21 34 29 3d 22 7a 7a 7a 7a |t(Buf1%!4)="zzzz| 00000560 63 68 6b 22 8c 0d 07 12 15 5a 7a 7a 7a 63 68 6b |chk".....Zzzzchk| 00000570 5f 53 74 61 74 75 73 25 3d 33 0d 07 1c 1b 5a 7a |_Status%=3....Zz| 00000580 7a 7a 63 68 6b 5f 48 61 6e 64 6c 65 25 3d 42 75 |zzchk_Handle%=Bu| 00000590 66 31 25 21 30 0d 07 26 05 cd 0d 07 30 09 fd 61 |f1%!0..&....0..a| 000005a0 25 3c 30 0d 07 58 0f f2 69 6e 69 74 5f 66 69 6c |%<0..X..init_fil| 000005b0 65 73 0d 07 80 0d 42 75 66 31 25 21 30 3d 30 0d |es....Buf1%!0=0.| 000005c0 07 8a 0d 42 75 66 32 25 21 30 3d 30 0d 07 94 56 |...Buf2%!0=0...V| 000005d0 c8 99 22 54 6f 6f 6c 62 6f 78 5f 49 6e 69 74 69 |.."Toolbox_Initi| 000005e0 61 6c 69 73 65 22 2c 30 2c 33 31 30 2c 42 75 66 |alise",0,310,Buf| 000005f0 32 25 2c 42 75 66 31 25 2c 22 3c 42 6f 6f 74 70 |2%,Buf1%,"<Bootp| 00000600 6c 75 73 24 44 69 72 3e 22 2c 54 6c 6d 73 25 2c |lus$Dir>",Tlms%,| 00000610 54 6c 6f 69 25 b8 2c 54 68 64 6c 25 2c 73 70 72 |Tloi%.,Thdl%,spr| 00000620 74 25 0d 07 bc 26 e7 41 75 74 6f 5f 50 72 6f 6d |t%...&.Auto_Prom| 00000630 70 74 25 80 20 50 61 73 73 77 6f 72 64 73 5f 45 |pt%. Passwords_E| 00000640 6e 61 62 6c 65 64 25 8c 0d 07 c6 15 53 65 71 75 |nabled%.....Sequ| 00000650 65 6e 63 65 24 3d 22 4c 4f 47 4f 4e 22 0d 07 d0 |ence$="LOGON"...| 00000660 05 cc 0d 07 da 16 53 65 71 75 65 6e 63 65 24 3d |......Sequence$=| 00000670 22 4e 4f 52 4d 41 4c 22 0d 07 e4 05 cd 0d 08 0c |"NORMAL"........| 00000680 2a 4f 77 6e 65 72 24 3d a4 67 65 74 5f 6d 65 73 |*Owner$=.get_mes| 00000690 73 61 67 65 28 22 4f 57 4e 22 2c 22 22 2c 22 22 |sage("OWN","",""| 000006a0 2c 22 22 2c 22 22 29 0d 08 34 12 f2 72 65 61 64 |,"","")..4..read| 000006b0 5f 66 69 6c 65 64 65 66 73 0d 08 3e 05 e1 0d 08 |_filedefs..>....| 000006c0 84 12 dd f2 69 6e 69 74 5f 67 6c 6f 62 61 6c 73 |....init_globals| 000006d0 0d 08 ac 0d ea 61 24 2c 61 25 2c 62 25 0d 08 c0 |.....a$,a%,b%...| 000006e0 1b 42 6f 6f 74 70 6c 75 73 5f 56 65 72 73 69 6f |.Bootplus_Versio| 000006f0 6e 24 3d 22 33 2e 31 22 0d 08 ca 0e 53 74 61 72 |n$="3.1"....Star| 00000700 74 65 64 25 3d a3 0d 08 d4 13 4c 6f 67 67 65 64 |ted%=.....Logged| 00000710 5f 55 73 65 72 24 3d 22 22 0d 08 de 10 4c 6f 67 |_User$=""....Log| 00000720 6f 6e 5f 49 44 25 3d 2d 31 0d 08 e8 14 4f 77 6e |on_ID%=-1....Own| 00000730 65 72 70 61 73 73 5f 49 44 25 3d 2d 31 0d 08 f2 |erpass_ID%=-1...| 00000740 0b 4f 62 6a 73 25 3d 30 0d 08 fc 0b 4e 74 72 73 |.Objs%=0....Ntrs| 00000750 25 3d 30 0d 09 06 0d 52 75 73 65 72 73 25 3d 30 |%=0....Rusers%=0| 00000760 0d 09 10 0b 52 75 73 72 25 3d 31 0d 09 1a 12 50 |....Rusr%=1....P| 00000770 61 73 73 77 6f 72 64 5f 49 44 25 3d 30 0d 09 24 |assword_ID%=0..$| 00000780 12 50 61 73 73 6d 65 6e 75 5f 49 44 25 3d 30 0d |.Passmenu_ID%=0.| 00000790 09 2e 2f 4f 70 74 66 69 6c 65 24 3d 22 3c 62 6f |../Optfile$="<bo| 000007a0 6f 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 6f |otplus$dir>.Reso| 000007b0 75 72 63 65 73 2e 4f 70 74 69 6f 6e 73 22 0d 09 |urces.Options"..| 000007c0 38 30 54 5f 4f 70 74 66 69 6c 65 24 3d 22 3c 62 |80T_Optfile$="<b| 000007d0 6f 6f 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 |ootplus$dir>.Res| 000007e0 6f 75 72 63 65 73 2e 4f 70 74 78 78 78 22 0d 09 |ources.Optxxx"..| 000007f0 42 31 41 63 63 65 73 73 66 69 6c 65 24 3d 22 3c |B1Accessfile$="<| 00000800 62 6f 6f 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 |bootplus$dir>.Re| 00000810 73 6f 75 72 63 65 73 2e 41 63 63 65 73 73 22 0d |sources.Access".| 00000820 09 4c 36 54 5f 41 63 63 65 73 73 66 69 6c 65 24 |.L6T_Accessfile$| 00000830 3d 22 3c 62 6f 6f 74 70 6c 75 73 24 64 69 72 3e |="<bootplus$dir>| 00000840 2e 52 65 73 6f 75 72 63 65 73 2e 41 63 63 65 73 |.Resources.Acces| 00000850 73 78 78 78 22 0d 09 56 2f 54 69 6d 65 73 66 69 |sxxx"..V/Timesfi| 00000860 6c 65 24 3d 22 3c 62 6f 6f 74 70 6c 75 73 24 64 |le$="<bootplus$d| 00000870 69 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 54 69 |ir>.Resources.Ti| 00000880 6d 65 73 22 0d 09 60 34 54 5f 54 69 6d 65 73 66 |mes"..`4T_Timesf| 00000890 69 6c 65 24 3d 22 3c 62 6f 6f 74 70 6c 75 73 24 |ile$="<bootplus$| 000008a0 64 69 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 54 |dir>.Resources.T| 000008b0 69 6d 65 73 78 78 78 22 0d 09 6a 31 50 61 73 73 |imesxxx"..j1Pass| 000008c0 66 69 6c 65 24 3d 22 3c 62 6f 6f 74 70 6c 75 73 |file$="<bootplus| 000008d0 24 64 69 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e |$dir>.Resources.| 000008e0 70 61 73 73 77 6f 72 64 22 0d 09 74 34 54 68 69 |password"..t4Thi| 000008f0 65 66 66 69 6c 65 24 3d 22 3c 42 6f 6f 74 70 6c |effile$="<Bootpl| 00000900 75 73 24 44 69 72 3e 2e 52 65 73 6f 75 72 63 65 |us$Dir>.Resource| 00000910 73 2e 6b 69 6c 6c 72 69 73 63 70 63 22 0d 09 7e |s.killriscpc"..~| 00000920 2f 4c 6f 67 66 69 6c 65 24 3d 22 3c 42 6f 6f 74 |/Logfile$="<Boot| 00000930 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 6f 75 72 |plus$dir>.Resour| 00000940 63 65 73 2e 6c 6f 67 66 69 6c 65 22 0d 09 88 33 |ces.logfile"...3| 00000950 4f 6c 6f 67 66 69 6c 65 24 3d 22 3c 42 6f 6f 74 |Ologfile$="<Boot| 00000960 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 6f 75 72 |plus$dir>.Resour| 00000970 63 65 73 2e 6f 6c 64 6c 6f 67 66 69 6c 65 22 0d |ces.oldlogfile".| 00000980 09 92 2f 4f 77 6e 65 72 66 69 6c 65 24 3d 22 3c |../Ownerfile$="<| 00000990 42 6f 6f 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 |Bootplus$dir>.Re| 000009a0 73 6f 75 72 63 65 73 2e 6f 77 6e 65 72 22 0d 09 |sources.owner"..| 000009b0 9c 10 41 75 74 6f 63 6c 6f 73 65 25 3d a3 0d 09 |..Autoclose%=...| 000009c0 a6 11 45 64 69 74 5f 54 79 70 65 24 3d 22 22 0d |..Edit_Type$="".| 000009d0 09 b0 0f 41 6c 69 61 73 5f 57 48 25 3d 30 0d 09 |...Alias_WH%=0..| 000009e0 ba 0f 46 6f 6e 74 5f 4c 68 25 3d 34 34 0d 09 c4 |..Font_Lh%=44...| 000009f0 20 46 6f 6e 74 5f 4e 61 6d 65 24 3d 22 48 6f 6d | Font_Name$="Hom| 00000a00 65 72 74 6f 6e 2e 4d 65 64 69 75 6d 22 0d 09 ce |erton.Medium"...| 00000a10 0e 45 64 69 74 6f 72 73 25 3d 30 0d 09 d8 0c 54 |.Editors%=0....T| 00000a20 64 69 72 73 25 3d 30 0d 09 e2 0c 54 79 64 69 72 |dirs%=0....Tydir| 00000a30 25 3d 30 0d 09 ec 0c 54 6e 64 69 72 25 3d 30 0d |%=0....Tndir%=0.| 00000a40 09 f6 11 44 75 73 74 62 69 6e 5f 49 44 25 3d 30 |...Dustbin_ID%=0| 00000a50 0d 0a 00 13 44 72 61 67 5f 52 65 61 73 6f 6e 24 |....Drag_Reason$| 00000a60 3d 22 22 0d 0a 0a 12 44 72 61 67 5f 4f 62 6a 65 |=""....Drag_Obje| 00000a70 63 74 25 3d 30 0d 0a 14 10 44 72 61 67 5f 49 6e |ct%=0....Drag_In| 00000a80 74 6f 25 3d 30 0d 0a 1e 0c 53 61 76 65 64 25 3d |to%=0....Saved%=| 00000a90 b9 0d 0a 28 14 53 65 71 75 65 6e 63 65 24 3d 22 |...(.Sequence$="| 00000aa0 42 4f 4f 54 22 0d 0a 32 05 e1 0d 0a 78 13 dd f2 |BOOT"..2....x...| 00000ab0 72 65 61 64 5f 66 69 6c 65 64 65 66 73 0d 0a a0 |read_filedefs...| 00000ac0 10 f3 42 6f 6f 74 5f 54 79 70 65 73 25 0d 0a aa |..Boot_Types%...| 00000ad0 15 e3 61 25 3d 31 b8 42 6f 6f 74 5f 54 79 70 65 |..a%=1.Boot_Type| 00000ae0 73 25 0d 0a b4 15 f3 42 6f 6f 74 5f 54 79 70 65 |s%.....Boot_Type| 00000af0 24 28 61 25 2c 31 29 0d 0a be 15 f3 42 6f 6f 74 |$(a%,1).....Boot| 00000b00 5f 54 79 70 65 24 28 61 25 2c 32 29 0d 0a c8 07 |_Type$(a%,2)....| 00000b10 f3 61 24 0d 0a d2 31 42 6f 6f 74 5f 54 79 70 65 |.a$...1Boot_Type| 00000b20 24 28 61 25 2c 33 29 3d a4 67 65 74 5f 6d 65 73 |$(a%,3)=.get_mes| 00000b30 73 61 67 65 28 61 24 2c 22 22 2c 22 22 2c 22 22 |sage(a$,"","",""| 00000b40 2c 22 22 29 0d 0a dc 07 ed 61 25 0d 0b 04 0f f3 |,"").....a%.....| 00000b50 53 74 61 6e 64 61 72 64 73 25 0d 0b 0e 14 e3 61 |Standards%.....a| 00000b60 25 3d 31 b8 53 74 61 6e 64 61 72 64 73 25 0d 0b |%=1.Standards%..| 00000b70 18 0b e3 62 25 3d 31 b8 32 0d 0b 22 15 f3 53 74 |...b%=1.2.."..St| 00000b80 61 6e 64 61 72 64 24 28 61 25 2c 62 25 29 0d 0b |andard$(a%,b%)..| 00000b90 2c 07 ed 62 25 0d 0b 36 07 ed 61 25 0d 0b 4a 0b |,..b%..6..a%..J.| 00000ba0 e3 61 25 3d 31 b8 37 0d 0b 54 12 f3 57 65 65 6b |.a%=1.7..T..Week| 00000bb0 64 61 79 73 24 28 61 25 29 0d 0b 5e 07 ed 61 25 |days$(a%)..^..a%| 00000bc0 0d 0b 68 05 e1 0d 0b ae 10 dd f2 69 6e 69 74 5f |..h........init_| 00000bd0 66 69 6c 65 73 0d 0b d6 0b ea 66 25 2c 69 64 25 |files.....f%,id%| 00000be0 0d 0b fe 6a f2 67 65 74 5f 6f 70 74 69 6f 6e 73 |...j.get_options| 00000bf0 28 61 25 2c 61 25 2c 61 25 2c 61 25 2c 61 25 2c |(a%,a%,a%,a%,a%,| 00000c00 61 25 2c 47 75 65 73 74 5f 4c 6f 67 69 6e 73 25 |a%,Guest_Logins%| 00000c10 2c 59 25 2c 46 75 6c 6c 5f 4f 77 6e 65 72 5f 41 |,Y%,Full_Owner_A| 00000c20 63 63 65 73 73 25 2c 59 25 2c 50 61 73 73 77 6f |ccess%,Y%,Passwo| 00000c30 72 64 73 5f 45 6e 61 62 6c 65 64 25 2c 41 75 74 |rds_Enabled%,Aut| 00000c40 6f 5f 50 72 6f 6d 70 74 25 29 0d 0c 26 13 f2 67 |o_Prompt%)..&..g| 00000c50 65 74 5f 75 73 65 72 61 63 63 65 73 73 0d 0c 4e |et_useraccess..N| 00000c60 12 f2 67 65 74 5f 75 73 65 72 74 69 6d 65 73 0d |..get_usertimes.| 00000c70 0c 76 30 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 32 |.v0.."OS_File",2| 00000c80 30 2c 22 3c 57 69 6d 70 24 53 63 72 61 70 44 69 |0,"<Wimp$ScrapDi| 00000c90 72 3e 2e 42 6f 6f 74 70 6c 75 73 22 b8 66 25 0d |r>.Bootplus".f%.| 00000ca0 0c 80 0a e7 66 25 3d 30 8c 0d 0c 8a 22 2a 43 44 |....f%=0...."*CD| 00000cb0 49 52 20 3c 57 69 6d 70 24 53 63 72 61 70 44 69 |IR <Wimp$ScrapDi| 00000cc0 72 3e 2e 42 6f 6f 74 70 6c 75 73 0d 0c 94 05 cd |r>.Bootplus.....| 00000cd0 0d 0c 9e 3a c8 99 22 58 4f 53 5f 46 53 43 6f 6e |...:.."XOS_FSCon| 00000ce0 74 72 6f 6c 22 2c 32 37 2c 22 3c 57 69 6d 70 24 |trol",27,"<Wimp$| 00000cf0 53 63 72 61 70 44 69 72 3e 2e 42 6f 6f 74 70 6c |ScrapDir>.Bootpl| 00000d00 75 73 2e 2a 22 2c 2c 26 31 38 0d 0c a8 05 e1 0d |us.*",,&18......| 00000d10 0c ee 08 dd f2 64 6f 0d 0d 21 0e c8 8e 72 65 61 |.....do..!...rea| 00000d20 73 6f 6e 25 ca 0d 0d 2a 06 c9 30 0d 0d 34 10 c8 |son%...*..0..4..| 00000d30 8e 53 65 71 75 65 6e 63 65 24 ca 0d 0d 3e 0c c9 |.Sequence$...>..| 00000d40 22 4c 4f 47 4f 4e 22 0d 0d 66 2e c8 99 54 5f 54 |"LOGON"..f...T_T| 00000d50 53 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 |SO%,0,Password_I| 00000d60 44 25 2c 30 2c 30 2c 50 61 73 73 6d 65 6e 75 5f |D%,0,0,Passmenu_| 00000d70 49 44 25 2c 37 0d 0d 70 19 53 65 71 75 65 6e 63 |ID%,7..p.Sequenc| 00000d80 65 24 3d 22 50 52 4f 4d 50 54 49 4e 47 22 0d 0d |e$="PROMPTING"..| 00000d90 7a 10 c9 22 50 52 4f 4d 50 54 49 4e 47 22 0d 0d |z.."PROMPTING"..| 00000da0 a2 12 f2 6c 6f 63 6b 5f 6d 6f 75 73 65 28 b9 29 |...lock_mouse(.)| 00000db0 0d 0d ac 05 cb 0d 0d b6 06 c9 31 0d 0d c0 12 f2 |..........1.....| 00000dc0 72 65 64 72 61 77 5f 77 69 6e 64 6f 77 0d 0d ca |redraw_window...| 00000dd0 06 c9 32 0d 0d d4 10 f2 6f 70 65 6e 5f 77 69 6e |..2.....open_win| 00000de0 64 6f 77 0d 0d de 06 c9 36 0d 0d e8 10 f2 6d 6f |dow.....6.....mo| 00000df0 75 73 65 5f 63 6c 69 63 6b 0d 0d f2 06 c9 37 0d |use_click.....7.| 00000e00 0d fc 11 f2 64 72 61 67 5f 73 74 6f 70 70 65 64 |....drag_stopped| 00000e10 0d 0e 06 07 c9 31 30 0d 0e 10 13 f2 73 63 72 6f |.....10.....scro| 00000e20 6c 6c 5f 72 65 71 75 65 73 74 0d 0e 1a 0d c9 31 |ll_request.....1| 00000e30 37 2c 31 38 2c 31 39 0d 0e 24 12 f2 77 69 6d 70 |7,18,19..$..wimp| 00000e40 5f 6d 65 73 73 61 67 65 73 0d 0e 2e 09 c9 26 32 |_messages.....&2| 00000e50 30 30 0d 0e 38 13 f2 74 6f 6f 6c 62 6f 78 5f 65 |00..8..toolbox_e| 00000e60 76 65 6e 74 73 0d 0e 42 05 cb 0d 0e 4c 05 e1 0d |vents..B....L...| 00000e70 0e 92 13 dd f2 72 65 64 72 61 77 5f 77 69 6e 64 |.....redraw_wind| 00000e80 6f 77 0d 0e ba 0e c8 8e 42 6c 63 6b 25 21 30 ca |ow......Blck%!0.| 00000e90 0d 0e c4 12 c9 53 75 62 6c 69 73 74 25 28 31 2c |.....Sublist%(1,| 00000ea0 32 29 0d 0e ec 13 f2 64 72 61 77 5f 6d 61 69 6e |2).....draw_main| 00000eb0 28 31 2c 32 29 0d 0e f6 12 c9 53 75 62 6c 69 73 |(1,2).....Sublis| 00000ec0 74 25 28 31 2c 31 29 0d 0f 1e 16 f2 64 72 61 77 |t%(1,1).....draw| 00000ed0 5f 73 75 62 28 31 2c 32 2c a3 2c 30 29 0d 0f 28 |_sub(1,2,.,0)..(| 00000ee0 12 c9 53 75 62 6c 69 73 74 25 28 32 2c 32 29 0d |..Sublist%(2,2).| 00000ef0 0f 50 13 f2 64 72 61 77 5f 6d 61 69 6e 28 32 2c |.P..draw_main(2,| 00000f00 32 29 0d 0f 5a 12 c9 53 75 62 6c 69 73 74 25 28 |2)..Z..Sublist%(| 00000f10 32 2c 31 29 0d 0f 82 16 f2 64 72 61 77 5f 73 75 |2,1).....draw_su| 00000f20 62 28 32 2c 32 2c a3 2c 30 29 0d 0f 8c 12 c9 53 |b(2,2,.,0).....S| 00000f30 75 62 6c 69 73 74 25 28 33 2c 31 29 0d 0f b4 16 |ublist%(3,1)....| 00000f40 f2 64 72 61 77 5f 73 75 62 28 33 2c 32 2c a3 2c |.draw_sub(3,2,.,| 00000f50 30 29 0d 0f be 05 cb 0d 0f c8 05 e1 0d 10 0e 11 |0)..............| 00000f60 dd f2 6f 70 65 6e 5f 77 69 6e 64 6f 77 0d 10 36 |..open_window..6| 00000f70 08 ea 62 68 25 0d 10 4a 10 62 68 25 3d 42 6c 63 |..bh%..J.bh%=Blc| 00000f80 6b 25 21 32 38 0d 10 54 0e c8 8e 42 6c 63 6b 25 |k%!28..T...Blck%| 00000f90 21 30 ca 0d 10 5e 12 c9 53 75 62 6c 69 73 74 25 |!0...^..Sublist%| 00000fa0 28 31 2c 32 29 0d 10 86 1a 42 6c 63 6b 25 21 32 |(1,2)....Blck%!2| 00000fb0 38 3d 53 75 62 6c 69 73 74 25 28 31 2c 31 29 0d |8=Sublist%(1,1).| 00000fc0 10 90 1e c8 99 22 57 69 6d 70 5f 4f 70 65 6e 57 |....."Wimp_OpenW| 00000fd0 69 6e 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d 10 9a |indow",,Blck%...| 00000fe0 18 f2 64 72 61 77 5f 73 75 62 28 31 2c 33 2c a3 |..draw_sub(1,3,.| 00000ff0 2c 62 68 25 29 0d 10 a4 12 c9 53 75 62 6c 69 73 |,bh%).....Sublis| 00001000 74 25 28 31 2c 31 29 0d 10 cc 1e c8 99 22 57 69 |t%(1,1)......"Wi| 00001010 6d 70 5f 4f 70 65 6e 57 69 6e 64 6f 77 22 2c 2c |mp_OpenWindow",,| 00001020 42 6c 63 6b 25 0d 10 d6 12 c9 53 75 62 6c 69 73 |Blck%.....Sublis| 00001030 74 25 28 32 2c 32 29 0d 10 fe 1a 42 6c 63 6b 25 |t%(2,2)....Blck%| 00001040 21 32 38 3d 53 75 62 6c 69 73 74 25 28 32 2c 31 |!28=Sublist%(2,1| 00001050 29 0d 11 08 1e c8 99 22 57 69 6d 70 5f 4f 70 65 |)......"Wimp_Ope| 00001060 6e 57 69 6e 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d |nWindow",,Blck%.| 00001070 11 12 18 f2 64 72 61 77 5f 73 75 62 28 32 2c 33 |....draw_sub(2,3| 00001080 2c a3 2c 62 68 25 29 0d 11 1c 18 f2 64 72 61 77 |,.,bh%).....draw| 00001090 5f 73 75 62 28 33 2c 33 2c a3 2c 62 68 25 29 0d |_sub(3,3,.,bh%).| 000010a0 11 26 12 c9 53 75 62 6c 69 73 74 25 28 32 2c 31 |.&..Sublist%(2,1| 000010b0 29 0d 11 4e 1e c8 99 22 57 69 6d 70 5f 4f 70 65 |)..N..."Wimp_Ope| 000010c0 6e 57 69 6e 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d |nWindow",,Blck%.| 000010d0 11 58 12 c9 53 75 62 6c 69 73 74 25 28 33 2c 31 |.X..Sublist%(3,1| 000010e0 29 0d 11 80 1e c8 99 22 57 69 6d 70 5f 4f 70 65 |)......"Wimp_Ope| 000010f0 6e 57 69 6e 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d |nWindow",,Blck%.| 00001100 11 8a 05 cb 0d 11 94 05 e1 0d 11 da 11 dd f2 6d |...............m| 00001110 6f 75 73 65 5f 63 6c 69 63 6b 0d 12 02 19 ea 77 |ouse_click.....w| 00001120 6b 5f 6d 79 25 2c 6f 73 5f 77 79 25 2c 74 72 25 |k_my%,os_wy%,tr%| 00001130 2c 70 25 0d 12 16 08 c8 8e b9 ca 0d 12 20 29 c9 |,p%.......... ).| 00001140 28 42 6c 63 6b 25 21 38 3d 34 29 80 28 42 6c 63 |(Blck%!8=4).(Blc| 00001150 6b 25 21 31 32 3d 53 75 62 6c 69 73 74 25 28 31 |k%!12=Sublist%(1| 00001160 2c 31 29 29 0d 12 48 15 f2 62 6f 6f 74 6c 69 73 |,1))..H..bootlis| 00001170 74 5f 63 6c 69 63 6b 65 64 0d 12 52 29 c9 28 42 |t_clicked..R).(B| 00001180 6c 63 6b 25 21 38 3d 34 29 80 28 42 6c 63 6b 25 |lck%!8=4).(Blck%| 00001190 21 31 32 3d 53 75 62 6c 69 73 74 25 28 32 2c 31 |!12=Sublist%(2,1| 000011a0 29 29 0d 12 7a 45 f2 64 69 72 6c 69 73 74 5f 63 |))..zE.dirlist_c| 000011b0 6c 69 63 6b 65 64 28 22 59 22 2c 53 75 62 6c 69 |licked("Y",Subli| 000011c0 73 74 25 28 32 2c 31 29 2c 54 79 64 69 72 73 25 |st%(2,1),Tydirs%| 000011d0 2c 54 79 70 74 25 28 29 2c 53 75 62 6c 69 73 74 |,Typt%(),Sublist| 000011e0 25 28 33 2c 31 29 29 0d 12 84 29 c9 28 42 6c 63 |%(3,1))...).(Blc| 000011f0 6b 25 21 38 3d 34 29 80 28 42 6c 63 6b 25 21 31 |k%!8=4).(Blck%!1| 00001200 32 3d 53 75 62 6c 69 73 74 25 28 33 2c 31 29 29 |2=Sublist%(3,1))| 00001210 0d 12 ac 45 f2 64 69 72 6c 69 73 74 5f 63 6c 69 |...E.dirlist_cli| 00001220 63 6b 65 64 28 22 4e 22 2c 53 75 62 6c 69 73 74 |cked("N",Sublist| 00001230 25 28 33 2c 31 29 2c 54 6e 64 69 72 73 25 2c 54 |%(3,1),Tndirs%,T| 00001240 6e 70 74 25 28 29 2c 53 75 62 6c 69 73 74 25 28 |npt%(),Sublist%(| 00001250 32 2c 31 29 29 0d 12 b6 05 cb 0d 12 c0 05 e1 0d |2,1))...........| 00001260 13 06 16 dd f2 62 6f 6f 74 6c 69 73 74 5f 63 6c |.....bootlist_cl| 00001270 69 63 6b 65 64 0d 13 2e 21 ea 6f 73 5f 6d 78 25 |icked...!.os_mx%| 00001280 2c 6f 73 5f 6d 79 25 2c 77 6b 5f 6d 79 25 2c 74 |,os_my%,wk_my%,t| 00001290 72 25 2c 6f 74 24 0d 13 42 12 6f 73 5f 6d 78 25 |r%,ot$..B.os_mx%| 000012a0 3d 42 6c 63 6b 25 21 30 0d 13 4c 12 6f 73 5f 6d |=Blck%!0..L.os_m| 000012b0 79 25 3d 42 6c 63 6b 25 21 34 0d 13 74 19 42 6c |y%=Blck%!4..t.Bl| 000012c0 63 6b 25 21 30 3d 53 75 62 6c 69 73 74 25 28 31 |ck%!0=Sublist%(1| 000012d0 2c 31 29 0d 13 7e 22 c8 99 22 57 69 6d 70 5f 47 |,1)..~".."Wimp_G| 000012e0 65 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c |etWindowState",,| 000012f0 42 6c 63 6b 25 0d 13 88 25 77 6b 5f 6d 79 25 3d |Blck%...%wk_my%=| 00001300 6f 73 5f 6d 79 25 2d 28 42 6c 63 6b 25 21 31 36 |os_my%-(Blck%!16| 00001310 2d 42 6c 63 6b 25 21 32 34 29 0d 13 92 1d 74 72 |-Blck%!24)....tr| 00001320 25 3d a8 28 2d 77 6b 5f 6d 79 25 2f 46 6f 6e 74 |%=.(-wk_my%/Font| 00001330 5f 4c 68 25 29 2b 31 0d 13 9c 10 e7 74 72 25 3c |_Lh%)+1.....tr%<| 00001340 3d 4f 62 6a 73 25 8c 0d 13 c4 11 70 25 3d 4f 70 |=Objs%.....p%=Op| 00001350 74 72 25 28 74 72 25 29 0d 13 ce 19 e7 28 4f 66 |tr%(tr%).....(Of| 00001360 6c 67 25 28 70 25 2c 35 29 80 20 36 34 29 3d 30 |lg%(p%,5). 64)=0| 00001370 8c 0d 13 f6 12 c8 8e 4f 64 61 74 24 28 70 25 2c |.......Odat$(p%,| 00001380 33 29 ca 0d 14 00 0b c9 22 31 30 30 30 22 0d 14 |3)......"1000"..| 00001390 0a 27 6f 74 24 3d a4 67 65 74 5f 6d 65 73 73 61 |.'ot$=.get_messa| 000013a0 67 65 28 22 44 4d 31 22 2c 22 22 2c 22 22 2c 22 |ge("DM1","","","| 000013b0 22 2c 22 22 29 0d 14 14 0b c9 22 32 30 30 30 22 |","")....."2000"| 000013c0 0d 14 1e 27 6f 74 24 3d a4 67 65 74 5f 6d 65 73 |...'ot$=.get_mes| 000013d0 73 61 67 65 28 22 44 4d 32 22 2c 22 22 2c 22 22 |sage("DM2","",""| 000013e0 2c 22 22 2c 22 22 29 0d 14 28 05 7f 0d 14 32 30 |,"","")..(....20| 000013f0 6f 74 24 3d a4 67 65 74 5f 6d 65 73 73 61 67 65 |ot$=.get_message| 00001400 28 22 44 4d 33 22 2c 4f 64 61 74 24 28 70 25 2c |("DM3",Odat$(p%,| 00001410 33 29 2c 22 22 2c 22 22 2c 22 22 29 0d 14 3c 05 |3),"","","")..<.| 00001420 cb 0d 14 46 27 42 75 66 32 25 21 30 3d 6f 73 5f |...F'Buf2%!0=os_| 00001430 6d 78 25 2d 31 36 3a 42 75 66 32 25 21 34 3d 6f |mx%-16:Buf2%!4=o| 00001440 73 5f 6d 79 25 2d 31 36 0d 14 50 28 42 75 66 32 |s_my%-16..P(Buf2| 00001450 25 21 38 3d 6f 73 5f 6d 78 25 2b 31 38 3a 42 75 |%!8=os_mx%+18:Bu| 00001460 66 32 25 21 31 32 3d 6f 73 5f 6d 79 25 2b 31 38 |f2%!12=os_my%+18| 00001470 0d 14 5a 28 c8 99 22 44 72 61 67 41 53 70 72 69 |..Z(.."DragASpri| 00001480 74 65 5f 53 74 61 72 74 22 2c 26 35 2c 31 2c 6f |te_Start",&5,1,o| 00001490 74 24 2c 42 75 66 32 25 0d 14 64 19 44 72 61 67 |t$,Buf2%..d.Drag| 000014a0 5f 52 65 61 73 6f 6e 24 3d 22 44 65 6c 65 74 65 |_Reason$="Delete| 000014b0 22 0d 14 6e 14 44 72 61 67 5f 4f 62 6a 65 63 74 |"..n.Drag_Object| 000014c0 25 3d 74 72 25 0d 14 78 05 cc 0d 14 a0 35 e7 4f |%=tr%..x.....5.O| 000014d0 64 61 74 24 28 70 25 2c 31 29 3d 22 21 42 6f 6f |dat$(p%,1)="!Boo| 000014e0 74 70 6c 75 73 22 84 4f 64 61 74 24 28 70 25 2c |tplus".Odat$(p%,| 000014f0 31 29 3d 22 21 7a 7a 7a 7a 70 61 73 73 22 8c 0d |1)="!zzzzpass"..| 00001500 14 aa 27 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 |..'.error_messag| 00001510 65 28 22 45 4d 31 22 2c 22 22 2c 22 22 2c 22 22 |e("EM1","","",""| 00001520 2c 30 2c 4b 25 29 0d 14 b4 05 cc 0d 14 be 27 f2 |,0,K%)........'.| 00001530 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 |error_message("E| 00001540 4d 32 22 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 4b |M2","","","",0,K| 00001550 25 29 0d 14 c8 05 cd 0d 14 d2 05 cd 0d 14 dc 05 |%)..............| 00001560 cd 0d 14 e6 05 e1 0d 15 2c 32 dd f2 64 69 72 6c |........,2..dirl| 00001570 69 73 74 5f 63 6c 69 63 6b 65 64 28 66 72 24 2c |ist_clicked(fr$,| 00001580 66 69 64 25 2c 66 72 63 74 25 2c 66 72 70 74 25 |fid%,frct%,frpt%| 00001590 28 29 2c 74 69 64 25 29 0d 15 54 20 ea 6f 73 5f |(),tid%)..T .os_| 000015a0 6d 78 25 2c 6f 73 5f 6d 79 25 2c 77 6b 5f 6d 79 |mx%,os_my%,wk_my| 000015b0 25 2c 74 72 25 2c 70 25 0d 15 68 12 6f 73 5f 6d |%,tr%,p%..h.os_m| 000015c0 78 25 3d 42 6c 63 6b 25 21 30 0d 15 72 12 6f 73 |x%=Blck%!0..r.os| 000015d0 5f 6d 79 25 3d 42 6c 63 6b 25 21 34 0d 15 9a 10 |_my%=Blck%!4....| 000015e0 42 6c 63 6b 25 21 30 3d 66 69 64 25 0d 15 a4 22 |Blck%!0=fid%..."| 000015f0 c8 99 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f |.."Wimp_GetWindo| 00001600 77 53 74 61 74 65 22 2c 2c 42 6c 63 6b 25 0d 15 |wState",,Blck%..| 00001610 ae 25 77 6b 5f 6d 79 25 3d 6f 73 5f 6d 79 25 2d |.%wk_my%=os_my%-| 00001620 28 42 6c 63 6b 25 21 31 36 2d 42 6c 63 6b 25 21 |(Blck%!16-Blck%!| 00001630 32 34 29 0d 15 b8 26 44 72 61 67 5f 4f 62 6a 65 |24)...&Drag_Obje| 00001640 63 74 25 3d a8 28 2d 77 6b 5f 6d 79 25 2f 46 6f |ct%=.(-wk_my%/Fo| 00001650 6e 74 5f 4c 68 25 29 2b 31 0d 15 c2 19 e7 44 72 |nt_Lh%)+1.....Dr| 00001660 61 67 5f 4f 62 6a 65 63 74 25 3c 3d 66 72 63 74 |ag_Object%<=frct| 00001670 25 8c 0d 15 ea 1a 70 25 3d 66 72 70 74 25 28 44 |%.....p%=frpt%(D| 00001680 72 61 67 5f 4f 62 6a 65 63 74 25 29 0d 15 f4 34 |rag_Object%)...4| 00001690 e7 28 28 54 66 6c 67 25 28 70 25 2c 31 29 80 26 |.((Tflg%(p%,1).&| 000016a0 34 30 29 3d 26 34 30 29 80 28 52 75 73 72 24 28 |40)=&40).(Rusr$(| 000016b0 52 75 73 72 25 29 3c 3e 4f 77 6e 65 72 24 29 8c |Rusr%)<>Owner$).| 000016c0 0d 16 1c 27 f2 65 72 72 6f 72 5f 6d 65 73 73 61 |...'.error_messa| 000016d0 67 65 28 22 45 4d 33 22 2c 22 22 2c 22 22 2c 22 |ge("EM3","","","| 000016e0 22 2c 30 2c 4b 25 29 0d 16 26 05 cc 0d 16 4e 17 |",0,K%)..&....N.| 000016f0 44 72 61 67 5f 52 65 61 73 6f 6e 24 3d 22 4d 6f |Drag_Reason$="Mo| 00001700 76 65 22 0d 16 58 12 44 72 61 67 5f 46 72 6f 6d |ve"..X.Drag_From| 00001710 24 3d 66 72 24 0d 16 62 13 44 72 61 67 5f 49 6e |$=fr$..b.Drag_In| 00001720 74 6f 25 3d 74 69 64 25 0d 16 6c 27 42 75 66 32 |to%=tid%..l'Buf2| 00001730 25 21 30 3d 6f 73 5f 6d 78 25 2d 31 36 3a 42 75 |%!0=os_mx%-16:Bu| 00001740 66 32 25 21 34 3d 6f 73 5f 6d 79 25 2d 31 36 0d |f2%!4=os_my%-16.| 00001750 16 76 28 42 75 66 32 25 21 38 3d 6f 73 5f 6d 78 |.v(Buf2%!8=os_mx| 00001760 25 2b 31 38 3a 42 75 66 32 25 21 31 32 3d 6f 73 |%+18:Buf2%!12=os| 00001770 5f 6d 79 25 2b 31 38 0d 16 80 30 c8 99 22 44 72 |_my%+18...0.."Dr| 00001780 61 67 41 53 70 72 69 74 65 5f 53 74 61 72 74 22 |agASprite_Start"| 00001790 2c 26 35 2c 31 2c 22 64 69 72 65 63 74 6f 72 79 |,&5,1,"directory| 000017a0 22 2c 42 75 66 32 25 0d 16 8a 05 cd 0d 16 94 05 |",Buf2%.........| 000017b0 cd 0d 16 9e 05 e1 0d 16 e4 12 dd f2 64 72 61 67 |............drag| 000017c0 5f 73 74 6f 70 70 65 64 0d 17 0c 22 c8 99 22 57 |_stopped...".."W| 000017d0 69 6d 70 5f 47 65 74 50 6f 69 6e 74 65 72 49 6e |imp_GetPointerIn| 000017e0 66 6f 22 2c 2c 42 6c 63 6b 25 0d 17 16 08 c8 8e |fo",,Blck%......| 000017f0 b9 ca 0d 17 20 33 c9 28 42 6c 63 6b 25 21 31 36 |.... 3.(Blck%!16| 00001800 3d 44 75 73 74 62 69 6e 5f 49 44 25 29 80 28 44 |=Dustbin_ID%).(D| 00001810 72 61 67 5f 52 65 61 73 6f 6e 24 3d 22 44 65 6c |rag_Reason$="Del| 00001820 65 74 65 22 29 0d 17 48 15 f2 64 72 61 67 5f 73 |ete")..H..drag_s| 00001830 74 6f 70 70 65 64 5f 62 69 6e 0d 17 52 30 c9 28 |topped_bin..R0.(| 00001840 42 6c 63 6b 25 21 31 32 3d 44 72 61 67 5f 49 6e |Blck%!12=Drag_In| 00001850 74 6f 25 29 80 28 44 72 61 67 5f 52 65 61 73 6f |to%).(Drag_Reaso| 00001860 6e 24 3d 22 4d 6f 76 65 22 29 0d 17 7a 14 e7 44 |n$="Move")..z..D| 00001870 72 61 67 5f 46 72 6f 6d 24 3d 22 59 22 8c 0d 17 |rag_From$="Y"...| 00001880 a2 36 f2 64 72 61 67 5f 73 74 6f 70 70 65 64 5f |.6.drag_stopped_| 00001890 64 69 72 28 54 79 64 69 72 73 25 2c 54 79 70 74 |dir(Tydirs%,Typt| 000018a0 25 28 29 2c 54 6e 64 69 72 73 25 2c 54 6e 70 74 |%(),Tndirs%,Tnpt| 000018b0 25 28 29 29 0d 17 ac 05 cc 0d 17 d4 36 f2 64 72 |%())........6.dr| 000018c0 61 67 5f 73 74 6f 70 70 65 64 5f 64 69 72 28 54 |ag_stopped_dir(T| 000018d0 6e 64 69 72 73 25 2c 54 6e 70 74 25 28 29 2c 54 |ndirs%,Tnpt%(),T| 000018e0 79 64 69 72 73 25 2c 54 79 70 74 25 28 29 29 0d |ydirs%,Typt%()).| 000018f0 17 de 05 cd 0d 17 e8 0c 53 61 76 65 64 25 3d a3 |........Saved%=.| 00001900 0d 18 10 19 f2 73 65 74 5f 6c 69 73 74 5f 65 78 |.....set_list_ex| 00001910 74 65 6e 74 28 32 2c b9 29 0d 18 1a 16 f2 64 72 |tent(2,.).....dr| 00001920 61 77 5f 73 75 62 28 32 2c 32 2c a3 2c 30 29 0d |aw_sub(2,2,.,0).| 00001930 18 24 19 f2 73 65 74 5f 6c 69 73 74 5f 65 78 74 |.$..set_list_ext| 00001940 65 6e 74 28 33 2c b9 29 0d 18 2e 16 f2 64 72 61 |ent(3,.).....dra| 00001950 77 5f 73 75 62 28 33 2c 32 2c a3 2c 30 29 0d 18 |w_sub(3,2,.,0)..| 00001960 38 05 cb 0d 18 42 18 c8 99 22 44 72 61 67 41 53 |8....B..."DragAS| 00001970 70 72 69 74 65 5f 53 74 6f 70 22 0d 18 4c 13 44 |prite_Stop"..L.D| 00001980 72 61 67 5f 52 65 61 73 6f 6e 24 3d 22 22 0d 18 |rag_Reason$=""..| 00001990 56 05 e1 0d 18 9c 16 dd f2 64 72 61 67 5f 73 74 |V........drag_st| 000019a0 6f 70 70 65 64 5f 62 69 6e 0d 18 c4 07 ea 70 25 |opped_bin.....p%| 000019b0 0d 18 d8 1a 70 25 3d 4f 70 74 72 25 28 44 72 61 |....p%=Optr%(Dra| 000019c0 67 5f 4f 62 6a 65 63 74 25 29 0d 18 e2 12 4f 66 |g_Object%)....Of| 000019d0 6c 67 25 28 70 25 2c 35 29 3d 31 36 0d 18 ec 1a |lg%(p%,5)=16....| 000019e0 e3 70 25 3d 44 72 61 67 5f 4f 62 6a 65 63 74 25 |.p%=Drag_Object%| 000019f0 b8 4f 62 6a 73 25 0d 18 f6 19 4f 70 74 72 25 28 |.Objs%....Optr%(| 00001a00 70 25 29 3d 4f 70 74 72 25 28 70 25 2b 31 29 0d |p%)=Optr%(p%+1).| 00001a10 19 00 07 ed 70 25 0d 19 0a 0c 4f 62 6a 73 25 2d |....p%....Objs%-| 00001a20 3d 31 0d 19 14 0c 53 61 76 65 64 25 3d a3 0d 19 |=1....Saved%=...| 00001a30 3c 19 f2 73 65 74 5f 6c 69 73 74 5f 65 78 74 65 |<..set_list_exte| 00001a40 6e 74 28 31 2c b9 29 0d 19 46 16 f2 64 72 61 77 |nt(1,.)..F..draw| 00001a50 5f 73 75 62 28 31 2c 32 2c a3 2c 30 29 0d 19 50 |_sub(1,2,.,0)..P| 00001a60 05 e1 0d 19 96 33 dd f2 64 72 61 67 5f 73 74 6f |.....3..drag_sto| 00001a70 70 70 65 64 5f 64 69 72 28 f8 66 72 63 25 2c f8 |pped_dir(.frc%,.| 00001a80 66 72 70 25 28 29 2c f8 74 6f 63 25 2c f8 74 6f |frp%(),.toc%,.to| 00001a90 70 25 28 29 29 0d 19 be 0a ea 70 25 2c 61 25 0d |p%()).....p%,a%.| 00001aa0 19 d2 19 70 25 3d 66 72 70 25 28 44 72 61 67 5f |...p%=frp%(Drag_| 00001ab0 4f 62 6a 65 63 74 25 29 0d 19 dc 0b 74 6f 63 25 |Object%)....toc%| 00001ac0 2b 3d 31 0d 19 e6 0b 61 25 3d 74 6f 63 25 0d 19 |+=1....a%=toc%..| 00001ad0 f0 1c c8 95 28 74 6f 70 25 28 61 25 2d 31 29 3e |....(top%(a%-1)>| 00001ae0 70 25 29 80 28 61 25 3e 31 29 0d 19 fa 17 74 6f |p%).(a%>1)....to| 00001af0 70 25 28 61 25 29 3d 74 6f 70 25 28 61 25 2d 31 |p%(a%)=top%(a%-1| 00001b00 29 0d 1a 04 09 61 25 2d 3d 31 0d 1a 0e 05 ce 0d |)....a%-=1......| 00001b10 1a 18 0f 74 6f 70 25 28 61 25 29 3d 70 25 0d 1a |...top%(a%)=p%..| 00001b20 40 0b 66 72 63 25 2d 3d 31 0d 1a 4a 18 e7 44 72 |@.frc%-=1..J..Dr| 00001b30 61 67 5f 4f 62 6a 65 63 74 25 3c 3d 66 72 63 25 |ag_Object%<=frc%| 00001b40 8c 0d 1a 54 19 e3 61 25 3d 44 72 61 67 5f 4f 62 |...T..a%=Drag_Ob| 00001b50 6a 65 63 74 25 b8 66 72 63 25 0d 1a 5e 17 66 72 |ject%.frc%..^.fr| 00001b60 70 25 28 61 25 29 3d 66 72 70 25 28 61 25 2b 31 |p%(a%)=frp%(a%+1| 00001b70 29 0d 1a 68 07 ed 61 25 0d 1a 72 05 cd 0d 1a 7c |)..h..a%..r....|| 00001b80 12 66 72 70 25 28 66 72 63 25 2b 31 29 3d 30 0d |.frp%(frc%+1)=0.| 00001b90 1a 86 05 e1 0d 1a cc 14 dd f2 73 63 72 6f 6c 6c |..........scroll| 00001ba0 5f 72 65 71 75 65 73 74 0d 1a f4 0b ea 72 25 2c |_request.....r%,| 00001bb0 62 68 25 0d 1b 08 10 62 68 25 3d 42 6c 63 6b 25 |bh%....bh%=Blck%| 00001bc0 21 32 38 0d 1b 12 0e c8 8e 42 6c 63 6b 25 21 30 |!28......Blck%!0| 00001bd0 ca 0d 1b 1c 12 c9 53 75 62 6c 69 73 74 25 28 31 |......Sublist%(1| 00001be0 2c 31 29 0d 1b 4e 27 72 25 3d a8 28 28 42 6c 63 |,1)..N'r%=.((Blc| 00001bf0 6b 25 21 31 36 2d 42 6c 63 6b 25 21 38 29 2f 46 |k%!16-Blck%!8)/F| 00001c00 6f 6e 74 5f 4c 68 25 29 2d 31 0d 1b 58 0f c8 8e |ont_Lh%)-1..X...| 00001c10 42 6c 63 6b 25 21 33 36 ca 0d 1b 62 07 c9 2d 32 |Blck%!36...b..-2| 00001c20 0d 1b 6c 19 42 6c 63 6b 25 21 32 34 2d 3d 46 6f |..l.Blck%!24-=Fo| 00001c30 6e 74 5f 4c 68 25 2a 72 25 0d 1b 76 07 c9 2d 31 |nt_Lh%*r%..v..-1| 00001c40 0d 1b 80 16 42 6c 63 6b 25 21 32 34 2d 3d 46 6f |....Blck%!24-=Fo| 00001c50 6e 74 5f 4c 68 25 0d 1b 8a 06 c9 31 0d 1b 94 16 |nt_Lh%.....1....| 00001c60 42 6c 63 6b 25 21 32 34 2b 3d 46 6f 6e 74 5f 4c |Blck%!24+=Font_L| 00001c70 68 25 0d 1b 9e 06 c9 32 0d 1b a8 19 42 6c 63 6b |h%.....2....Blck| 00001c80 25 21 32 34 2b 3d 46 6f 6e 74 5f 4c 68 25 2a 72 |%!24+=Font_Lh%*r| 00001c90 25 0d 1b b2 05 cb 0d 1b bc 1e c8 99 22 57 69 6d |%..........."Wim| 00001ca0 70 5f 4f 70 65 6e 57 69 6e 64 6f 77 22 2c 2c 42 |p_OpenWindow",,B| 00001cb0 6c 63 6b 25 0d 1b c6 12 c9 53 75 62 6c 69 73 74 |lck%.....Sublist| 00001cc0 25 28 32 2c 31 29 0d 1b ee 12 c9 53 75 62 6c 69 |%(2,1).....Subli| 00001cd0 73 74 25 28 32 2c 32 29 0d 1c 16 0f c8 8e 42 6c |st%(2,2)......Bl| 00001ce0 63 6b 25 21 33 36 ca 0d 1c 20 07 c9 2d 32 0d 1c |ck%!36... ..-2..| 00001cf0 2a 11 42 6c 63 6b 25 21 32 34 2d 3d 31 32 38 0d |*.Blck%!24-=128.| 00001d00 1c 34 07 c9 2d 31 0d 1c 3e 10 42 6c 63 6b 25 21 |.4..-1..>.Blck%!| 00001d10 32 34 2d 3d 31 36 0d 1c 48 06 c9 31 0d 1c 52 10 |24-=16..H..1..R.| 00001d20 42 6c 63 6b 25 21 32 34 2b 3d 31 36 0d 1c 5c 06 |Blck%!24+=16..\.| 00001d30 c9 32 0d 1c 66 11 42 6c 63 6b 25 21 32 34 2b 3d |.2..f.Blck%!24+=| 00001d40 31 32 38 0d 1c 70 05 cb 0d 1c 7a 1e c8 99 22 57 |128..p....z..."W| 00001d50 69 6d 70 5f 4f 70 65 6e 57 69 6e 64 6f 77 22 2c |imp_OpenWindow",| 00001d60 2c 42 6c 63 6b 25 0d 1c 84 18 f2 64 72 61 77 5f |,Blck%.....draw_| 00001d70 73 75 62 28 32 2c 33 2c a3 2c 62 68 25 29 0d 1c |sub(2,3,.,bh%)..| 00001d80 8e 18 f2 64 72 61 77 5f 73 75 62 28 33 2c 33 2c |...draw_sub(3,3,| 00001d90 a3 2c 62 68 25 29 0d 1c 98 05 cb 0d 1c a2 05 e1 |.,bh%)..........| 00001da0 0d 1c e8 14 dd f2 74 6f 6f 6c 62 6f 78 5f 65 76 |......toolbox_ev| 00001db0 65 6e 74 73 0d 1d 10 17 45 76 65 6e 74 5f 53 69 |ents....Event_Si| 00001dc0 7a 65 25 3d 42 6c 63 6b 25 21 30 0d 1d 1a 1c 45 |ze%=Blck%!0....E| 00001dd0 76 65 6e 74 5f 52 65 66 65 72 65 6e 63 65 25 3d |vent_Reference%=| 00001de0 42 6c 63 6b 25 21 34 0d 1d 24 17 45 76 65 6e 74 |Blck%!4..$.Event| 00001df0 5f 43 6f 64 65 25 3d 42 6c 63 6b 25 21 38 0d 1d |_Code%=Blck%!8..| 00001e00 2e 19 45 76 65 6e 74 5f 46 6c 61 67 73 25 3d 42 |..Event_Flags%=B| 00001e10 6c 63 6b 25 21 31 32 0d 1d 38 19 45 76 65 6e 74 |lck%!12..8.Event| 00001e20 5f 42 6c 6f 63 6b 25 3d 42 6c 63 6b 25 21 32 30 |_Block%=Blck%!20| 00001e30 0d 1d 60 3f f2 63 61 6c 6c 65 72 73 28 30 2c 41 |..`?.callers(0,A| 00001e40 6e 63 65 73 74 6f 72 5f 49 44 25 2c 41 6e 63 65 |ncestor_ID%,Ance| 00001e50 73 74 6f 72 5f 4e 61 6d 65 24 2c 41 6e 63 65 73 |stor_Name$,Ances| 00001e60 74 6f 72 5f 43 6f 6d 70 6f 6e 65 6e 74 25 29 0d |tor_Component%).| 00001e70 1d 6a 39 f2 63 61 6c 6c 65 72 73 28 38 2c 50 61 |.j9.callers(8,Pa| 00001e80 72 65 6e 74 5f 49 44 25 2c 50 61 72 65 6e 74 5f |rent_ID%,Parent_| 00001e90 4e 61 6d 65 24 2c 50 61 72 65 6e 74 5f 43 6f 6d |Name$,Parent_Com| 00001ea0 70 6f 6e 65 6e 74 25 29 0d 1d 74 34 f2 63 61 6c |ponent%)..t4.cal| 00001eb0 6c 65 72 73 28 31 36 2c 53 65 6c 66 5f 49 44 25 |lers(16,Self_ID%| 00001ec0 2c 53 65 6c 66 5f 4e 61 6d 65 24 2c 53 65 6c 66 |,Self_Name$,Self| 00001ed0 5f 43 6f 6d 70 6f 6e 65 6e 74 25 29 0d 1d a6 11 |_Component%)....| 00001ee0 c8 8e 53 65 6c 66 5f 4e 61 6d 65 24 ca 0d 1d b0 |..Self_Name$....| 00001ef0 0c c9 22 41 6c 69 61 73 22 0d 1d ba 11 f2 68 61 |.."Alias".....ha| 00001f00 6e 64 6c 65 5f 61 6c 69 61 73 0d 1d c4 0f c9 22 |ndle_alias....."| 00001f10 41 75 74 6f 6d 65 6e 75 22 0d 1d ce 14 f2 68 61 |Automenu".....ha| 00001f20 6e 64 6c 65 5f 61 75 74 6f 6d 65 6e 75 0d 1d d8 |ndle_automenu...| 00001f30 0f c9 22 49 62 61 72 6d 65 6e 75 22 0d 1d e2 14 |.."Ibarmenu"....| 00001f40 f2 68 61 6e 64 6c 65 5f 69 62 61 72 6d 65 6e 75 |.handle_ibarmenu| 00001f50 0d 1d ec 0e c9 22 49 63 6f 6e 62 61 72 22 0d 1d |....."Iconbar"..| 00001f60 f6 13 f2 68 61 6e 64 6c 65 5f 69 63 6f 6e 62 61 |...handle_iconba| 00001f70 72 0d 1e 00 0f c9 22 4d 61 69 6e 6c 69 73 74 22 |r....."Mainlist"| 00001f80 0d 1e 0a 14 f2 68 61 6e 64 6c 65 5f 6d 61 69 6e |.....handle_main| 00001f90 6c 69 73 74 0d 1e 14 12 c9 22 4d 61 69 6e 74 65 |list....."Mainte| 00001fa0 6e 61 6e 63 65 22 0d 1e 1e 17 f2 68 61 6e 64 6c |nance".....handl| 00001fb0 65 5f 6d 61 69 6e 74 65 6e 61 6e 63 65 0d 1e 28 |e_maintenance..(| 00001fc0 0e c9 22 4f 70 74 69 6f 6e 73 22 0d 1e 32 13 f2 |.."Options"..2..| 00001fd0 68 61 6e 64 6c 65 5f 6f 70 74 69 6f 6e 73 0d 1e |handle_options..| 00001fe0 3c 0c c9 22 4e 6f 64 69 72 22 0d 1e 46 11 f2 68 |<.."Nodir"..F..h| 00001ff0 61 6e 64 6c 65 5f 6e 6f 64 69 72 0d 1e 50 0f c9 |andle_nodir..P..| 00002000 22 50 61 73 73 6d 65 6e 75 22 0d 1e 5a 14 f2 68 |"Passmenu"..Z..h| 00002010 61 6e 64 6c 65 5f 70 61 73 73 6d 65 6e 75 0d 1e |andle_passmenu..| 00002020 64 0f c9 22 50 61 73 73 77 6f 72 64 22 0d 1e 6e |d.."Password"..n| 00002030 14 f2 68 61 6e 64 6c 65 5f 70 61 73 73 77 6f 72 |..handle_passwor| 00002040 64 0d 1e 78 0e c9 22 53 75 62 6c 69 73 74 22 0d |d..x.."Sublist".| 00002050 1e 82 13 f2 68 61 6e 64 6c 65 5f 73 75 62 6c 69 |....handle_subli| 00002060 73 74 0d 1e 8c 10 c9 22 54 68 69 65 66 74 72 61 |st....."Thieftra| 00002070 70 22 0d 1e 96 15 f2 68 61 6e 64 6c 65 5f 74 68 |p".....handle_th| 00002080 69 65 66 74 72 61 70 0d 1e a0 11 c9 22 55 73 65 |ieftrap....."Use| 00002090 72 61 63 63 65 73 73 22 0d 1e aa 16 f2 68 61 6e |raccess".....han| 000020a0 64 6c 65 5f 75 73 65 72 61 63 63 65 73 73 0d 1e |dle_useraccess..| 000020b0 b4 0d c9 22 59 65 73 64 69 72 22 0d 1e be 12 f2 |..."Yesdir".....| 000020c0 68 61 6e 64 6c 65 5f 79 65 73 64 69 72 0d 1e c8 |handle_yesdir...| 000020d0 0a c9 22 57 6d 69 22 0d 1e d2 0f f2 68 61 6e 64 |.."Wmi".....hand| 000020e0 6c 65 5f 77 6d 69 0d 1e dc 05 cb 0d 1e e6 05 e1 |le_wmi..........| 000020f0 0d 1f 2c 13 dd f2 77 69 6d 70 5f 6d 65 73 73 61 |..,...wimp_messa| 00002100 67 65 73 0d 1f 54 1a ea 73 74 61 74 65 25 2c 61 |ges..T..state%,a| 00002110 25 2c 61 6c 25 2c 64 75 72 25 2c 62 25 0d 1f 68 |%,al%,dur%,b%..h| 00002120 0f c8 8e 42 6c 63 6b 25 21 31 36 ca 0d 1f 72 06 |...Blck%!16...r.| 00002130 c9 30 0d 1f 7c 0b 51 75 69 74 25 3d b9 0d 1f 86 |.0..|.Quit%=....| 00002140 06 c9 31 0d 1f b8 1f 53 6f 75 72 63 65 24 3d a4 |..1....Source$=.| 00002150 69 6e 64 69 72 65 63 74 28 42 6c 63 6b 25 2b 34 |indirect(Blck%+4| 00002160 34 29 0d 1f c2 4a e7 28 42 6c 63 6b 25 21 32 30 |4)...J.(Blck%!20| 00002170 3d 53 75 62 6c 69 73 74 25 28 31 2c 31 29 29 80 |=Sublist%(1,1)).| 00002180 28 53 6f 75 72 63 65 24 3d 22 50 69 6e 62 6f 61 |(Source$="Pinboa| 00002190 72 64 22 29 80 28 45 64 69 74 5f 54 79 70 65 24 |rd").(Edit_Type$| 000021a0 3d 22 61 75 74 6f 72 75 6e 22 29 8c 0d 1f f4 14 |="autorun").....| 000021b0 42 6c 63 6b 25 21 31 32 3d 42 6c 63 6b 25 21 38 |Blck%!12=Blck%!8| 000021c0 0d 1f fe 0e 42 6c 63 6b 25 21 31 36 3d 32 0d 20 |....Blck%!16=2. | 000021d0 08 10 42 6c 63 6b 25 21 33 36 3d 31 32 38 0d 20 |..Blck%!36=128. | 000021e0 12 33 24 28 42 6c 63 6b 25 2b 34 34 29 3d 22 3c |.3$(Blck%+44)="<| 000021f0 57 69 6d 70 24 53 63 72 61 70 44 69 72 3e 2e 42 |Wimp$ScrapDir>.B| 00002200 6f 6f 74 70 6c 75 73 2e 50 69 6e 62 6f 61 72 64 |ootplus.Pinboard| 00002210 22 0d 20 1c 29 c8 99 22 57 69 6d 70 5f 53 65 6e |". .).."Wimp_Sen| 00002220 64 4d 65 73 73 61 67 65 22 2c 31 37 2c 42 6c 63 |dMessage",17,Blc| 00002230 6b 25 2c 42 6c 63 6b 25 21 34 0d 20 26 05 cd 0d |k%,Blck%!4. &...| 00002240 20 30 06 c9 32 0d 20 58 1d 70 61 74 68 24 3d a4 | 0..2. X.path$=.| 00002250 69 6e 64 69 72 65 63 74 28 42 6c 63 6b 25 2b 34 |indirect(Blck%+4| 00002260 34 29 0d 20 62 1f e7 41 70 70 6c 69 63 61 74 69 |4). b..Applicati| 00002270 6f 6e 24 3d 22 21 54 68 69 65 66 74 72 61 70 22 |on$="!Thieftrap"| 00002280 8c 0d 20 8a 1a f2 6d 61 6b 65 5f 74 68 69 65 66 |.. ...make_thief| 00002290 74 72 61 70 28 70 61 74 68 24 29 0d 20 94 05 cc |trap(path$). ...| 000022a0 0d 20 bc 16 f2 6d 61 6b 65 5f 61 6c 69 61 73 28 |. ...make_alias(| 000022b0 70 61 74 68 24 29 0d 20 c6 05 cd 0d 20 d0 06 c9 |path$). .... ...| 000022c0 33 0d 20 f8 1f 53 6f 75 72 63 65 24 3d a4 69 6e |3. ..Source$=.in| 000022d0 64 69 72 65 63 74 28 42 6c 63 6b 25 2b 34 34 29 |direct(Blck%+44)| 000022e0 0d 21 02 0f c8 8e 42 6c 63 6b 25 21 32 30 ca 0d |.!....Blck%!20..| 000022f0 21 0c 0e c9 41 6c 69 61 73 5f 57 48 25 0d 21 16 |!...Alias_WH%.!.| 00002300 15 f2 64 72 61 67 67 65 64 5f 74 6f 5f 61 6c 69 |..dragged_to_ali| 00002310 61 73 0d 21 20 12 c9 53 75 62 6c 69 73 74 25 28 |as.! ..Sublist%(| 00002320 31 2c 31 29 0d 21 2a 14 f2 64 72 61 67 67 65 64 |1,1).!*..dragged| 00002330 5f 74 6f 5f 65 64 69 74 0d 21 34 05 cb 0d 21 3e |_to_edit.!4...!>| 00002340 0b c9 26 34 30 30 43 32 0d 21 66 1a c8 8e a4 69 |..&400C2.!f....i| 00002350 6e 64 69 72 65 63 74 28 42 6c 63 6b 25 2b 32 38 |ndirect(Blck%+28| 00002360 29 ca 0d 21 70 0f c9 22 7a 7a 7a 7a 70 61 73 73 |)..!p.."zzzzpass| 00002370 22 0d 21 7a 18 e7 50 61 73 73 77 6f 72 64 73 5f |".!z..Passwords_| 00002380 45 6e 61 62 6c 65 64 25 8c 0d 21 a2 16 5a 7a 7a |Enabled%..!..Zzz| 00002390 7a 70 61 73 73 5f 53 74 61 74 75 73 25 3d 33 0d |zpass_Status%=3.| 000023a0 21 ac 1c 5a 7a 7a 7a 70 61 73 73 5f 48 61 6e 64 |!..Zzzzpass_Hand| 000023b0 6c 65 25 3d 42 6c 63 6b 25 21 34 0d 21 b6 16 e7 |le%=Blck%!4.!...| 000023c0 4c 6f 67 67 65 64 5f 55 73 65 72 24 3c 3e 22 22 |Logged_User$<>""| 000023d0 8c 0d 21 de 2c f2 75 73 65 72 5f 74 69 6d 65 73 |..!.,.user_times| 000023e0 28 4c 6f 67 67 65 64 5f 55 73 65 72 24 2c 61 6c |(Logged_User$,al| 000023f0 25 2c 64 75 72 25 2c 61 25 2c 62 25 29 0d 21 e8 |%,dur%,a%,b%).!.| 00002400 1a f2 69 6e 66 6f 72 6d 5f 7a 7a 7a 7a 70 61 73 |..inform_zzzzpas| 00002410 73 28 64 75 72 25 29 0d 21 f2 05 cd 0d 21 fc 05 |s(dur%).!....!..| 00002420 cc 0d 22 2e 11 f2 70 61 75 73 65 5f 6c 6f 67 69 |.."...pause_logi| 00002430 6e 73 0d 22 38 12 f2 72 65 6d 6f 76 65 5f 6c 6f |ns."8..remove_lo| 00002440 67 69 6e 73 0d 22 42 05 cd 0d 22 4c 0e c9 22 7a |gins."B..."L.."z| 00002450 7a 7a 7a 63 68 6b 22 0d 22 56 15 5a 7a 7a 7a 63 |zzzchk"."V.Zzzzc| 00002460 68 6b 5f 53 74 61 74 75 73 25 3d 33 0d 22 60 1b |hk_Status%=3."`.| 00002470 5a 7a 7a 7a 63 68 6b 5f 48 61 6e 64 6c 65 25 3d |Zzzzchk_Handle%=| 00002480 42 6c 63 6b 25 21 34 0d 22 6a 05 cb 0d 22 74 0b |Blck%!4."j..."t.| 00002490 c9 26 34 30 30 63 34 0d 22 88 0e 53 74 61 72 74 |.&400c4."..Start| 000024a0 65 64 25 3d b9 0d 22 92 0b c9 26 38 30 38 63 30 |ed%=.."...&808c0| 000024b0 0d 22 ba 1e e7 42 6c 63 6b 25 21 34 3d 5a 7a 7a |."...Blck%!4=Zzz| 000024c0 7a 70 61 73 73 5f 48 61 6e 64 6c 65 25 8c 0d 22 |zpass_Handle%.."| 000024d0 e2 49 c8 99 22 57 69 6d 70 5f 54 72 61 6e 73 66 |.I.."Wimp_Transf| 000024e0 65 72 42 6c 6f 63 6b 22 2c 5a 7a 7a 7a 70 61 73 |erBlock",Zzzzpas| 000024f0 73 5f 48 61 6e 64 6c 65 25 2c 42 6c 63 6b 25 21 |s_Handle%,Blck%!| 00002500 32 34 2c 54 68 64 6c 25 2c 42 75 66 31 25 2c 42 |24,Thdl%,Buf1%,B| 00002510 6c 63 6b 25 21 32 30 0d 22 ec 0d c8 8e 21 42 75 |lck%!20."....!Bu| 00002520 66 31 25 ca 0d 22 f6 06 c9 31 0d 23 1e 1d f2 6c |f1%.."...1.#...l| 00002530 6f 67 69 6e 5f 75 73 65 72 28 24 28 42 75 66 31 |ogin_user($(Buf1| 00002540 25 2b 34 29 2c a3 29 0d 23 28 2f 42 6c 63 6b 25 |%+4),.).#(/Blck%| 00002550 21 30 3d 33 32 3a 42 6c 63 6b 25 21 31 32 3d 42 |!0=32:Blck%!12=B| 00002560 6c 63 6b 25 21 38 3a 42 6c 63 6b 25 21 31 36 3d |lck%!8:Blck%!16=| 00002570 26 38 30 38 63 30 0d 23 32 1d 42 6c 63 6b 25 21 |&808c0.#2.Blck%!| 00002580 32 30 3d 34 3a 42 6c 63 6b 25 21 32 34 3d 42 75 |20=4:Blck%!24=Bu| 00002590 66 32 25 0d 23 3c 0c 21 42 75 66 32 25 3d 32 0d |f2%.#<.!Buf2%=2.| 000025a0 23 46 32 c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d |#F2.."Wimp_SendM| 000025b0 65 73 73 61 67 65 22 2c 31 37 2c 42 6c 63 6b 25 |essage",17,Blck%| 000025c0 2c 5a 7a 7a 7a 70 61 73 73 5f 48 61 6e 64 6c 65 |,Zzzzpass_Handle| 000025d0 25 0d 23 50 17 e7 53 65 71 75 65 6e 63 65 24 3d |%.#P..Sequence$=| 000025e0 22 4c 4f 47 4f 4e 22 8c 0d 23 78 16 53 65 71 75 |"LOGON"..#x.Sequ| 000025f0 65 6e 63 65 24 3d 22 4e 4f 52 4d 41 4c 22 0d 23 |ence$="NORMAL".#| 00002600 82 05 cd 0d 23 8c 06 c9 32 0d 23 be 14 51 75 69 |....#...2.#..Qui| 00002610 74 25 3d 41 75 74 6f 63 6c 6f 73 65 25 0d 23 c8 |t%=Autoclose%.#.| 00002620 06 c9 34 0d 23 f0 13 4c 6f 67 67 65 64 5f 55 73 |..4.#..Logged_Us| 00002630 65 72 24 3d 22 22 0d 23 fa 05 cb 0d 24 04 05 cd |er$="".#....$...| 00002640 0d 24 0e 05 cb 0d 24 18 05 e1 0d 24 5e 16 dd f2 |.$....$....$^...| 00002650 64 72 61 67 67 65 64 5f 74 6f 5f 61 6c 69 61 73 |dragged_to_alias| 00002660 0d 24 86 15 e7 42 6c 63 6b 25 21 34 30 3c 3e 26 |.$...Blck%!40<>&| 00002670 32 30 30 30 8c 0d 24 ae 36 f2 65 72 72 6f 72 5f |2000..$.6.error_| 00002680 6d 65 73 73 61 67 65 28 22 45 4d 34 22 2c 53 6f |message("EM4",So| 00002690 75 72 63 65 24 2c c3 7e 28 42 6c 63 6b 25 21 34 |urce$,.~(Blck%!4| 000026a0 30 29 2c 22 22 2c 30 2c 4b 25 29 0d 24 b8 05 cc |0),"",0,K%).$...| 000026b0 0d 24 e0 13 61 25 3d a9 28 53 6f 75 72 63 65 24 |.$..a%=.(Source$| 000026c0 29 2d 31 0d 24 ea 1f f5 3a 61 25 2d 3d 31 3a fd |)-1.$...:a%-=1:.| 000026d0 c1 53 6f 75 72 63 65 24 2c 61 25 2c 31 29 3d 22 |.Source$,a%,1)="| 000026e0 2e 22 0d 24 f4 1f 41 70 70 6c 69 63 61 74 69 6f |.".$..Applicatio| 000026f0 6e 24 3d c1 53 6f 75 72 63 65 24 2c 61 25 2b 31 |n$=.Source$,a%+1| 00002700 29 0d 24 fe 31 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |).$.1..T_TOMO%,0| 00002710 2c 41 6c 69 61 73 5f 49 44 25 2c 4d 5f 44 5f 53 |,Alias_ID%,M_D_S| 00002720 53 50 25 2c 30 2c 41 70 70 6c 69 63 61 74 69 6f |SP%,0,Applicatio| 00002730 6e 24 0d 25 08 30 c8 99 54 5f 54 4f 4d 4f 25 2c |n$.%.0..T_TOMO%,| 00002740 30 2c 41 6c 69 61 73 5f 49 44 25 2c 4d 5f 44 5f |0,Alias_ID%,M_D_| 00002750 53 54 25 2c 30 2c 41 70 70 6c 69 63 61 74 69 6f |ST%,0,Applicatio| 00002760 6e 24 0d 25 1c 05 cd 0d 25 26 05 e1 0d 25 6c 15 |n$.%....%&...%l.| 00002770 dd f2 64 72 61 67 67 65 64 5f 74 6f 5f 65 64 69 |..dragged_to_edi| 00002780 74 0d 25 94 24 ea 61 25 2c 70 25 2c 61 24 2c 62 |t.%.$.a%,p%,a$,b| 00002790 24 2c 63 24 2c 6c 65 61 66 24 2c 64 75 70 6c 69 |$,c$,leaf$,dupli| 000027a0 63 61 74 65 25 0d 25 a8 08 c8 8e b9 ca 0d 25 b2 |cate%.%.......%.| 000027b0 2a c9 28 42 6c 63 6b 25 21 34 30 3c 3e 26 32 30 |*.(Blck%!40<>&20| 000027c0 30 30 29 80 28 45 64 69 74 5f 54 79 70 65 24 3d |00).(Edit_Type$=| 000027d0 22 62 6f 6f 74 22 29 0d 25 bc 2c f2 65 72 72 6f |"boot").%.,.erro| 000027e0 72 5f 6d 65 73 73 61 67 65 28 22 45 4d 35 22 2c |r_message("EM5",| 000027f0 53 6f 75 72 63 65 24 2c 22 22 2c 22 22 2c 30 2c |Source$,"","",0,| 00002800 4b 25 29 0d 25 c6 2f c9 28 42 6c 63 6b 25 21 34 |K%).%./.(Blck%!4| 00002810 30 3c 3e 26 32 30 30 30 29 80 28 45 64 69 74 5f |0<>&2000).(Edit_| 00002820 54 79 70 65 24 3d 22 72 65 73 6f 75 72 63 65 73 |Type$="resources| 00002830 22 29 0d 25 d0 2c f2 65 72 72 6f 72 5f 6d 65 73 |").%.,.error_mes| 00002840 73 61 67 65 28 22 45 4d 36 22 2c 53 6f 75 72 63 |sage("EM6",Sourc| 00002850 65 24 2c 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 25 |e$,"","",0,K%).%| 00002860 da 05 7f 0d 26 02 13 61 25 3d a9 28 53 6f 75 72 |....&..a%=.(Sour| 00002870 63 65 24 29 2d 31 0d 26 0c 1f f5 3a 61 25 2d 3d |ce$)-1.&...:a%-=| 00002880 31 3a fd c1 53 6f 75 72 63 65 24 2c 61 25 2c 31 |1:..Source$,a%,1| 00002890 29 3d 22 2e 22 0d 26 16 18 6c 65 61 66 24 3d c1 |)=".".&..leaf$=.| 000028a0 53 6f 75 72 63 65 24 2c 61 25 2b 31 29 0d 26 20 |Source$,a%+1).& | 000028b0 10 64 75 70 6c 69 63 61 74 65 25 3d a3 0d 26 2a |.duplicate%=..&*| 000028c0 0f e3 61 25 3d 31 b8 4f 62 6a 73 25 0d 26 34 1e |..a%=1.Objs%.&4.| 000028d0 e7 6c 65 61 66 24 3d 4f 64 61 74 24 28 4f 70 74 |.leaf$=Odat$(Opt| 000028e0 72 25 28 61 25 29 2c 31 29 8c 0d 26 3e 10 64 75 |r%(a%),1)..&>.du| 000028f0 70 6c 69 63 61 74 65 25 3d b9 0d 26 48 09 70 25 |plicate%=..&H.p%| 00002900 3d 61 25 0d 26 52 05 cd 0d 26 5c 07 ed 61 25 0d |=a%.&R...&\..a%.| 00002910 26 66 10 e7 64 75 70 6c 69 63 61 74 65 25 8c 0d |&f..duplicate%..| 00002920 26 8e 16 e7 6c 65 61 66 24 3d 22 50 69 6e 62 6f |&...leaf$="Pinbo| 00002930 61 72 64 22 8c 0d 26 b6 33 4f 64 61 74 24 28 70 |ard"..&.3Odat$(p| 00002940 25 2c 35 29 3d 22 3c 57 69 6d 70 24 53 63 72 61 |%,5)="<Wimp$Scra| 00002950 70 44 69 72 3e 2e 42 6f 6f 74 70 6c 75 73 2e 50 |pDir>.Bootplus.P| 00002960 69 6e 62 6f 61 72 64 22 0d 26 c0 0b e3 61 25 3d |inboard".&...a%=| 00002970 31 b8 34 0d 26 ca 2c 4f 66 6c 67 25 28 70 25 2c |1.4.&.,Oflg%(p%,| 00002980 61 25 29 3d 28 4f 66 6c 67 25 28 70 25 2c 61 25 |a%)=(Oflg%(p%,a%| 00002990 29 80 26 46 46 46 46 46 46 46 30 29 84 31 33 0d |).&FFFFFFF0).13.| 000029a0 26 d4 07 ed 61 25 0d 26 de 12 4f 66 6c 67 25 28 |&...a%.&..Oflg%(| 000029b0 70 25 2c 35 29 3d 33 32 0d 26 e8 0c 53 61 76 65 |p%,5)=32.&..Save| 000029c0 64 25 3d a3 0d 26 f2 05 cc 0d 27 1a 2a f2 65 72 |d%=..&....'.*.er| 000029d0 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 4d 37 |ror_message("EM7| 000029e0 22 2c 6c 65 61 66 24 2c 22 22 2c 22 22 2c 30 2c |",leaf$,"","",0,| 000029f0 4b 25 29 0d 27 24 05 cd 0d 27 2e 05 cc 0d 27 56 |K%).'$...'....'V| 00002a00 0c 53 61 76 65 64 25 3d a3 0d 27 60 0c 4f 6e 74 |.Saved%=..'`.Ont| 00002a10 72 25 2b 3d 31 0d 27 6a 0c 4f 62 6a 73 25 2b 3d |r%+=1.'j.Objs%+=| 00002a20 31 0d 27 74 16 4f 70 74 72 25 28 4f 62 6a 73 25 |1.'t.Optr%(Objs%| 00002a30 29 3d 4f 6e 74 72 25 0d 27 7e 18 4f 64 61 74 24 |)=Ontr%.'~.Odat$| 00002a40 28 4f 6e 74 72 25 2c 31 29 3d 6c 65 61 66 24 0d |(Ontr%,1)=leaf$.| 00002a50 27 88 0f c8 8e 42 6c 63 6b 25 21 34 30 ca 0d 27 |'....Blck%!40..'| 00002a60 92 0a c9 26 32 30 30 30 0d 27 ba 11 c8 8e 45 64 |...&2000.'....Ed| 00002a70 69 74 5f 54 79 70 65 24 ca 0d 27 c4 0e c9 22 61 |it_Type$..'..."a| 00002a80 75 74 6f 72 75 6e 22 0d 27 ce 32 4f 64 61 74 24 |utorun".'.2Odat$| 00002a90 28 4f 6e 74 72 25 2c 32 29 3d a4 67 65 74 5f 6d |(Ontr%,2)=.get_m| 00002aa0 65 73 73 61 67 65 28 22 44 4d 34 22 2c 22 22 2c |essage("DM4","",| 00002ab0 22 22 2c 22 22 2c 22 22 29 0d 27 d8 0b c9 22 62 |"","","").'..."b| 00002ac0 6f 6f 74 22 0d 27 e2 32 4f 64 61 74 24 28 4f 6e |oot".'.2Odat$(On| 00002ad0 74 72 25 2c 32 29 3d a4 67 65 74 5f 6d 65 73 73 |tr%,2)=.get_mess| 00002ae0 61 67 65 28 22 44 4d 35 22 2c 22 22 2c 22 22 2c |age("DM5","","",| 00002af0 22 22 2c 22 22 29 0d 27 ec 10 c9 22 72 65 73 6f |"","").'..."reso| 00002b00 75 72 63 65 73 22 0d 27 f6 32 4f 64 61 74 24 28 |urces".'.2Odat$(| 00002b10 4f 6e 74 72 25 2c 32 29 3d a4 67 65 74 5f 6d 65 |Ontr%,2)=.get_me| 00002b20 73 73 61 67 65 28 22 44 4d 35 22 2c 22 22 2c 22 |ssage("DM5","","| 00002b30 22 2c 22 22 2c 22 22 29 0d 28 00 0e c9 22 70 72 |","","").(..."pr| 00002b40 65 64 65 73 6b 22 0d 28 0a 32 4f 64 61 74 24 28 |edesk".(.2Odat$(| 00002b50 4f 6e 74 72 25 2c 32 29 3d a4 67 65 74 5f 6d 65 |Ontr%,2)=.get_me| 00002b60 73 73 61 67 65 28 22 44 4d 36 22 2c 22 22 2c 22 |ssage("DM6","","| 00002b70 22 2c 22 22 2c 22 22 29 0d 28 14 05 cb 0d 28 1e |","","").(....(.| 00002b80 19 4f 64 61 74 24 28 4f 6e 74 72 25 2c 33 29 3d |.Odat$(Ontr%,3)=| 00002b90 22 32 30 30 30 22 0d 28 28 0a c9 26 31 30 30 30 |"2000".((..&1000| 00002ba0 0d 28 50 32 4f 64 61 74 24 28 4f 6e 74 72 25 2c |.(P2Odat$(Ontr%,| 00002bb0 32 29 3d a4 67 65 74 5f 6d 65 73 73 61 67 65 28 |2)=.get_message(| 00002bc0 22 44 4d 31 22 2c 22 22 2c 22 22 2c 22 22 2c 22 |"DM1","","","","| 00002bd0 22 29 0d 28 5a 19 4f 64 61 74 24 28 4f 6e 74 72 |").(Z.Odat$(Ontr| 00002be0 25 2c 33 29 3d 22 31 30 30 30 22 0d 28 64 05 7f |%,3)="1000".(d..| 00002bf0 0d 28 6e 2d c8 99 22 4f 53 5f 43 6f 6e 76 65 72 |.(n-.."OS_Conver| 00002c00 74 48 65 78 34 22 2c 42 6c 63 6b 25 21 34 30 2c |tHex4",Blck%!40,| 00002c10 42 75 66 32 25 2c 31 32 38 b8 2c 70 25 0d 28 78 |Buf2%,128.,p%.(x| 00002c20 0a 3f 70 25 3d 31 33 0d 28 82 10 e7 42 75 66 32 |.?p%=13.(...Buf2| 00002c30 25 3f 30 3d 34 38 8c 0d 28 8c 1d 4f 64 61 74 24 |%?0=48..(..Odat$| 00002c40 28 4f 6e 74 72 25 2c 33 29 3d c2 24 42 75 66 32 |(Ontr%,3)=.$Buf2| 00002c50 25 2c 33 29 0d 28 96 05 cc 0d 28 a0 19 4f 64 61 |%,3).(....(..Oda| 00002c60 74 24 28 4f 6e 74 72 25 2c 33 29 3d 24 42 75 66 |t$(Ontr%,3)=$Buf| 00002c70 32 25 0d 28 aa 05 cd 0d 28 b4 45 c8 99 22 58 4f |2%.(....(.E.."XO| 00002c80 53 5f 52 65 61 64 56 61 72 56 61 6c 22 2c 22 46 |S_ReadVarVal","F| 00002c90 69 6c 65 24 54 79 70 65 5f 22 2b 4f 64 61 74 24 |ile$Type_"+Odat$| 00002ca0 28 4f 6e 74 72 25 2c 33 29 2c 42 75 66 31 25 2c |(Ontr%,3),Buf1%,| 00002cb0 31 32 38 2c 30 2c 33 b8 2c 2c 6c 25 0d 28 be 0a |128,0,3.,,l%.(..| 00002cc0 e7 6c 25 3d 30 8c 0d 28 e6 25 4f 64 61 74 24 28 |.l%=0..(.%Odat$(| 00002cd0 4f 6e 74 72 25 2c 32 29 3d 22 26 22 2b 4f 64 61 |Ontr%,2)="&"+Oda| 00002ce0 74 24 28 4f 6e 74 72 25 2c 33 29 0d 28 f0 05 cc |t$(Ontr%,3).(...| 00002cf0 0d 29 18 0f 42 75 66 31 25 3f 6c 25 3d 31 33 0d |.)..Buf1%?l%=13.| 00002d00 29 22 19 4f 64 61 74 24 28 4f 6e 74 72 25 2c 32 |)".Odat$(Ontr%,2| 00002d10 29 3d 24 42 75 66 31 25 0d 29 2c 05 cd 0d 29 36 |)=$Buf1%.),...)6| 00002d20 05 cb 0d 29 5e 15 4f 64 61 74 24 28 4f 6e 74 72 |...)^.Odat$(Ontr| 00002d30 25 2c 34 29 3d 22 22 0d 29 68 08 63 25 3d 30 0d |%,4)="".)h.c%=0.| 00002d40 29 72 05 f5 0d 29 7c 09 63 25 2b 3d 31 0d 29 86 |)r...)|.c%+=1.).| 00002d50 5e e7 28 42 6f 6f 74 5f 54 79 70 65 24 28 63 25 |^.(Boot_Type$(c%| 00002d60 2c 31 29 3d 45 64 69 74 5f 54 79 70 65 24 29 80 |,1)=Edit_Type$).| 00002d70 28 28 42 6f 6f 74 5f 54 79 70 65 24 28 63 25 2c |((Boot_Type$(c%,| 00002d80 32 29 3d 4f 64 61 74 24 28 4f 6e 74 72 25 2c 33 |2)=Odat$(Ontr%,3| 00002d90 29 29 84 28 42 6f 6f 74 5f 54 79 70 65 24 28 63 |)).(Boot_Type$(c| 00002da0 25 2c 32 29 3d 22 2a 22 29 29 8c 0d 29 90 23 4f |%,2)="*"))..).#O| 00002db0 64 61 74 24 28 4f 6e 74 72 25 2c 34 29 3d 42 6f |dat$(Ontr%,4)=Bo| 00002dc0 6f 74 5f 54 79 70 65 24 28 63 25 2c 33 29 0d 29 |ot_Type$(c%,3).)| 00002dd0 9a 05 cd 0d 29 a4 2a fd 28 63 25 3d 42 6f 6f 74 |....).*.(c%=Boot| 00002de0 5f 54 79 70 65 73 25 29 84 28 4f 64 61 74 24 28 |_Types%).(Odat$(| 00002df0 4f 6e 74 72 25 2c 34 29 3c 3e 22 22 29 0d 29 cc |Ontr%,4)<>"").).| 00002e00 18 e7 53 6f 75 72 63 65 24 3d 22 50 69 6e 62 6f |..Source$="Pinbo| 00002e10 61 72 64 22 8c 0d 29 f4 36 4f 64 61 74 24 28 4f |ard"..).6Odat$(O| 00002e20 6e 74 72 25 2c 35 29 3d 22 3c 57 69 6d 70 24 53 |ntr%,5)="<Wimp$S| 00002e30 63 72 61 70 44 69 72 3e 2e 42 6f 6f 74 70 6c 75 |crapDir>.Bootplu| 00002e40 73 2e 50 69 6e 62 6f 61 72 64 22 0d 29 fe 05 cc |s.Pinboard".)...| 00002e50 0d 2a 08 1a 4f 64 61 74 24 28 4f 6e 74 72 25 2c |.*..Odat$(Ontr%,| 00002e60 35 29 3d 53 6f 75 72 63 65 24 0d 2a 12 05 cd 0d |5)=Source$.*....| 00002e70 2a 1c 23 4f 66 6c 67 25 28 4f 6e 74 72 25 2c 31 |*.#Oflg%(Ontr%,1| 00002e80 29 3d 28 32 34 3c 3c 31 36 29 84 26 31 30 30 84 |)=(24<<16).&100.| 00002e90 31 33 0d 2a 26 24 4f 66 6c 67 25 28 4f 6e 74 72 |13.*&$Oflg%(Ontr| 00002ea0 25 2c 32 29 3d 28 32 30 30 3c 3c 31 36 29 84 26 |%,2)=(200<<16).&| 00002eb0 31 30 30 84 31 33 0d 2a 30 14 4f 66 6c 67 25 28 |100.13.*0.Oflg%(| 00002ec0 4f 6e 74 72 25 2c 33 29 3d 38 0d 2a 3a 11 c8 8e |Ontr%,3)=8.*:...| 00002ed0 45 64 69 74 5f 54 79 70 65 24 ca 0d 2a 44 0b c9 |Edit_Type$..*D..| 00002ee0 22 62 6f 6f 74 22 0d 2a 4e 24 4f 66 6c 67 25 28 |"boot".*N$Oflg%(| 00002ef0 4f 6e 74 72 25 2c 34 29 3d 28 35 31 32 3c 3c 31 |Ontr%,4)=(512<<1| 00002f00 36 29 84 26 31 30 30 84 31 33 0d 2a 58 10 c9 22 |6).&100.13.*X.."| 00002f10 72 65 73 6f 75 72 63 65 73 22 0d 2a 62 24 4f 66 |resources".*b$Of| 00002f20 6c 67 25 28 4f 6e 74 72 25 2c 34 29 3d 28 35 31 |lg%(Ontr%,4)=(51| 00002f30 32 3c 3c 31 36 29 84 26 31 30 30 84 31 33 0d 2a |2<<16).&100.13.*| 00002f40 6c 0e c9 22 61 75 74 6f 72 75 6e 22 0d 2a 76 24 |l.."autorun".*v$| 00002f50 4f 66 6c 67 25 28 4f 6e 74 72 25 2c 34 29 3d 28 |Oflg%(Ontr%,4)=(| 00002f60 34 38 30 3c 3c 31 36 29 84 26 31 30 30 84 31 33 |480<<16).&100.13| 00002f70 0d 2a 80 0e c9 22 70 72 65 64 65 73 6b 22 0d 2a |.*..."predesk".*| 00002f80 8a 24 4f 66 6c 67 25 28 4f 6e 74 72 25 2c 34 29 |.$Oflg%(Ontr%,4)| 00002f90 3d 28 34 30 30 3c 3c 31 36 29 84 26 31 30 30 84 |=(400<<16).&100.| 00002fa0 31 33 0d 2a 94 05 cb 0d 2a 9e 15 4f 66 6c 67 25 |13.*....*..Oflg%| 00002fb0 28 4f 6e 74 72 25 2c 35 29 3d 33 32 0d 2a a8 05 |(Ontr%,5)=32.*..| 00002fc0 cd 0d 2a b2 05 cb 0d 2a da 19 f2 73 65 74 5f 6c |..*....*...set_l| 00002fd0 69 73 74 5f 65 78 74 65 6e 74 28 31 2c b9 29 0d |ist_extent(1,.).| 00002fe0 2a e4 16 f2 64 72 61 77 5f 73 75 62 28 31 2c 32 |*...draw_sub(1,2| 00002ff0 2c a3 2c 30 29 0d 2a ee 05 e1 0d 2b 34 27 dd f2 |,.,0).*....+4'..| 00003000 63 61 6c 6c 65 72 73 28 6f 66 66 73 65 74 25 2c |callers(offset%,| 00003010 f8 69 64 25 2c f8 69 64 24 2c f8 63 70 6e 74 25 |.id%,.id$,.cpnt%| 00003020 29 0d 2b 8e 09 ea 70 74 72 25 0d 2b a2 16 70 74 |).+...ptr%.+..pt| 00003030 72 25 3d 54 6c 6f 69 25 2b 6f 66 66 73 65 74 25 |r%=Tloi%+offset%| 00003040 0d 2b ac 0d 69 64 25 3d 21 70 74 72 25 0d 2b b6 |.+..id%=!ptr%.+.| 00003050 0c e7 69 64 25 3c 3e 30 8c 0d 2b c0 2f c8 99 22 |..id%<>0..+./.."| 00003060 54 6f 6f 6c 62 6f 78 5f 47 65 74 54 65 6d 70 6c |Toolbox_GetTempl| 00003070 61 74 65 4e 61 6d 65 22 2c 30 2c 69 64 25 2c 42 |ateName",0,id%,B| 00003080 75 66 31 25 2c 31 32 38 0d 2b ca 18 69 64 24 3d |uf1%,128.+..id$=| 00003090 a4 69 6e 64 69 72 65 63 74 28 42 75 66 31 25 29 |.indirect(Buf1%)| 000030a0 0d 2b d4 05 cc 0d 2b de 0a 69 64 24 3d 22 22 0d |.+....+..id$="".| 000030b0 2b e8 05 cd 0d 2b f2 10 63 70 6e 74 25 3d 70 74 |+....+..cpnt%=pt| 000030c0 72 25 21 34 0d 2b fc 05 e1 0d 2c 42 14 dd f2 68 |r%!4.+....,B...h| 000030d0 61 6e 64 6c 65 5f 69 63 6f 6e 62 61 72 0d 2c 4c |andle_iconbar.,L| 000030e0 05 e1 0d 2c 92 12 dd f2 68 61 6e 64 6c 65 5f 61 |...,....handle_a| 000030f0 6c 69 61 73 0d 2c ba 12 ea 73 74 61 74 65 25 2c |lias.,...state%,| 00003100 62 6f 25 2c 70 25 0d 2c ce 12 c8 8e 45 76 65 6e |bo%,p%.,....Even| 00003110 74 5f 43 6f 64 65 25 ca 0d 2c d8 0c c9 45 5f 54 |t_Code%..,...E_T| 00003120 4f 41 43 25 0d 2d 00 16 41 6c 69 61 73 5f 49 44 |OAC%.-..Alias_ID| 00003130 25 3d 53 65 6c 66 5f 49 44 25 0d 2d 0a 25 c8 99 |%=Self_ID%.-.%..| 00003140 54 5f 54 4f 4d 4f 25 2c 30 2c 41 6c 69 61 73 5f |T_TOMO%,0,Alias_| 00003150 49 44 25 2c 30 b8 41 6c 69 61 73 5f 57 48 25 0d |ID%,0.Alias_WH%.| 00003160 2d 14 0d c9 45 5f 57 41 54 42 53 25 0d 2d 3c 13 |-...E_WATBS%.-<.| 00003170 41 70 70 6c 69 63 61 74 69 6f 6e 24 3d 22 22 0d |Application$="".| 00003180 2d 46 2b c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 41 |-F+..T_TOMO%,0,A| 00003190 6c 69 61 73 5f 49 44 25 2c 36 34 30 2c 30 2c 22 |lias_ID%,640,0,"| 000031a0 21 42 6f 6f 74 70 6c 75 73 22 0d 2d 50 28 c8 99 |!Bootplus".-P(..| 000031b0 54 5f 54 4f 4d 4f 25 2c 30 2c 41 6c 69 61 73 5f |T_TOMO%,0,Alias_| 000031c0 49 44 25 2c 36 34 32 2c 30 2c 22 3c 6e 6f 6e 65 |ID%,642,0,"<none| 000031d0 3e 22 0d 2d 5a 0b c9 45 5f 44 44 45 25 0d 2d 82 |>".-Z..E_DDE%.-.| 000031e0 16 e7 41 70 70 6c 69 63 61 74 69 6f 6e 24 3c 3e |..Application$<>| 000031f0 22 22 8c 0d 2d aa 0e 42 75 66 32 25 21 30 3d 36 |""..-..Buf2%!0=6| 00003200 34 0d 2d b4 2b 42 75 66 32 25 21 31 32 3d 30 3a |4.-.+Buf2%!12=0:| 00003210 42 75 66 32 25 21 31 36 3d 31 3a 42 75 66 32 25 |Buf2%!16=1:Buf2%| 00003220 21 32 30 3d 42 6c 63 6b 25 21 31 36 0d 2d be 34 |!20=Blck%!16.-.4| 00003230 42 75 66 32 25 21 32 38 3d 42 6c 63 6b 25 21 32 |Buf2%!28=Blck%!2| 00003240 34 3a 42 75 66 32 25 21 33 32 3d 42 6c 63 6b 25 |4:Buf2%!32=Blck%| 00003250 21 32 38 3a 42 75 66 32 25 21 33 36 3d 31 32 38 |!28:Buf2%!36=128| 00003260 0d 2d c8 2b 42 75 66 32 25 21 34 30 3d 26 32 30 |.-.+Buf2%!40=&20| 00003270 30 30 3a 24 28 42 75 66 32 25 2b 34 34 29 3d 41 |00:$(Buf2%+44)=A| 00003280 70 70 6c 69 63 61 74 69 6f 6e 24 0d 2d d2 2a c8 |pplication$.-.*.| 00003290 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 |."Wimp_SendMessa| 000032a0 67 65 22 2c 31 37 2c 42 75 66 32 25 2c 42 6c 63 |ge",17,Buf2%,Blc| 000032b0 6b 25 21 31 36 0d 2d dc 05 cd 0d 2d e6 05 cb 0d |k%!16.-....-....| 000032c0 2d f0 05 e1 0d 2e 36 15 dd f2 68 61 6e 64 6c 65 |-.....6...handle| 000032d0 5f 61 75 74 6f 6d 65 6e 75 0d 2e 5e 12 c8 8e 45 |_automenu..^...E| 000032e0 76 65 6e 74 5f 43 6f 64 65 25 ca 0d 2e 68 0a c9 |vent_Code%...h..| 000032f0 45 5f 4d 53 25 0d 2e 90 15 f2 63 68 65 63 6b 5f |E_MS%.....check_| 00003300 69 66 5f 61 70 70 6c 69 65 64 0d 2e b8 18 e7 53 |if_applied.....S| 00003310 65 6c 66 5f 43 6f 6d 70 6f 6e 65 6e 74 25 3d 26 |elf_Component%=&| 00003320 64 8c 0d 2e e0 1f 61 25 3d a4 67 65 74 5f 74 61 |d.....a%=.get_ta| 00003330 73 6b 5f 69 64 28 22 50 69 6e 62 6f 61 72 64 22 |sk_id("Pinboard"| 00003340 29 0d 2e ea 0a e7 61 25 3d 30 8c 0d 2f 12 27 f2 |).....a%=0../.'.| 00003350 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 |error_message("E| 00003360 4d 38 22 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 4b |M8","","","",0,K| 00003370 25 29 0d 2f 1c 05 cc 0d 2f 44 0e 42 75 66 32 25 |%)./..../D.Buf2%| 00003380 21 30 3d 36 34 0d 2f 4e 24 42 75 66 32 25 21 31 |!0=64./N$Buf2%!1| 00003390 32 3d 30 3a 42 75 66 32 25 21 31 36 3d 31 3a 42 |2=0:Buf2%!16=1:B| 000033a0 75 66 32 25 21 32 30 3d 30 0d 2f 58 26 42 75 66 |uf2%!20=0./X&Buf| 000033b0 32 25 21 32 38 3d 30 3a 42 75 66 32 25 21 33 32 |2%!28=0:Buf2%!32| 000033c0 3d 30 3a 42 75 66 32 25 21 33 36 3d 31 32 38 0d |=0:Buf2%!36=128.| 000033d0 2f 62 28 42 75 66 32 25 21 34 30 3d 26 66 65 62 |/b(Buf2%!40=&feb| 000033e0 3a 24 28 42 75 66 32 25 2b 34 34 29 3d 22 50 69 |:$(Buf2%+44)="Pi| 000033f0 6e 62 6f 61 72 64 22 0d 2f 6c 24 c8 99 22 57 69 |nboard"./l$.."Wi| 00003400 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c |mp_SendMessage",| 00003410 31 37 2c 42 75 66 32 25 2c 61 25 0d 2f 76 05 cd |17,Buf2%,a%./v..| 00003420 0d 2f 80 05 cc 0d 2f a8 16 c8 8e 53 65 6c 66 5f |./..../....Self_| 00003430 43 6f 6d 70 6f 6e 65 6e 74 25 ca 0d 2f b2 07 c9 |Component%../...| 00003440 26 39 0d 2f da 18 45 64 69 74 5f 54 79 70 65 24 |&9./..Edit_Type$| 00003450 3d 22 61 75 74 6f 72 75 6e 22 0d 2f e4 07 c9 26 |="autorun"./...&| 00003460 62 0d 30 0c 15 45 64 69 74 5f 54 79 70 65 24 3d |b.0..Edit_Type$=| 00003470 22 62 6f 6f 74 22 0d 30 16 07 c9 26 35 0d 30 3e |"boot".0...&5.0>| 00003480 1a 45 64 69 74 5f 54 79 70 65 24 3d 22 72 65 73 |.Edit_Type$="res| 00003490 6f 75 72 63 65 73 22 0d 30 48 07 c9 26 63 0d 30 |ources".0H..&c.0| 000034a0 70 18 45 64 69 74 5f 54 79 70 65 24 3d 22 70 72 |p.Edit_Type$="pr| 000034b0 65 64 65 73 6b 22 0d 30 7a 05 cb 0d 30 84 10 f2 |edesk".0z...0...| 000034c0 67 65 74 5f 61 70 70 6c 69 73 74 0d 30 8e 13 f2 |get_applist.0...| 000034d0 64 72 61 77 5f 6d 61 69 6e 28 31 2c 30 29 0d 30 |draw_main(1,0).0| 000034e0 98 05 cd 0d 30 a2 05 cb 0d 30 ac 05 e1 0d 30 f2 |....0....0....0.| 000034f0 15 dd f2 68 61 6e 64 6c 65 5f 69 62 61 72 6d 65 |...handle_ibarme| 00003500 6e 75 0d 31 1a 12 c8 8e 45 76 65 6e 74 5f 43 6f |nu.1....Event_Co| 00003510 64 65 25 ca 0d 31 24 0c c9 45 5f 54 4f 41 43 25 |de%..1$..E_TOAC%| 00003520 0d 31 4c 19 49 62 61 72 6d 65 6e 75 5f 49 44 25 |.1L.Ibarmenu_ID%| 00003530 3d 53 65 6c 66 5f 49 44 25 0d 31 56 0d c9 45 5f |=Self_ID%.1V..E_| 00003540 4d 41 54 42 53 25 0d 31 7e 08 c8 8e b9 ca 0d 31 |MATBS%.1~......1| 00003550 88 1a c9 28 ac 50 61 73 73 77 6f 72 64 73 5f 45 |...(.Passwords_E| 00003560 6e 61 62 6c 65 64 25 29 0d 31 b0 27 f2 69 62 61 |nabled%).1.'.iba| 00003570 72 6d 65 6e 75 5f 67 72 65 79 73 28 31 2c 30 2c |rmenu_greys(1,0,| 00003580 30 2c 30 2c 22 42 6f 6f 74 70 6c 75 73 22 29 0d |0,0,"Bootplus").| 00003590 31 ba 30 c9 28 28 4c 6f 67 67 65 64 5f 55 73 65 |1.0.((Logged_Use| 000035a0 72 24 3d 4f 77 6e 65 72 24 29 80 20 50 61 73 73 |r$=Owner$). Pass| 000035b0 77 6f 72 64 73 5f 45 6e 61 62 6c 65 64 25 29 0d |words_Enabled%).| 000035c0 31 e2 2d f2 69 62 61 72 6d 65 6e 75 5f 67 72 65 |1.-.ibarmenu_gre| 000035d0 79 73 28 30 2c 30 2c 30 2c 30 2c 22 4c 6f 67 67 |ys(0,0,0,0,"Logg| 000035e0 65 64 20 3a 20 4f 57 4e 45 52 22 29 0d 31 ec 2c |ed : OWNER").1.,| 000035f0 c9 28 28 4c 6f 67 67 65 64 5f 55 73 65 72 24 3d |.((Logged_User$=| 00003600 22 22 29 80 20 50 61 73 73 77 6f 72 64 73 5f 45 |""). Passwords_E| 00003610 6e 61 62 6c 65 64 25 29 0d 32 14 27 f2 69 62 61 |nabled%).2.'.iba| 00003620 72 6d 65 6e 75 5f 67 72 65 79 73 28 30 2c 31 2c |rmenu_greys(0,1,| 00003630 31 2c 31 2c 22 42 6f 6f 74 70 6c 75 73 22 29 0d |1,1,"Bootplus").| 00003640 32 1e 32 c9 28 28 4c 6f 67 67 65 64 5f 55 73 65 |2.2.((Logged_Use| 00003650 72 24 3d 22 4c 4f 47 4f 46 46 22 29 80 20 50 61 |r$="LOGOFF"). Pa| 00003660 73 73 77 6f 72 64 73 5f 45 6e 61 62 6c 65 64 25 |sswords_Enabled%| 00003670 29 0d 32 46 29 f2 69 62 61 72 6d 65 6e 75 5f 67 |).2F).ibarmenu_g| 00003680 72 65 79 73 28 30 2c 31 2c 31 2c 31 2c 22 4c 6f |reys(0,1,1,1,"Lo| 00003690 67 67 65 64 20 4f 66 66 22 29 0d 32 50 05 7f 0d |gged Off").2P...| 000036a0 32 78 35 f2 69 62 61 72 6d 65 6e 75 5f 67 72 65 |2x5.ibarmenu_gre| 000036b0 79 73 28 30 2c 31 2c 31 2c 30 2c 22 4c 6f 67 67 |ys(0,1,1,0,"Logg| 000036c0 65 64 20 3a 20 22 2b 4c 6f 67 67 65 64 5f 55 73 |ed : "+Logged_Us| 000036d0 65 72 24 29 0d 32 82 05 cb 0d 32 8c 0b c9 45 5f |er$).2....2...E_| 000036e0 55 51 41 25 0d 32 b4 0b 51 75 69 74 25 3d b9 0d |UQA%.2..Quit%=..| 000036f0 32 be 05 cb 0d 32 c8 05 e1 0d 33 0e 15 dd f2 68 |2....2....3....h| 00003700 61 6e 64 6c 65 5f 6d 61 69 6e 6c 69 73 74 0d 33 |andle_mainlist.3| 00003710 22 07 ea 4b 25 0d 33 36 12 c8 8e 45 76 65 6e 74 |"..K%.36...Event| 00003720 5f 43 6f 64 65 25 ca 0d 33 40 0c c9 45 5f 54 4f |_Code%..3@..E_TO| 00003730 41 43 25 0d 33 68 19 4d 61 69 6e 6c 69 73 74 5f |AC%.3h.Mainlist_| 00003740 49 44 25 3d 53 65 6c 66 5f 49 44 25 0d 33 72 2c |ID%=Self_ID%.3r,| 00003750 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4d 61 69 6e |..T_TOMO%,0,Main| 00003760 6c 69 73 74 5f 49 44 25 2c 30 b8 53 75 62 6c 69 |list_ID%,0.Subli| 00003770 73 74 25 28 31 2c 32 29 0d 33 7c 2b c8 99 54 5f |st%(1,2).3|+..T_| 00003780 54 4f 4d 4f 25 2c 30 2c 4d 61 69 6e 6c 69 73 74 |TOMO%,0,Mainlist| 00003790 5f 49 44 25 2c 36 38 2c 35 2c 42 75 66 32 25 2c |_ID%,68,5,Buf2%,| 000037a0 31 32 38 0d 33 86 16 44 75 73 74 62 69 6e 5f 49 |128.3..Dustbin_I| 000037b0 44 25 3d 21 42 75 66 32 25 0d 33 90 0b c9 45 5f |D%=!Buf2%.3...E_| 000037c0 41 42 53 25 0d 33 b8 16 c8 8e 53 65 6c 66 5f 43 |ABS%.3....Self_C| 000037d0 6f 6d 70 6f 6e 65 6e 74 25 ca 0d 33 c2 06 c9 33 |omponent%..3...3| 000037e0 0d 33 ea 10 f2 67 65 74 5f 61 70 70 6c 69 73 74 |.3...get_applist| 000037f0 0d 33 f4 19 f2 73 65 74 5f 6c 69 73 74 5f 65 78 |.3...set_list_ex| 00003800 74 65 6e 74 28 31 2c b9 29 0d 33 fe 16 f2 64 72 |tent(1,.).3...dr| 00003810 61 77 5f 73 75 62 28 31 2c 32 2c a3 2c 30 29 0d |aw_sub(1,2,.,0).| 00003820 34 08 06 c9 34 0d 34 30 17 f2 61 70 70 6c 79 5f |4...4.40..apply_| 00003830 65 64 69 74 5f 63 68 61 6e 67 65 73 0d 34 3a 0c |edit_changes.4:.| 00003840 53 61 76 65 64 25 3d b9 0d 34 44 05 cb 0d 34 4e |Saved%=..4D...4N| 00003850 0c c9 45 5f 57 48 42 48 25 0d 34 76 1a c8 99 54 |..E_WHBH%.4v...T| 00003860 5f 54 48 4f 25 2c 30 2c 53 75 62 6c 69 73 74 5f |_THO%,0,Sublist_| 00003870 49 44 25 0d 34 80 15 f2 63 68 65 63 6b 5f 69 66 |ID%.4...check_if| 00003880 5f 61 70 70 6c 69 65 64 0d 34 8a 05 cb 0d 34 94 |_applied.4....4.| 00003890 05 e1 0d 34 da 18 dd f2 68 61 6e 64 6c 65 5f 6d |...4....handle_m| 000038a0 61 69 6e 74 65 6e 61 6e 63 65 0d 35 02 08 ea 62 |aintenance.5...b| 000038b0 74 25 0d 35 16 12 c8 8e 45 76 65 6e 74 5f 43 6f |t%.5....Event_Co| 000038c0 64 65 25 ca 0d 35 20 0d c9 45 5f 4d 41 54 42 53 |de%..5 ..E_MATBS| 000038d0 25 0d 35 48 18 e7 50 61 73 73 77 6f 72 64 73 5f |%.5H..Passwords_| 000038e0 45 6e 61 62 6c 65 64 25 8c 0d 35 70 1e c8 99 54 |Enabled%..5p...T| 000038f0 5f 54 4f 4d 4f 25 2c 30 2c 53 65 6c 66 5f 49 44 |_TOMO%,0,Self_ID| 00003900 25 2c 32 2c 30 2c 30 0d 35 7a 1e c8 99 54 5f 54 |%,2,0,0.5z...T_T| 00003910 4f 4d 4f 25 2c 30 2c 53 65 6c 66 5f 49 44 25 2c |OMO%,0,Self_ID%,| 00003920 32 2c 31 2c 30 0d 35 84 1f c8 99 54 5f 54 4f 4d |2,1,0.5....T_TOM| 00003930 4f 25 2c 30 2c 53 65 6c 66 5f 49 44 25 2c 32 2c |O%,0,Self_ID%,2,| 00003940 26 63 2c 30 0d 35 8e 1f c8 99 54 5f 54 4f 4d 4f |&c,0.5....T_TOMO| 00003950 25 2c 30 2c 53 65 6c 66 5f 49 44 25 2c 32 2c 26 |%,0,Self_ID%,2,&| 00003960 64 2c 30 0d 35 98 05 cc 0d 35 c0 1e c8 99 54 5f |d,0.5....5....T_| 00003970 54 4f 4d 4f 25 2c 30 2c 53 65 6c 66 5f 49 44 25 |TOMO%,0,Self_ID%| 00003980 2c 32 2c 30 2c 31 0d 35 ca 1e c8 99 54 5f 54 4f |,2,0,1.5....T_TO| 00003990 4d 4f 25 2c 30 2c 53 65 6c 66 5f 49 44 25 2c 32 |MO%,0,Self_ID%,2| 000039a0 2c 31 2c 31 0d 35 d4 1f c8 99 54 5f 54 4f 4d 4f |,1,1.5....T_TOMO| 000039b0 25 2c 30 2c 53 65 6c 66 5f 49 44 25 2c 32 2c 26 |%,0,Self_ID%,2,&| 000039c0 63 2c 31 0d 35 de 1f c8 99 54 5f 54 4f 4d 4f 25 |c,1.5....T_TOMO%| 000039d0 2c 30 2c 53 65 6c 66 5f 49 44 25 2c 32 2c 26 64 |,0,Self_ID%,2,&d| 000039e0 2c 31 0d 35 e8 05 cd 0d 35 f2 0a c9 45 5f 4d 53 |,1.5....5...E_MS| 000039f0 25 0d 36 1a 16 c8 8e 53 65 6c 66 5f 43 6f 6d 70 |%.6....Self_Comp| 00003a00 6f 6e 65 6e 74 25 ca 0d 36 24 06 c9 30 0d 36 4c |onent%..6$..0.6L| 00003a10 1b c8 99 22 4f 53 5f 46 69 6c 65 22 2c 36 2c 4f |..."OS_File",6,O| 00003a20 6c 6f 67 66 69 6c 65 24 0d 36 56 2a c8 99 22 4f |logfile$.6V*.."O| 00003a30 53 5f 46 53 43 6f 6e 74 72 6f 6c 22 2c 32 35 2c |S_FSControl",25,| 00003a40 4c 6f 67 66 69 6c 65 24 2c 4f 6c 6f 67 66 69 6c |Logfile$,Ologfil| 00003a50 65 24 0d 36 60 20 c8 99 22 4f 53 5f 46 69 6c 65 |e$.6` .."OS_File| 00003a60 22 2c 31 31 2c 4c 6f 67 66 69 6c 65 24 2c 26 46 |",11,Logfile$,&F| 00003a70 46 46 0d 36 6a 06 c9 31 0d 36 92 1d ff 28 22 2a |FF.6j..1.6...("*| 00003a80 46 69 6c 65 72 5f 52 75 6e 20 22 2b 4c 6f 67 66 |Filer_Run "+Logf| 00003a90 69 6c 65 24 29 0d 36 9c 07 c9 26 64 0d 36 c4 14 |ile$).6...&d.6..| 00003aa0 f2 6b 69 6c 6c 5f 74 68 69 65 66 74 72 61 70 73 |.kill_thieftraps| 00003ab0 0d 36 ce 08 c9 26 31 31 0d 36 f6 1e f2 62 6f 6f |.6...&11.6...boo| 00003ac0 74 5f 69 6e 73 74 61 6c 6c 28 22 43 48 45 43 4b |t_install("CHECK| 00003ad0 22 2c 62 74 25 29 0d 37 00 09 e7 62 74 25 8c 0d |",bt%).7...bt%..| 00003ae0 37 28 28 2a 46 69 6c 65 72 5f 52 75 6e 20 3c 42 |7((*Filer_Run <B| 00003af0 6f 6f 74 24 44 69 72 3e 2e 55 74 69 6c 73 2e 44 |oot$Dir>.Utils.D| 00003b00 65 73 6b 72 75 6e 4f 0d 37 32 05 cc 0d 37 50 27 |eskrunO.72...7P'| 00003b10 2a 46 69 6c 65 72 5f 52 75 6e 20 3c 42 6f 6f 74 |*Filer_Run <Boot| 00003b20 24 64 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b |$dir>.Utils.Desk| 00003b30 72 75 6e 0d 37 5a 05 cd 0d 37 64 05 cb 0d 37 6e |run.7Z...7d...7n| 00003b40 05 cb 0d 37 78 05 e1 0d 37 be 12 dd f2 68 61 6e |...7x...7....han| 00003b50 64 6c 65 5f 6e 6f 64 69 72 0d 37 e6 12 c8 8e 45 |dle_nodir.7....E| 00003b60 76 65 6e 74 5f 43 6f 64 65 25 ca 0d 37 f0 0c c9 |vent_Code%..7...| 00003b70 45 5f 54 4f 41 43 25 0d 38 18 16 4e 6f 64 69 72 |E_TOAC%.8..Nodir| 00003b80 5f 49 44 25 3d 53 65 6c 66 5f 49 44 25 0d 38 22 |_ID%=Self_ID%.8"| 00003b90 29 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4e 6f 64 |)..T_TOMO%,0,Nod| 00003ba0 69 72 5f 49 44 25 2c 30 b8 53 75 62 6c 69 73 74 |ir_ID%,0.Sublist| 00003bb0 25 28 33 2c 31 29 0d 38 2c 15 53 75 62 6c 69 73 |%(3,1).8,.Sublis| 00003bc0 74 25 28 33 2c 33 29 3d 33 35 32 0d 38 36 16 53 |t%(3,3)=352.86.S| 00003bd0 75 62 6c 69 73 74 25 28 33 2c 34 29 3d 2d 32 38 |ublist%(3,4)=-28| 00003be0 30 0d 38 40 15 53 75 62 6c 69 73 74 25 28 33 2c |0.8@.Sublist%(3,| 00003bf0 35 29 3d 32 34 34 0d 38 4a 16 53 75 62 6c 69 73 |5)=244.8J.Sublis| 00003c00 74 25 28 33 2c 36 29 3d 2d 32 33 32 0d 38 54 05 |t%(3,6)=-232.8T.| 00003c10 cb 0d 38 5e 05 e1 0d 38 a4 14 dd f2 68 61 6e 64 |..8^...8....hand| 00003c20 6c 65 5f 6f 70 74 69 6f 6e 73 0d 38 cc 2c ea 61 |le_options.8.,.a| 00003c30 25 2c 62 25 2c 63 25 2c 64 25 2c 65 25 2c 66 25 |%,b%,c%,d%,e%,f%| 00003c40 2c 67 25 2c 68 25 2c 69 25 2c 6a 25 2c 6b 25 2c |,g%,h%,i%,j%,k%,| 00003c50 6c 25 2c 62 74 25 0d 38 e0 12 c8 8e 45 76 65 6e |l%,bt%.8....Even| 00003c60 74 5f 43 6f 64 65 25 ca 0d 38 ea 0c c9 45 5f 54 |t_Code%..8...E_T| 00003c70 4f 41 43 25 0d 39 12 18 4f 70 74 69 6f 6e 73 5f |OAC%.9..Options_| 00003c80 49 44 25 3d 53 65 6c 66 5f 49 44 25 0d 39 1c 0d |ID%=Self_ID%.9..| 00003c90 c9 45 5f 57 41 54 42 53 25 0d 39 44 35 f2 67 65 |.E_WATBS%.9D5.ge| 00003ca0 74 5f 6f 70 74 69 6f 6e 73 28 61 25 2c 62 25 2c |t_options(a%,b%,| 00003cb0 63 25 2c 64 25 2c 65 25 2c 66 25 2c 67 25 2c 68 |c%,d%,e%,f%,g%,h| 00003cc0 25 2c 69 25 2c 6a 25 2c 6b 25 2c 6c 25 29 0d 39 |%,i%,j%,k%,l%).9| 00003cd0 4e 27 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 |N'..T_TOMO%,0,Op| 00003ce0 74 69 6f 6e 73 5f 49 44 25 2c 35 31 32 2c 33 2c |tions_ID%,512,3,| 00003cf0 c3 28 61 25 29 0d 39 58 27 c8 99 54 5f 54 4f 4d |.(a%).9X'..T_TOM| 00003d00 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 |O%,0,Options_ID%| 00003d10 2c 35 31 32 2c 31 2c c3 28 62 25 29 0d 39 62 27 |,512,1,.(b%).9b'| 00003d20 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 |..T_TOMO%,0,Opti| 00003d30 6f 6e 73 5f 49 44 25 2c 35 31 32 2c 32 2c c3 28 |ons_ID%,512,2,.(| 00003d40 63 25 29 0d 39 6c 25 c8 99 54 5f 54 4f 4d 4f 25 |c%).9l%..T_TOMO%| 00003d50 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 2c 31 |,0,Options_ID%,1| 00003d60 39 36 2c 39 2c 2d 64 25 0d 39 76 26 c8 99 54 5f |96,9,-d%.9v&..T_| 00003d70 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f |TOMO%,0,Options_| 00003d80 49 44 25 2c 31 39 36 2c 26 61 2c 2d 65 25 0d 39 |ID%,196,&a,-e%.9| 00003d90 80 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 |.&..T_TOMO%,0,Op| 00003da0 74 69 6f 6e 73 5f 49 44 25 2c 31 39 36 2c 26 63 |tions_ID%,196,&c| 00003db0 2c 2d 66 25 0d 39 8a 26 c8 99 54 5f 54 4f 4d 4f |,-f%.9.&..T_TOMO| 00003dc0 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 2c |%,0,Options_ID%,| 00003dd0 31 39 36 2c 26 64 2c 2d 67 25 0d 39 94 27 c8 99 |196,&d,-g%.9.'..| 00003de0 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e |T_TOMO%,0,Option| 00003df0 73 5f 49 44 25 2c 31 39 36 2c 26 31 34 2c 2d 68 |s_ID%,196,&14,-h| 00003e00 25 0d 39 9e 27 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |%.9.'..T_TOMO%,0| 00003e10 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 2c 31 39 36 |,Options_ID%,196| 00003e20 2c 26 31 35 2c 2d 69 25 0d 39 a8 27 c8 99 54 5f |,&15,-i%.9.'..T_| 00003e30 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f |TOMO%,0,Options_| 00003e40 49 44 25 2c 31 39 36 2c 26 31 36 2c 2d 6a 25 0d |ID%,196,&16,-j%.| 00003e50 39 b2 27 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f |9.'..T_TOMO%,0,O| 00003e60 70 74 69 6f 6e 73 5f 49 44 25 2c 31 39 36 2c 26 |ptions_ID%,196,&| 00003e70 31 37 2c 2d 6b 25 0d 39 bc 27 c8 99 54 5f 54 4f |17,-k%.9.'..T_TO| 00003e80 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 |MO%,0,Options_ID| 00003e90 25 2c 31 39 36 2c 26 31 38 2c 2d 6c 25 0d 39 c6 |%,196,&18,-l%.9.| 00003ea0 1e f2 62 6f 6f 74 5f 69 6e 73 74 61 6c 6c 28 22 |..boot_install("| 00003eb0 43 48 45 43 4b 22 2c 62 74 25 29 0d 39 d0 30 c8 |CHECK",bt%).9.0.| 00003ec0 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f |.T_TOMO%,0,Optio| 00003ed0 6e 73 5f 49 44 25 2c 36 35 2c 26 31 42 2c 62 74 |ns_ID%,65,&1B,bt| 00003ee0 25 80 26 38 30 30 30 30 30 30 30 0d 39 da 33 c8 |%.&80000000.9.3.| 00003ef0 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f |.T_TOMO%,0,Optio| 00003f00 6e 73 5f 49 44 25 2c 36 35 2c 26 31 43 2c 28 ac |ns_ID%,65,&1C,(.| 00003f10 62 74 25 29 80 26 38 30 30 30 30 30 30 30 0d 39 |bt%).&80000000.9| 00003f20 e4 0b c9 45 5f 41 42 53 25 0d 3a 0c 33 c8 99 54 |...E_ABS%.:.3..T| 00003f30 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 |_TOMO%,0,Options| 00003f40 5f 49 44 25 2c 35 31 33 2c 33 2c 42 75 66 31 25 |_ID%,513,3,Buf1%| 00003f50 2c 31 32 38 b8 2c 2c 2c 2c 2c 6c 25 0d 3a 16 1c |,128.,,,,,l%.:..| 00003f60 42 75 66 31 25 3f 6c 25 3d 31 33 3a 61 25 3d bb |Buf1%?l%=13:a%=.| 00003f70 28 24 42 75 66 31 25 29 0d 3a 20 33 c8 99 54 5f |($Buf1%).: 3..T_| 00003f80 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f |TOMO%,0,Options_| 00003f90 49 44 25 2c 35 31 33 2c 31 2c 42 75 66 31 25 2c |ID%,513,1,Buf1%,| 00003fa0 31 32 38 b8 2c 2c 2c 2c 2c 6c 25 0d 3a 2a 1c 42 |128.,,,,,l%.:*.B| 00003fb0 75 66 31 25 3f 6c 25 3d 31 33 3a 62 25 3d bb 28 |uf1%?l%=13:b%=.(| 00003fc0 24 42 75 66 31 25 29 0d 3a 34 33 c8 99 54 5f 54 |$Buf1%).:43..T_T| 00003fd0 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 |OMO%,0,Options_I| 00003fe0 44 25 2c 35 31 33 2c 32 2c 42 75 66 31 25 2c 31 |D%,513,2,Buf1%,1| 00003ff0 32 38 b8 2c 2c 2c 2c 2c 6c 25 0d 3a 3e 1c 42 75 |28.,,,,,l%.:>.Bu| 00004000 66 31 25 3f 6c 25 3d 31 33 3a 63 25 3d bb 28 24 |f1%?l%=13:c%=.($| 00004010 42 75 66 31 25 29 0d 3a 48 24 c8 99 54 5f 54 4f |Buf1%).:H$..T_TO| 00004020 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 |MO%,0,Options_ID| 00004030 25 2c 31 39 37 2c 39 b8 64 25 0d 3a 52 25 c8 99 |%,197,9.d%.:R%..| 00004040 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e |T_TOMO%,0,Option| 00004050 73 5f 49 44 25 2c 31 39 37 2c 26 61 b8 65 25 0d |s_ID%,197,&a.e%.| 00004060 3a 5c 25 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f |:\%..T_TOMO%,0,O| 00004070 70 74 69 6f 6e 73 5f 49 44 25 2c 31 39 37 2c 26 |ptions_ID%,197,&| 00004080 63 b8 66 25 0d 3a 66 25 c8 99 54 5f 54 4f 4d 4f |c.f%.:f%..T_TOMO| 00004090 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 2c |%,0,Options_ID%,| 000040a0 31 39 37 2c 26 64 b8 67 25 0d 3a 70 26 c8 99 54 |197,&d.g%.:p&..T| 000040b0 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 |_TOMO%,0,Options| 000040c0 5f 49 44 25 2c 31 39 37 2c 26 31 34 b8 68 25 0d |_ID%,197,&14.h%.| 000040d0 3a 7a 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f |:z&..T_TOMO%,0,O| 000040e0 70 74 69 6f 6e 73 5f 49 44 25 2c 31 39 37 2c 26 |ptions_ID%,197,&| 000040f0 31 35 b8 69 25 0d 3a 84 26 c8 99 54 5f 54 4f 4d |15.i%.:.&..T_TOM| 00004100 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 |O%,0,Options_ID%| 00004110 2c 31 39 37 2c 26 31 36 b8 6a 25 0d 3a 8e 26 c8 |,197,&16.j%.:.&.| 00004120 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f |.T_TOMO%,0,Optio| 00004130 6e 73 5f 49 44 25 2c 31 39 37 2c 26 31 37 b8 6b |ns_ID%,197,&17.k| 00004140 25 0d 3a 98 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |%.:.&..T_TOMO%,0| 00004150 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 2c 31 39 37 |,Options_ID%,197| 00004160 2c 26 31 38 b8 6c 25 0d 3a a2 16 c8 8e 53 65 6c |,&18.l%.:....Sel| 00004170 66 5f 43 6f 6d 70 6f 6e 65 6e 74 25 ca 0d 3a ac |f_Component%..:.| 00004180 08 c9 26 31 61 0d 3a d4 1c f2 62 6f 6f 74 5f 69 |..&1a.:...boot_i| 00004190 6e 73 74 61 6c 6c 28 22 4f 55 54 22 2c 62 74 25 |nstall("OUT",bt%| 000041a0 29 0d 3a de 14 f2 6b 69 6c 6c 5f 74 68 69 65 66 |).:...kill_thief| 000041b0 74 72 61 70 73 0d 3a e8 11 f2 70 61 75 73 65 5f |traps.:...pause_| 000041c0 6c 6f 67 69 6e 73 0d 3a f2 12 f2 72 65 6d 6f 76 |logins.:...remov| 000041d0 65 5f 6c 6f 67 69 6e 73 0d 3a fc 50 f2 73 61 76 |e_logins.:.P.sav| 000041e0 65 5f 6f 70 74 69 6f 6e 73 28 61 25 2c 62 25 2c |e_options(a%,b%,| 000041f0 63 25 2c 28 64 25 3d 31 29 2c 28 65 25 3d 31 29 |c%,(d%=1),(e%=1)| 00004200 2c 28 66 25 3d 31 29 2c 28 67 25 3d 31 29 2c 28 |,(f%=1),(g%=1),(| 00004210 68 25 3d 31 29 2c 28 69 25 3d 31 29 2c 28 6a 25 |h%=1),(i%=1),(j%| 00004220 3d 31 29 2c 30 2c 30 29 0d 3b 06 10 f2 63 6c 65 |=1),0,0).;...cle| 00004230 61 72 5f 65 64 69 74 73 0d 3b 10 08 c9 26 31 62 |ar_edits.;...&1b| 00004240 0d 3b 38 1b f2 62 6f 6f 74 5f 69 6e 73 74 61 6c |.;8..boot_instal| 00004250 6c 28 22 49 4e 22 2c 62 74 25 29 0d 3b 42 2c c8 |l("IN",bt%).;B,.| 00004260 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f |.T_TOMO%,0,Optio| 00004270 6e 73 5f 49 44 25 2c 36 35 2c 26 31 42 2c 26 38 |ns_ID%,65,&1B,&8| 00004280 30 30 30 30 30 30 30 0d 3b 4c 24 c8 99 54 5f 54 |0000000.;L$..T_T| 00004290 4f 4d 4f 25 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 |OMO%,0,Options_I| 000042a0 44 25 2c 36 35 2c 26 31 43 2c 30 0d 3b 56 08 c9 |D%,65,&1C,0.;V..| 000042b0 26 31 43 0d 3b 7e 1c f2 62 6f 6f 74 5f 69 6e 73 |&1C.;~..boot_ins| 000042c0 74 61 6c 6c 28 22 4f 55 54 22 2c 62 74 25 29 0d |tall("OUT",bt%).| 000042d0 3b 88 24 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 4f |;.$..T_TOMO%,0,O| 000042e0 70 74 69 6f 6e 73 5f 49 44 25 2c 36 35 2c 26 31 |ptions_ID%,65,&1| 000042f0 42 2c 30 0d 3b 92 2c c8 99 54 5f 54 4f 4d 4f 25 |B,0.;.,..T_TOMO%| 00004300 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 2c 36 |,0,Options_ID%,6| 00004310 35 2c 26 31 43 2c 26 38 30 30 30 30 30 30 30 0d |5,&1C,&80000000.| 00004320 3b 9c 08 c9 26 31 31 0d 3b c4 5a f2 73 61 76 65 |;...&11.;.Z.save| 00004330 5f 6f 70 74 69 6f 6e 73 28 61 25 2c 62 25 2c 63 |_options(a%,b%,c| 00004340 25 2c 28 64 25 3d 31 29 2c 28 65 25 3d 31 29 2c |%,(d%=1),(e%=1),| 00004350 28 66 25 3d 31 29 2c 28 67 25 3d 31 29 2c 28 68 |(f%=1),(g%=1),(h| 00004360 25 3d 31 29 2c 28 69 25 3d 31 29 2c 28 6a 25 3d |%=1),(i%=1),(j%=| 00004370 31 29 2c 28 6b 25 3d 31 29 2c 28 6c 25 3d 31 29 |1),(k%=1),(l%=1)| 00004380 29 0d 3b ec 20 e7 28 6b 25 3d 31 29 80 ac 50 61 |).;. .(k%=1)..Pa| 00004390 73 73 77 6f 72 64 73 5f 45 6e 61 62 6c 65 64 25 |sswords_Enabled%| 000043a0 8c 0d 3c 32 1a 50 61 72 65 6e 74 5f 4e 61 6d 65 |..<2.Parent_Name| 000043b0 24 3d 22 4f 70 74 69 6f 6e 73 22 0d 3c 3c 15 f2 |$="Options".<<..| 000043c0 73 68 6f 77 69 6e 67 5f 70 61 73 73 77 6f 72 64 |showing_password| 000043d0 0d 3c 46 2d c8 99 54 5f 54 53 4f 25 2c 30 2c 50 |.<F-..T_TSO%,0,P| 000043e0 61 73 73 77 6f 72 64 5f 49 44 25 2c 30 2c 30 2c |assword_ID%,0,0,| 000043f0 4f 70 74 69 6f 6e 73 5f 49 44 25 2c 30 0d 3c 50 |Options_ID%,0.<P| 00004400 18 50 61 73 73 77 6f 72 64 73 5f 45 6e 61 62 6c |.Passwords_Enabl| 00004410 65 64 25 3d b9 0d 3c 5a 22 53 65 71 75 65 6e 63 |ed%=..<Z"Sequenc| 00004420 65 24 3d 22 45 4e 41 42 4c 49 4e 47 20 50 41 53 |e$="ENABLING PAS| 00004430 53 57 4f 52 44 53 22 0d 3c 64 05 cc 0d 3c 6e 20 |SWORDS".<d...<n | 00004440 e7 28 6b 25 3d 30 29 80 20 50 61 73 73 77 6f 72 |.(k%=0). Passwor| 00004450 64 73 5f 45 6e 61 62 6c 65 64 25 8c 0d 3c 96 11 |ds_Enabled%..<..| 00004460 f2 70 61 75 73 65 5f 6c 6f 67 69 6e 73 0d 3c a0 |.pause_logins.<.| 00004470 12 f2 72 65 6d 6f 76 65 5f 6c 6f 67 69 6e 73 0d |..remove_logins.| 00004480 3c aa 18 50 61 73 73 77 6f 72 64 73 5f 45 6e 61 |<..Passwords_Ena| 00004490 62 6c 65 64 25 3d a3 0d 3c b4 13 4c 6f 67 67 65 |bled%=..<..Logge| 000044a0 64 5f 55 73 65 72 24 3d 22 22 0d 3c be 05 cd 0d |d_User$="".<....| 000044b0 3c c8 05 cd 0d 3c d2 18 47 75 65 73 74 5f 4c 6f |<....<..Guest_Lo| 000044c0 67 69 6e 73 25 3d 28 67 25 3d 31 29 0d 3c dc 1d |gins%=(g%=1).<..| 000044d0 46 75 6c 6c 5f 4f 77 6e 65 72 5f 41 63 63 65 73 |Full_Owner_Acces| 000044e0 73 25 3d 28 69 25 3d 31 29 0d 3c e6 1d 50 61 73 |s%=(i%=1).<..Pas| 000044f0 73 77 6f 72 64 73 5f 45 6e 61 62 6c 65 64 25 3d |swords_Enabled%=| 00004500 28 6b 25 3d 31 29 0d 3c f0 17 41 75 74 6f 5f 50 |(k%=1).<..Auto_P| 00004510 72 6f 6d 70 74 25 3d 28 6c 25 3d 31 29 0d 3c fa |rompt%=(l%=1).<.| 00004520 05 cb 0d 3d 04 05 cb 0d 3d 0e 05 e1 0d 3d 54 15 |...=....=....=T.| 00004530 dd f2 68 61 6e 64 6c 65 5f 70 61 73 73 6d 65 6e |..handle_passmen| 00004540 75 0d 3d 7c 0d ea 6c 25 2c 6c 24 2c 61 25 0d 3d |u.=|..l%,l$,a%.=| 00004550 90 12 c8 8e 45 76 65 6e 74 5f 43 6f 64 65 25 ca |....Event_Code%.| 00004560 0d 3d 9a 0c c9 45 5f 54 4f 41 43 25 0d 3d c2 19 |.=...E_TOAC%.=..| 00004570 50 61 73 73 6d 65 6e 75 5f 49 44 25 3d 53 65 6c |Passmenu_ID%=Sel| 00004580 66 5f 49 44 25 0d 3d cc 0d c9 45 5f 4d 41 54 42 |f_ID%.=...E_MATB| 00004590 53 25 0d 3d f4 13 c8 8e 4c 6f 67 67 65 64 5f 55 |S%.=....Logged_U| 000045a0 73 65 72 24 ca 0d 3d fe 07 c9 22 22 0d 3e 26 20 |ser$..=..."".>& | 000045b0 f2 70 61 73 73 6d 65 6e 75 5f 67 72 65 79 73 28 |.passmenu_greys(| 000045c0 30 2c 31 2c 31 2c 31 2c 31 2c 31 29 0d 3e 30 0b |0,1,1,1,1,1).>0.| 000045d0 c9 4f 77 6e 65 72 24 0d 3e 58 20 f2 70 61 73 73 |.Owner$.>X .pass| 000045e0 6d 65 6e 75 5f 67 72 65 79 73 28 30 2c 30 2c 30 |menu_greys(0,0,0| 000045f0 2c 30 2c 30 2c 30 29 0d 3e 62 0d c9 22 4c 4f 47 |,0,0,0).>b.."LOG| 00004600 4f 46 46 22 0d 3e 8a 20 f2 70 61 73 73 6d 65 6e |OFF".>. .passmen| 00004610 75 5f 67 72 65 79 73 28 30 2c 31 2c 31 2c 31 2c |u_greys(0,1,1,1,| 00004620 31 2c 31 29 0d 3e 94 05 7f 0d 3e bc 20 f2 70 61 |1,1).>....>. .pa| 00004630 73 73 6d 65 6e 75 5f 67 72 65 79 73 28 30 2c 30 |ssmenu_greys(0,0| 00004640 2c 30 2c 31 2c 31 2c 31 29 0d 3e c6 05 cb 0d 3e |,0,1,1,1).>....>| 00004650 d0 0a c9 45 5f 4d 53 25 0d 3e f8 16 c8 8e 53 65 |...E_MS%.>....Se| 00004660 6c 66 5f 43 6f 6d 70 6f 6e 65 6e 74 25 ca 0d 3f |lf_Component%..?| 00004670 02 07 c9 26 44 0d 3f 2a 19 4c 6f 67 67 65 64 5f |...&D.?*.Logged_| 00004680 55 73 65 72 24 3d 22 4c 4f 47 4f 46 46 22 0d 3f |User$="LOGOFF".?| 00004690 34 1a e7 28 5a 7a 7a 7a 70 61 73 73 5f 53 74 61 |4..(Zzzzpass_Sta| 000046a0 74 75 73 25 3d 33 29 8c 0d 3f 5c 17 f2 69 6e 66 |tus%=3)..?\..inf| 000046b0 6f 72 6d 5f 7a 7a 7a 7a 70 61 73 73 28 30 29 0d |orm_zzzzpass(0).| 000046c0 3f 66 05 cd 0d 3f 70 12 e7 41 75 74 6f 5f 50 72 |?f...?p..Auto_Pr| 000046d0 6f 6d 70 74 25 8c 0d 3f 98 2e c8 99 54 5f 54 53 |ompt%..?....T_TS| 000046e0 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 |O%,0,Password_ID| 000046f0 25 2c 30 2c 30 2c 50 61 73 73 6d 65 6e 75 5f 49 |%,0,0,Passmenu_I| 00004700 44 25 2c 37 0d 3f a2 19 53 65 71 75 65 6e 63 65 |D%,7.?..Sequence| 00004710 24 3d 22 50 52 4f 4d 50 54 49 4e 47 22 0d 3f ac |$="PROMPTING".?.| 00004720 05 cd 0d 3f b6 07 c9 26 43 0d 3f e8 0b 52 75 73 |...?...&C.?..Rus| 00004730 72 25 3d 31 0d 3f f2 11 f2 6d 61 6b 65 5f 64 69 |r%=1.?...make_di| 00004740 72 6c 69 73 74 0d 40 1a 09 6c 24 3d 22 22 0d 40 |rlist.@..l$="".@| 00004750 24 11 e3 61 25 3d 31 b8 52 75 73 65 72 73 25 0d |$..a%=1.Rusers%.| 00004760 40 2e 11 6c 24 2b 3d 52 75 73 72 24 28 61 25 29 |@..l$+=Rusr$(a%)| 00004770 0d 40 38 17 e7 61 25 3c 52 75 73 65 72 73 25 8c |.@8..a%<Rusers%.| 00004780 6c 24 2b 3d 22 2c 22 0d 40 42 07 ed 61 25 0d 40 |l$+=",".@B..a%.@| 00004790 4c 29 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 55 73 |L)..T_TOMO%,0,Us| 000047a0 65 72 61 63 63 65 73 73 5f 49 44 25 2c 38 39 36 |eraccess_ID%,896| 000047b0 2c 26 31 62 2c 6c 24 0d 40 56 28 c8 99 54 5f 54 |,&1b,l$.@V(..T_T| 000047c0 4f 4d 4f 25 2c 31 2c 55 73 65 72 61 63 63 65 73 |OMO%,1,Useracces| 000047d0 73 5f 49 44 25 2c 38 39 38 2c 26 31 62 2c 30 0d |s_ID%,898,&1b,0.| 000047e0 40 60 11 f2 75 73 65 72 5f 67 61 64 67 65 74 73 |@`..user_gadgets| 000047f0 0d 40 6a 13 f2 64 72 61 77 5f 6d 61 69 6e 28 32 |.@j..draw_main(2| 00004800 2c 30 29 0d 40 74 05 cb 0d 40 7e 05 cb 0d 40 88 |,0).@t...@~...@.| 00004810 05 e1 0d 40 ce 15 dd f2 68 61 6e 64 6c 65 5f 70 |...@....handle_p| 00004820 61 73 73 77 6f 72 64 0d 40 f6 2c ea 61 25 2c 62 |assword.@.,.a%,b| 00004830 25 2c 63 25 2c 64 25 2c 65 25 2c 66 25 2c 67 25 |%,c%,d%,e%,f%,g%| 00004840 2c 68 25 2c 69 25 2c 6a 25 2c 6b 25 2c 6c 25 2c |,h%,i%,j%,k%,l%,| 00004850 77 68 25 0d 41 0a 12 c8 8e 45 76 65 6e 74 5f 43 |wh%.A....Event_C| 00004860 6f 64 65 25 ca 0d 41 14 0c c9 45 5f 54 4f 41 43 |ode%..A...E_TOAC| 00004870 25 0d 41 3c 19 50 61 73 73 77 6f 72 64 5f 49 44 |%.A<.Password_ID| 00004880 25 3d 53 65 6c 66 5f 49 44 25 0d 41 46 0d c9 45 |%=Self_ID%.AF..E| 00004890 5f 57 41 54 42 53 25 0d 41 6e 15 f2 73 68 6f 77 |_WATBS%.An..show| 000048a0 69 6e 67 5f 70 61 73 73 77 6f 72 64 0d 41 78 1b |ing_password.Ax.| 000048b0 e7 53 65 71 75 65 6e 63 65 24 3d 22 50 52 4f 4d |.Sequence$="PROM| 000048c0 50 54 49 4e 47 22 8c 0d 41 aa 12 f2 6c 6f 63 6b |PTING"..A...lock| 000048d0 5f 6d 6f 75 73 65 28 b9 29 0d 41 b4 05 cc 0d 41 |_mouse(.).A....A| 000048e0 be 12 f2 6c 6f 63 6b 5f 6d 6f 75 73 65 28 a3 29 |...lock_mouse(.)| 000048f0 0d 41 c8 05 cd 0d 41 d2 0c c9 45 5f 57 48 42 48 |.A....A...E_WHBH| 00004900 25 0d 41 fa 10 c8 8e 53 65 71 75 65 6e 63 65 24 |%.A....Sequence$| 00004910 ca 0d 42 04 19 c9 22 45 4e 41 42 4c 49 4e 47 20 |..B..."ENABLING | 00004920 50 41 53 53 57 4f 52 44 53 22 0d 42 2c 35 f2 67 |PASSWORDS".B,5.g| 00004930 65 74 5f 6f 70 74 69 6f 6e 73 28 61 25 2c 62 25 |et_options(a%,b%| 00004940 2c 63 25 2c 64 25 2c 65 25 2c 66 25 2c 67 25 2c |,c%,d%,e%,f%,g%,| 00004950 68 25 2c 69 25 2c 6a 25 2c 6b 25 2c 6c 25 29 0d |h%,i%,j%,k%,l%).| 00004960 42 36 35 f2 73 61 76 65 5f 6f 70 74 69 6f 6e 73 |B65.save_options| 00004970 28 61 25 2c 62 25 2c 63 25 2c 64 25 2c 65 25 2c |(a%,b%,c%,d%,e%,| 00004980 66 25 2c 67 25 2c 68 25 2c 69 25 2c 6a 25 2c a3 |f%,g%,h%,i%,j%,.| 00004990 2c 6c 25 29 0d 42 40 18 50 61 73 73 77 6f 72 64 |,l%).B@.Password| 000049a0 73 5f 45 6e 61 62 6c 65 64 25 3d a3 0d 42 4a 16 |s_Enabled%=..BJ.| 000049b0 53 65 71 75 65 6e 63 65 24 3d 22 4e 4f 52 4d 41 |Sequence$="NORMA| 000049c0 4c 22 0d 42 54 10 c9 22 50 52 4f 4d 50 54 49 4e |L".BT.."PROMPTIN| 000049d0 47 22 0d 42 7c 15 e7 4c 6f 67 67 65 64 5f 55 73 |G".B|..Logged_Us| 000049e0 65 72 24 3d 22 22 8c 0d 42 a4 2e c8 99 54 5f 54 |er$=""..B....T_T| 000049f0 53 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 |SO%,0,Password_I| 00004a00 44 25 2c 30 2c 30 2c 50 61 73 73 6d 65 6e 75 5f |D%,0,0,Passmenu_| 00004a10 49 44 25 2c 37 0d 42 ae 05 cd 0d 42 b8 0d c9 22 |ID%,7.B....B..."| 00004a20 4e 4f 52 4d 41 4c 22 0d 42 e0 25 c8 99 22 4f 53 |NORMAL".B.%.."OS| 00004a30 5f 52 65 61 64 4d 6f 64 65 56 61 72 69 61 62 6c |_ReadModeVariabl| 00004a40 65 22 2c 2d 31 2c 34 b8 2c 2c 61 25 0d 42 ea 26 |e",-1,4.,,a%.B.&| 00004a50 c8 99 22 4f 53 5f 52 65 61 64 4d 6f 64 65 56 61 |.."OS_ReadModeVa| 00004a60 72 69 61 62 6c 65 22 2c 2d 31 2c 31 31 b8 2c 2c |riable",-1,11.,,| 00004a70 62 25 0d 42 f4 25 c8 99 22 4f 53 5f 52 65 61 64 |b%.B.%.."OS_Read| 00004a80 4d 6f 64 65 56 61 72 69 61 62 6c 65 22 2c 2d 31 |ModeVariable",-1| 00004a90 2c 35 b8 2c 2c 63 25 0d 42 fe 26 c8 99 22 4f 53 |,5.,,c%.B.&.."OS| 00004aa0 5f 52 65 61 64 4d 6f 64 65 56 61 72 69 61 62 6c |_ReadModeVariabl| 00004ab0 65 22 2c 2d 31 2c 31 32 b8 2c 2c 64 25 0d 43 08 |e",-1,12.,,d%.C.| 00004ac0 21 c8 97 c8 93 30 2c 30 2c 28 62 25 2b 31 29 3c |!....0,0,(b%+1)<| 00004ad0 3c 61 25 2c 28 64 25 2b 31 29 3c 3c 63 25 0d 43 |<a%,(d%+1)<<c%.C| 00004ae0 12 05 cd 0d 43 1c 05 cb 0d 43 26 0b c9 45 5f 41 |....C....C&..E_A| 00004af0 42 53 25 0d 43 4e 16 c8 8e 53 65 6c 66 5f 43 6f |BS%.CN...Self_Co| 00004b00 6d 70 6f 6e 65 6e 74 25 ca 0d 43 58 06 c9 38 0d |mponent%..CX..8.| 00004b10 43 80 17 f2 61 63 74 69 6f 6e 5f 6f 6b 5f 70 61 |C...action_ok_pa| 00004b20 73 73 77 6f 72 64 0d 43 8a 06 c9 39 0d 43 b2 3c |ssword.C...9.C.<| 00004b30 c8 99 54 5f 54 53 4f 25 2c 30 2c 50 61 73 73 77 |..T_TSO%,0,Passw| 00004b40 6f 72 64 5f 49 44 25 2c 30 2c 30 2c 50 61 72 65 |ord_ID%,0,0,Pare| 00004b50 6e 74 5f 49 44 25 2c 50 61 72 65 6e 74 5f 43 6f |nt_ID%,Parent_Co| 00004b60 6d 70 6f 6e 65 6e 74 25 0d 43 bc 05 cb 0d 43 c6 |mponent%.C....C.| 00004b70 05 cb 0d 43 d0 05 e1 0d 44 16 14 dd f2 68 61 6e |...C....D....han| 00004b80 64 6c 65 5f 73 75 62 6c 69 73 74 0d 44 3e 12 c8 |dle_sublist.D>..| 00004b90 8e 45 76 65 6e 74 5f 43 6f 64 65 25 ca 0d 44 48 |.Event_Code%..DH| 00004ba0 0c c9 45 5f 54 4f 41 43 25 0d 44 70 18 53 75 62 |..E_TOAC%.Dp.Sub| 00004bb0 6c 69 73 74 5f 49 44 25 3d 53 65 6c 66 5f 49 44 |list_ID%=Self_ID| 00004bc0 25 0d 44 7a 2b c8 99 54 5f 54 4f 4d 4f 25 2c 30 |%.Dz+..T_TOMO%,0| 00004bd0 2c 53 75 62 6c 69 73 74 5f 49 44 25 2c 30 b8 53 |,Sublist_ID%,0.S| 00004be0 75 62 6c 69 73 74 25 28 31 2c 31 29 0d 44 84 14 |ublist%(1,1).D..| 00004bf0 53 75 62 6c 69 73 74 25 28 31 2c 33 29 3d 36 34 |Sublist%(1,3)=64| 00004c00 0d 44 8e 15 53 75 62 6c 69 73 74 25 28 31 2c 34 |.D..Sublist%(1,4| 00004c10 29 3d 2d 36 34 0d 44 98 15 53 75 62 6c 69 73 74 |)=-64.D..Sublist| 00004c20 25 28 31 2c 35 29 3d 38 31 32 0d 44 a2 16 53 75 |%(1,5)=812.D..Su| 00004c30 62 6c 69 73 74 25 28 31 2c 36 29 3d 2d 32 33 32 |blist%(1,6)=-232| 00004c40 0d 44 ac 05 cb 0d 44 b6 05 e1 0d 44 fc 16 dd f2 |.D....D....D....| 00004c50 68 61 6e 64 6c 65 5f 74 68 69 65 66 74 72 61 70 |handle_thieftrap| 00004c60 0d 45 24 12 c8 8e 45 76 65 6e 74 5f 43 6f 64 65 |.E$...Event_Code| 00004c70 25 ca 0d 45 2e 0c c9 45 5f 54 4f 41 43 25 0d 45 |%..E...E_TOAC%.E| 00004c80 56 1a 54 68 69 65 66 74 72 61 70 5f 49 44 25 3d |V.Thieftrap_ID%=| 00004c90 53 65 6c 66 5f 49 44 25 0d 45 60 0d c9 45 5f 57 |Self_ID%.E`..E_W| 00004ca0 41 54 42 53 25 0d 45 88 29 c8 99 54 5f 54 4f 4d |ATBS%.E.)..T_TOM| 00004cb0 4f 25 2c 30 2c 54 68 69 65 66 74 72 61 70 5f 49 |O%,0,Thieftrap_I| 00004cc0 44 25 2c 4d 5f 44 5f 53 53 25 2c 32 2c 31 0d 45 |D%,M_D_SS%,2,1.E| 00004cd0 92 30 53 6f 75 72 63 65 24 3d 22 3c 42 6f 6f 74 |.0Source$="<Boot| 00004ce0 50 6c 75 73 24 44 69 72 3e 2e 52 65 73 6f 75 72 |Plus$Dir>.Resour| 00004cf0 63 65 73 2e 54 68 69 65 66 74 72 61 70 22 0d 45 |ces.Thieftrap".E| 00004d00 9c 1d 41 70 70 6c 69 63 61 74 69 6f 6e 24 3d 22 |..Application$="| 00004d10 21 54 68 69 65 66 74 72 61 70 22 0d 45 a6 0b c9 |!Thieftrap".E...| 00004d20 45 5f 44 44 45 25 0d 45 ce 0e 42 75 66 32 25 21 |E_DDE%.E..Buf2%!| 00004d30 30 3d 36 34 0d 45 d8 2b 42 75 66 32 25 21 31 32 |0=64.E.+Buf2%!12| 00004d40 3d 30 3a 42 75 66 32 25 21 31 36 3d 31 3a 42 75 |=0:Buf2%!16=1:Bu| 00004d50 66 32 25 21 32 30 3d 42 6c 63 6b 25 21 31 36 0d |f2%!20=Blck%!16.| 00004d60 45 e2 34 42 75 66 32 25 21 32 38 3d 42 6c 63 6b |E.4Buf2%!28=Blck| 00004d70 25 21 32 34 3a 42 75 66 32 25 21 33 32 3d 42 6c |%!24:Buf2%!32=Bl| 00004d80 63 6b 25 21 32 38 3a 42 75 66 32 25 21 33 36 3d |ck%!28:Buf2%!36=| 00004d90 31 32 38 0d 45 ec 2b 42 75 66 32 25 21 34 30 3d |128.E.+Buf2%!40=| 00004da0 26 32 30 30 30 3a 24 28 42 75 66 32 25 2b 34 34 |&2000:$(Buf2%+44| 00004db0 29 3d 41 70 70 6c 69 63 61 74 69 6f 6e 24 0d 45 |)=Application$.E| 00004dc0 f6 2a c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 |.*.."Wimp_SendMe| 00004dd0 73 73 61 67 65 22 2c 31 37 2c 42 75 66 32 25 2c |ssage",17,Buf2%,| 00004de0 42 6c 63 6b 25 21 31 36 0d 46 00 05 cb 0d 46 0a |Blck%!16.F....F.| 00004df0 05 e1 0d 46 50 17 dd f2 68 61 6e 64 6c 65 5f 75 |...FP...handle_u| 00004e00 73 65 72 61 63 63 65 73 73 0d 46 78 0e ea 6c 24 |seraccess.Fx..l$| 00004e10 2c 61 25 2c 6f 76 25 0d 46 8c 12 c8 8e 45 76 65 |,a%,ov%.F....Eve| 00004e20 6e 74 5f 43 6f 64 65 25 ca 0d 46 96 0c c9 45 5f |nt_Code%..F...E_| 00004e30 54 4f 41 43 25 0d 46 be 1b 55 73 65 72 61 63 63 |TOAC%.F..Useracc| 00004e40 65 73 73 5f 49 44 25 3d 53 65 6c 66 5f 49 44 25 |ess_ID%=Self_ID%| 00004e50 0d 46 c8 2e c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c |.F....T_TOMO%,0,| 00004e60 55 73 65 72 61 63 63 65 73 73 5f 49 44 25 2c 30 |Useraccess_ID%,0| 00004e70 b8 53 75 62 6c 69 73 74 25 28 32 2c 32 29 0d 46 |.Sublist%(2,2).F| 00004e80 d2 1f 53 75 62 6c 69 73 74 25 28 33 2c 32 29 3d |..Sublist%(3,2)=| 00004e90 53 75 62 6c 69 73 74 25 28 32 2c 32 29 0d 46 dc |Sublist%(2,2).F.| 00004ea0 0c c9 45 5f 53 53 56 43 25 0d 47 04 33 c8 99 54 |..E_SSVC%.G.3..T| 00004eb0 5f 54 4f 4d 4f 25 2c 31 2c 55 73 65 72 61 63 63 |_TOMO%,1,Useracc| 00004ec0 65 73 73 5f 49 44 25 2c 38 39 39 2c 26 31 62 2c |ess_ID%,899,&1b,| 00004ed0 42 75 66 31 25 2c 31 32 38 b8 61 25 0d 47 0e 0e |Buf1%,128.a%.G..| 00004ee0 52 75 73 72 25 3d 61 25 2b 31 0d 47 36 11 f2 75 |Rusr%=a%+1.G6..u| 00004ef0 73 65 72 5f 67 61 64 67 65 74 73 0d 47 40 19 f2 |ser_gadgets.G@..| 00004f00 73 65 74 5f 6c 69 73 74 5f 65 78 74 65 6e 74 28 |set_list_extent(| 00004f10 32 2c b9 29 0d 47 4a 16 f2 64 72 61 77 5f 73 75 |2,.).GJ..draw_su| 00004f20 62 28 32 2c 32 2c a3 2c 30 29 0d 47 54 19 f2 73 |b(2,2,.,0).GT..s| 00004f30 65 74 5f 6c 69 73 74 5f 65 78 74 65 6e 74 28 33 |et_list_extent(3| 00004f40 2c b9 29 0d 47 5e 16 f2 64 72 61 77 5f 73 75 62 |,.).G^..draw_sub| 00004f50 28 33 2c 32 2c a3 2c 30 29 0d 47 68 0b c9 45 5f |(3,2,.,0).Gh..E_| 00004f60 41 42 53 25 0d 47 90 16 c8 8e 53 65 6c 66 5f 43 |ABS%.G....Self_C| 00004f70 6f 6d 70 6f 6e 65 6e 74 25 ca 0d 47 9a 08 c9 26 |omponent%..G...&| 00004f80 31 38 0d 47 c2 16 f2 6d 6f 64 69 66 79 5f 75 73 |18.G...modify_us| 00004f90 65 72 61 63 63 65 73 73 0d 47 cc 14 f2 73 61 76 |eraccess.G...sav| 00004fa0 65 5f 75 73 65 72 61 63 63 65 73 73 0d 47 d6 13 |e_useraccess.G..| 00004fb0 f2 73 61 76 65 5f 75 73 65 72 74 69 6d 65 73 0d |.save_usertimes.| 00004fc0 47 e0 0c 53 61 76 65 64 25 3d b9 0d 47 ea 05 cb |G..Saved%=..G...| 00004fd0 0d 47 f4 0c c9 45 5f 57 48 42 48 25 0d 48 1c 19 |.G...E_WHBH%.H..| 00004fe0 c8 99 54 5f 54 48 4f 25 2c 30 2c 59 65 73 64 69 |..T_THO%,0,Yesdi| 00004ff0 72 5f 49 44 25 0d 48 26 18 c8 99 54 5f 54 48 4f |r_ID%.H&...T_THO| 00005000 25 2c 30 2c 4e 6f 64 69 72 5f 49 44 25 0d 48 30 |%,0,Nodir_ID%.H0| 00005010 0d e7 ac 53 61 76 65 64 25 8c 0d 48 3a 2c f2 65 |...Saved%..H:,.e| 00005020 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 4d |rror_message("EM| 00005030 39 22 2c 22 22 2c 22 22 2c 22 45 54 33 22 2c 26 |9","","","ET3",&| 00005040 31 33 2c 6b 25 29 0d 48 44 0a e7 6b 25 3d 31 8c |13,k%).HD..k%=1.| 00005050 0d 48 6c 16 f2 6d 6f 64 69 66 79 5f 75 73 65 72 |.Hl..modify_user| 00005060 61 63 63 65 73 73 0d 48 76 14 f2 73 61 76 65 5f |access.Hv..save_| 00005070 75 73 65 72 61 63 63 65 73 73 0d 48 80 13 f2 73 |useraccess.H...s| 00005080 61 76 65 5f 75 73 65 72 74 69 6d 65 73 0d 48 8a |ave_usertimes.H.| 00005090 05 cd 0d 48 94 05 cd 0d 48 9e 0c 53 61 76 65 64 |...H....H..Saved| 000050a0 25 3d b9 0d 48 a8 05 cb 0d 48 b2 05 e1 0d 48 f8 |%=..H....H....H.| 000050b0 13 dd f2 68 61 6e 64 6c 65 5f 79 65 73 64 69 72 |...handle_yesdir| 000050c0 0d 49 20 12 c8 8e 45 76 65 6e 74 5f 43 6f 64 65 |.I ...Event_Code| 000050d0 25 ca 0d 49 2a 0c c9 45 5f 54 4f 41 43 25 0d 49 |%..I*..E_TOAC%.I| 000050e0 52 17 59 65 73 64 69 72 5f 49 44 25 3d 53 65 6c |R.Yesdir_ID%=Sel| 000050f0 66 5f 49 44 25 0d 49 5c 2a c8 99 54 5f 54 4f 4d |f_ID%.I\*..T_TOM| 00005100 4f 25 2c 30 2c 59 65 73 64 69 72 5f 49 44 25 2c |O%,0,Yesdir_ID%,| 00005110 30 b8 53 75 62 6c 69 73 74 25 28 32 2c 31 29 0d |0.Sublist%(2,1).| 00005120 49 66 14 53 75 62 6c 69 73 74 25 28 32 2c 33 29 |If.Sublist%(2,3)| 00005130 3d 34 34 0d 49 70 16 53 75 62 6c 69 73 74 25 28 |=44.Ip.Sublist%(| 00005140 32 2c 34 29 3d 2d 32 38 30 0d 49 7a 15 53 75 62 |2,4)=-280.Iz.Sub| 00005150 6c 69 73 74 25 28 32 2c 35 29 3d 32 34 34 0d 49 |list%(2,5)=244.I| 00005160 84 16 53 75 62 6c 69 73 74 25 28 32 2c 36 29 3d |..Sublist%(2,6)=| 00005170 2d 32 33 32 0d 49 8e 05 cb 0d 49 98 05 e1 0d 49 |-232.I....I....I| 00005180 de 10 dd f2 68 61 6e 64 6c 65 5f 77 6d 69 0d 4a |....handle_wmi.J| 00005190 06 18 ea 6e 6d 24 2c 73 74 24 2c 74 6e 24 2c 70 |...nm$,st$,tn$,p| 000051a0 63 24 2c 74 70 24 0d 4a 1a 12 c8 8e 45 76 65 6e |c$,tp$.J....Even| 000051b0 74 5f 43 6f 64 65 25 ca 0d 4a 24 0d c9 45 5f 57 |t_Code%..J$..E_W| 000051c0 41 54 42 53 25 0d 4a 4c 24 ff 28 22 2a 41 43 43 |ATBS%.JL$.("*ACC| 000051d0 45 53 53 20 22 2b 4f 77 6e 65 72 66 69 6c 65 24 |ESS "+Ownerfile$| 000051e0 2b 22 20 57 52 2f 52 22 29 0d 4a 56 14 66 25 3d |+" WR/R").JV.f%=| 000051f0 8e 28 4f 77 6e 65 72 66 69 6c 65 24 29 0d 4a 60 |.(Ownerfile$).J`| 00005200 0b e3 61 25 3d 31 b8 35 0d 4a 6a 0b 61 24 3d be |..a%=1.5.Jj.a$=.| 00005210 23 66 25 0d 4a 74 24 c8 99 54 5f 54 4f 4d 4f 25 |#f%.Jt$..T_TOMO%| 00005220 2c 30 2c 53 65 6c 66 5f 49 44 25 2c 35 31 32 2c |,0,Self_ID%,512,| 00005230 61 25 2b 34 2c 61 24 0d 4a 7e 07 ed 61 25 0d 4a |a%+4,a$.J~..a%.J| 00005240 88 08 d9 23 66 25 0d 4a 92 22 ff 28 22 2a 41 43 |...#f%.J.".("*AC| 00005250 43 45 53 53 20 22 2b 4f 77 6e 65 72 66 69 6c 65 |CESS "+Ownerfile| 00005260 24 2b 22 20 4c 2f 22 29 0d 4a 9c 0b c9 45 5f 41 |$+" L/").J...E_A| 00005270 42 53 25 0d 4a c4 18 e7 53 65 6c 66 5f 43 6f 6d |BS%.J...Self_Com| 00005280 70 6f 6e 65 6e 74 25 3d 31 30 8c 0d 4a ce 24 ff |ponent%=10..J.$.| 00005290 28 22 2a 41 43 43 45 53 53 20 22 2b 4f 77 6e 65 |("*ACCESS "+Owne| 000052a0 72 66 69 6c 65 24 2b 22 20 57 52 2f 52 22 29 0d |rfile$+" WR/R").| 000052b0 4a d8 14 66 25 3d ad 28 4f 77 6e 65 72 66 69 6c |J..f%=.(Ownerfil| 000052c0 65 24 29 0d 4a e2 0b e3 61 25 3d 31 b8 35 0d 4a |e$).J...a%=1.5.J| 000052d0 ec 33 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 53 65 |.3..T_TOMO%,0,Se| 000052e0 6c 66 5f 49 44 25 2c 35 31 33 2c 61 25 2b 34 2c |lf_ID%,513,a%+4,| 000052f0 42 75 66 31 25 2c 31 32 38 b8 2c 2c 2c 2c 2c 6c |Buf1%,128.,,,,,l| 00005300 25 0d 4a f6 0f 42 75 66 31 25 3f 6c 25 3d 31 33 |%.J..Buf1%?l%=13| 00005310 0d 4b 00 0f d5 23 66 25 2c 24 42 75 66 31 25 0d |.K...#f%,$Buf1%.| 00005320 4b 0a 07 ed 61 25 0d 4b 14 08 d9 23 66 25 0d 4b |K...a%.K...#f%.K| 00005330 1e 22 ff 28 22 2a 41 43 43 45 53 53 20 22 2b 4f |.".("*ACCESS "+O| 00005340 77 6e 65 72 66 69 6c 65 24 2b 22 20 4c 2f 22 29 |wnerfile$+" L/")| 00005350 0d 4b 28 05 cd 0d 4b 32 05 cb 0d 4b 3c 05 e1 0d |.K(...K2...K<...| 00005360 4b 82 1b dd f2 6d 61 6b 65 5f 74 68 69 65 66 74 |K....make_thieft| 00005370 72 61 70 28 64 65 73 74 24 29 0d 4b aa 10 ea 66 |rap(dest$).K...f| 00005380 25 2c 61 25 2c 61 24 2c 70 25 0d 4b be 1c 70 25 |%,a%,a$,p%.K..p%| 00005390 3d a7 64 65 73 74 24 2c 22 2e 21 54 68 69 65 66 |=.dest$,".!Thief| 000053a0 74 72 61 70 22 29 0d 4b c8 24 ff 28 22 2a 41 63 |trap").K.$.("*Ac| 000053b0 63 65 73 73 20 22 2b 54 68 69 65 66 66 69 6c 65 |cess "+Thieffile| 000053c0 24 2b 22 20 57 52 2f 52 22 29 0d 4b d2 14 66 25 |$+" WR/R").K..f%| 000053d0 3d ad 28 54 68 69 65 66 66 69 6c 65 24 29 0d 4b |=.(Thieffile$).K| 000053e0 dc 08 61 25 3d 31 0d 4b e6 05 f5 0d 4b f0 09 61 |..a%=1.K....K..a| 000053f0 25 2b 3d 31 0d 4b fa 0b 61 24 3d be 23 66 25 0d |%+=1.K..a$=.#f%.| 00005400 4c 04 09 fd c5 23 66 25 0d 4c 0e 20 61 24 3d c0 |L....#f%.L. a$=.| 00005410 64 65 73 74 24 2c 70 25 29 2b 22 21 54 72 61 70 |dest$,p%)+"!Trap| 00005420 5f 22 2b c3 28 61 25 29 0d 4c 36 1e d5 23 66 25 |_"+.(a%).L6..#f%| 00005430 2c 22 2a 57 49 50 45 20 22 2b 61 24 2b 22 20 46 |,"*WIPE "+a$+" F| 00005440 52 7e 43 7e 56 22 0d 4c 40 08 d9 23 66 25 0d 4c |R~C~V".L@..#f%.L| 00005450 4a 22 ff 28 22 2a 41 63 63 65 73 73 20 22 2b 54 |J".("*Access "+T| 00005460 68 69 65 66 66 69 6c 65 24 2b 22 20 4c 2f 22 29 |hieffile$+" L/")| 00005470 0d 4c 72 3e ff 28 22 2a 43 4f 50 59 20 3c 42 6f |.Lr>.("*COPY <Bo| 00005480 6f 74 50 6c 75 73 24 44 69 72 3e 2e 52 65 73 6f |otPlus$Dir>.Reso| 00005490 75 72 63 65 73 2e 54 68 69 65 66 74 72 61 70 20 |urces.Thieftrap | 000054a0 22 2b 61 24 2b 22 20 7e 43 7e 56 52 22 29 0d 4c |"+a$+" ~C~VR").L| 000054b0 9a 48 ff 28 22 2a 43 4f 50 59 20 3c 42 6f 6f 74 |.H.("*COPY <Boot| 000054c0 50 6c 75 73 24 44 69 72 3e 2e 52 65 73 6f 75 72 |Plus$Dir>.Resour| 000054d0 63 65 73 2e 21 7a 7a 7a 7a 70 61 73 73 20 22 2b |ces.!zzzzpass "+| 000054e0 61 24 2b 22 2e 21 7a 7a 7a 7a 70 61 73 73 20 7e |a$+".!zzzzpass ~| 000054f0 43 7e 56 52 22 29 0d 4c ae 05 e1 0d 4c fe 15 dd |C~VR").L....L...| 00005500 f2 6b 69 6c 6c 5f 74 68 69 65 66 74 72 61 70 73 |.kill_thieftraps| 00005510 0d 4d 26 0d ea 61 25 2c 61 24 2c 66 25 0d 4d 3a |.M&..a%,a$,f%.M:| 00005520 24 ff 28 22 2a 41 43 43 45 53 53 20 22 2b 54 68 |$.("*ACCESS "+Th| 00005530 69 65 66 66 69 6c 65 24 2b 22 20 57 52 2f 52 22 |ieffile$+" WR/R"| 00005540 29 0d 4d 44 1a ff 28 22 2a 4f 42 45 59 20 22 2b |).MD..("*OBEY "+| 00005550 54 68 69 65 66 66 69 6c 65 24 29 0d 4d 4e 22 ff |Thieffile$).MN".| 00005560 28 22 2a 57 49 50 45 20 22 2b 54 68 69 65 66 66 |("*WIPE "+Thieff| 00005570 69 6c 65 24 2b 22 20 7e 43 7e 56 22 29 0d 4d 58 |ile$+" ~C~V").MX| 00005580 14 66 25 3d ae 28 54 68 69 65 66 66 69 6c 65 24 |.f%=.(Thieffile$| 00005590 29 0d 4d 62 1e d5 23 66 25 2c 22 7c 20 46 69 6c |).Mb..#f%,"| Fil| 000055a0 65 73 20 66 6f 72 20 6b 69 6c 6c 69 6e 67 22 0d |es for killing".| 000055b0 4d 6c 08 d9 23 66 25 0d 4d 76 25 ff 28 22 2a 53 |Ml..#f%.Mv%.("*S| 000055c0 65 74 54 79 70 65 20 22 2b 54 68 69 65 66 66 69 |etType "+Thieffi| 000055d0 6c 65 24 2b 22 20 26 46 45 42 22 29 0d 4d 80 22 |le$+" &FEB").M."| 000055e0 ff 28 22 2a 41 43 43 45 53 53 20 22 2b 54 68 69 |.("*ACCESS "+Thi| 000055f0 65 66 66 69 6c 65 24 2b 22 20 4c 2f 22 29 0d 4d |effile$+" L/").M| 00005600 8a 05 e1 0d 4d da 1b dd f2 6c 6f 63 6b 5f 6d 6f |....M....lock_mo| 00005610 75 73 65 28 6c 6f 63 6b 6d 6f 75 73 65 29 0d 4e |use(lockmouse).N| 00005620 02 10 ea 61 25 2c 62 25 2c 77 25 2c 68 25 0d 4e |...a%,b%,w%,h%.N| 00005630 0c 25 c8 99 22 4f 53 5f 52 65 61 64 4d 6f 64 65 |.%.."OS_ReadMode| 00005640 56 61 72 69 61 62 6c 65 22 2c 2d 31 2c 34 b8 2c |Variable",-1,4.,| 00005650 2c 61 25 0d 4e 16 26 c8 99 22 4f 53 5f 52 65 61 |,a%.N.&.."OS_Rea| 00005660 64 4d 6f 64 65 56 61 72 69 61 62 6c 65 22 2c 2d |dModeVariable",-| 00005670 31 2c 31 31 b8 2c 2c 62 25 0d 4e 20 11 77 25 3d |1,11.,,b%.N .w%=| 00005680 28 62 25 2b 31 29 3c 3c 61 25 0d 4e 2a 25 c8 99 |(b%+1)<<a%.N*%..| 00005690 22 4f 53 5f 52 65 61 64 4d 6f 64 65 56 61 72 69 |"OS_ReadModeVari| 000056a0 61 62 6c 65 22 2c 2d 31 2c 35 b8 2c 2c 61 25 0d |able",-1,5.,,a%.| 000056b0 4e 34 26 c8 99 22 4f 53 5f 52 65 61 64 4d 6f 64 |N4&.."OS_ReadMod| 000056c0 65 56 61 72 69 61 62 6c 65 22 2c 2d 31 2c 31 32 |eVariable",-1,12| 000056d0 b8 2c 2c 62 25 0d 4e 3e 11 68 25 3d 28 62 25 2b |.,,b%.N>.h%=(b%+| 000056e0 31 29 3c 3c 61 25 0d 4e 48 26 c8 99 54 5f 54 4f |1)<<a%.NH&..T_TO| 000056f0 4d 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 |MO%,0,Password_I| 00005700 44 25 2c 30 b8 42 6c 63 6b 25 21 30 0d 4e 52 22 |D%,0.Blck%!0.NR"| 00005710 c8 99 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f |.."Wimp_GetWindo| 00005720 77 53 74 61 74 65 22 2c 2c 42 6c 63 6b 25 0d 4e |wState",,Blck%.N| 00005730 5c 0f e7 6c 6f 63 6b 6d 6f 75 73 65 8c 0d 4e 84 |\..lockmouse..N.| 00005740 39 c8 97 c8 93 42 6c 63 6b 25 21 34 2c 42 6c 63 |9....Blck%!4,Blc| 00005750 6b 25 21 38 2c 42 6c 63 6b 25 21 31 32 2d 42 6c |k%!8,Blck%!12-Bl| 00005760 63 6b 25 21 34 2c 42 6c 63 6b 25 21 31 36 2d 42 |ck%!4,Blck%!16-B| 00005770 6c 63 6b 25 21 38 0d 4e 8e 05 cd 0d 4e 98 29 42 |lck%!8.N....N.)B| 00005780 6c 63 6b 25 21 34 3d 28 77 25 2d 36 30 38 29 2f |lck%!4=(w%-608)/| 00005790 32 3a 42 6c 63 6b 25 21 38 3d 28 68 25 2d 34 36 |2:Blck%!8=(h%-46| 000057a0 34 29 2f 32 0d 4e a2 2d 42 6c 63 6b 25 21 31 32 |4)/2.N.-Blck%!12| 000057b0 3d 42 6c 63 6b 25 21 34 2b 36 30 38 3a 42 6c 63 |=Blck%!4+608:Blc| 000057c0 6b 25 21 31 36 3d 42 6c 63 6b 25 21 38 2b 34 36 |k%!16=Blck%!8+46| 000057d0 34 0d 4e ac 1e c8 99 22 57 69 6d 70 5f 4f 70 65 |4.N...."Wimp_Ope| 000057e0 6e 57 69 6e 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d |nWindow",,Blck%.| 000057f0 4e b6 05 e1 0d 4e fc 16 dd f2 73 68 6f 77 69 6e |N....N....showin| 00005800 67 5f 70 61 73 73 77 6f 72 64 0d 4f 24 13 c8 8e |g_password.O$...| 00005810 50 61 72 65 6e 74 5f 4e 61 6d 65 24 ca 0d 4f 2e |Parent_Name$..O.| 00005820 0e c9 22 49 63 6f 6e 62 61 72 22 0d 4f 56 3c f2 |.."Iconbar".OV<.| 00005830 63 6c 65 61 72 5f 66 69 65 6c 64 73 28 22 43 46 |clear_fields("CF| 00005840 31 22 2c 22 22 2c 22 22 2c 22 22 2c 22 22 2c 30 |1","","","","",0| 00005850 2c 30 2c 26 38 30 30 30 30 30 30 30 2c 26 38 30 |,0,&80000000,&80| 00005860 30 30 30 30 30 30 29 0d 4f 60 10 41 75 74 6f 63 |000000).O`.Autoc| 00005870 6c 6f 73 65 25 3d b9 0d 4f 6a 0e c9 22 4f 70 74 |lose%=..Oj.."Opt| 00005880 69 6f 6e 73 22 0d 4f 92 40 f2 63 6c 65 61 72 5f |ions".O.@.clear_| 00005890 66 69 65 6c 64 73 28 22 43 46 32 22 2c 4f 77 6e |fields("CF2",Own| 000058a0 65 72 24 2c 22 22 2c 22 22 2c 22 22 2c 26 38 30 |er$,"","","",&80| 000058b0 30 30 30 30 30 30 2c 26 38 30 30 30 30 30 30 30 |000000,&80000000| 000058c0 2c 30 2c 30 29 0d 4f 9c 0f c9 22 50 61 73 73 6d |,0,0).O..."Passm| 000058d0 65 6e 75 22 0d 4f a6 18 c8 8e 50 61 72 65 6e 74 |enu".O....Parent| 000058e0 5f 43 6f 6d 70 6f 6e 65 6e 74 25 ca 0d 4f b0 06 |_Component%..O..| 000058f0 c9 33 0d 4f d8 40 f2 63 6c 65 61 72 5f 66 69 65 |.3.O.@.clear_fie| 00005900 6c 64 73 28 22 43 46 33 22 2c 4f 77 6e 65 72 24 |lds("CF3",Owner$| 00005910 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 30 2c 26 38 |,"","","",0,0,&8| 00005920 30 30 30 30 30 30 30 2c 26 38 30 30 30 30 30 30 |0000000,&8000000| 00005930 30 29 0d 4f e2 14 55 73 65 72 6e 61 6d 65 24 3d |0).O..Username$=| 00005940 4f 77 6e 65 72 24 0d 4f ec 06 c9 38 0d 50 14 40 |Owner$.O...8.P.@| 00005950 f2 63 6c 65 61 72 5f 66 69 65 6c 64 73 28 22 43 |.clear_fields("C| 00005960 46 33 22 2c 4f 77 6e 65 72 24 2c 22 22 2c 22 22 |F3",Owner$,"",""| 00005970 2c 22 22 2c 30 2c 30 2c 26 38 30 30 30 30 30 30 |,"",0,0,&8000000| 00005980 30 2c 26 38 30 30 30 30 30 30 30 29 0d 50 1e 14 |0,&80000000).P..| 00005990 55 73 65 72 6e 61 6d 65 24 3d 4f 77 6e 65 72 24 |Username$=Owner$| 000059a0 0d 50 28 06 c9 37 0d 50 50 3c f2 63 6c 65 61 72 |.P(..7.PP<.clear| 000059b0 5f 66 69 65 6c 64 73 28 22 43 46 34 22 2c 22 22 |_fields("CF4",""| 000059c0 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 30 2c 26 38 |,"","","",0,0,&8| 000059d0 30 30 30 30 30 30 30 2c 26 38 30 30 30 30 30 30 |0000000,&8000000| 000059e0 30 29 0d 50 5a 06 c9 36 0d 50 82 15 e7 4c 6f 67 |0).PZ..6.P...Log| 000059f0 67 65 64 5f 55 73 65 72 24 3d 22 22 8c 0d 50 8c |ged_User$=""..P.| 00005a00 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 |(.error_message(| 00005a10 22 45 4d 31 30 22 2c 22 22 2c 22 22 2c 22 22 2c |"EM10","","","",| 00005a20 30 2c 4b 25 29 0d 50 96 05 cc 0d 50 a0 3e f2 63 |0,K%).P....P.>.c| 00005a30 6c 65 61 72 5f 66 69 65 6c 64 73 28 22 43 46 35 |lear_fields("CF5| 00005a40 22 2c 4c 6f 67 67 65 64 5f 55 73 65 72 24 2c 22 |",Logged_User$,"| 00005a50 22 2c 22 22 2c 22 22 2c 26 38 30 30 30 30 30 30 |","","",&8000000| 00005a60 30 2c 30 2c 30 2c 30 29 0d 50 aa 1a 55 73 65 72 |0,0,0,0).P..User| 00005a70 6e 61 6d 65 24 3d 4c 6f 67 67 65 64 5f 55 73 65 |name$=Logged_Use| 00005a80 72 24 0d 50 b4 05 cd 0d 50 be 05 cb 0d 50 c8 10 |r$.P....P....P..| 00005a90 41 75 74 6f 63 6c 6f 73 65 25 3d a3 0d 50 d2 0f |Autoclose%=..P..| 00005aa0 c9 22 50 61 73 73 77 6f 72 64 22 0d 50 dc 18 c8 |."Password".P...| 00005ab0 8e 50 61 72 65 6e 74 5f 43 6f 6d 70 6f 6e 65 6e |.Parent_Componen| 00005ac0 74 25 ca 0d 50 e6 08 c9 31 30 30 0d 51 0e 34 f2 |t%..P...100.Q.4.| 00005ad0 63 6c 65 61 72 5f 66 69 65 6c 64 73 28 22 43 46 |clear_fields("CF| 00005ae0 36 22 2c 22 22 2c 22 22 2c 22 22 2c 22 22 2c 30 |6","","","","",0| 00005af0 2c 26 38 30 30 30 30 30 30 30 2c 30 2c 30 29 0d |,&80000000,0,0).| 00005b00 51 18 08 c9 31 30 31 0d 51 40 34 f2 63 6c 65 61 |Q...101.Q@4.clea| 00005b10 72 5f 66 69 65 6c 64 73 28 22 43 46 37 22 2c 22 |r_fields("CF7","| 00005b20 22 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 26 38 30 |","","","",0,&80| 00005b30 30 30 30 30 30 30 2c 30 2c 30 29 0d 51 4a 08 c9 |000000,0,0).QJ..| 00005b40 31 30 32 0d 51 72 40 f2 63 6c 65 61 72 5f 66 69 |102.Qr@.clear_fi| 00005b50 65 6c 64 73 28 22 43 46 38 22 2c 4f 77 6e 65 72 |elds("CF8",Owner| 00005b60 24 2c 22 22 2c 22 22 2c 22 22 2c 26 38 30 30 30 |$,"","","",&8000| 00005b70 30 30 30 30 2c 26 38 30 30 30 30 30 30 30 2c 30 |0000,&80000000,0| 00005b80 2c 30 29 0d 51 7c 14 55 73 65 72 6e 61 6d 65 24 |,0).Q|.Username$| 00005b90 3d 4f 77 6e 65 72 24 0d 51 86 05 cb 0d 51 90 10 |=Owner$.Q....Q..| 00005ba0 41 75 74 6f 63 6c 6f 73 65 25 3d a3 0d 51 9a 05 |Autoclose%=..Q..| 00005bb0 cb 0d 51 a4 05 e1 0d 51 ea 18 dd f2 76 61 6c 63 |..Q....Q....valc| 00005bc0 68 61 6e 67 65 5f 70 61 73 73 77 6f 72 64 0d 52 |hange_password.R| 00005bd0 12 10 e7 42 6c 63 6b 25 21 31 36 3d 30 8c 0d 52 |...Blck%!16=0..R| 00005be0 3a 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 |:(.error_message| 00005bf0 28 22 45 4d 31 31 22 2c 22 22 2c 22 22 2c 22 22 |("EM11","","",""| 00005c00 2c 30 2c 4b 25 29 0d 52 44 05 cc 0d 52 4e 16 c8 |,0,K%).RD...RN..| 00005c10 8e 53 65 6c 66 5f 43 6f 6d 70 6f 6e 65 6e 74 25 |.Self_Component%| 00005c20 ca 0d 52 58 06 c9 34 0d 52 62 21 55 73 65 72 6e |..RX..4.Rb!Usern| 00005c30 61 6d 65 24 3d a4 69 6e 64 69 72 65 63 74 28 42 |ame$=.indirect(B| 00005c40 6c 63 6b 25 2b 31 36 29 0d 52 6c 06 c9 35 0d 52 |lck%+16).Rl..5.R| 00005c50 76 21 50 61 73 73 77 6f 72 64 24 3d a4 69 6e 64 |v!Password$=.ind| 00005c60 69 72 65 63 74 28 42 6c 63 6b 25 2b 31 36 29 0d |irect(Blck%+16).| 00005c70 52 80 06 c9 36 0d 52 8a 24 4e 65 77 70 61 73 73 |R...6.R.$Newpass| 00005c80 77 6f 72 64 24 3d a4 69 6e 64 69 72 65 63 74 28 |word$=.indirect(| 00005c90 42 6c 63 6b 25 2b 31 36 29 0d 52 94 06 c9 37 0d |Blck%+16).R...7.| 00005ca0 52 9e 1f 56 65 72 69 66 79 24 3d a4 69 6e 64 69 |R..Verify$=.indi| 00005cb0 72 65 63 74 28 42 6c 63 6b 25 2b 31 36 29 0d 52 |rect(Blck%+16).R| 00005cc0 a8 05 cb 0d 52 b2 05 cd 0d 52 bc 05 e1 0d 53 02 |....R....R....S.| 00005cd0 18 dd f2 61 63 74 69 6f 6e 5f 6f 6b 5f 70 61 73 |...action_ok_pas| 00005ce0 73 77 6f 72 64 0d 53 2a 21 ea 75 24 2c 70 24 2c |sword.S*!.u$,p$,| 00005cf0 76 61 6c 69 64 25 2c 76 65 72 69 66 79 25 2c 65 |valid%,verify%,e| 00005d00 78 69 73 74 73 25 0d 53 3e 2d c8 99 54 5f 54 4f |xists%.S>-..T_TO| 00005d10 4d 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 |MO%,0,Password_I| 00005d20 44 25 2c 35 31 33 2c 26 34 2c 42 75 66 31 25 2c |D%,513,&4,Buf1%,| 00005d30 32 35 36 0d 53 48 17 75 24 3d a4 69 6e 64 69 72 |256.SH.u$=.indir| 00005d40 65 63 74 28 42 75 66 31 25 29 0d 53 52 2d c8 99 |ect(Buf1%).SR-..| 00005d50 54 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 73 77 6f |T_TOMO%,0,Passwo| 00005d60 72 64 5f 49 44 25 2c 35 31 33 2c 26 35 2c 42 75 |rd_ID%,513,&5,Bu| 00005d70 66 31 25 2c 32 35 36 0d 53 5c 17 70 24 3d a4 69 |f1%,256.S\.p$=.i| 00005d80 6e 64 69 72 65 63 74 28 42 75 66 31 25 29 0d 53 |ndirect(Buf1%).S| 00005d90 66 2d c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 50 61 |f-..T_TOMO%,0,Pa| 00005da0 73 73 77 6f 72 64 5f 49 44 25 2c 35 31 33 2c 26 |ssword_ID%,513,&| 00005db0 36 2c 42 75 66 31 25 2c 32 35 36 0d 53 70 17 6e |6,Buf1%,256.Sp.n| 00005dc0 24 3d a4 69 6e 64 69 72 65 63 74 28 42 75 66 31 |$=.indirect(Buf1| 00005dd0 25 29 0d 53 7a 2d c8 99 54 5f 54 4f 4d 4f 25 2c |%).Sz-..T_TOMO%,| 00005de0 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c 35 |0,Password_ID%,5| 00005df0 31 33 2c 26 37 2c 42 75 66 31 25 2c 32 35 36 0d |13,&7,Buf1%,256.| 00005e00 53 84 17 76 24 3d a4 69 6e 64 69 72 65 63 74 28 |S..v$=.indirect(| 00005e10 42 75 66 31 25 29 0d 53 8e 25 76 61 6c 69 64 25 |Buf1%).S.%valid%| 00005e20 3d a4 63 68 65 63 6b 5f 75 73 65 72 28 75 24 2c |=.check_user(u$,| 00005e30 70 24 2c 65 78 69 73 74 73 25 29 0d 53 98 13 76 |p$,exists%).S..v| 00005e40 65 72 69 66 79 25 3d 28 6e 24 3d 76 24 29 0d 53 |erify%=(n$=v$).S| 00005e50 a2 13 c8 8e 50 61 72 65 6e 74 5f 4e 61 6d 65 24 |....Parent_Name$| 00005e60 ca 0d 53 ac 0e c9 22 49 63 6f 6e 62 61 72 22 0d |..S..."Iconbar".| 00005e70 53 d4 0c e7 76 61 6c 69 64 25 8c 0d 53 de 15 f2 |S...valid%..S...| 00005e80 6c 6f 67 69 6e 5f 75 73 65 72 28 75 24 2c b9 29 |login_user(u$,.)| 00005e90 0d 53 e8 05 cc 0d 53 f2 0d e7 65 78 69 73 74 73 |.S....S...exists| 00005ea0 25 8c 0d 53 fc 28 f2 65 72 72 6f 72 5f 6d 65 73 |%..S.(.error_mes| 00005eb0 73 61 67 65 28 22 45 4d 31 32 22 2c 22 22 2c 22 |sage("EM12","","| 00005ec0 22 2c 22 22 2c 30 2c 4b 25 29 0d 54 06 05 cc 0d |","",0,K%).T....| 00005ed0 54 10 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 |T.(.error_messag| 00005ee0 65 28 22 45 4d 31 33 22 2c 22 22 2c 22 22 2c 22 |e("EM13","","","| 00005ef0 22 2c 30 2c 4b 25 29 0d 54 1a 05 cd 0d 54 24 05 |",0,K%).T....T$.| 00005f00 cd 0d 54 2e 0e c9 22 4f 70 74 69 6f 6e 73 22 0d |..T..."Options".| 00005f10 54 56 0e e7 ac 76 65 72 69 66 79 25 8c 0d 54 60 |TV...verify%..T`| 00005f20 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 |(.error_message(| 00005f30 22 45 4d 31 34 22 2c 22 22 2c 22 22 2c 22 22 2c |"EM14","","","",| 00005f40 30 2c 4b 25 29 0d 54 6a 2d c8 99 54 5f 54 53 4f |0,K%).Tj-..T_TSO| 00005f50 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 |%,0,Password_ID%| 00005f60 2c 30 2c 30 2c 4f 70 74 69 6f 6e 73 5f 49 44 25 |,0,0,Options_ID%| 00005f70 2c 30 0d 54 74 05 cc 0d 54 7e 0d e7 a9 28 6e 24 |,0.Tt...T~...(n$| 00005f80 29 3c 34 8c 0d 54 88 28 f2 65 72 72 6f 72 5f 6d |)<4..T.(.error_m| 00005f90 65 73 73 61 67 65 28 22 45 4d 31 35 22 2c 22 22 |essage("EM15",""| 00005fa0 2c 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 54 92 2d |,"","",0,K%).T.-| 00005fb0 c8 99 54 5f 54 53 4f 25 2c 30 2c 50 61 73 73 77 |..T_TSO%,0,Passw| 00005fc0 6f 72 64 5f 49 44 25 2c 30 2c 30 2c 4f 70 74 69 |ord_ID%,0,0,Opti| 00005fd0 6f 6e 73 5f 49 44 25 2c 30 0d 54 9c 05 cc 0d 54 |ons_ID%,0.T....T| 00005fe0 a6 0d e7 65 78 69 73 74 73 25 8c 0d 54 b0 17 f2 |...exists%..T...| 00005ff0 6d 6f 64 69 66 79 5f 75 73 65 72 28 75 24 2c 6e |modify_user(u$,n| 00006000 24 29 0d 54 ba 05 cc 0d 54 c4 14 f2 61 64 64 5f |$).T....T...add_| 00006010 75 73 65 72 28 75 24 2c 6e 24 29 0d 54 ce 05 cd |user(u$,n$).T...| 00006020 0d 54 f6 15 f2 6c 6f 67 69 6e 5f 75 73 65 72 28 |.T...login_user(| 00006030 75 24 2c b9 29 0d 55 00 13 f2 69 6e 73 74 61 6c |u$,.).U...instal| 00006040 6c 5f 6c 6f 67 69 6e 73 0d 55 0a 16 53 65 71 75 |l_logins.U..Sequ| 00006050 65 6e 63 65 24 3d 22 4e 4f 52 4d 41 4c 22 0d 55 |ence$="NORMAL".U| 00006060 14 05 cd 0d 55 1e 05 cd 0d 55 28 0f c9 22 50 61 |....U....U(.."Pa| 00006070 73 73 6d 65 6e 75 22 0d 55 50 18 c8 8e 50 61 72 |ssmenu".UP...Par| 00006080 65 6e 74 5f 43 6f 6d 70 6f 6e 65 6e 74 25 ca 0d |ent_Component%..| 00006090 55 5a 06 c9 33 0d 55 82 0c e7 76 61 6c 69 64 25 |UZ..3.U...valid%| 000060a0 8c 0d 55 8c 30 c8 99 54 5f 54 53 4f 25 2c 30 2c |..U.0..T_TSO%,0,| 000060b0 50 61 73 73 77 6f 72 64 5f 49 44 25 2c 30 2c 30 |Password_ID%,0,0| 000060c0 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c 31 30 |,Password_ID%,10| 000060d0 30 0d 55 96 05 cc 0d 55 a0 28 f2 65 72 72 6f 72 |0.U....U.(.error| 000060e0 5f 6d 65 73 73 61 67 65 28 22 45 4d 31 36 22 2c |_message("EM16",| 000060f0 22 22 2c 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 55 |"","","",0,K%).U| 00006100 aa 05 cd 0d 55 b4 06 c9 38 0d 55 dc 0c e7 76 61 |....U...8.U...va| 00006110 6c 69 64 25 8c 0d 55 e6 30 c8 99 54 5f 54 53 4f |lid%..U.0..T_TSO| 00006120 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 |%,0,Password_ID%| 00006130 2c 30 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 |,0,0,Password_ID| 00006140 25 2c 31 30 31 0d 55 f0 05 cc 0d 55 fa 28 f2 65 |%,101.U....U.(.e| 00006150 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 4d |rror_message("EM| 00006160 31 36 22 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 4b |16","","","",0,K| 00006170 25 29 0d 56 04 05 cd 0d 56 0e 06 c9 37 0d 56 36 |%).V....V...7.V6| 00006180 0c e7 76 61 6c 69 64 25 8c 0d 56 40 15 f2 6c 6f |..valid%..V@..lo| 00006190 67 69 6e 5f 75 73 65 72 28 75 24 2c b9 29 0d 56 |gin_user(u$,.).V| 000061a0 4a 16 53 65 71 75 65 6e 63 65 24 3d 22 4e 4f 52 |J.Sequence$="NOR| 000061b0 4d 41 4c 22 0d 56 54 05 cc 0d 56 5e 0d e7 65 78 |MAL".VT...V^..ex| 000061c0 69 73 74 73 25 8c 0d 56 68 28 f2 65 72 72 6f 72 |ists%..Vh(.error| 000061d0 5f 6d 65 73 73 61 67 65 28 22 45 4d 31 32 22 2c |_message("EM12",| 000061e0 22 22 2c 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 56 |"","","",0,K%).V| 000061f0 72 05 cc 0d 56 7c 28 f2 65 72 72 6f 72 5f 6d 65 |r...V|(.error_me| 00006200 73 73 61 67 65 28 22 45 4d 31 33 22 2c 22 22 2c |ssage("EM13","",| 00006210 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 56 86 05 cd |"","",0,K%).V...| 00006220 0d 56 90 05 cd 0d 56 9a 06 c9 36 0d 56 c2 0c e7 |.V....V...6.V...| 00006230 76 61 6c 69 64 25 8c 0d 56 cc 0d e7 76 65 72 69 |valid%..V...veri| 00006240 66 79 25 8c 0d 56 d6 0d e7 a9 28 6e 24 29 3c 34 |fy%..V....(n$)<4| 00006250 8c 0d 56 e0 28 f2 65 72 72 6f 72 5f 6d 65 73 73 |..V.(.error_mess| 00006260 61 67 65 28 22 45 4d 31 35 22 2c 22 22 2c 22 22 |age("EM15","",""| 00006270 2c 22 22 2c 30 2c 4b 25 29 0d 56 ea 05 cc 0d 56 |,"",0,K%).V....V| 00006280 f4 0b e7 6e 24 3d 70 24 8c 0d 56 fe 28 f2 65 72 |...n$=p$..V.(.er| 00006290 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 4d 31 |ror_message("EM1| 000062a0 37 22 2c 22 22 2c 22 22 2c 22 22 2c 30 2c 4b 25 |7","","","",0,K%| 000062b0 29 0d 57 08 05 cc 0d 57 12 17 f2 6d 6f 64 69 66 |).W....W...modif| 000062c0 79 5f 75 73 65 72 28 75 24 2c 6e 24 29 0d 57 1c |y_user(u$,n$).W.| 000062d0 05 cd 0d 57 26 05 cd 0d 57 30 05 cc 0d 57 3a 28 |...W&...W0...W:(| 000062e0 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 |.error_message("| 000062f0 45 4d 31 34 22 2c 22 22 2c 22 22 2c 22 22 2c 30 |EM14","","","",0| 00006300 2c 4b 25 29 0d 57 44 05 cd 0d 57 4e 05 cc 0d 57 |,K%).WD...WN...W| 00006310 58 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 |X(.error_message| 00006320 28 22 45 4d 31 38 22 2c 22 22 2c 22 22 2c 22 22 |("EM18","","",""| 00006330 2c 30 2c 4b 25 29 0d 57 62 05 cd 0d 57 6c 05 cb |,0,K%).Wb...Wl..| 00006340 0d 57 76 0f c9 22 50 61 73 73 77 6f 72 64 22 0d |.Wv.."Password".| 00006350 57 9e 18 c8 8e 50 61 72 65 6e 74 5f 43 6f 6d 70 |W....Parent_Comp| 00006360 6f 6e 65 6e 74 25 ca 0d 57 a8 08 c9 31 30 30 0d |onent%..W...100.| 00006370 57 d0 0d e7 65 78 69 73 74 73 25 8c 0d 57 da 28 |W...exists%..W.(| 00006380 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 |.error_message("| 00006390 45 4d 31 39 22 2c 75 24 2c 22 22 2c 22 22 2c 30 |EM19",u$,"","",0| 000063a0 2c 4b 25 29 0d 57 e4 05 cc 0d 57 ee 0d e7 76 65 |,K%).W....W...ve| 000063b0 72 69 66 79 25 8c 0d 57 f8 0d e7 a9 28 6e 24 29 |rify%..W....(n$)| 000063c0 3c 34 8c 0d 58 02 28 f2 65 72 72 6f 72 5f 6d 65 |<4..X.(.error_me| 000063d0 73 73 61 67 65 28 22 45 4d 31 35 22 2c 22 22 2c |ssage("EM15","",| 000063e0 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 58 0c 05 cc |"","",0,K%).X...| 000063f0 0d 58 16 14 f2 61 64 64 5f 75 73 65 72 28 75 24 |.X...add_user(u$| 00006400 2c 6e 24 29 0d 58 20 05 cd 0d 58 2a 05 cc 0d 58 |,n$).X ...X*...X| 00006410 34 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 |4(.error_message| 00006420 28 22 45 4d 31 34 22 2c 22 22 2c 22 22 2c 22 22 |("EM14","","",""| 00006430 2c 30 2c 4b 25 29 0d 58 3e 30 c8 99 54 5f 54 53 |,0,K%).X>0..T_TS| 00006440 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 |O%,0,Password_ID| 00006450 25 2c 30 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 |%,0,0,Password_I| 00006460 44 25 2c 31 30 30 0d 58 48 05 cd 0d 58 52 05 cd |D%,100.XH...XR..| 00006470 0d 58 5c 08 c9 31 30 31 0d 58 84 0e e7 ac 65 78 |.X\..101.X....ex| 00006480 69 73 74 73 25 8c 0d 58 8e 28 f2 65 72 72 6f 72 |ists%..X.(.error| 00006490 5f 6d 65 73 73 61 67 65 28 22 45 4d 32 30 22 2c |_message("EM20",| 000064a0 75 24 2c 22 22 2c 22 22 2c 30 2c 4b 25 29 0d 58 |u$,"","",0,K%).X| 000064b0 98 05 cc 0d 58 a2 0d e7 76 65 72 69 66 79 25 8c |....X...verify%.| 000064c0 0d 58 ac 0d e7 a9 28 6e 24 29 3c 34 8c 0d 58 b6 |.X....(n$)<4..X.| 000064d0 28 f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 |(.error_message(| 000064e0 22 45 4d 31 35 22 2c 22 22 2c 22 22 2c 22 22 2c |"EM15","","","",| 000064f0 30 2c 4b 25 29 0d 58 c0 05 cc 0d 58 ca 17 f2 6d |0,K%).X....X...m| 00006500 6f 64 69 66 79 5f 75 73 65 72 28 75 24 2c 6e 24 |odify_user(u$,n$| 00006510 29 0d 58 d4 05 cd 0d 58 de 05 cc 0d 58 e8 28 f2 |).X....X....X.(.| 00006520 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 |error_message("E| 00006530 4d 31 34 22 2c 22 22 2c 22 22 2c 22 22 2c 30 2c |M14","","","",0,| 00006540 4b 25 29 0d 58 f2 30 c8 99 54 5f 54 53 4f 25 2c |K%).X.0..T_TSO%,| 00006550 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c 30 |0,Password_ID%,0| 00006560 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c |,0,Password_ID%,| 00006570 31 30 31 0d 58 fc 05 cd 0d 59 06 05 cd 0d 59 10 |101.X....Y....Y.| 00006580 08 c9 31 30 32 0d 59 38 0d e7 76 65 72 69 66 79 |..102.Y8..verify| 00006590 25 8c 0d 59 42 22 f2 61 64 64 5f 75 73 65 72 28 |%..YB".add_user(| 000065a0 4f 77 6e 65 72 24 2c 4e 65 77 70 61 73 73 77 6f |Owner$,Newpasswo| 000065b0 72 64 24 29 0d 59 4c 19 f2 6c 6f 67 69 6e 5f 75 |rd$).YL..login_u| 000065c0 73 65 72 28 4f 77 6e 65 72 24 2c b9 29 0d 59 56 |ser(Owner$,.).YV| 000065d0 05 cc 0d 59 60 28 f2 65 72 72 6f 72 5f 6d 65 73 |...Y`(.error_mes| 000065e0 73 61 67 65 28 22 45 4d 31 34 22 2c 22 22 2c 22 |sage("EM14","","| 000065f0 22 2c 22 22 2c 30 2c 4b 25 29 0d 59 6a 30 c8 99 |","",0,K%).Yj0..| 00006600 54 5f 54 53 4f 25 2c 30 2c 50 61 73 73 77 6f 72 |T_TSO%,0,Passwor| 00006610 64 5f 49 44 25 2c 30 2c 30 2c 50 61 73 73 77 6f |d_ID%,0,0,Passwo| 00006620 72 64 5f 49 44 25 2c 31 30 32 0d 59 74 05 cd 0d |rd_ID%,102.Yt...| 00006630 59 7e 05 cb 0d 59 88 05 cb 0d 59 92 05 e1 0d 59 |Y~...Y....Y....Y| 00006640 d8 4e dd f2 67 65 74 5f 6f 70 74 69 6f 6e 73 28 |.N..get_options(| 00006650 f8 61 74 25 2c f8 77 74 25 2c f8 64 74 25 2c f8 |.at%,.wt%,.dt%,.| 00006660 74 73 25 2c f8 74 71 25 2c f8 64 61 25 2c f8 67 |ts%,.tq%,.da%,.g| 00006670 6c 25 2c f8 74 6d 25 2c f8 66 6f 25 2c f8 77 6f |l%,.tm%,.fo%,.wo| 00006680 25 2c f8 70 65 25 2c f8 61 70 25 29 0d 5a 64 0d |%,.pe%,.ap%).Zd.| 00006690 ea 66 25 2c 61 24 2c 61 25 0d 5a 8c 09 77 6f 25 |.f%,a$,a%.Z..wo%| 000066a0 3d a3 0d 5a 96 09 70 65 25 3d a3 0d 5a a0 09 61 |=..Z..pe%=..Z..a| 000066b0 70 25 3d a3 0d 5a b4 1f c8 99 22 4f 53 5f 46 69 |p%=..Z...."OS_Fi| 000066c0 6c 65 22 2c 34 2c 4f 70 74 66 69 6c 65 24 2c 2c |le",4,Optfile$,,| 000066d0 2c 2c 33 0d 5a be 12 66 25 3d 8e 28 4f 70 74 66 |,,3.Z..f%=.(Optf| 000066e0 69 6c 65 24 29 0d 5a c8 08 75 25 3d 30 0d 5a d2 |ile$).Z..u%=0.Z.| 000066f0 05 f5 0d 5a dc 0b 61 24 3d be 23 66 25 0d 5a e6 |...Z..a$=.#f%.Z.| 00006700 0f 61 25 3d a7 61 24 2c 22 3a 22 29 0d 5a f0 10 |.a%=.a$,":").Z..| 00006710 c8 8e c0 61 24 2c 61 25 2d 32 29 ca 0d 5a fa 11 |...a$,a%-2)..Z..| 00006720 c9 22 41 6c 6c 6f 77 20 54 69 6d 65 22 0d 5b 04 |."Allow Time".[.| 00006730 14 61 74 25 3d bb 28 c1 61 24 2c 61 25 2b 32 29 |.at%=.(.a$,a%+2)| 00006740 29 0d 5b 0e 10 c9 22 57 61 72 6e 20 54 69 6d 65 |).[..."Warn Time| 00006750 22 0d 5b 18 14 77 74 25 3d bb 28 c1 61 24 2c 61 |".[..wt%=.(.a$,a| 00006760 25 2b 32 29 29 0d 5b 22 0f c9 22 44 69 65 20 54 |%+2)).[".."Die T| 00006770 69 6d 65 22 0d 5b 2c 14 64 74 25 3d bb 28 c1 61 |ime".[,.dt%=.(.a| 00006780 24 2c 61 25 2b 32 29 29 0d 5b 36 14 c9 22 54 61 |$,a%+2)).[6.."Ta| 00006790 73 6b 20 53 74 61 72 74 69 6e 67 22 0d 5b 40 17 |sk Starting".[@.| 000067a0 74 73 25 3d 28 c1 61 24 2c 61 25 2b 32 29 3d 22 |ts%=(.a$,a%+2)="| 000067b0 59 22 29 0d 5b 4a 14 c9 22 54 61 73 6b 20 51 75 |Y").[J.."Task Qu| 000067c0 69 74 74 69 6e 67 22 0d 5b 54 17 74 71 25 3d 28 |itting".[T.tq%=(| 000067d0 c1 61 24 2c 61 25 2b 32 29 3d 22 59 22 29 0d 5b |.a$,a%+2)="Y").[| 000067e0 5e 17 c9 22 44 69 72 65 63 74 6f 72 79 20 41 63 |^.."Directory Ac| 000067f0 63 65 73 73 22 0d 5b 68 17 64 61 25 3d 28 c1 61 |cess".[h.da%=(.a| 00006800 24 2c 61 25 2b 32 29 3d 22 59 22 29 0d 5b 72 13 |$,a%+2)="Y").[r.| 00006810 c9 22 47 75 65 73 74 20 4c 6f 67 69 6e 73 22 0d |."Guest Logins".| 00006820 5b 7c 17 67 6c 25 3d 28 c1 61 24 2c 61 25 2b 32 |[|.gl%=(.a$,a%+2| 00006830 29 3d 22 59 22 29 0d 5b 86 17 c9 22 54 65 73 74 |)="Y").[..."Test| 00006840 20 4d 6f 64 65 20 4c 6f 67 69 6e 73 22 0d 5b 90 | Mode Logins".[.| 00006850 17 74 6d 25 3d 28 c1 61 24 2c 61 25 2b 32 29 3d |.tm%=(.a$,a%+2)=| 00006860 22 59 22 29 0d 5b 9a 18 c9 22 46 75 6c 6c 20 4f |"Y").[..."Full O| 00006870 77 6e 65 72 20 41 63 63 65 73 73 22 0d 5b a4 17 |wner Access".[..| 00006880 66 6f 25 3d 28 c1 61 24 2c 61 25 2b 32 29 3d 22 |fo%=(.a$,a%+2)="| 00006890 59 22 29 0d 5b ae 13 c9 22 57 61 74 63 68 64 6f |Y").[..."Watchdo| 000068a0 67 20 4f 66 66 22 0d 5b b8 17 77 6f 25 3d 28 c1 |g Off".[..wo%=(.| 000068b0 61 24 2c 61 25 2b 32 29 3d 22 59 22 29 0d 5b c2 |a$,a%+2)="Y").[.| 000068c0 18 c9 22 50 61 73 73 77 6f 72 64 73 20 45 6e 61 |.."Passwords Ena| 000068d0 62 6c 65 64 22 0d 5b cc 17 70 65 25 3d 28 c1 61 |bled".[..pe%=(.a| 000068e0 24 2c 61 25 2b 32 29 3d 22 59 22 29 0d 5b d6 12 |$,a%+2)="Y").[..| 000068f0 c9 22 41 75 74 6f 20 50 72 6f 6d 70 74 22 0d 5b |."Auto Prompt".[| 00006900 e0 17 61 70 25 3d 28 c1 61 24 2c 61 25 2b 32 29 |..ap%=(.a$,a%+2)| 00006910 3d 22 59 22 29 0d 5b ea 05 cb 0d 5b f4 09 fd c5 |="Y").[....[....| 00006920 23 66 25 0d 5b fe 08 d9 23 66 25 0d 5c 08 1f c8 |#f%.[...#f%.\...| 00006930 99 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 4f 70 74 |."OS_File",4,Opt| 00006940 66 69 6c 65 24 2c 2c 2c 2c 39 0d 5c 12 05 e1 0d |file$,,,,9.\....| 00006950 5c 62 14 dd f2 67 65 74 5f 75 73 65 72 61 63 63 |\b...get_useracc| 00006960 65 73 73 0d 5c 8a 0d ea 66 25 2c 61 24 2c 61 25 |ess.\...f%,a$,a%| 00006970 0d 5c 9e 22 c8 99 22 4f 53 5f 46 69 6c 65 22 2c |.\.".."OS_File",| 00006980 34 2c 41 63 63 65 73 73 66 69 6c 65 24 2c 2c 2c |4,Accessfile$,,,| 00006990 2c 33 0d 5c a8 15 66 25 3d 8e 28 41 63 63 65 73 |,3.\..f%=.(Acces| 000069a0 73 66 69 6c 65 24 29 0d 5c b2 0d 52 75 73 65 72 |sfile$).\..Ruser| 000069b0 73 25 3d 30 0d 5c bc 05 f5 0d 5c c6 0b 61 24 3d |s%=0.\....\..a$=| 000069c0 be 23 66 25 0d 5c d0 0f 61 25 3d a7 61 24 2c 22 |.#f%.\..a%=.a$,"| 000069d0 3a 22 29 0d 5c da 0e 52 75 73 65 72 73 25 2b 3d |:").\..Rusers%+=| 000069e0 31 0d 5c e4 1c 52 75 73 72 24 28 52 75 73 65 72 |1.\..Rusr$(Ruser| 000069f0 73 25 29 3d c0 61 24 2c 61 25 2d 32 29 0d 5c ee |s%)=.a$,a%-2).\.| 00006a00 1c 52 64 69 72 24 28 52 75 73 65 72 73 25 29 3d |.Rdir$(Rusers%)=| 00006a10 c1 61 24 2c 61 25 2b 32 29 0d 5c f8 09 fd c5 23 |.a$,a%+2).\....#| 00006a20 66 25 0d 5d 02 08 d9 23 66 25 0d 5d 0c 22 c8 99 |f%.]...#f%.]."..| 00006a30 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 41 63 63 65 |"OS_File",4,Acce| 00006a40 73 73 66 69 6c 65 24 2c 2c 2c 2c 39 0d 5d 16 05 |ssfile$,,,,9.]..| 00006a50 e1 0d 5d 5c 13 dd f2 67 65 74 5f 75 73 65 72 74 |..]\...get_usert| 00006a60 69 6d 65 73 0d 5d 84 0d ea 66 25 2c 61 24 2c 61 |imes.]...f%,a$,a| 00006a70 25 0d 5d 98 21 c8 99 22 4f 53 5f 46 69 6c 65 22 |%.].!.."OS_File"| 00006a80 2c 34 2c 54 69 6d 65 73 66 69 6c 65 24 2c 2c 2c |,4,Timesfile$,,,| 00006a90 2c 33 0d 5d a2 14 66 25 3d 8e 28 54 69 6d 65 73 |,3.]..f%=.(Times| 00006aa0 66 69 6c 65 24 29 0d 5d ac 0d 52 75 73 65 72 73 |file$).]..Rusers| 00006ab0 25 3d 30 0d 5d b6 05 f5 0d 5d c0 0b 61 24 3d be |%=0.]....]..a$=.| 00006ac0 23 66 25 0d 5d ca 0f 61 25 3d a7 61 24 2c 22 3a |#f%.]..a%=.a$,":| 00006ad0 22 29 0d 5d d4 0e 52 75 73 65 72 73 25 2b 3d 31 |").]..Rusers%+=1| 00006ae0 0d 5d de 1c 52 74 69 6d 24 28 52 75 73 65 72 73 |.]..Rtim$(Rusers| 00006af0 25 29 3d c1 61 24 2c 61 25 2b 32 29 0d 5d e8 09 |%)=.a$,a%+2).]..| 00006b00 fd c5 23 66 25 0d 5d f2 08 d9 23 66 25 0d 5d fc |..#f%.]...#f%.].| 00006b10 21 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 54 |!.."OS_File",4,T| 00006b20 69 6d 65 73 66 69 6c 65 24 2c 2c 2c 2c 39 0d 5e |imesfile$,,,,9.^| 00006b30 06 05 e1 0d 5e 4c 43 dd f2 73 61 76 65 5f 6f 70 |....^LC..save_op| 00006b40 74 69 6f 6e 73 28 61 74 25 2c 77 74 25 2c 64 74 |tions(at%,wt%,dt| 00006b50 25 2c 74 73 25 2c 74 71 25 2c 64 61 25 2c 67 6c |%,ts%,tq%,da%,gl| 00006b60 25 2c 74 6d 25 2c 66 6f 25 2c 77 6f 25 2c 70 65 |%,tm%,fo%,wo%,pe| 00006b70 25 2c 61 70 25 29 0d 5e ec 07 ea 66 25 0d 5f 00 |%,ap%).^...f%._.| 00006b80 1f c8 99 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 4f |..."OS_File",4,O| 00006b90 70 74 66 69 6c 65 24 2c 2c 2c 2c 33 0d 5f 0a 14 |ptfile$,,,,3._..| 00006ba0 66 25 3d ae 28 54 5f 4f 70 74 66 69 6c 65 24 29 |f%=.(T_Optfile$)| 00006bb0 0d 5f 14 1f d5 23 66 25 2c 22 41 6c 6c 6f 77 20 |._...#f%,"Allow | 00006bc0 54 69 6d 65 20 3a 20 22 2b c3 28 61 74 25 29 0d |Time : "+.(at%).| 00006bd0 5f 1e 1e d5 23 66 25 2c 22 57 61 72 6e 20 54 69 |_...#f%,"Warn Ti| 00006be0 6d 65 20 3a 20 22 2b c3 28 77 74 25 29 0d 5f 28 |me : "+.(wt%)._(| 00006bf0 1d d5 23 66 25 2c 22 44 69 65 20 54 69 6d 65 20 |..#f%,"Die Time | 00006c00 3a 20 22 2b c3 28 64 74 25 29 0d 5f 32 30 d5 23 |: "+.(dt%)._20.#| 00006c10 66 25 2c 22 54 61 73 6b 20 53 74 61 72 74 69 6e |f%,"Task Startin| 00006c20 67 20 3a 20 22 2b bd 28 2d 38 39 2a 74 73 25 2d |g : "+.(-89*ts%-| 00006c30 37 38 2a 28 ac 74 73 25 29 29 0d 5f 3c 30 d5 23 |78*(.ts%))._<0.#| 00006c40 66 25 2c 22 54 61 73 6b 20 51 75 69 74 74 69 6e |f%,"Task Quittin| 00006c50 67 20 3a 20 22 2b bd 28 2d 38 39 2a 74 71 25 2d |g : "+.(-89*tq%-| 00006c60 37 38 2a 28 ac 74 71 25 29 29 0d 5f 46 33 d5 23 |78*(.tq%))._F3.#| 00006c70 66 25 2c 22 44 69 72 65 63 74 6f 72 79 20 41 63 |f%,"Directory Ac| 00006c80 63 65 73 73 20 3a 20 22 2b bd 28 2d 38 39 2a 64 |cess : "+.(-89*d| 00006c90 61 25 2d 37 38 2a 28 ac 64 61 25 29 29 0d 5f 50 |a%-78*(.da%))._P| 00006ca0 2f d5 23 66 25 2c 22 47 75 65 73 74 20 4c 6f 67 |/.#f%,"Guest Log| 00006cb0 69 6e 73 20 3a 20 22 2b bd 28 2d 38 39 2a 67 6c |ins : "+.(-89*gl| 00006cc0 25 2d 37 38 2a 28 ac 67 6c 25 29 29 0d 5f 5a 33 |%-78*(.gl%))._Z3| 00006cd0 d5 23 66 25 2c 22 54 65 73 74 20 4d 6f 64 65 20 |.#f%,"Test Mode | 00006ce0 4c 6f 67 69 6e 73 20 3a 20 22 2b bd 28 2d 38 39 |Logins : "+.(-89| 00006cf0 2a 74 6d 25 2d 37 38 2a 28 ac 74 6d 25 29 29 0d |*tm%-78*(.tm%)).| 00006d00 5f 64 34 d5 23 66 25 2c 22 46 75 6c 6c 20 4f 77 |_d4.#f%,"Full Ow| 00006d10 6e 65 72 20 41 63 63 65 73 73 20 3a 20 22 2b bd |ner Access : "+.| 00006d20 28 2d 38 39 2a 66 6f 25 2d 37 38 2a 28 ac 66 6f |(-89*fo%-78*(.fo| 00006d30 25 29 29 0d 5f 6e 2f d5 23 66 25 2c 22 57 61 74 |%))._n/.#f%,"Wat| 00006d40 63 68 64 6f 67 20 4f 66 66 20 3a 20 22 2b bd 28 |chdog Off : "+.(| 00006d50 2d 38 39 2a 77 6f 25 2d 37 38 2a 28 ac 77 6f 25 |-89*wo%-78*(.wo%| 00006d60 29 29 0d 5f 78 34 d5 23 66 25 2c 22 50 61 73 73 |))._x4.#f%,"Pass| 00006d70 77 6f 72 64 73 20 45 6e 61 62 6c 65 64 20 3a 20 |words Enabled : | 00006d80 22 2b bd 28 2d 38 39 2a 70 65 25 2d 37 38 2a 28 |"+.(-89*pe%-78*(| 00006d90 ac 70 65 25 29 29 0d 5f 82 2e d5 23 66 25 2c 22 |.pe%))._...#f%,"| 00006da0 41 75 74 6f 20 50 72 6f 6d 70 74 20 3a 20 22 2b |Auto Prompt : "+| 00006db0 bd 28 2d 38 39 2a 61 70 25 2d 37 38 2a 28 ac 61 |.(-89*ap%-78*(.a| 00006dc0 70 25 29 29 0d 5f 8c 08 d9 23 66 25 0d 5f 96 1a |p%))._...#f%._..| 00006dd0 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 36 2c 4f 70 |.."OS_File",6,Op| 00006de0 74 66 69 6c 65 24 0d 5f a0 2b c8 99 22 4f 53 5f |tfile$._.+.."OS_| 00006df0 46 53 43 6f 6e 74 72 6f 6c 22 2c 32 35 2c 54 5f |FSControl",25,T_| 00006e00 4f 70 74 66 69 6c 65 24 2c 4f 70 74 66 69 6c 65 |Optfile$,Optfile| 00006e10 24 0d 5f aa 1f c8 99 22 4f 53 5f 46 69 6c 65 22 |$._...."OS_File"| 00006e20 2c 34 2c 4f 70 74 66 69 6c 65 24 2c 2c 2c 2c 39 |,4,Optfile$,,,,9| 00006e30 0d 5f b4 05 e1 0d 60 0e 15 dd f2 73 61 76 65 5f |._....`....save_| 00006e40 75 73 65 72 61 63 63 65 73 73 0d 60 40 0a ea 66 |useraccess.`@..f| 00006e50 25 2c 61 25 0d 60 54 22 c8 99 22 4f 53 5f 46 69 |%,a%.`T".."OS_Fi| 00006e60 6c 65 22 2c 34 2c 41 63 63 65 73 73 66 69 6c 65 |le",4,Accessfile| 00006e70 24 2c 2c 2c 2c 33 0d 60 5e 17 66 25 3d ae 28 54 |$,,,,3.`^.f%=.(T| 00006e80 5f 41 63 63 65 73 73 66 69 6c 65 24 29 0d 60 68 |_Accessfile$).`h| 00006e90 11 e3 61 25 3d 31 b8 52 75 73 65 72 73 25 0d 60 |..a%=1.Rusers%.`| 00006ea0 72 22 d5 23 66 25 2c 52 75 73 72 24 28 61 25 29 |r".#f%,Rusr$(a%)| 00006eb0 2b 22 20 3a 20 22 2b 52 64 69 72 24 28 61 25 29 |+" : "+Rdir$(a%)| 00006ec0 0d 60 7c 07 ed 61 25 0d 60 86 08 d9 23 66 25 0d |.`|..a%.`...#f%.| 00006ed0 60 90 1d c8 99 22 4f 53 5f 46 69 6c 65 22 2c 36 |`...."OS_File",6| 00006ee0 2c 41 63 63 65 73 73 66 69 6c 65 24 0d 60 9a 31 |,Accessfile$.`.1| 00006ef0 c8 99 22 4f 53 5f 46 53 43 6f 6e 74 72 6f 6c 22 |.."OS_FSControl"| 00006f00 2c 32 35 2c 54 5f 41 63 63 65 73 73 66 69 6c 65 |,25,T_Accessfile| 00006f10 24 2c 41 63 63 65 73 73 66 69 6c 65 24 0d 60 a4 |$,Accessfile$.`.| 00006f20 22 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 41 |".."OS_File",4,A| 00006f30 63 63 65 73 73 66 69 6c 65 24 2c 2c 2c 2c 39 0d |ccessfile$,,,,9.| 00006f40 60 ae 05 e1 0d 60 fe 14 dd f2 73 61 76 65 5f 75 |`....`....save_u| 00006f50 73 65 72 74 69 6d 65 73 0d 61 26 0a ea 66 25 2c |sertimes.a&..f%,| 00006f60 61 25 0d 61 3a 21 c8 99 22 4f 53 5f 46 69 6c 65 |a%.a:!.."OS_File| 00006f70 22 2c 34 2c 54 69 6d 65 73 66 69 6c 65 24 2c 2c |",4,Timesfile$,,| 00006f80 2c 2c 33 0d 61 44 16 66 25 3d ae 28 54 5f 54 69 |,,3.aD.f%=.(T_Ti| 00006f90 6d 65 73 66 69 6c 65 24 29 0d 61 4e 11 e3 61 25 |mesfile$).aN..a%| 00006fa0 3d 31 b8 52 75 73 65 72 73 25 0d 61 58 22 d5 23 |=1.Rusers%.aX".#| 00006fb0 66 25 2c 52 75 73 72 24 28 61 25 29 2b 22 20 3a |f%,Rusr$(a%)+" :| 00006fc0 20 22 2b 52 74 69 6d 24 28 61 25 29 0d 61 62 07 | "+Rtim$(a%).ab.| 00006fd0 ed 61 25 0d 61 6c 08 d9 23 66 25 0d 61 76 1c c8 |.a%.al..#f%.av..| 00006fe0 99 22 4f 53 5f 46 69 6c 65 22 2c 36 2c 54 69 6d |."OS_File",6,Tim| 00006ff0 65 73 66 69 6c 65 24 0d 61 80 2f c8 99 22 4f 53 |esfile$.a./.."OS| 00007000 5f 46 53 43 6f 6e 74 72 6f 6c 22 2c 32 35 2c 54 |_FSControl",25,T| 00007010 5f 54 69 6d 65 73 66 69 6c 65 24 2c 54 69 6d 65 |_Timesfile$,Time| 00007020 73 66 69 6c 65 24 0d 61 8a 21 c8 99 22 4f 53 5f |sfile$.a.!.."OS_| 00007030 46 69 6c 65 22 2c 34 2c 54 69 6d 65 73 66 69 6c |File",4,Timesfil| 00007040 65 24 2c 2c 2c 2c 39 0d 61 94 05 e1 0d 61 da 12 |e$,,,,9.a....a..| 00007050 dd f2 6d 61 6b 65 5f 64 69 72 6c 69 73 74 0d 62 |..make_dirlist.b| 00007060 02 14 ea 70 6e 74 72 25 2c 73 70 6e 74 72 25 2c |...pntr%,spntr%,| 00007070 61 25 0d 62 16 0c 54 64 69 72 73 25 3d 30 0d 62 |a%.b..Tdirs%=0.b| 00007080 3e 08 61 25 3d 30 0d 62 48 05 f5 0d 62 52 3b c8 |>.a%=0.bH...bR;.| 00007090 99 22 4f 53 5f 47 42 50 42 22 2c 31 32 2c 22 3c |."OS_GBPB",12,"<| 000070a0 42 6f 6f 74 24 64 69 72 3e 2e 5e 22 2c 42 75 66 |Boot$dir>.^",Buf| 000070b0 31 25 2c 31 2c 61 25 2c 32 35 36 2c 22 2a 22 b8 |1%,1,a%,256,"*".| 000070c0 2c 2c 2c 2c 61 25 0d 62 5c 1e e7 28 61 25 3c 3e |,,,,a%.b\..(a%<>| 000070d0 2d 31 29 80 28 42 75 66 31 25 21 32 30 3e 26 66 |-1).(Buf1%!20>&f| 000070e0 66 66 29 8c 0d 62 84 0d 54 64 69 72 73 25 2b 3d |ff)..b..Tdirs%+=| 000070f0 31 0d 62 8e 27 54 64 69 72 24 28 54 64 69 72 73 |1.b.'Tdir$(Tdirs| 00007100 25 2c 31 29 3d a4 69 6e 64 69 72 65 63 74 28 42 |%,1)=.indirect(B| 00007110 75 66 31 25 2b 32 34 29 0d 62 98 51 e7 52 75 73 |uf1%+24).b.Q.Rus| 00007120 72 24 28 52 75 73 72 25 29 3c 3e 4f 77 6e 65 72 |r$(Rusr%)<>Owner| 00007130 24 80 28 54 64 69 72 24 28 54 64 69 72 73 25 2c |$.(Tdir$(Tdirs%,| 00007140 31 29 3d 22 21 42 6f 6f 74 22 84 c0 54 64 69 72 |1)="!Boot"..Tdir| 00007150 24 28 54 64 69 72 73 25 2c 31 29 2c 36 29 3d 22 |$(Tdirs%,1),6)="| 00007160 21 54 72 61 70 5f 22 29 8c 0d 62 c0 28 54 66 6c |!Trap_")..b.(Tfl| 00007170 67 25 28 54 64 69 72 73 25 2c 31 29 3d 26 37 84 |g%(Tdirs%,1)=&7.| 00007180 26 31 30 30 84 28 32 34 3c 3c 31 36 29 84 26 34 |&100.(24<<16).&4| 00007190 30 0d 62 ca 05 cc 0d 62 f2 24 54 66 6c 67 25 28 |0.b....b.$Tflg%(| 000071a0 54 64 69 72 73 25 2c 31 29 3d 26 37 84 26 31 30 |Tdirs%,1)=&7.&10| 000071b0 30 84 28 32 34 3c 3c 31 36 29 0d 62 fc 05 cd 0d |0.(24<<16).b....| 000071c0 63 06 05 cd 0d 63 10 0a fd 61 25 3d 2d 31 0d 63 |c....c...a%=-1.c| 000071d0 1a 0d 54 6e 70 74 25 28 29 3d 30 0d 63 24 0d 54 |..Tnpt%()=0.c$.T| 000071e0 79 70 74 25 28 29 3d 30 0d 63 2e 05 e1 0d 63 7e |ypt%()=0.c....c~| 000071f0 12 dd f2 75 73 65 72 5f 67 61 64 67 65 74 73 0d |...user_gadgets.| 00007200 63 a6 1b ea 61 25 2c 64 25 2c 6c 25 2c 72 25 2c |c...a%,d%,l%,r%,| 00007210 65 31 25 2c 65 32 25 2c 74 24 0d 63 ba 0d 54 79 |e1%,e2%,t$.c..Ty| 00007220 64 69 72 73 25 3d 30 0d 63 c4 0d 54 6e 64 69 72 |dirs%=0.c..Tndir| 00007230 73 25 3d 30 0d 63 ce 10 e3 61 25 3d 31 b8 54 64 |s%=0.c...a%=1.Td| 00007240 69 72 73 25 0d 63 d8 2a e7 a7 52 64 69 72 24 28 |irs%.c.*..Rdir$(| 00007250 52 75 73 72 25 29 2c 22 7c 22 2b 54 64 69 72 24 |Rusr%),"|"+Tdir$| 00007260 28 61 25 2c 31 29 2b 22 7c 22 29 3e 30 8c 0d 64 |(a%,1)+"|")>0..d| 00007270 00 0e 54 79 64 69 72 73 25 2b 3d 31 0d 64 0a 15 |..Tydirs%+=1.d..| 00007280 54 79 70 74 25 28 54 79 64 69 72 73 25 29 3d 61 |Typt%(Tydirs%)=a| 00007290 25 0d 64 14 05 cc 0d 64 3c 0e 54 6e 64 69 72 73 |%.d....d<.Tndirs| 000072a0 25 2b 3d 31 0d 64 46 15 54 6e 70 74 25 28 54 6e |%+=1.dF.Tnpt%(Tn| 000072b0 64 69 72 73 25 29 3d 61 25 0d 64 50 05 cd 0d 64 |dirs%)=a%.dP...d| 000072c0 78 1b e7 28 54 66 6c 67 25 28 61 25 2c 31 29 80 |x..(Tflg%(a%,1).| 000072d0 26 34 30 29 3d 26 34 30 8c 0d 64 a0 19 e7 52 75 |&40)=&40..d...Ru| 000072e0 73 72 24 28 52 75 73 72 25 29 3d 4f 77 6e 65 72 |sr$(Rusr%)=Owner| 000072f0 24 8c 0d 64 aa 2a 54 66 6c 67 25 28 61 25 2c 31 |$..d.*Tflg%(a%,1| 00007300 29 3d 28 54 66 6c 67 25 28 61 25 2c 31 29 80 26 |)=(Tflg%(a%,1).&| 00007310 46 46 46 46 46 46 46 43 29 84 26 37 0d 64 b4 05 |FFFFFFFC).&7.d..| 00007320 cc 0d 64 be 2a 54 66 6c 67 25 28 61 25 2c 31 29 |..d.*Tflg%(a%,1)| 00007330 3d 28 54 66 6c 67 25 28 61 25 2c 31 29 80 26 46 |=(Tflg%(a%,1).&F| 00007340 46 46 46 46 46 46 43 29 84 26 35 0d 64 c8 05 cd |FFFFFFC).&5.d...| 00007350 0d 64 d2 05 cd 0d 64 dc 07 ed 61 25 0d 65 04 13 |.d....d...a%.e..| 00007360 74 24 3d 52 74 69 6d 24 28 52 75 73 72 25 29 0d |t$=Rtim$(Rusr%).| 00007370 65 0e 08 6c 25 3d 31 0d 65 18 0b e3 64 25 3d 31 |e..l%=1.e...d%=1| 00007380 b8 37 0d 65 22 14 72 25 3d a7 74 24 2c 22 7c 22 |.7.e".r%=.t$,"|"| 00007390 2c 6c 25 2b 31 29 0d 65 2c 15 65 31 25 3d a7 74 |,l%+1).e,.e1%=.t| 000073a0 24 2c 22 3d 22 2c 6c 25 2b 31 29 0d 65 36 16 65 |$,"=",l%+1).e6.e| 000073b0 32 25 3d a7 74 24 2c 22 3d 22 2c 65 31 25 2b 31 |2%=.t$,"=",e1%+1| 000073c0 29 0d 65 5e 15 e7 c1 74 24 2c 6c 25 2b 33 2c 31 |).e^...t$,l%+3,1| 000073d0 29 3d 22 59 22 8c 0d 65 68 2a c8 99 54 5f 54 4f |)="Y"..eh*..T_TO| 000073e0 4d 4f 25 2c 30 2c 55 73 65 72 61 63 63 65 73 73 |MO%,0,Useraccess| 000073f0 5f 49 44 25 2c 31 39 36 2c 64 25 2b 26 33 2c 31 |_ID%,196,d%+&3,1| 00007400 0d 65 72 05 cc 0d 65 7c 2a c8 99 54 5f 54 4f 4d |.er...e|*..T_TOM| 00007410 4f 25 2c 30 2c 55 73 65 72 61 63 63 65 73 73 5f |O%,0,Useraccess_| 00007420 49 44 25 2c 31 39 36 2c 64 25 2b 26 33 2c 30 0d |ID%,196,d%+&3,0.| 00007430 65 86 05 cd 0d 65 ae 41 c8 99 54 5f 54 4f 4d 4f |e....e.A..T_TOMO| 00007440 25 2c 30 2c 55 73 65 72 61 63 63 65 73 73 5f 49 |%,0,Useraccess_I| 00007450 44 25 2c 38 33 32 2c 64 25 2b 26 32 33 2c bb 28 |D%,832,d%+&23,.(| 00007460 c1 74 24 2c 65 31 25 2b 31 2c 65 32 25 2d 65 31 |.t$,e1%+1,e2%-e1| 00007470 25 2d 31 29 29 0d 65 d6 40 c8 99 54 5f 54 4f 4d |%-1)).e.@..T_TOM| 00007480 4f 25 2c 30 2c 55 73 65 72 61 63 63 65 73 73 5f |O%,0,Useraccess_| 00007490 49 44 25 2c 38 33 32 2c 64 25 2b 26 33 30 2c bb |ID%,832,d%+&30,.| 000074a0 28 c1 74 24 2c 65 32 25 2b 31 2c 72 25 2d 65 32 |(.t$,e2%+1,r%-e2| 000074b0 25 2d 31 29 29 0d 65 e0 09 6c 25 3d 72 25 0d 65 |%-1)).e..l%=r%.e| 000074c0 ea 14 72 25 3d a7 74 24 2c 22 7c 22 2c 6c 25 2b |..r%=.t$,"|",l%+| 000074d0 31 29 0d 65 f4 07 ed 64 25 0d 65 fe 05 e1 0d 66 |1).e...d%.e....f| 000074e0 44 17 dd f2 6d 6f 64 69 66 79 5f 75 73 65 72 61 |D...modify_usera| 000074f0 63 63 65 73 73 0d 66 6c 0f ea 61 24 2c 61 25 2c |ccess.fl..a$,a%,| 00007500 62 2c 74 24 0d 66 94 0a 61 24 3d 22 7c 22 0d 66 |b,t$.f..a$="|".f| 00007510 9e 11 e3 61 25 3d 31 b8 54 79 64 69 72 73 25 0d |...a%=1.Tydirs%.| 00007520 66 a8 1e 61 24 2b 3d 54 64 69 72 24 28 54 79 70 |f..a$+=Tdir$(Typ| 00007530 74 25 28 61 25 29 2c 31 29 2b 22 7c 22 0d 66 b2 |t%(a%),1)+"|".f.| 00007540 07 ed 61 25 0d 66 bc 13 52 64 69 72 24 28 52 75 |..a%.f..Rdir$(Ru| 00007550 73 72 25 29 3d 61 24 0d 66 e4 0a 61 24 3d 22 7c |sr%)=a$.f..a$="|| 00007560 22 0d 66 ee 0b e3 64 25 3d 31 b8 37 0d 66 f8 15 |".f...d%=1.7.f..| 00007570 61 24 2b 3d 57 65 65 6b 64 61 79 73 24 28 64 25 |a$+=Weekdays$(d%| 00007580 29 0d 67 02 2b c8 99 54 5f 54 4f 4d 4f 25 2c 30 |).g.+..T_TOMO%,0| 00007590 2c 55 73 65 72 61 63 63 65 73 73 5f 49 44 25 2c |,Useraccess_ID%,| 000075a0 31 39 37 2c 26 33 2b 64 25 b8 61 25 0d 67 0c 0a |197,&3+d%.a%.g..| 000075b0 e7 61 25 3d 31 8c 0d 67 16 0b 61 24 2b 3d 22 59 |.a%=1..g..a$+="Y| 000075c0 22 0d 67 20 05 cc 0d 67 2a 0b 61 24 2b 3d 22 4e |".g ...g*.a$+="N| 000075d0 22 0d 67 34 05 cd 0d 67 3e 2c c8 99 54 5f 54 4f |".g4...g>,..T_TO| 000075e0 4d 4f 25 2c 30 2c 55 73 65 72 61 63 63 65 73 73 |MO%,0,Useraccess| 000075f0 5f 49 44 25 2c 38 33 33 2c 64 25 2b 26 32 33 b8 |_ID%,833,d%+&23.| 00007600 61 25 0d 67 48 11 61 24 2b 3d 22 3d 22 2b c3 28 |a%.gH.a$+="="+.(| 00007610 61 25 29 0d 67 70 2c c8 99 54 5f 54 4f 4d 4f 25 |a%).gp,..T_TOMO%| 00007620 2c 30 2c 55 73 65 72 61 63 63 65 73 73 5f 49 44 |,0,Useraccess_ID| 00007630 25 2c 38 33 33 2c 64 25 2b 26 33 30 b8 61 25 0d |%,833,d%+&30.a%.| 00007640 67 7a 15 61 24 2b 3d 22 3d 22 2b c3 28 61 25 29 |gz.a$+="="+.(a%)| 00007650 2b 22 7c 22 0d 67 84 07 ed 64 25 0d 67 8e 13 52 |+"|".g...d%.g..R| 00007660 74 69 6d 24 28 52 75 73 72 25 29 3d 61 24 0d 67 |tim$(Rusr%)=a$.g| 00007670 98 05 e1 0d 67 de 2d dd f2 70 61 73 73 6d 65 6e |....g.-..passmen| 00007680 75 5f 67 72 65 79 73 28 69 31 25 2c 69 32 25 2c |u_greys(i1%,i2%,| 00007690 69 33 25 2c 69 34 25 2c 69 35 25 2c 69 36 25 29 |i3%,i4%,i5%,i6%)| 000076a0 0d 68 4c 24 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c |.hL$..T_TOMO%,0,| 000076b0 50 61 73 73 6d 65 6e 75 5f 49 44 25 2c 32 2c 37 |Passmenu_ID%,2,7| 000076c0 2c 69 31 25 0d 68 56 25 c8 99 54 5f 54 4f 4d 4f |,i1%.hV%..T_TOMO| 000076d0 25 2c 30 2c 50 61 73 73 6d 65 6e 75 5f 49 44 25 |%,0,Passmenu_ID%| 000076e0 2c 32 2c 26 64 2c 69 32 25 0d 68 60 24 c8 99 54 |,2,&d,i2%.h`$..T| 000076f0 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 73 6d 65 6e |_TOMO%,0,Passmen| 00007700 75 5f 49 44 25 2c 32 2c 36 2c 69 33 25 0d 68 6a |u_ID%,2,6,i3%.hj| 00007710 24 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 |$..T_TOMO%,0,Pas| 00007720 73 6d 65 6e 75 5f 49 44 25 2c 32 2c 33 2c 69 34 |smenu_ID%,2,3,i4| 00007730 25 0d 68 74 24 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |%.ht$..T_TOMO%,0| 00007740 2c 50 61 73 73 6d 65 6e 75 5f 49 44 25 2c 32 2c |,Passmenu_ID%,2,| 00007750 38 2c 69 35 25 0d 68 7e 25 c8 99 54 5f 54 4f 4d |8,i5%.h~%..T_TOM| 00007760 4f 25 2c 30 2c 50 61 73 73 6d 65 6e 75 5f 49 44 |O%,0,Passmenu_ID| 00007770 25 2c 32 2c 26 63 2c 69 36 25 0d 68 88 05 e1 0d |%,2,&c,i6%.h....| 00007780 68 ce 29 dd f2 69 62 61 72 6d 65 6e 75 5f 67 72 |h.)..ibarmenu_gr| 00007790 65 79 73 28 69 31 25 2c 69 32 25 2c 69 33 25 2c |eys(i1%,i2%,i3%,| 000077a0 69 34 25 2c 62 74 24 29 0d 69 1e 24 c8 99 54 5f |i4%,bt$).i.$..T_| 000077b0 54 4f 4d 4f 25 2c 30 2c 49 62 61 72 6d 65 6e 75 |TOMO%,0,Ibarmenu| 000077c0 5f 49 44 25 2c 32 2c 35 2c 69 31 25 0d 69 28 24 |_ID%,2,5,i1%.i($| 000077d0 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 49 62 61 72 |..T_TOMO%,0,Ibar| 000077e0 6d 65 6e 75 5f 49 44 25 2c 32 2c 36 2c 69 32 25 |menu_ID%,2,6,i2%| 000077f0 0d 69 32 25 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c |.i2%..T_TOMO%,0,| 00007800 49 62 61 72 6d 65 6e 75 5f 49 44 25 2c 32 2c 26 |Ibarmenu_ID%,2,&| 00007810 61 2c 69 33 25 0d 69 3c 25 c8 99 54 5f 54 4f 4d |a,i3%.i<%..T_TOM| 00007820 4f 25 2c 30 2c 49 62 61 72 6d 65 6e 75 5f 49 44 |O%,0,Ibarmenu_ID| 00007830 25 2c 32 2c 26 62 2c 69 34 25 0d 69 46 23 c8 99 |%,2,&b,i4%.iF#..| 00007840 54 5f 54 4f 4d 4f 25 2c 30 2c 49 62 61 72 6d 65 |T_TOMO%,0,Ibarme| 00007850 6e 75 5f 49 44 25 2c 32 34 2c 62 74 24 0d 69 50 |nu_ID%,24,bt$.iP| 00007860 05 e1 0d 69 96 3b dd f2 63 6c 65 61 72 5f 66 69 |...i.;..clear_fi| 00007870 65 6c 64 73 28 6c 62 24 2c 74 31 24 2c 74 32 24 |elds(lb$,t1$,t2$| 00007880 2c 74 33 24 2c 74 34 24 2c 66 64 31 25 2c 66 64 |,t3$,t4$,fd1%,fd| 00007890 32 25 2c 66 64 33 25 2c 66 64 34 25 29 0d 6a 22 |2%,fd3%,fd4%).j"| 000078a0 24 61 24 3d a4 67 65 74 5f 6d 65 73 73 61 67 65 |$a$=.get_message| 000078b0 28 6c 62 24 2c 22 22 2c 22 22 2c 22 22 2c 22 22 |(lb$,"","","",""| 000078c0 29 0d 6a 2c 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |).j,&..T_TOMO%,0| 000078d0 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c 34 34 |,Password_ID%,44| 000078e0 38 2c 26 61 2c 61 24 0d 6a 36 26 c8 99 54 5f 54 |8,&a,a$.j6&..T_T| 000078f0 4f 4d 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f |OMO%,0,Password_| 00007900 49 44 25 2c 35 31 32 2c 34 2c 74 31 24 0d 6a 40 |ID%,512,4,t1$.j@| 00007910 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 |&..T_TOMO%,0,Pas| 00007920 73 77 6f 72 64 5f 49 44 25 2c 35 31 32 2c 35 2c |sword_ID%,512,5,| 00007930 74 32 24 0d 6a 4a 26 c8 99 54 5f 54 4f 4d 4f 25 |t2$.jJ&..T_TOMO%| 00007940 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c |,0,Password_ID%,| 00007950 35 31 32 2c 36 2c 74 33 24 0d 6a 54 26 c8 99 54 |512,6,t3$.jT&..T| 00007960 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 73 77 6f 72 |_TOMO%,0,Passwor| 00007970 64 5f 49 44 25 2c 35 31 32 2c 37 2c 74 33 24 0d |d_ID%,512,7,t3$.| 00007980 6a 5e 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 50 |j^&..T_TOMO%,0,P| 00007990 61 73 73 77 6f 72 64 5f 49 44 25 2c 36 35 2c 30 |assword_ID%,65,0| 000079a0 2c 66 64 31 25 0d 6a 68 26 c8 99 54 5f 54 4f 4d |,fd1%.jh&..T_TOM| 000079b0 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 |O%,0,Password_ID| 000079c0 25 2c 36 35 2c 34 2c 66 64 31 25 0d 6a 72 26 c8 |%,65,4,fd1%.jr&.| 000079d0 99 54 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 73 77 |.T_TOMO%,0,Passw| 000079e0 6f 72 64 5f 49 44 25 2c 36 35 2c 31 2c 66 64 32 |ord_ID%,65,1,fd2| 000079f0 25 0d 6a 7c 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |%.j|&..T_TOMO%,0| 00007a00 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c 36 35 |,Password_ID%,65| 00007a10 2c 35 2c 66 64 32 25 0d 6a 86 26 c8 99 54 5f 54 |,5,fd2%.j.&..T_T| 00007a20 4f 4d 4f 25 2c 30 2c 50 61 73 73 77 6f 72 64 5f |OMO%,0,Password_| 00007a30 49 44 25 2c 36 35 2c 32 2c 66 64 33 25 0d 6a 90 |ID%,65,2,fd3%.j.| 00007a40 26 c8 99 54 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 |&..T_TOMO%,0,Pas| 00007a50 73 77 6f 72 64 5f 49 44 25 2c 36 35 2c 36 2c 66 |sword_ID%,65,6,f| 00007a60 64 33 25 0d 6a 9a 26 c8 99 54 5f 54 4f 4d 4f 25 |d3%.j.&..T_TOMO%| 00007a70 2c 30 2c 50 61 73 73 77 6f 72 64 5f 49 44 25 2c |,0,Password_ID%,| 00007a80 36 35 2c 33 2c 66 64 34 25 0d 6a a4 26 c8 99 54 |65,3,fd4%.j.&..T| 00007a90 5f 54 4f 4d 4f 25 2c 30 2c 50 61 73 73 77 6f 72 |_TOMO%,0,Passwor| 00007aa0 64 5f 49 44 25 2c 36 35 2c 37 2c 66 64 34 25 0d |d_ID%,65,7,fd4%.| 00007ab0 6a ae 05 e1 0d 6a f4 14 dd f2 69 6e 73 74 61 6c |j....j....instal| 00007ac0 6c 5f 6c 6f 67 69 6e 73 0d 6b 3a 14 ea 6c 25 2c |l_logins.k:..l%,| 00007ad0 62 6f 6f 74 70 6c 75 73 64 69 72 24 0d 6b 44 37 |bootplusdir$.kD7| 00007ae0 c8 99 22 4f 53 5f 52 65 61 64 56 61 72 56 61 6c |.."OS_ReadVarVal| 00007af0 22 2c 22 42 6f 6f 74 70 6c 75 73 24 44 69 72 22 |","Bootplus$Dir"| 00007b00 2c 42 75 66 31 25 2c 31 32 38 2c 30 2c 30 b8 2c |,Buf1%,128,0,0.,| 00007b10 2c 6c 25 0d 6b 4e 0f 42 75 66 31 25 3f 6c 25 3d |,l%.kN.Buf1%?l%=| 00007b20 31 33 0d 6b 58 17 62 6f 6f 74 70 6c 75 73 64 69 |13.kX.bootplusdi| 00007b30 72 24 3d 24 42 75 66 31 25 0d 6b 62 1c 41 70 70 |r$=$Buf1%.kb.App| 00007b40 6c 69 63 61 74 69 6f 6e 24 3d 22 21 7a 7a 7a 7a |lication$="!zzzz| 00007b50 70 61 73 73 22 0d 6b 6c 2f 53 6f 75 72 63 65 24 |pass".kl/Source$| 00007b60 3d 62 6f 6f 74 70 6c 75 73 64 69 72 24 2b 22 2e |=bootplusdir$+".| 00007b70 72 65 73 6f 75 72 63 65 73 2e 21 7a 7a 7a 7a 70 |resources.!zzzzp| 00007b80 61 73 73 22 0d 6b 76 2d f2 6d 61 6b 65 5f 61 6c |ass".kv-.make_al| 00007b90 69 61 73 28 22 3c 42 6f 6f 74 24 54 6f 42 65 54 |ias("<Boot$ToBeT| 00007ba0 61 73 6b 73 3e 2e 21 7a 7a 7a 7a 70 61 73 73 22 |asks>.!zzzzpass"| 00007bb0 29 0d 6b 80 1c 41 70 70 6c 69 63 61 74 69 6f 6e |).k..Application| 00007bc0 24 3d 22 21 42 6f 6f 74 70 6c 75 73 22 0d 6b 8a |$="!Bootplus".k.| 00007bd0 18 53 6f 75 72 63 65 24 3d 62 6f 6f 74 70 6c 75 |.Source$=bootplu| 00007be0 73 64 69 72 24 0d 6b 94 2d f2 6d 61 6b 65 5f 61 |sdir$.k.-.make_a| 00007bf0 6c 69 61 73 28 22 3c 42 6f 6f 74 24 54 6f 42 65 |lias("<Boot$ToBe| 00007c00 54 61 73 6b 73 3e 2e 21 42 6f 6f 74 70 6c 75 73 |Tasks>.!Bootplus| 00007c10 22 29 0d 6b 9e 15 45 64 69 74 5f 54 79 70 65 24 |").k..Edit_Type$| 00007c20 3d 22 62 6f 6f 74 22 0d 6b a8 2e f2 6d 6f 64 69 |="boot".k...modi| 00007c30 66 79 5f 62 6f 6f 74 5f 66 69 6c 65 28 62 6f 6f |fy_boot_file(boo| 00007c40 74 70 6c 75 73 64 69 72 24 2c 22 72 65 6d 6f 76 |tplusdir$,"remov| 00007c50 65 22 2c b9 29 0d 6b b2 2e f2 6d 6f 64 69 66 79 |e",.).k...modify| 00007c60 5f 62 6f 6f 74 5f 66 69 6c 65 28 62 6f 6f 74 70 |_boot_file(bootp| 00007c70 6c 75 73 64 69 72 24 2c 22 69 6e 73 65 72 74 22 |lusdir$,"insert"| 00007c80 2c b9 29 0d 6b bc 11 45 64 69 74 5f 54 79 70 65 |,.).k..Edit_Type| 00007c90 24 3d 22 22 0d 6b c6 31 2a 46 69 6c 65 72 5f 52 |$="".k.1*Filer_R| 00007ca0 75 6e 20 3c 42 6f 6f 74 70 6c 75 73 24 44 69 72 |un <Bootplus$Dir| 00007cb0 3e 2e 52 65 73 6f 75 72 63 65 73 2e 21 7a 7a 7a |>.Resources.!zzz| 00007cc0 7a 70 61 73 73 0d 6b d0 05 e1 0d 6c 16 13 dd f2 |zpass.k....l....| 00007cd0 72 65 6d 6f 76 65 5f 6c 6f 67 69 6e 73 0d 6c 48 |remove_logins.lH| 00007ce0 14 ea 6c 25 2c 62 6f 6f 74 70 6c 75 73 64 69 72 |..l%,bootplusdir| 00007cf0 24 0d 6c 5c 37 c8 99 22 4f 53 5f 52 65 61 64 56 |$.l\7.."OS_ReadV| 00007d00 61 72 56 61 6c 22 2c 22 42 6f 6f 74 70 6c 75 73 |arVal","Bootplus| 00007d10 24 44 69 72 22 2c 42 75 66 31 25 2c 31 32 38 2c |$Dir",Buf1%,128,| 00007d20 30 2c 30 b8 2c 2c 6c 25 0d 6c 66 0f 42 75 66 31 |0,0.,,l%.lf.Buf1| 00007d30 25 3f 6c 25 3d 31 33 0d 6c 70 17 62 6f 6f 74 70 |%?l%=13.lp.bootp| 00007d40 6c 75 73 64 69 72 24 3d 24 42 75 66 31 25 0d 6c |lusdir$=$Buf1%.l| 00007d50 7a 38 c8 99 22 58 4f 53 5f 46 53 43 6f 6e 74 72 |z8.."XOS_FSContr| 00007d60 6f 6c 22 2c 32 37 2c 22 3c 42 6f 6f 74 24 54 6f |ol",27,"<Boot$To| 00007d70 42 65 54 61 73 6b 73 3e 2e 21 7a 7a 7a 7a 70 61 |BeTasks>.!zzzzpa| 00007d80 73 73 22 2c 2c 33 0d 6c 84 38 c8 99 22 58 4f 53 |ss",,3.l.8.."XOS| 00007d90 5f 46 53 43 6f 6e 74 72 6f 6c 22 2c 32 37 2c 22 |_FSControl",27,"| 00007da0 3c 42 6f 6f 74 24 54 6f 42 65 54 61 73 6b 73 3e |<Boot$ToBeTasks>| 00007db0 2e 21 62 6f 6f 74 70 6c 75 73 22 2c 2c 33 0d 6c |.!bootplus",,3.l| 00007dc0 8e 15 45 64 69 74 5f 54 79 70 65 24 3d 22 62 6f |..Edit_Type$="bo| 00007dd0 6f 74 22 0d 6c 98 2e f2 6d 6f 64 69 66 79 5f 62 |ot".l...modify_b| 00007de0 6f 6f 74 5f 66 69 6c 65 28 62 6f 6f 74 70 6c 75 |oot_file(bootplu| 00007df0 73 64 69 72 24 2c 22 72 65 6d 6f 76 65 22 2c b9 |sdir$,"remove",.| 00007e00 29 0d 6c a2 11 45 64 69 74 5f 54 79 70 65 24 3d |).l..Edit_Type$=| 00007e10 22 22 0d 6c ac 05 e1 0d 6c f2 12 dd f2 70 61 75 |"".l....l....pau| 00007e20 73 65 5f 6c 6f 67 69 6e 73 0d 6d 1a 08 ea 69 64 |se_logins.m...id| 00007e30 25 0d 6d 2e 20 69 64 25 3d a4 67 65 74 5f 74 61 |%.m. id%=.get_ta| 00007e40 73 6b 5f 69 64 28 22 7a 7a 7a 7a 70 61 73 73 22 |sk_id("zzzzpass"| 00007e50 29 0d 6d 38 0b e7 69 64 25 3e 30 8c 0d 6d 60 29 |).m8..id%>0..m`)| 00007e60 42 6c 63 6b 25 21 30 3d 32 38 3a 42 6c 63 6b 25 |Blck%!0=28:Blck%| 00007e70 21 31 32 3d 30 3a 42 6c 63 6b 25 21 31 36 3d 26 |!12=0:Blck%!16=&| 00007e80 38 30 38 63 30 0d 6d 6a 1d 42 6c 63 6b 25 21 32 |808c0.mj.Blck%!2| 00007e90 30 3d 34 3a 42 6c 63 6b 25 21 32 34 3d 42 75 66 |0=4:Blck%!24=Buf| 00007ea0 32 25 0d 6d 74 0c 21 42 75 66 32 25 3d 33 0d 6d |2%.mt.!Buf2%=3.m| 00007eb0 7e 25 c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 |~%.."Wimp_SendMe| 00007ec0 73 73 61 67 65 22 2c 31 37 2c 42 6c 63 6b 25 2c |ssage",17,Blck%,| 00007ed0 69 64 25 0d 6d 88 05 cd 0d 6d 92 1f 69 64 25 3d |id%.m....m..id%=| 00007ee0 a4 67 65 74 5f 74 61 73 6b 5f 69 64 28 22 7a 7a |.get_task_id("zz| 00007ef0 7a 7a 63 68 6b 22 29 0d 6d 9c 0b e7 69 64 25 3e |zzchk").m...id%>| 00007f00 30 8c 0d 6d c4 29 42 6c 63 6b 25 21 30 3d 32 38 |0..m.)Blck%!0=28| 00007f10 3a 42 6c 63 6b 25 21 31 32 3d 30 3a 42 6c 63 6b |:Blck%!12=0:Blck| 00007f20 25 21 31 36 3d 26 38 30 38 63 30 0d 6d ce 1d 42 |%!16=&808c0.m..B| 00007f30 6c 63 6b 25 21 32 30 3d 34 3a 42 6c 63 6b 25 21 |lck%!20=4:Blck%!| 00007f40 32 34 3d 42 75 66 32 25 0d 6d d8 0c 21 42 75 66 |24=Buf2%.m..!Buf| 00007f50 32 25 3d 33 0d 6d e2 25 c8 99 22 57 69 6d 70 5f |2%=3.m.%.."Wimp_| 00007f60 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 31 37 2c |SendMessage",17,| 00007f70 42 6c 63 6b 25 2c 69 64 25 0d 6d ec 05 cd 0d 6d |Blck%,id%.m....m| 00007f80 f6 05 e1 0d 6e 5a 13 dd a4 65 6e 63 6f 64 65 28 |....nZ...encode(| 00007f90 70 73 77 64 24 29 0d 6e a0 16 ea 65 6e 63 64 24 |pswd$).n...encd$| 00007fa0 2c 61 25 2c 62 25 2c 63 25 2c 64 25 0d 6e b4 0c |,a%,b%,c%,d%.n..| 00007fb0 65 6e 63 64 24 3d 22 22 0d 6e be 0f 61 25 3d a9 |encd$="".n..a%=.| 00007fc0 28 70 73 77 64 24 29 0d 6e c8 0c e3 65 25 3d 31 |(pswd$).n...e%=1| 00007fd0 b8 61 25 0d 6e d2 16 62 25 3d 97 28 c1 70 73 77 |.a%.n..b%=.(.psw| 00007fe0 64 24 2c 65 25 2c 31 29 29 0d 6e dc 1b 63 25 3d |d$,e%,1)).n..c%=| 00007ff0 97 28 c1 70 73 77 64 24 2c 61 25 2d 65 25 2b 31 |.(.pswd$,a%-e%+1| 00008000 2c 31 29 29 0d 6e e6 16 64 25 3d 28 62 25 2a 28 |,1)).n..d%=(b%*(| 00008010 63 25 2b 31 29 29 80 26 46 46 0d 6e f0 11 e7 64 |c%+1)).&FF.n...d| 00008020 25 3c 33 32 8c 64 25 2b 3d 33 32 0d 6e fa 1c e7 |%<32.d%+=32.n...| 00008030 64 25 3e 3d 31 32 37 80 20 64 25 3c 3d 31 33 39 |d%>=127. d%<=139| 00008040 8c 64 25 2b 3d 32 33 0d 6f 04 10 65 6e 63 64 24 |.d%+=23.o..encd$| 00008050 2b 3d bd 28 64 25 29 0d 6f 0e 07 ed 65 25 0d 6f |+=.(d%).o...e%.o| 00008060 2c 0a 3d 65 6e 63 64 24 0d 6f 72 24 dd a4 63 68 |,.=encd$.or$..ch| 00008070 65 63 6b 5f 75 73 65 72 28 75 73 6e 6d 24 2c 70 |eck_user(usnm$,p| 00008080 61 73 73 24 2c f8 6e 61 6d 69 25 29 0d 6f ea 27 |ass$,.nami%).o.'| 00008090 ea 65 6e 63 64 24 2c 6e 74 72 79 24 2c 66 25 2c |.encd$,ntry$,f%,| 000080a0 6f 6b 25 2c 70 6e 61 6d 24 2c 70 70 61 73 24 2c |ok%,pnam$,ppas$,| 000080b0 70 31 24 0d 6f fe 13 e7 75 73 6e 6d 24 3d 22 47 |p1$.o...usnm$="G| 000080c0 55 45 53 54 22 8c 0d 70 26 28 6f 6b 25 3d 28 28 |UEST"..p&(ok%=((| 000080d0 70 61 73 73 24 3d 22 47 55 45 53 54 22 29 80 20 |pass$="GUEST"). | 000080e0 47 75 65 73 74 5f 4c 6f 67 69 6e 73 25 29 0d 70 |Guest_Logins%).p| 000080f0 30 0b 6e 61 6d 69 25 3d b9 0d 70 3a 05 cc 0d 70 |0.nami%=..p:...p| 00008100 62 08 61 25 3d 30 0d 70 6c 16 70 31 24 3d a4 65 |b.a%=0.pl.p1$=.e| 00008110 6e 63 6f 64 65 28 70 61 73 73 24 29 0d 70 76 16 |ncode(pass$).pv.| 00008120 65 6e 63 64 24 3d a4 65 6e 63 6f 64 65 28 70 31 |encd$=.encode(p1| 00008130 24 29 0d 70 80 09 6f 6b 25 3d a3 0d 70 8a 0b 6e |$).p..ok%=..p..n| 00008140 61 6d 69 25 3d a3 0d 70 94 20 c8 99 22 4f 53 5f |ami%=..p. .."OS_| 00008150 46 69 6c 65 22 2c 34 2c 50 61 73 73 66 69 6c 65 |File",4,Passfile| 00008160 24 2c 2c 2c 2c 33 0d 70 9e 13 66 25 3d 8e 28 50 |$,,,,3.p..f%=.(P| 00008170 61 73 73 66 69 6c 65 24 29 0d 70 a8 11 c8 95 ac |assfile$).p.....| 00008180 28 c5 23 66 25 84 6f 6b 25 29 0d 70 b2 0e 6e 74 |(.#f%.ok%).p..nt| 00008190 72 79 24 3d be 23 66 25 0d 70 bc 16 74 61 62 31 |ry$=.#f%.p..tab1| 000081a0 25 3d a7 6e 74 72 79 24 2c bd 28 39 29 29 0d 70 |%=.ntry$,.(9)).p| 000081b0 c6 1e 74 61 62 32 25 3d a7 6e 74 72 79 24 2c bd |..tab2%=.ntry$,.| 000081c0 28 39 29 2c 74 61 62 31 25 2b 31 29 0d 70 d0 19 |(9),tab1%+1).p..| 000081d0 70 6e 61 6d 24 3d c0 6e 74 72 79 24 2c 74 61 62 |pnam$=.ntry$,tab| 000081e0 31 25 2d 31 29 0d 70 da 27 70 70 61 73 24 3d c1 |1%-1).p.'ppas$=.| 000081f0 6e 74 72 79 24 2c 74 61 62 31 25 2b 31 2c 74 61 |ntry$,tab1%+1,ta| 00008200 62 32 25 2d 74 61 62 31 25 2d 31 29 0d 70 e4 09 |b2%-tab1%-1).p..| 00008210 61 25 2b 3d 31 0d 70 ee 25 6f 6b 25 3d 28 28 75 |a%+=1.p.%ok%=((u| 00008220 73 6e 6d 24 3d 70 6e 61 6d 24 29 80 28 65 6e 63 |snm$=pnam$).(enc| 00008230 64 24 3d 70 70 61 73 24 29 29 0d 70 f8 18 e7 75 |d$=ppas$)).p...u| 00008240 73 6e 6d 24 3d 70 6e 61 6d 24 8c 6e 61 6d 69 25 |snm$=pnam$.nami%| 00008250 3d b9 0d 71 02 05 ce 0d 71 0c 08 d9 23 66 25 0d |=..q....q...#f%.| 00008260 71 16 20 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 34 |q. .."OS_File",4| 00008270 2c 50 61 73 73 66 69 6c 65 24 2c 2c 2c 2c 39 0d |,Passfile$,,,,9.| 00008280 71 20 05 cd 0d 71 34 08 3d 6f 6b 25 0d 71 7a 1b |q ...q4.=ok%.qz.| 00008290 dd f2 61 64 64 5f 75 73 65 72 28 75 73 6e 6d 24 |..add_user(usnm$| 000082a0 2c 70 61 73 73 24 29 0d 71 c0 1d ea 65 6e 63 64 |,pass$).q...encd| 000082b0 24 2c 70 61 64 25 2c 70 31 24 2c 62 64 24 2c 66 |$,pad%,p1$,bd$,f| 000082c0 25 2c 6c 25 0d 71 e8 16 70 31 24 3d a4 65 6e 63 |%,l%.q..p1$=.enc| 000082d0 6f 64 65 28 70 61 73 73 24 29 0d 71 f2 16 65 6e |ode(pass$).q..en| 000082e0 63 64 24 3d a4 65 6e 63 6f 64 65 28 70 31 24 29 |cd$=.encode(p1$)| 000082f0 0d 71 fc 21 70 61 64 25 3d 33 35 2d 28 a9 28 75 |.q.!pad%=35-(.(u| 00008300 73 6e 6d 24 29 2b a9 28 65 6e 63 64 24 29 2b 32 |snm$)+.(encd$)+2| 00008310 29 0d 72 06 20 c8 99 22 4f 53 5f 46 69 6c 65 22 |).r. .."OS_File"| 00008320 2c 34 2c 50 61 73 73 66 69 6c 65 24 2c 2c 2c 2c |,4,Passfile$,,,,| 00008330 33 0d 72 10 13 66 25 3d ad 28 50 61 73 73 66 69 |3.r..f%=.(Passfi| 00008340 6c 65 24 29 0d 72 1a 0b c8 95 ac c5 23 66 25 0d |le$).r......#f%.| 00008350 72 24 0e 6e 74 72 79 24 3d be 23 66 25 0d 72 2e |r$.ntry$=.#f%.r.| 00008360 05 ce 0d 72 38 29 d5 23 66 25 2c 75 73 6e 6d 24 |...r8).#f%,usnm$| 00008370 2b bd 28 39 29 2b 65 6e 63 64 24 2b bd 28 39 29 |+.(9)+encd$+.(9)| 00008380 2b c4 70 61 64 25 2c 22 78 22 29 0d 72 42 08 d9 |+.pad%,"x").rB..| 00008390 23 66 25 0d 72 4c 20 c8 99 22 4f 53 5f 46 69 6c |#f%.rL .."OS_Fil| 000083a0 65 22 2c 34 2c 50 61 73 73 66 69 6c 65 24 2c 2c |e",4,Passfile$,,| 000083b0 2c 2c 39 0d 72 88 33 c8 99 22 4f 53 5f 52 65 61 |,,9.r.3.."OS_Rea| 000083c0 64 56 61 72 56 61 6c 22 2c 22 42 6f 6f 74 24 44 |dVarVal","Boot$D| 000083d0 69 72 22 2c 42 75 66 31 25 2c 31 32 38 2c 30 2c |ir",Buf1%,128,0,| 000083e0 30 b8 2c 2c 6c 25 0d 72 92 09 6c 25 2d 3d 36 0d |0.,,l%.r..l%-=6.| 000083f0 72 9c 0f 42 75 66 31 25 3f 6c 25 3d 31 33 0d 72 |r..Buf1%?l%=13.r| 00008400 a6 0e 62 64 24 3d 24 42 75 66 31 25 0d 72 ba 23 |..bd$=$Buf1%.r.#| 00008410 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 32 30 2c 62 |.."OS_File",20,b| 00008420 64 24 2b 22 2e 47 72 6f 75 70 73 22 b8 66 25 0d |d$+".Groups".f%.| 00008430 72 c4 0a e7 66 25 3d 30 8c 0d 72 ec 1f c8 99 22 |r...f%=0..r...."| 00008440 4f 53 5f 46 69 6c 65 22 2c 38 2c 62 64 24 2b 22 |OS_File",8,bd$+"| 00008450 2e 47 72 6f 75 70 73 22 0d 72 f6 05 cd 0d 73 00 |.Groups".r....s.| 00008460 2a c8 99 22 4f 53 5f 46 69 6c 65 22 2c 32 30 2c |*.."OS_File",20,| 00008470 62 64 24 2b 22 2e 47 72 6f 75 70 73 2e 22 2b 75 |bd$+".Groups."+u| 00008480 73 6e 6d 24 b8 66 25 0d 73 0a 0a e7 66 25 3d 30 |snm$.f%.s...f%=0| 00008490 8c 0d 73 32 26 c8 99 22 4f 53 5f 46 69 6c 65 22 |..s2&.."OS_File"| 000084a0 2c 38 2c 62 64 24 2b 22 2e 47 72 6f 75 70 73 2e |,8,bd$+".Groups.| 000084b0 22 2b 75 73 6e 6d 24 0d 73 3c 05 cd 0d 73 46 0e |"+usnm$.s<...sF.| 000084c0 52 75 73 65 72 73 25 2b 3d 31 0d 73 50 18 52 75 |Rusers%+=1.sP.Ru| 000084d0 73 72 24 28 52 75 73 65 72 73 25 29 3d 75 73 6e |sr$(Rusers%)=usn| 000084e0 6d 24 0d 73 5a 54 52 64 69 72 24 28 52 75 73 65 |m$.sZTRdir$(Ruse| 000084f0 72 73 25 29 3d 22 7c 41 70 70 73 7c 44 69 76 65 |rs%)="|Apps|Dive| 00008500 72 73 69 6f 6e 73 7c 49 6d 61 67 65 73 7c 50 75 |rsions|Images|Pu| 00008510 62 6c 69 63 7c 53 6f 75 6e 64 7c 54 75 74 6f 72 |blic|Sound|Tutor| 00008520 69 61 6c 73 7c 55 74 69 6c 69 74 69 65 73 7c 56 |ials|Utilities|V| 00008530 69 64 65 6f 7c 22 0d 73 64 0b 62 64 24 3d 22 7c |ideo|".sd.bd$="|| 00008540 22 0d 73 6e 0b e3 62 25 3d 31 b8 37 0d 73 78 20 |".sn..b%=1.7.sx | 00008550 62 64 24 2b 3d 57 65 65 6b 64 61 79 73 24 28 62 |bd$+=Weekdays$(b| 00008560 25 29 2b 22 59 3d 38 3d 31 37 7c 22 0d 73 82 07 |%)+"Y=8=17|".s..| 00008570 ed 62 25 0d 73 8c 16 52 74 69 6d 24 28 52 75 73 |.b%.s..Rtim$(Rus| 00008580 65 72 73 25 29 3d 62 64 24 0d 73 96 14 f2 73 61 |ers%)=bd$.s...sa| 00008590 76 65 5f 75 73 65 72 61 63 63 65 73 73 0d 73 a0 |ve_useraccess.s.| 000085a0 13 f2 73 61 76 65 5f 75 73 65 72 74 69 6d 65 73 |..save_usertimes| 000085b0 0d 73 aa 05 e1 0d 73 f0 1e dd f2 6d 6f 64 69 66 |.s....s....modif| 000085c0 79 5f 75 73 65 72 28 75 73 6e 6d 24 2c 70 61 73 |y_user(usnm$,pas| 000085d0 73 24 29 0d 74 36 2b ea 65 6e 63 64 24 2c 6e 74 |s$).t6+.encd$,nt| 000085e0 79 72 24 2c 70 61 64 25 2c 74 61 62 31 25 2c 74 |yr$,pad%,tab1%,t| 000085f0 61 62 32 25 2c 70 6e 61 6d 24 2c 70 31 24 0d 74 |ab2%,pnam$,p1$.t| 00008600 4a 16 70 31 24 3d a4 65 6e 63 6f 64 65 28 70 61 |J.p1$=.encode(pa| 00008610 73 73 24 29 0d 74 54 16 65 6e 63 64 24 3d a4 65 |ss$).tT.encd$=.e| 00008620 6e 63 6f 64 65 28 70 31 24 29 0d 74 5e 21 70 61 |ncode(p1$).t^!pa| 00008630 64 25 3d 33 35 2d 28 a9 28 75 73 6e 6d 24 29 2b |d%=35-(.(usnm$)+| 00008640 a9 28 65 6e 63 64 24 29 2b 32 29 0d 74 68 20 c8 |.(encd$)+2).th .| 00008650 99 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 50 61 73 |."OS_File",4,Pas| 00008660 73 66 69 6c 65 24 2c 2c 2c 2c 33 0d 74 72 13 66 |sfile$,,,,3.tr.f| 00008670 25 3d ad 28 50 61 73 73 66 69 6c 65 24 29 0d 74 |%=.(Passfile$).t| 00008680 7c 05 f5 0d 74 86 0e 70 6f 73 6e 25 3d 8f 23 66 ||...t..posn%=.#f| 00008690 25 0d 74 90 0e 6e 74 72 79 24 3d be 23 66 25 0d |%.t..ntry$=.#f%.| 000086a0 74 9a 16 74 61 62 31 25 3d a7 6e 74 72 79 24 2c |t..tab1%=.ntry$,| 000086b0 bd 28 39 29 29 0d 74 a4 1e 74 61 62 32 25 3d a7 |.(9)).t..tab2%=.| 000086c0 6e 74 72 79 24 2c bd 28 39 29 2c 74 61 62 31 25 |ntry$,.(9),tab1%| 000086d0 2b 31 29 0d 74 ae 19 70 6e 61 6d 24 3d c0 6e 74 |+1).t..pnam$=.nt| 000086e0 72 79 24 2c 74 61 62 31 25 2d 31 29 0d 74 b8 10 |ry$,tab1%-1).t..| 000086f0 fd 70 6e 61 6d 24 3d 75 73 6e 6d 24 0d 74 c2 0e |.pnam$=usnm$.t..| 00008700 cf 23 66 25 3d 70 6f 73 6e 25 0d 74 cc 29 d5 23 |.#f%=posn%.t.).#| 00008710 66 25 2c 75 73 6e 6d 24 2b bd 28 39 29 2b 65 6e |f%,usnm$+.(9)+en| 00008720 63 64 24 2b bd 28 39 29 2b c4 70 61 64 25 2c 22 |cd$+.(9)+.pad%,"| 00008730 78 22 29 0d 74 d6 08 d9 23 66 25 0d 74 e0 20 c8 |x").t...#f%.t. .| 00008740 99 22 4f 53 5f 46 69 6c 65 22 2c 34 2c 50 61 73 |."OS_File",4,Pas| 00008750 73 66 69 6c 65 24 2c 2c 2c 2c 39 0d 74 ea 05 e1 |sfile$,,,,9.t...| 00008760 0d 75 30 1f dd f2 6c 6f 67 69 6e 5f 75 73 65 72 |.u0...login_user| 00008770 28 75 73 6e 6d 24 2c 69 6e 66 6f 72 6d 25 29 0d |(usnm$,inform%).| 00008780 75 76 18 ea 61 25 2c 61 6c 25 2c 64 75 72 25 2c |uv..a%,al%,dur%,| 00008790 73 68 25 2c 65 68 25 0d 75 8a 19 e7 4c 6f 67 67 |sh%,eh%.u...Logg| 000087a0 65 64 5f 55 73 65 72 24 3c 3e 75 73 6e 6d 24 8c |ed_User$<>usnm$.| 000087b0 0d 75 b2 27 f2 75 73 65 72 5f 74 69 6d 65 73 28 |.u.'.user_times(| 000087c0 75 73 6e 6d 24 2c 61 6c 25 2c 64 75 72 25 2c 73 |usnm$,al%,dur%,s| 000087d0 68 25 2c 65 68 25 29 0d 75 bc 0a c8 8e 61 6c 25 |h%,eh%).u....al%| 000087e0 ca 0d 75 c6 06 c9 31 0d 75 ee 22 c8 99 54 5f 54 |..u...1.u."..T_T| 000087f0 4f 4d 4f 25 2c 30 2c 49 62 61 72 6d 65 6e 75 5f |OMO%,0,Ibarmenu_| 00008800 49 44 25 2c 32 2c 36 2c 30 0d 75 f8 16 4c 6f 67 |ID%,2,6,0.u..Log| 00008810 67 65 64 5f 55 73 65 72 24 3d 75 73 6e 6d 24 0d |ged_User$=usnm$.| 00008820 76 20 23 e7 28 5a 7a 7a 7a 70 61 73 73 5f 53 74 |v #.(Zzzzpass_St| 00008830 61 74 75 73 25 3d 33 29 80 20 69 6e 66 6f 72 6d |atus%=3). inform| 00008840 25 8c 0d 76 48 1a f2 69 6e 66 6f 72 6d 5f 7a 7a |%..vH..inform_zz| 00008850 7a 7a 70 61 73 73 28 64 75 72 25 29 0d 76 52 05 |zzpass(dur%).vR.| 00008860 cd 0d 76 5c 06 c9 32 0d 76 84 2b f2 65 72 72 6f |..v\..2.v.+.erro| 00008870 72 5f 6d 65 73 73 61 67 65 28 22 45 4d 32 31 22 |r_message("EM21"| 00008880 2c 22 22 2c 22 22 2c 22 45 54 31 22 2c 30 2c 4b |,"","","ET1",0,K| 00008890 25 29 0d 76 8e 06 c9 33 0d 76 b6 33 f2 65 72 72 |%).v...3.v.3.err| 000088a0 6f 72 5f 6d 65 73 73 61 67 65 28 22 45 4d 32 32 |or_message("EM22| 000088b0 22 2c c3 28 73 68 25 29 2c c3 28 65 68 25 29 2c |",.(sh%),.(eh%),| 000088c0 22 45 54 31 22 2c 30 2c 4b 25 29 0d 76 c0 05 cb |"ET1",0,K%).v...| 000088d0 0d 76 ca 05 cc 0d 76 f2 2b f2 65 72 72 6f 72 5f |.v....v.+.error_| 000088e0 6d 65 73 73 61 67 65 28 22 45 4d 32 33 22 2c 22 |message("EM23","| 000088f0 22 2c 22 22 2c 22 45 54 32 22 2c 30 2c 4b 25 29 |","","ET2",0,K%)| 00008900 0d 76 fc 05 cd 0d 77 06 05 e1 0d 77 56 37 dd f2 |.v....w....wV7..| 00008910 75 73 65 72 5f 74 69 6d 65 73 28 75 73 65 72 6e |user_times(usern| 00008920 24 2c f8 61 6c 6c 6f 77 65 64 25 2c f8 64 75 72 |$,.allowed%,.dur| 00008930 61 74 69 6f 6e 25 2c f8 73 68 25 2c f8 65 68 25 |ation%,.sh%,.eh%| 00008940 29 0d 77 7e 1e ea 61 25 2c 74 68 25 2c 6d 6e 25 |).w~..a%,th%,mn%| 00008950 2c 77 64 25 2c 65 31 25 2c 65 32 25 2c 62 25 0d |,wd%,e1%,e2%,b%.| 00008960 77 a6 11 e3 61 25 3d 31 b8 52 75 73 65 72 73 25 |w...a%=1.Rusers%| 00008970 0d 77 b0 15 e7 52 75 73 72 24 28 61 25 29 3d 75 |.w...Rusr$(a%)=u| 00008980 73 6e 6d 24 8c 0d 77 ba 0c 52 75 73 72 25 3d 61 |snm$..w..Rusr%=a| 00008990 25 0d 77 c4 05 cd 0d 77 ce 07 ed 61 25 0d 77 d8 |%.w....w...a%.w.| 000089a0 13 e7 75 73 65 72 6e 24 3d 4f 77 6e 65 72 24 8c |..usern$=Owner$.| 000089b0 0d 78 00 0e 61 6c 6c 6f 77 65 64 25 3d 31 0d 78 |.x..allowed%=1.x| 000089c0 0a 05 cc 0d 78 32 0c 21 42 75 66 31 25 3d 33 0d |....x2.!Buf1%=3.| 000089d0 78 3c 18 c8 99 22 4f 53 5f 57 6f 72 64 22 2c 31 |x<..."OS_Word",1| 000089e0 34 2c 42 75 66 31 25 0d 78 46 23 c8 99 26 63 31 |4,Buf1%.xF#..&c1| 000089f0 2c 42 75 66 31 25 2c 42 75 66 32 25 2c 31 32 38 |,Buf1%,Buf2%,128| 00008a00 2c 22 25 32 34 22 b8 2c 61 25 0d 78 50 0a 3f 61 |,"%24".,a%.xP.?a| 00008a10 25 3d 31 33 0d 78 5a 11 74 68 25 3d bb 28 24 42 |%=13.xZ.th%=.($B| 00008a20 75 66 32 25 29 0d 78 64 23 c8 99 26 63 31 2c 42 |uf2%).xd#..&c1,B| 00008a30 75 66 31 25 2c 42 75 66 32 25 2c 31 32 38 2c 22 |uf1%,Buf2%,128,"| 00008a40 25 57 4e 22 b8 2c 61 25 0d 78 6e 0a 3f 61 25 3d |%WN".,a%.xn.?a%=| 00008a50 31 33 0d 78 78 11 77 64 25 3d bb 28 24 42 75 66 |13.xx.wd%=.($Buf| 00008a60 32 25 29 0d 78 82 23 c8 99 26 63 31 2c 42 75 66 |2%).x.#..&c1,Buf| 00008a70 31 25 2c 42 75 66 32 25 2c 31 32 38 2c 22 25 4d |1%,Buf2%,128,"%M| 00008a80 49 22 b8 2c 61 25 0d 78 8c 0a 3f 61 25 3d 31 33 |I".,a%.x..?a%=13| 00008a90 0d 78 96 11 6d 6e 25 3d bb 28 24 42 75 66 32 25 |.x..mn%=.($Buf2%| 00008aa0 29 0d 78 a0 26 61 25 3d a7 52 74 69 6d 24 28 52 |).x.&a%=.Rtim$(R| 00008ab0 75 73 72 25 29 2c 57 65 65 6b 64 61 79 73 24 28 |usr%),Weekdays$(| 00008ac0 77 64 25 29 2c 31 29 0d 78 aa 0f 64 75 72 61 74 |wd%),1).x..durat| 00008ad0 69 6f 6e 25 3d 30 0d 78 b4 1f e7 c1 52 74 69 6d |ion%=0.x....Rtim| 00008ae0 24 28 52 75 73 72 25 29 2c 61 25 2b 32 2c 31 29 |$(Rusr%),a%+2,1)| 00008af0 3d 22 59 22 8c 0d 78 dc 1f 65 31 25 3d a7 52 74 |="Y"..x..e1%=.Rt| 00008b00 69 6d 24 28 52 75 73 72 25 29 2c 22 3d 22 2c 61 |im$(Rusr%),"=",a| 00008b10 25 2b 33 29 0d 78 e6 20 65 32 25 3d a7 52 74 69 |%+3).x. e2%=.Rti| 00008b20 6d 24 28 52 75 73 72 25 29 2c 22 3d 22 2c 65 31 |m$(Rusr%),"=",e1| 00008b30 25 2b 32 29 0d 78 f0 1f 62 25 3d a7 52 74 69 6d |%+2).x..b%=.Rtim| 00008b40 24 28 52 75 73 72 25 29 2c 22 7c 22 2c 65 32 25 |$(Rusr%),"|",e2%| 00008b50 2b 32 29 0d 78 fa 29 73 68 25 3d bb 28 c1 52 74 |+2).x.)sh%=.(.Rt| 00008b60 69 6d 24 28 52 75 73 72 25 29 2c 65 31 25 2b 31 |im$(Rusr%),e1%+1| 00008b70 2c 65 32 25 2d 65 31 25 2d 31 29 29 0d 79 04 28 |,e2%-e1%-1)).y.(| 00008b80 65 68 25 3d bb 28 c1 52 74 69 6d 24 28 52 75 73 |eh%=.(.Rtim$(Rus| 00008b90 72 25 29 2c 65 32 25 2b 31 2c 62 25 2d 65 32 25 |r%),e2%+1,b%-e2%| 00008ba0 2d 31 29 29 0d 79 0e 1a e7 28 74 68 25 3e 3d 73 |-1)).y...(th%>=s| 00008bb0 68 25 80 20 74 68 25 3c 3d 65 68 25 29 8c 0d 79 |h%. th%<=eh%)..y| 00008bc0 18 0e 61 6c 6c 6f 77 65 64 25 3d 31 0d 79 22 20 |..allowed%=1.y" | 00008bd0 64 75 72 61 74 69 6f 6e 25 3d 28 65 68 25 2d 74 |duration%=(eh%-t| 00008be0 68 25 2b 31 29 2a 36 30 2d 6d 6e 25 0d 79 2c 05 |h%+1)*60-mn%.y,.| 00008bf0 cc 0d 79 36 0e 61 6c 6c 6f 77 65 64 25 3d 33 0d |..y6.allowed%=3.| 00008c00 79 40 05 cd 0d 79 4a 05 cc 0d 79 54 0e 61 6c 6c |y@...yJ...yT.all| 00008c10 6f 77 65 64 25 3d 32 0d 79 5e 05 cd 0d 79 68 05 |owed%=2.y^...yh.| 00008c20 cd 0d 79 72 05 e1 0d 79 c2 20 dd f2 69 6e 66 6f |..yr...y. ..info| 00008c30 72 6d 5f 7a 7a 7a 7a 70 61 73 73 28 64 75 72 61 |rm_zzzzpass(dura| 00008c40 74 69 6f 6e 25 29 0d 79 f4 0a ea 70 25 2c 61 25 |tion%).y...p%,a%| 00008c50 0d 7a 8a 09 70 25 3d 32 30 0d 7a 94 0c 21 42 75 |.z..p%=20.z..!Bu| 00008c60 66 32 25 3d 31 0d 7a 9e 0e 42 75 66 32 25 21 34 |f2%=1.z..Buf2%!4| 00008c70 3d 70 25 0d 7a a8 22 24 28 42 75 66 32 25 2b 32 |=p%.z."$(Buf2%+2| 00008c80 30 29 3d 4c 6f 67 67 65 64 5f 55 73 65 72 24 2b |0)=Logged_User$+| 00008c90 bd 28 31 33 29 0d 7a b2 19 70 25 2b 3d a9 28 4c |.(13).z..p%+=.(L| 00008ca0 6f 67 67 65 64 5f 55 73 65 72 24 29 2b 32 0d 7a |ogged_User$)+2.z| 00008cb0 bc 0f 42 75 66 32 25 21 31 32 3d 70 25 0d 7a c6 |..Buf2%!12=p%.z.| 00008cc0 1b e7 4c 6f 67 67 65 64 5f 55 73 65 72 24 3d 22 |..Logged_User$="| 00008cd0 4c 4f 47 4f 46 46 22 8c 0d 7a d0 1a 24 28 42 75 |LOGOFF"..z..$(Bu| 00008ce0 66 32 25 2b 42 75 66 32 25 21 31 32 29 3d 22 7c |f2%+Buf2%!12)="|| 00008cf0 7c 22 0d 7a da 09 50 25 2b 3d 32 0d 7a e4 05 cc ||".z..P%+=2.z...| 00008d00 0d 7a ee 22 24 28 42 75 66 32 25 2b 42 75 66 32 |.z."$(Buf2%+Buf2| 00008d10 25 21 31 32 29 3d 52 64 69 72 24 28 52 75 73 72 |%!12)=Rdir$(Rusr| 00008d20 25 29 0d 7a f8 17 70 25 2b 3d a9 28 52 64 69 72 |%).z..p%+=.(Rdir| 00008d30 24 28 52 75 73 72 25 29 29 0d 7b 02 05 cd 0d 7b |$(Rusr%)).{....{| 00008d40 0c 16 42 75 66 32 25 21 31 36 3d 64 75 72 61 74 |..Buf2%!16=durat| 00008d50 69 6f 6e 25 0d 7b 34 29 42 6c 63 6b 25 21 30 3d |ion%.{4)Blck%!0=| 00008d60 33 32 3a 42 6c 63 6b 25 21 31 32 3d 30 3a 42 6c |32:Blck%!12=0:Bl| 00008d70 63 6b 25 21 31 36 3d 26 38 30 38 63 30 0d 7b 3e |ck%!16=&808c0.{>| 00008d80 1e 42 6c 63 6b 25 21 32 30 3d 70 25 3a 42 6c 63 |.Blck%!20=p%:Blc| 00008d90 6b 25 21 32 34 3d 42 75 66 32 25 0d 7b 48 1b e7 |k%!24=Buf2%.{H..| 00008da0 4c 6f 67 67 65 64 5f 55 73 65 72 24 3d 22 4c 4f |Logged_User$="LO| 00008db0 47 4f 46 46 22 8c 0d 7b 52 17 42 6c 63 6b 25 21 |GOFF"..{R.Blck%!| 00008dc0 32 30 3d 42 75 66 32 25 21 31 32 2b 34 0d 7b 5c |20=Buf2%!12+4.{\| 00008dd0 05 cc 0d 7b 66 27 42 6c 63 6b 25 21 32 30 3d 42 |...{f'Blck%!20=B| 00008de0 75 66 32 25 21 31 32 2b a9 28 52 64 69 72 24 28 |uf2%!12+.(Rdir$(| 00008df0 52 75 73 72 25 29 29 2b 32 0d 7b 70 05 cd 0d 7b |Rusr%))+2.{p...{| 00008e00 7a 32 c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 |z2.."Wimp_SendMe| 00008e10 73 73 61 67 65 22 2c 31 37 2c 42 6c 63 6b 25 2c |ssage",17,Blck%,| 00008e20 5a 7a 7a 7a 70 61 73 73 5f 48 61 6e 64 6c 65 25 |Zzzzpass_Handle%| 00008e30 0d 7b 84 05 e1 0d 7b ca 1e dd f2 62 6f 6f 74 5f |.{....{....boot_| 00008e40 69 6e 73 74 61 6c 6c 28 74 79 70 65 24 2c f8 63 |install(type$,.c| 00008e50 66 25 29 0d 7b f2 11 ea 66 25 2c 61 24 2c 62 76 |f%).{...f%,a$,bv| 00008e60 24 2c 6e 25 0d 7c 1a 09 63 66 25 3d a3 0d 7c 24 |$,n%.|..cf%=..|$| 00008e70 24 66 25 3d 8e 28 22 3c 42 6f 6f 74 24 44 69 72 |$f%=.("<Boot$Dir| 00008e80 3e 2e 55 74 69 6c 73 2e 44 65 73 6b 72 75 6e 22 |>.Utils.Deskrun"| 00008e90 29 0d 7c 2e 05 f5 0d 7c 38 0b 61 24 3d be 23 66 |).|....|8.a$=.#f| 00008ea0 25 0d 7c 42 1c 63 66 25 3d 28 a7 61 24 2c 22 21 |%.|B.cf%=(.a$,"!| 00008eb0 42 6f 6f 74 70 6c 75 73 22 29 3e 30 29 0d 7c 4c |Bootplus")>0).|L| 00008ec0 0d fd c5 23 66 25 84 63 66 25 0d 7c 56 08 d9 23 |...#f%.cf%.|V..#| 00008ed0 66 25 0d 7c 7e 37 c8 99 22 4f 53 5f 52 65 61 64 |f%.|~7.."OS_Read| 00008ee0 56 61 72 56 61 6c 22 2c 22 42 6f 6f 74 70 6c 75 |VarVal","Bootplu| 00008ef0 73 24 44 69 72 22 2c 42 75 66 31 25 2c 31 32 38 |s$Dir",Buf1%,128| 00008f00 2c 30 2c 30 b8 2c 2c 6e 25 0d 7c 88 0f 42 75 66 |,0,0.,,n%.|..Buf| 00008f10 31 25 3f 6e 25 3d 31 33 0d 7c 92 08 c8 8e b9 ca |1%?n%=13.|......| 00008f20 0d 7c 9c 18 c9 28 28 74 79 70 65 24 3d 22 49 4e |.|...((type$="IN| 00008f30 22 29 80 ac 63 66 25 29 0d 7c c4 3a c8 99 22 4f |")..cf%).|.:.."O| 00008f40 53 5f 46 53 43 6f 6e 74 72 6f 6c 22 2c 32 34 2c |S_FSControl",24,| 00008f50 22 3c 42 6f 6f 74 24 44 69 72 3e 2e 55 74 69 6c |"<Boot$Dir>.Util| 00008f60 73 2e 44 65 73 6b 72 75 6e 22 2c 22 57 52 2f 57 |s.Deskrun","WR/W| 00008f70 52 22 0d 7c ce 4e c8 99 22 4f 53 5f 46 53 43 6f |R".|.N.."OS_FSCo| 00008f80 6e 74 72 6f 6c 22 2c 32 35 2c 22 3c 42 6f 6f 74 |ntrol",25,"<Boot| 00008f90 24 44 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b |$Dir>.Utils.Desk| 00008fa0 72 75 6e 22 2c 22 3c 42 6f 6f 74 24 44 69 72 3e |run","<Boot$Dir>| 00008fb0 2e 55 74 69 6c 73 2e 44 65 73 6b 72 75 6e 4f 22 |.Utils.DeskrunO"| 00008fc0 0d 7c d8 3a c8 99 22 4f 53 5f 46 53 43 6f 6e 74 |.|.:.."OS_FSCont| 00008fd0 72 6f 6c 22 2c 32 34 2c 22 3c 42 6f 6f 74 24 44 |rol",24,"<Boot$D| 00008fe0 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b 72 75 |ir>.Utils.Deskru| 00008ff0 6e 4f 22 2c 22 4c 52 2f 52 22 0d 7c e2 24 66 25 |nO","LR/R".|.$f%| 00009000 3d ae 28 22 3c 42 6f 6f 74 24 44 69 72 3e 2e 55 |=.("<Boot$Dir>.U| 00009010 74 69 6c 73 2e 44 65 73 6b 72 75 6e 22 29 0d 7c |tils.Deskrun").|| 00009020 ec 98 d5 23 66 25 2c 22 49 46 54 48 45 52 45 20 |...#f%,"IFTHERE | 00009030 22 2b 24 42 75 66 31 25 2b 22 2e 21 52 75 6e 20 |"+$Buf1%+".!Run | 00009040 54 48 45 4e 20 46 69 6c 65 72 5f 52 75 6e 20 22 |THEN Filer_Run "| 00009050 2b 24 42 75 66 31 25 2b 22 20 45 4c 53 45 20 45 |+$Buf1%+" ELSE E| 00009060 52 52 4f 52 20 21 42 6f 6f 74 70 6c 75 73 20 68 |RROR !Bootplus h| 00009070 61 73 20 6d 6f 76 65 64 2e 20 20 52 75 6e 20 69 |as moved. Run i| 00009080 74 20 66 72 6f 6d 20 74 68 65 20 63 75 72 72 65 |t from the curre| 00009090 6e 74 20 6c 6f 63 61 74 69 6f 6e 20 61 6e 64 20 |nt location and | 000090a0 72 65 2d 69 6e 73 74 61 6c 6c 20 69 6e 74 6f 20 |re-install into | 000090b0 21 42 6f 6f 74 22 0d 7c f6 08 d9 23 66 25 0d 7d |!Boot".|...#f%.}| 000090c0 00 32 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 31 38 |.2.."OS_File",18| 000090d0 2c 22 3c 42 6f 6f 74 24 44 69 72 3e 2e 55 74 69 |,"<Boot$Dir>.Uti| 000090e0 6c 73 2e 44 65 73 6b 72 75 6e 22 2c 26 46 45 42 |ls.Deskrun",&FEB| 000090f0 0d 7d 0a 39 c8 99 22 4f 53 5f 46 53 43 6f 6e 74 |.}.9.."OS_FSCont| 00009100 72 6f 6c 22 2c 32 34 2c 22 3c 42 6f 6f 74 24 44 |rol",24,"<Boot$D| 00009110 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b 72 75 |ir>.Utils.Deskru| 00009120 6e 22 2c 22 4c 52 2f 52 22 0d 7d 14 19 c9 28 28 |n","LR/R".}...((| 00009130 74 79 70 65 24 3d 22 4f 55 54 22 29 80 20 63 66 |type$="OUT"). cf| 00009140 25 29 0d 7d 3c 3a c8 99 22 4f 53 5f 46 53 43 6f |%).}<:.."OS_FSCo| 00009150 6e 74 72 6f 6c 22 2c 32 34 2c 22 3c 42 6f 6f 74 |ntrol",24,"<Boot| 00009160 24 44 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b |$Dir>.Utils.Desk| 00009170 72 75 6e 22 2c 22 57 52 2f 57 52 22 0d 7d 46 3b |run","WR/WR".}F;| 00009180 c8 99 22 4f 53 5f 46 53 43 6f 6e 74 72 6f 6c 22 |.."OS_FSControl"| 00009190 2c 32 34 2c 22 3c 42 6f 6f 74 24 44 69 72 3e 2e |,24,"<Boot$Dir>.| 000091a0 55 74 69 6c 73 2e 44 65 73 6b 72 75 6e 4f 22 2c |Utils.DeskrunO",| 000091b0 22 57 52 2f 57 52 22 0d 7d 50 2c c8 99 22 4f 53 |"WR/WR".}P,.."OS| 000091c0 5f 46 69 6c 65 22 2c 36 2c 22 3c 42 6f 6f 74 24 |_File",6,"<Boot$| 000091d0 44 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b 72 |Dir>.Utils.Deskr| 000091e0 75 6e 22 0d 7d 5a 4e c8 99 22 4f 53 5f 46 53 43 |un".}ZN.."OS_FSC| 000091f0 6f 6e 74 72 6f 6c 22 2c 32 35 2c 22 3c 42 6f 6f |ontrol",25,"<Boo| 00009200 74 24 44 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 |t$Dir>.Utils.Des| 00009210 6b 72 75 6e 4f 22 2c 22 3c 42 6f 6f 74 24 44 69 |krunO","<Boot$Di| 00009220 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b 72 75 6e |r>.Utils.Deskrun| 00009230 22 0d 7d 64 39 c8 99 22 4f 53 5f 46 53 43 6f 6e |".}d9.."OS_FSCon| 00009240 74 72 6f 6c 22 2c 32 34 2c 22 3c 42 6f 6f 74 24 |trol",24,"<Boot$| 00009250 44 69 72 3e 2e 55 74 69 6c 73 2e 44 65 73 6b 72 |Dir>.Utils.Deskr| 00009260 75 6e 22 2c 22 4c 52 2f 52 22 0d 7d 6e 05 cb 0d |un","LR/R".}n...| 00009270 7d 78 05 e1 0d 7d d2 1d dd f2 64 72 61 77 5f 6d |}x...}....draw_m| 00009280 61 69 6e 28 6d 69 64 25 2c 72 65 61 73 6f 6e 25 |ain(mid%,reason%| 00009290 29 0d 7e 22 07 ea 61 25 0d 7e 4a 1c 42 6c 63 6b |).~"..a%.~J.Blck| 000092a0 25 21 30 3d 53 75 62 6c 69 73 74 25 28 6d 69 64 |%!0=Sublist%(mid| 000092b0 25 2c 32 29 0d 7e 54 22 c8 99 22 57 69 6d 70 5f |%,2).~T".."Wimp_| 000092c0 47 65 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c |GetWindowState",| 000092d0 2c 42 6c 63 6b 25 0d 7e 5e 0e c8 8e 72 65 61 73 |,Blck%.~^...reas| 000092e0 6f 6e 25 ca 0d 7e 68 06 c9 30 0d 7e 90 0b c8 8e |on%..~h..0.~....| 000092f0 6d 69 64 25 ca 0d 7e 9a 06 c9 31 0d 7e c2 11 c8 |mid%..~...1.~...| 00009300 8e 45 64 69 74 5f 54 79 70 65 24 ca 0d 7e cc 0e |.Edit_Type$..~..| 00009310 c9 22 61 75 74 6f 72 75 6e 22 0d 7e d6 34 c8 99 |."autorun".~.4..| 00009320 54 5f 54 4f 4d 4f 25 2c 30 2c 4d 61 69 6e 6c 69 |T_TOMO%,0,Mainli| 00009330 73 74 5f 49 44 25 2c 31 31 2c 22 45 64 69 74 20 |st_ID%,11,"Edit | 00009340 41 75 74 6f 72 75 6e 20 46 69 6c 65 73 22 0d 7e |Autorun Files".~| 00009350 e0 0b c9 22 62 6f 6f 74 22 0d 7e ea 3e c8 99 54 |..."boot".~.>..T| 00009360 5f 54 4f 4d 4f 25 2c 30 2c 4d 61 69 6e 6c 69 73 |_TOMO%,0,Mainlis| 00009370 74 5f 49 44 25 2c 31 31 2c 22 45 64 69 74 20 41 |t_ID%,11,"Edit A| 00009380 75 74 6f 62 6f 6f 74 65 64 20 41 70 70 6c 69 63 |utobooted Applic| 00009390 61 74 69 6f 6e 73 22 0d 7e f4 10 c9 22 72 65 73 |ations".~..."res| 000093a0 6f 75 72 63 65 73 22 0d 7e fe 3c c8 99 54 5f 54 |ources".~.<..T_T| 000093b0 4f 4d 4f 25 2c 30 2c 4d 61 69 6e 6c 69 73 74 5f |OMO%,0,Mainlist_| 000093c0 49 44 25 2c 31 31 2c 22 45 64 69 74 20 52 65 73 |ID%,11,"Edit Res| 000093d0 6f 75 72 63 65 20 41 70 70 6c 69 63 61 74 69 6f |ource Applicatio| 000093e0 6e 73 22 0d 7f 08 0e c9 22 70 72 65 64 65 73 6b |ns"....."predesk| 000093f0 22 0d 7f 12 34 c8 99 54 5f 54 4f 4d 4f 25 2c 30 |"...4..T_TOMO%,0| 00009400 2c 4d 61 69 6e 6c 69 73 74 5f 49 44 25 2c 31 31 |,Mainlist_ID%,11| 00009410 2c 22 45 64 69 74 20 50 72 65 64 65 73 6b 20 46 |,"Edit Predesk F| 00009420 69 6c 65 73 22 0d 7f 1c 05 cb 0d 7f 44 05 cb 0d |iles".......D...| 00009430 7f 4e 1e c8 99 22 57 69 6d 70 5f 4f 70 65 6e 57 |.N..."Wimp_OpenW| 00009440 69 6e 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d 7f 58 |indow",,Blck%..X| 00009450 06 c9 32 0d 7f 62 20 c8 99 22 57 69 6d 70 5f 52 |..2..b .."Wimp_R| 00009460 65 64 72 61 77 57 69 6e 64 6f 77 22 2c 2c 42 6c |edrawWindow",,Bl| 00009470 63 6b 25 0d 7f 6c 05 cb 0d 7f 94 0c e7 6d 69 64 |ck%..l.......mid| 00009480 25 3d 32 8c 0d 7f bc 1c f2 64 72 61 77 5f 73 75 |%=2......draw_su| 00009490 62 28 32 2c 72 65 61 73 6f 6e 25 2c b9 2c 30 29 |b(2,reason%,.,0)| 000094a0 0d 7f c6 1c f2 64 72 61 77 5f 73 75 62 28 33 2c |.....draw_sub(3,| 000094b0 72 65 61 73 6f 6e 25 2c b9 2c 30 29 0d 7f d0 05 |reason%,.,0)....| 000094c0 cc 0d 7f f8 1c f2 64 72 61 77 5f 73 75 62 28 31 |......draw_sub(1| 000094d0 2c 72 65 61 73 6f 6e 25 2c b9 2c 30 29 0d 80 02 |,reason%,.,0)...| 000094e0 05 cd 0d 80 2a 1c 42 6c 63 6b 25 21 30 3d 53 75 |....*.Blck%!0=Su| 000094f0 62 6c 69 73 74 25 28 6d 69 64 25 2c 32 29 0d 80 |blist%(mid%,2)..| 00009500 34 22 c8 99 22 57 69 6d 70 5f 47 65 74 57 69 6e |4".."Wimp_GetWin| 00009510 64 6f 77 53 74 61 74 65 22 2c 2c 42 6c 63 6b 25 |dowState",,Blck%| 00009520 0d 80 3e 1d 42 6c 63 6b 25 21 32 38 3d 53 75 62 |..>.Blck%!28=Sub| 00009530 6c 69 73 74 25 28 6d 69 64 25 2c 31 29 0d 80 48 |list%(mid%,1)..H| 00009540 1e c8 99 22 57 69 6d 70 5f 4f 70 65 6e 57 69 6e |..."Wimp_OpenWin| 00009550 64 6f 77 22 2c 2c 42 6c 63 6b 25 0d 80 52 05 e1 |dow",,Blck%..R..| 00009560 0d 80 e8 26 dd f2 64 72 61 77 5f 73 75 62 28 73 |...&..draw_sub(s| 00009570 69 64 25 2c 72 65 61 73 6f 6e 25 2c 6d 61 69 6e |id%,reason%,main| 00009580 25 2c 62 68 25 29 0d 81 42 18 ea 61 25 2c 72 25 |%,bh%)..B..a%,r%| 00009590 2c 6f 73 5f 77 78 25 2c 6f 73 5f 77 79 25 0d 81 |,os_wx%,os_wy%..| 000095a0 60 10 e7 72 65 61 73 6f 6e 25 3c 3e 32 8c 0d 81 |`..reason%<>2...| 000095b0 88 1c 42 75 66 31 25 21 30 3d 53 75 62 6c 69 73 |..Buf1%!0=Sublis| 000095c0 74 25 28 73 69 64 25 2c 32 29 0d 81 92 22 c8 99 |t%(sid%,2)..."..| 000095d0 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 |"Wimp_GetWindowS| 000095e0 74 61 74 65 22 2c 2c 42 75 66 31 25 0d 81 9c 1d |tate",,Buf1%....| 000095f0 6f 73 5f 77 78 25 3d 28 42 75 66 31 25 21 34 2d |os_wx%=(Buf1%!4-| 00009600 42 75 66 31 25 21 32 30 29 0d 81 a6 1e 6f 73 5f |Buf1%!20)....os_| 00009610 77 79 25 3d 28 42 75 66 31 25 21 31 36 2d 42 75 |wy%=(Buf1%!16-Bu| 00009620 66 31 25 21 32 34 29 0d 81 b0 1c 42 75 66 32 25 |f1%!24)....Buf2%| 00009630 21 30 3d 53 75 62 6c 69 73 74 25 28 73 69 64 25 |!0=Sublist%(sid%| 00009640 2c 31 29 0d 81 ba 22 c8 99 22 57 69 6d 70 5f 47 |,1)...".."Wimp_G| 00009650 65 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c |etWindowState",,| 00009660 42 75 66 32 25 0d 81 c4 23 42 75 66 32 25 21 34 |Buf2%...#Buf2%!4| 00009670 3d 6f 73 5f 77 78 25 2b 53 75 62 6c 69 73 74 25 |=os_wx%+Sublist%| 00009680 28 73 69 64 25 2c 33 29 0d 81 ce 34 42 75 66 32 |(sid%,3)...4Buf2| 00009690 25 21 38 3d 6f 73 5f 77 79 25 2b 53 75 62 6c 69 |%!8=os_wy%+Subli| 000096a0 73 74 25 28 73 69 64 25 2c 34 29 2b 53 75 62 6c |st%(sid%,4)+Subl| 000096b0 69 73 74 25 28 73 69 64 25 2c 36 29 0d 81 d8 35 |ist%(sid%,6)...5| 000096c0 42 75 66 32 25 21 31 32 3d 6f 73 5f 77 78 25 2b |Buf2%!12=os_wx%+| 000096d0 53 75 62 6c 69 73 74 25 28 73 69 64 25 2c 33 29 |Sublist%(sid%,3)| 000096e0 2b 53 75 62 6c 69 73 74 25 28 73 69 64 25 2c 35 |+Sublist%(sid%,5| 000096f0 29 0d 81 e2 24 42 75 66 32 25 21 31 36 3d 6f 73 |)...$Buf2%!16=os| 00009700 5f 77 79 25 2b 53 75 62 6c 69 73 74 25 28 73 69 |_wy%+Sublist%(si| 00009710 64 25 2c 34 29 0d 81 ec 05 cd 0d 82 14 0e c8 8e |d%,4)...........| 00009720 72 65 61 73 6f 6e 25 ca 0d 82 1e 06 c9 30 0d 82 |reason%......0..| 00009730 d2 0f 42 75 66 32 25 21 32 38 3d 2d 31 0d 82 dc |..Buf2%!28=-1...| 00009740 1e c8 99 22 57 69 6d 70 5f 4f 70 65 6e 57 69 6e |..."Wimp_OpenWin| 00009750 64 6f 77 22 2c 2c 42 75 66 32 25 0d 82 f0 1c f2 |dow",,Buf2%.....| 00009760 73 65 74 5f 6c 69 73 74 5f 65 78 74 65 6e 74 28 |set_list_extent(| 00009770 73 69 64 25 2c b9 29 0d 82 fa 0b c8 8e 73 69 64 |sid%,.)......sid| 00009780 25 ca 0d 83 04 06 c9 31 0d 83 2c 2f f2 64 72 61 |%......1..,/.dra| 00009790 77 5f 6c 69 73 74 28 31 2c 4f 62 6a 73 25 2c 4f |w_list(1,Objs%,O| 000097a0 70 74 72 25 28 29 2c 4f 64 61 74 24 28 29 2c 4f |ptr%(),Odat$(),O| 000097b0 66 6c 67 25 28 29 29 0d 83 36 06 c9 32 0d 83 5e |flg%())..6..2..^| 000097c0 31 f2 64 72 61 77 5f 6c 69 73 74 28 32 2c 54 79 |1.draw_list(2,Ty| 000097d0 64 69 72 73 25 2c 54 79 70 74 25 28 29 2c 54 64 |dirs%,Typt%(),Td| 000097e0 69 72 24 28 29 2c 54 66 6c 67 25 28 29 29 0d 83 |ir$(),Tflg%())..| 000097f0 68 06 c9 33 0d 83 90 31 f2 64 72 61 77 5f 6c 69 |h..3...1.draw_li| 00009800 73 74 28 33 2c 54 6e 64 69 72 73 25 2c 54 6e 70 |st(3,Tndirs%,Tnp| 00009810 74 25 28 29 2c 54 64 69 72 24 28 29 2c 54 66 6c |t%(),Tdir$(),Tfl| 00009820 67 25 28 29 29 0d 83 9a 05 cb 0d 83 ae 06 c9 32 |g%())..........2| 00009830 0d 83 d6 0b c8 8e 73 69 64 25 ca 0d 83 e0 06 c9 |......sid%......| 00009840 31 0d 84 08 2f f2 64 72 61 77 5f 6c 69 73 74 28 |1.../.draw_list(| 00009850 31 2c 4f 62 6a 73 25 2c 4f 70 74 72 25 28 29 2c |1,Objs%,Optr%(),| 00009860 4f 64 61 74 24 28 29 2c 4f 66 6c 67 25 28 29 29 |Odat$(),Oflg%())| 00009870 0d 84 12 06 c9 32 0d 84 3a 31 f2 64 72 61 77 5f |.....2..:1.draw_| 00009880 6c 69 73 74 28 32 2c 54 79 64 69 72 73 25 2c 54 |list(2,Tydirs%,T| 00009890 79 70 74 25 28 29 2c 54 64 69 72 24 28 29 2c 54 |ypt%(),Tdir$(),T| 000098a0 66 6c 67 25 28 29 29 0d 84 44 06 c9 33 0d 84 6c |flg%())..D..3..l| 000098b0 31 f2 64 72 61 77 5f 6c 69 73 74 28 33 2c 54 6e |1.draw_list(3,Tn| 000098c0 64 69 72 73 25 2c 54 6e 70 74 25 28 29 2c 54 64 |dirs%,Tnpt%(),Td| 000098d0 69 72 24 28 29 2c 54 66 6c 67 25 28 29 29 0d 84 |ir$(),Tflg%())..| 000098e0 76 05 cb 0d 84 80 06 c9 33 0d 84 a8 10 42 75 66 |v.......3....Buf| 000098f0 32 25 21 32 38 3d 62 68 25 0d 84 b2 1e c8 99 22 |2%!28=bh%......"| 00009900 57 69 6d 70 5f 4f 70 65 6e 57 69 6e 64 6f 77 22 |Wimp_OpenWindow"| 00009910 2c 2c 42 75 66 32 25 0d 84 bc 05 cb 0d 84 c6 05 |,,Buf2%.........| 00009920 e1 0d 85 2a 23 dd f2 73 65 74 5f 6c 69 73 74 5f |...*#..set_list_| 00009930 65 78 74 65 6e 74 28 73 69 64 25 2c 72 65 64 72 |extent(sid%,redr| 00009940 61 77 25 29 0d 85 52 1c 42 6c 63 6b 25 21 30 3d |aw%)..R.Blck%!0=| 00009950 53 75 62 6c 69 73 74 25 28 73 69 64 25 2c 31 29 |Sublist%(sid%,1)| 00009960 0d 85 5c 26 c8 99 22 57 69 6d 70 5f 47 65 74 57 |..\&.."Wimp_GetW| 00009970 69 6e 64 6f 77 49 6e 66 6f 22 2c 2c 28 42 6c 63 |indowInfo",,(Blc| 00009980 6b 25 84 26 31 29 0d 85 66 0b c8 8e 73 69 64 25 |k%.&1)..f...sid%| 00009990 ca 0d 85 70 06 c9 31 0d 85 7a 1c 42 6c 63 6b 25 |...p..1..z.Blck%| 000099a0 21 34 38 3d 2d 46 6f 6e 74 5f 4c 68 25 2a 4f 62 |!48=-Font_Lh%*Ob| 000099b0 6a 73 25 0d 85 84 06 c9 32 0d 85 8e 1e 42 6c 63 |js%.....2....Blc| 000099c0 6b 25 21 34 38 3d 2d 46 6f 6e 74 5f 4c 68 25 2a |k%!48=-Font_Lh%*| 000099d0 54 79 64 69 72 73 25 0d 85 98 06 c9 33 0d 85 a2 |Tydirs%.....3...| 000099e0 1e 42 6c 63 6b 25 21 34 38 3d 2d 46 6f 6e 74 5f |.Blck%!48=-Font_| 000099f0 4c 68 25 2a 54 6e 64 69 72 73 25 0d 85 ac 05 cb |Lh%*Tndirs%.....| 00009a00 0d 85 b6 21 e7 42 6c 63 6b 25 21 34 38 3e 28 42 |...!.Blck%!48>(B| 00009a10 6c 63 6b 25 21 38 2d 42 6c 63 6b 25 21 31 36 29 |lck%!8-Blck%!16)| 00009a20 8c 0d 85 c0 1d 42 6c 63 6b 25 21 34 38 3d 42 6c |.....Blck%!48=Bl| 00009a30 63 6b 25 21 38 2d 42 6c 63 6b 25 21 31 36 0d 85 |ck%!8-Blck%!16..| 00009a40 ca 05 cd 0d 85 d4 27 c8 99 22 57 69 6d 70 5f 53 |......'.."Wimp_S| 00009a50 65 74 45 78 74 65 6e 74 22 2c 42 6c 63 6b 25 21 |etExtent",Blck%!| 00009a60 30 2c 42 6c 63 6b 25 2b 34 34 0d 85 de 0d e7 72 |0,Blck%+44.....r| 00009a70 65 64 72 61 77 25 8c 0d 86 10 1e c8 99 22 57 69 |edraw%......."Wi| 00009a80 6d 70 5f 4f 70 65 6e 57 69 6e 64 6f 77 22 2c 2c |mp_OpenWindow",,| 00009a90 42 6c 63 6b 25 0d 86 1a 05 cd 0d 86 24 05 e1 0d |Blck%.......$...| 00009aa0 86 6a 35 dd f2 64 72 61 77 5f 6c 69 73 74 28 73 |.j5..draw_list(s| 00009ab0 69 64 25 2c 6e 74 72 73 25 2c 70 74 72 73 25 28 |id%,ntrs%,ptrs%(| 00009ac0 29 2c 73 64 61 74 61 24 28 29 2c 66 6c 61 67 73 |),sdata$(),flags| 00009ad0 25 28 29 29 0d 86 ec 47 ea 66 68 25 2c 6d 25 2c |%())...G.fh%,m%,| 00009ae0 6f 73 5f 77 6c 25 2c 6f 73 5f 77 74 25 2c 77 6b |os_wl%,os_wt%,wk| 00009af0 5f 72 6c 25 2c 77 6b 5f 72 74 25 2c 77 6b 5f 72 |_rl%,wk_rt%,wk_r| 00009b00 62 25 2c 74 74 25 2c 74 62 25 2c 72 25 2c 65 25 |b%,tt%,tb%,r%,e%| 00009b10 2c 63 6c 73 25 2c 78 70 6f 73 25 0d 87 00 16 63 |,cls%,xpos%....c| 00009b20 6c 73 25 3d de 28 73 64 61 74 61 24 28 29 2c 32 |ls%=.(sdata$(),2| 00009b30 29 0d 87 0a 31 c8 99 22 46 6f 6e 74 5f 46 69 6e |)...1.."Font_Fin| 00009b40 64 46 6f 6e 74 22 2c 2c 46 6f 6e 74 5f 4e 61 6d |dFont",,Font_Nam| 00009b50 65 24 2c 31 39 32 2c 31 39 32 2c 30 2c 30 b8 66 |e$,192,192,0,0.f| 00009b60 68 25 0d 87 14 24 c8 99 22 46 6f 6e 74 5f 52 65 |h%...$.."Font_Re| 00009b70 61 64 49 6e 66 6f 22 2c 66 68 25 b8 2c 2c 66 62 |adInfo",fh%.,,fb| 00009b80 25 2c 2c 66 74 25 0d 87 1e 16 46 6f 6e 74 5f 4c |%,,ft%....Font_L| 00009b90 68 25 3d 66 74 25 2d 66 62 25 2b 34 0d 87 28 1c |h%=ft%-fb%+4..(.| 00009ba0 42 6c 63 6b 25 21 30 3d 53 75 62 6c 69 73 74 25 |Blck%!0=Sublist%| 00009bb0 28 73 69 64 25 2c 31 29 0d 87 32 23 c8 99 22 57 |(sid%,1)..2#.."W| 00009bc0 69 6d 70 5f 52 65 64 72 61 77 57 69 6e 64 6f 77 |imp_RedrawWindow| 00009bd0 22 2c 2c 42 6c 63 6b 25 b8 6d 25 0d 87 3c 05 f5 |",,Blck%.m%..<..| 00009be0 0d 87 64 2d e7 28 42 6c 63 6b 25 21 33 36 3e 42 |..d-.(Blck%!36>B| 00009bf0 6c 63 6b 25 21 32 38 29 80 28 42 6c 63 6b 25 21 |lck%!28).(Blck%!| 00009c00 34 30 3e 42 6c 63 6b 25 21 33 32 29 8c 0d 87 8c |40>Blck%!32)....| 00009c10 1d 6f 73 5f 77 6c 25 3d 28 42 6c 63 6b 25 21 34 |.os_wl%=(Blck%!4| 00009c20 2d 42 6c 63 6b 25 21 32 30 29 0d 87 96 1e 6f 73 |-Blck%!20)....os| 00009c30 5f 77 74 25 3d 28 42 6c 63 6b 25 21 31 36 2d 42 |_wt%=(Blck%!16-B| 00009c40 6c 63 6b 25 21 32 34 29 0d 87 c8 1a 77 6b 5f 72 |lck%!24)....wk_r| 00009c50 6c 25 3d 42 6c 63 6b 25 21 32 38 2d 6f 73 5f 77 |l%=Blck%!28-os_w| 00009c60 6c 25 0d 87 d2 1a 77 6b 5f 72 74 25 3d 42 6c 63 |l%....wk_rt%=Blc| 00009c70 6b 25 21 34 30 2d 6f 73 5f 77 74 25 0d 87 dc 1a |k%!40-os_wt%....| 00009c80 77 6b 5f 72 62 25 3d 42 6c 63 6b 25 21 33 32 2d |wk_rb%=Blck%!32-| 00009c90 6f 73 5f 77 74 25 0d 88 04 1d 74 74 25 3d a8 28 |os_wt%....tt%=.(| 00009ca0 2d 77 6b 5f 72 74 25 2f 46 6f 6e 74 5f 4c 68 25 |-wk_rt%/Font_Lh%| 00009cb0 29 2b 31 0d 88 0e 1d 74 62 25 3d a8 28 2d 77 6b |)+1....tb%=.(-wk| 00009cc0 5f 72 62 25 2f 46 6f 6e 74 5f 4c 68 25 29 2b 31 |_rb%/Font_Lh%)+1| 00009cd0 0d 88 54 0f e3 72 25 3d 74 74 25 b8 74 62 25 0d |..T..r%=tt%.tb%.| 00009ce0 88 86 10 70 25 3d 70 74 72 73 25 28 72 25 29 0d |...p%=ptrs%(r%).| 00009cf0 88 90 0a e7 70 25 3e 30 8c 0d 88 b8 0e e3 63 25 |....p%>0......c%| 00009d00 3d 31 b8 63 6c 73 25 0d 88 c2 1f e7 28 66 6c 61 |=1.cls%.....(fla| 00009d10 67 73 25 28 70 25 2c 63 25 29 80 26 31 30 30 29 |gs%(p%,c%).&100)| 00009d20 3d 26 31 30 30 8c 0d 88 ea 27 78 70 6f 73 25 3d |=&100....'xpos%=| 00009d30 28 66 6c 61 67 73 25 28 70 25 2c 63 25 29 80 26 |(flags%(p%,c%).&| 00009d40 66 66 66 66 30 30 30 30 29 3e 3e 31 36 0d 88 f4 |ffff0000)>>16...| 00009d50 32 c8 99 22 57 69 6d 70 5f 53 65 74 46 6f 6e 74 |2.."Wimp_SetFont| 00009d60 43 6f 6c 6f 75 72 73 22 2c 2c 30 2c 28 66 6c 61 |Colours",,0,(fla| 00009d70 67 73 25 28 70 25 2c 63 25 29 80 20 31 35 29 0d |gs%(p%,c%). 15).| 00009d80 88 fe 4d c8 99 22 46 6f 6e 74 5f 50 61 69 6e 74 |..M.."Font_Paint| 00009d90 22 2c 66 68 25 2c 73 64 61 74 61 24 28 70 25 2c |",fh%,sdata$(p%,| 00009da0 63 25 29 2c 31 36 2c 6f 73 5f 77 6c 25 2b 78 70 |c%),16,os_wl%+xp| 00009db0 6f 73 25 2c 6f 73 5f 77 74 25 2d 72 25 2a 46 6f |os%,os_wt%-r%*Fo| 00009dc0 6e 74 5f 4c 68 25 2d 66 62 25 2d 34 0d 89 08 05 |nt_Lh%-fb%-4....| 00009dd0 cd 0d 89 12 07 ed 63 25 0d 89 1c 05 cd 0d 89 26 |......c%.......&| 00009de0 07 ed 72 25 0d 89 30 05 cd 0d 89 3a 0b e7 6d 25 |..r%..0....:..m%| 00009df0 3c 3e 30 8c 0d 89 62 23 c8 99 22 57 69 6d 70 5f |<>0...b#.."Wimp_| 00009e00 47 65 74 52 65 63 74 61 6e 67 6c 65 22 2c 2c 42 |GetRectangle",,B| 00009e10 6c 63 6b 25 b8 6d 25 0d 89 6c 05 cd 0d 89 76 09 |lck%.m%..l....v.| 00009e20 fd 6d 25 3d 30 0d 89 80 05 e1 0d 89 c6 11 dd f2 |.m%=0...........| 00009e30 67 65 74 5f 61 70 70 6c 69 73 74 0d 8a 5c 29 ea |get_applist..\).| 00009e40 61 6c 69 6e 65 24 2c 66 31 25 2c 70 25 2c 6f 66 |aline$,f1%,p%,of| 00009e50 66 73 65 74 25 2c 61 70 70 24 2c 66 6f 75 6e 64 |fset%,app$,found| 00009e60 25 2c 72 25 0d 8a 84 0b 4f 62 6a 73 25 3d 30 0d |%,r%....Objs%=0.| 00009e70 8a 8e 0d 4f 66 6c 67 25 28 29 3d 37 0d 8a 98 0d |...Oflg%()=7....| 00009e80 4f 70 74 72 25 28 29 3d 30 0d 8a a2 0e 4f 64 61 |Optr%()=0....Oda| 00009e90 74 24 28 29 3d 22 22 0d 8a ac 11 c8 8e 45 64 69 |t$()=""......Edi| 00009ea0 74 5f 54 79 70 65 24 ca 0d 8a b6 10 c9 22 72 65 |t_Type$......"re| 00009eb0 73 6f 75 72 63 65 73 22 0d 8a de 3f f2 67 65 74 |sources"...?.get| 00009ec0 5f 66 69 6c 65 6c 69 73 74 65 64 28 22 3c 63 68 |_filelisted("<ch| 00009ed0 6f 69 63 65 73 24 77 72 69 74 65 3e 2e 42 6f 6f |oices$write>.Boo| 00009ee0 74 2e 50 72 65 44 65 73 6b 54 6f 70 22 2c 22 41 |t.PreDeskTop","A| 00009ef0 64 64 41 70 70 22 29 0d 8a e8 0b c9 22 62 6f 6f |ddApp")....."boo| 00009f00 74 22 0d 8b 10 40 f2 67 65 74 5f 66 69 6c 65 6c |t"...@.get_filel| 00009f10 69 73 74 65 64 28 22 3c 63 68 6f 69 63 65 73 24 |isted("<choices$| 00009f20 77 72 69 74 65 3e 2e 42 6f 6f 74 2e 44 65 73 6b |write>.Boot.Desk| 00009f30 74 6f 70 22 2c 22 46 69 6c 65 72 5f 42 6f 6f 74 |top","Filer_Boot| 00009f40 22 29 0d 8b 1a 0e c9 22 61 75 74 6f 72 75 6e 22 |")....."autorun"| 00009f50 0d 8b 42 26 f2 67 65 74 5f 64 69 72 6c 69 73 74 |..B&.get_dirlist| 00009f60 65 64 28 22 3c 42 6f 6f 74 24 54 6f 42 65 54 61 |ed("<Boot$ToBeTa| 00009f70 73 6b 73 3e 22 29 0d 8b 4c 0e c9 22 70 72 65 64 |sks>")..L.."pred| 00009f80 65 73 6b 22 0d 8b 74 27 f2 67 65 74 5f 64 69 72 |esk"..t'.get_dir| 00009f90 6c 69 73 74 65 64 28 22 3c 42 6f 6f 74 24 54 6f |listed("<Boot$To| 00009fa0 42 65 4c 6f 61 64 65 64 3e 22 29 0d 8b 7e 05 cb |BeLoaded>")..~..| 00009fb0 0d 8b a6 0f 4f 6e 74 72 25 3d 4f 62 6a 73 25 0d |....Ontr%=Objs%.| 00009fc0 8b b0 0f e3 72 25 3d 31 b8 4f 62 6a 73 25 0d 8b |....r%=1.Objs%..| 00009fd0 ba 10 4f 70 74 72 25 28 72 25 29 3d 72 25 0d 8b |..Optr%(r%)=r%..| 00009fe0 c4 29 4f 66 6c 67 25 28 72 25 2c 31 29 3d 4f 66 |.)Oflg%(r%,1)=Of| 00009ff0 6c 67 25 28 72 25 2c 31 29 84 28 32 34 3c 3c 31 |lg%(r%,1).(24<<1| 0000a000 36 29 84 26 31 30 30 0d 8b ce 2a 4f 66 6c 67 25 |6).&100...*Oflg%| 0000a010 28 72 25 2c 32 29 3d 4f 66 6c 67 25 28 72 25 2c |(r%,2)=Oflg%(r%,| 0000a020 32 29 84 28 32 30 30 3c 3c 31 36 29 84 26 31 30 |2).(200<<16).&10| 0000a030 30 0d 8b d8 11 c8 8e 45 64 69 74 5f 54 79 70 65 |0......Edit_Type| 0000a040 24 ca 0d 8b e2 0b c9 22 62 6f 6f 74 22 0d 8b ec |$......"boot"...| 0000a050 2a 4f 66 6c 67 25 28 72 25 2c 34 29 3d 4f 66 6c |*Oflg%(r%,4)=Ofl| 0000a060 67 25 28 72 25 2c 34 29 84 28 35 31 32 3c 3c 31 |g%(r%,4).(512<<1| 0000a070 36 29 84 26 31 30 30 0d 8b f6 10 c9 22 72 65 73 |6).&100....."res| 0000a080 6f 75 72 63 65 73 22 0d 8c 00 2a 4f 66 6c 67 25 |ources"...*Oflg%| 0000a090 28 72 25 2c 34 29 3d 4f 66 6c 67 25 28 72 25 2c |(r%,4)=Oflg%(r%,| 0000a0a0 34 29 84 28 35 31 32 3c 3c 31 36 29 84 26 31 30 |4).(512<<16).&10| 0000a0b0 30 0d 8c 0a 0e c9 22 61 75 74 6f 72 75 6e 22 0d |0....."autorun".| 0000a0c0 8c 14 2a 4f 66 6c 67 25 28 72 25 2c 34 29 3d 4f |..*Oflg%(r%,4)=O| 0000a0d0 66 6c 67 25 28 72 25 2c 34 29 84 28 34 38 30 3c |flg%(r%,4).(480<| 0000a0e0 3c 31 36 29 84 26 31 30 30 0d 8c 1e 0e c9 22 70 |<16).&100....."p| 0000a0f0 72 65 64 65 73 6b 22 0d 8c 28 2a 4f 66 6c 67 25 |redesk"..(*Oflg%| 0000a100 28 72 25 2c 34 29 3d 4f 66 6c 67 25 28 72 25 2c |(r%,4)=Oflg%(r%,| 0000a110 34 29 84 28 34 30 30 3c 3c 31 36 29 84 26 31 30 |4).(400<<16).&10| 0000a120 30 0d 8c 32 05 cb 0d 8c 3c 07 ed 72 25 0d 8c 46 |0..2....<..r%..F| 0000a130 05 e1 0d 8c 8c 20 dd f2 67 65 74 5f 66 69 6c 65 |..... ..get_file| 0000a140 6c 69 73 74 65 64 28 66 69 6c 65 24 2c 63 6f 6d |listed(file$,com| 0000a150 24 29 0d 8c b4 12 ea 66 31 25 2c 61 6c 69 6e 65 |$).....f1%,aline| 0000a160 24 2c 70 25 0d 8c c8 10 66 31 25 3d 8e 28 66 69 |$,p%....f1%=.(fi| 0000a170 6c 65 24 29 0d 8c d2 05 f5 0d 8c dc 10 61 6c 69 |le$).........ali| 0000a180 6e 65 24 3d be 23 66 31 25 0d 8c e6 5f fd 28 a7 |ne$=.#f1%..._.(.| 0000a190 61 6c 69 6e 65 24 2c 22 7c 53 74 61 72 74 22 29 |aline$,"|Start")| 0000a1a0 3e 30 80 a7 61 6c 69 6e 65 24 2c 22 4d 61 72 73 |>0..aline$,"Mars| 0000a1b0 22 29 3e 30 80 a7 61 6c 69 6e 65 24 2c 22 21 42 |")>0..aline$,"!B| 0000a1c0 6f 6f 74 70 6c 75 73 22 29 3e 30 80 a7 61 6c 69 |ootplus")>0..ali| 0000a1d0 6e 65 24 2c 45 64 69 74 5f 54 79 70 65 24 29 3e |ne$,Edit_Type$)>| 0000a1e0 30 29 84 c5 23 66 31 25 0d 8c f0 0c e7 ac c5 23 |0)..#f1%.......#| 0000a1f0 66 31 25 8c 0d 8d 18 05 f5 0d 8d 22 10 61 6c 69 |f1%........".ali| 0000a200 6e 65 24 3d be 23 66 31 25 0d 8d 2c 15 e7 a7 61 |ne$=.#f1%..,...a| 0000a210 6c 69 6e 65 24 2c 63 6f 6d 24 29 3d 31 8c 0d 8d |line$,com$)=1...| 0000a220 36 14 70 25 3d a7 61 6c 69 6e 65 24 2c 22 2e 21 |6.p%=.aline$,".!| 0000a230 22 29 0d 8d 40 0a e7 70 25 3e 30 8c 0d 8d 4a 0c |")..@..p%>0...J.| 0000a240 4f 62 6a 73 25 2b 3d 31 0d 8d 54 20 4f 64 61 74 |Objs%+=1..T Odat| 0000a250 24 28 4f 62 6a 73 25 2c 31 29 3d c1 61 6c 69 6e |$(Objs%,1)=.alin| 0000a260 65 24 2c 70 25 2b 31 29 0d 8d 5e 24 4f 64 61 74 |e$,p%+1)..^$Odat| 0000a270 24 28 4f 62 6a 73 25 2c 32 29 3d 22 41 70 70 20 |$(Objs%,2)="App | 0000a280 28 72 65 66 65 72 65 6e 63 65 29 22 0d 8d 68 19 |(reference)"..h.| 0000a290 4f 64 61 74 24 28 4f 62 6a 73 25 2c 33 29 3d 22 |Odat$(Objs%,3)="| 0000a2a0 32 30 30 30 22 0d 8d 90 13 70 25 3d a7 61 6c 69 |2000"....p%=.ali| 0000a2b0 6e 65 24 2c 22 20 22 29 0d 8d 9a 20 4f 64 61 74 |ne$," ")... Odat| 0000a2c0 24 28 4f 62 6a 73 25 2c 35 29 3d c1 61 6c 69 6e |$(Objs%,5)=.alin| 0000a2d0 65 24 2c 70 25 2b 31 29 0d 8d a4 24 c8 99 22 4f |e$,p%+1)...$.."O| 0000a2e0 53 5f 46 69 6c 65 22 2c 32 33 2c 4f 64 61 74 24 |S_File",23,Odat$| 0000a2f0 28 4f 62 6a 73 25 2c 35 29 b8 70 25 0d 8d ae 0a |(Objs%,5).p%....| 0000a300 e7 70 25 3d 30 8c 0d 8d b8 25 4f 64 61 74 24 28 |.p%=0....%Odat$(| 0000a310 4f 62 6a 73 25 2c 34 29 3d 22 4f 72 69 67 69 6e |Objs%,4)="Origin| 0000a320 61 6c 20 4d 69 73 73 69 6e 67 22 0d 8d c2 15 4f |al Missing"....O| 0000a330 66 6c 67 25 28 4f 62 6a 73 25 2c 34 29 3d 31 31 |flg%(Objs%,4)=11| 0000a340 0d 8d cc 05 cd 0d 8d d6 19 f2 63 68 65 63 6b 5f |..........check_| 0000a350 73 74 61 6e 64 61 72 64 5f 65 6e 74 72 79 0d 8d |standard_entry..| 0000a360 e0 05 cd 0d 8d ea 05 cd 0d 8d f4 1c fd a7 61 6c |..............al| 0000a370 69 6e 65 24 2c 22 7c 45 6e 64 22 29 3e 30 84 c5 |ine$,"|End")>0..| 0000a380 23 66 31 25 0d 8d fe 05 cd 0d 8e 08 09 d9 23 66 |#f1%..........#f| 0000a390 31 25 0d 8e 12 05 e1 0d 8e 58 19 dd f2 67 65 74 |1%.......X...get| 0000a3a0 5f 64 69 72 6c 69 73 74 65 64 28 64 69 72 24 29 |_dirlisted(dir$)| 0000a3b0 0d 8e 80 34 ea 66 69 6c 65 24 2c 6f 66 66 73 65 |...4.file$,offse| 0000a3c0 74 25 2c 66 6f 75 6e 64 25 2c 6c 25 2c 70 25 2c |t%,found%,l%,p%,| 0000a3d0 6c 24 2c 66 25 2c 61 24 2c 62 24 2c 63 24 2c 61 |l$,f%,a$,b$,c$,a| 0000a3e0 25 2c 63 25 0d 8e 94 0d 6f 66 66 73 65 74 25 3d |%,c%....offset%=| 0000a3f0 30 0d 8e 9e 05 f5 0d 8e a8 39 c8 99 22 4f 53 5f |0........9.."OS_| 0000a400 47 42 50 42 22 2c 31 32 2c 64 69 72 24 2c 42 75 |GBPB",12,dir$,Bu| 0000a410 66 31 25 2c 31 2c 6f 66 66 73 65 74 25 2c 31 32 |f1%,1,offset%,12| 0000a420 38 2c 30 b8 2c 2c 2c 2c 6f 66 66 73 65 74 25 0d |8,0.,,,,offset%.| 0000a430 8e b2 1f e7 6f 66 66 73 65 74 25 3c 3e 2d 31 80 |....offset%<>-1.| 0000a440 20 42 75 66 31 25 21 32 30 3c 3e 2d 31 8c 0d 8e | Buf1%!20<>-1...| 0000a450 bc 0f c8 8e 42 75 66 31 25 21 32 30 ca 0d 8e c6 |....Buf1%!20....| 0000a460 0a c9 26 31 30 30 30 0d 8e ee 0c 4f 62 6a 73 25 |..&1000....Objs%| 0000a470 2b 3d 31 0d 8e f8 26 4f 64 61 74 24 28 4f 62 6a |+=1...&Odat$(Obj| 0000a480 73 25 2c 31 29 3d a4 69 6e 64 69 72 65 63 74 28 |s%,1)=.indirect(| 0000a490 42 75 66 31 25 2b 32 34 29 0d 8f 02 1e 4f 64 61 |Buf1%+24)....Oda| 0000a4a0 74 24 28 4f 62 6a 73 25 2c 32 29 3d 22 44 69 72 |t$(Objs%,2)="Dir| 0000a4b0 65 63 74 6f 72 79 22 0d 8f 0c 19 4f 64 61 74 24 |ectory"....Odat$| 0000a4c0 28 4f 62 6a 73 25 2c 33 29 3d 22 31 30 30 30 22 |(Objs%,3)="1000"| 0000a4d0 0d 8f 16 11 c8 8e 45 64 69 74 5f 54 79 70 65 24 |......Edit_Type$| 0000a4e0 ca 0d 8f 2a 05 cb 0d 8f 34 15 4f 64 61 74 24 28 |...*....4.Odat$(| 0000a4f0 4f 62 6a 73 25 2c 34 29 3d 22 22 0d 8f 3e 2a 4f |Objs%,4)=""..>*O| 0000a500 64 61 74 24 28 4f 62 6a 73 25 2c 35 29 3d 64 69 |dat$(Objs%,5)=di| 0000a510 72 24 2b 22 2e 22 2b 4f 64 61 74 24 28 4f 62 6a |r$+"."+Odat$(Obj| 0000a520 73 25 2c 31 29 0d 8f 48 0a c9 26 32 30 30 30 0d |s%,1)..H..&2000.| 0000a530 8f 70 0c 4f 62 6a 73 25 2b 3d 31 0d 8f 7a 26 4f |.p.Objs%+=1..z&O| 0000a540 64 61 74 24 28 4f 62 6a 73 25 2c 31 29 3d a4 69 |dat$(Objs%,1)=.i| 0000a550 6e 64 69 72 65 63 74 28 42 75 66 31 25 2b 32 34 |ndirect(Buf1%+24| 0000a560 29 0d 8f 84 2a 4f 64 61 74 24 28 4f 62 6a 73 25 |)...*Odat$(Objs%| 0000a570 2c 35 29 3d 64 69 72 24 2b 22 2e 22 2b 4f 64 61 |,5)=dir$+"."+Oda| 0000a580 74 24 28 4f 62 6a 73 25 2c 31 29 0d 8f 8e 4f c8 |t$(Objs%,1)...O.| 0000a590 99 22 4f 53 5f 47 42 50 42 22 2c 31 30 2c 64 69 |."OS_GBPB",10,di| 0000a5a0 72 24 2b 22 2e 22 2b 4f 64 61 74 24 28 4f 62 6a |r$+"."+Odat$(Obj| 0000a5b0 73 25 2c 31 29 2c 42 75 66 31 25 2c 31 30 2c 30 |s%,1),Buf1%,10,0| 0000a5c0 2c 32 30 30 2c 22 21 53 70 72 69 74 65 73 2a 22 |,200,"!Sprites*"| 0000a5d0 b8 2c 2c 2c 66 6f 75 6e 64 25 0d 8f 98 0e e7 66 |.,,,found%.....f| 0000a5e0 6f 75 6e 64 25 3d 30 8c 0d 8f c0 35 c8 99 22 4f |ound%=0....5.."O| 0000a5f0 53 5f 46 69 6c 65 22 2c 32 30 2c 64 69 72 24 2b |S_File",20,dir$+| 0000a600 22 2e 22 2b 4f 64 61 74 24 28 4f 62 6a 73 25 2c |"."+Odat$(Objs%,| 0000a610 31 29 2b 22 2e 21 52 75 6e 22 b8 66 25 0d 8f ca |1)+".!Run".f%...| 0000a620 0a e7 66 25 3d 30 8c 0d 8f f2 20 4f 64 61 74 24 |..f%=0.... Odat$| 0000a630 28 4f 62 6a 73 25 2c 32 29 3d 22 41 70 70 20 28 |(Objs%,2)="App (| 0000a640 66 75 6c 6c 3f 29 22 0d 8f fc 21 4f 64 61 74 24 |full?)"...!Odat$| 0000a650 28 4f 62 6a 73 25 2c 34 29 3d 22 4e 6f 20 21 72 |(Objs%,4)="No !r| 0000a660 75 6e 20 66 69 6c 65 22 0d 90 06 15 4f 66 6c 67 |un file"....Oflg| 0000a670 25 28 4f 62 6a 73 25 2c 34 29 3d 31 31 0d 90 10 |%(Objs%,4)=11...| 0000a680 05 cc 0d 90 38 20 4f 64 61 74 24 28 4f 62 6a 73 |....8 Odat$(Objs| 0000a690 25 2c 32 29 3d 22 41 70 70 20 28 61 6c 69 61 73 |%,2)="App (alias| 0000a6a0 29 22 0d 90 42 29 66 25 3d 8e 28 64 69 72 24 2b |)"..B)f%=.(dir$+| 0000a6b0 22 2e 22 2b 4f 64 61 74 24 28 4f 62 6a 73 25 2c |"."+Odat$(Objs%,| 0000a6c0 31 29 2b 22 2e 21 52 75 6e 22 29 0d 90 4c 0b 6c |1)+".!Run")..L.l| 0000a6d0 24 3d be 23 66 25 0d 90 56 08 d9 23 66 25 0d 90 |$=.#f%..V..#f%..| 0000a6e0 60 0e 6c 24 3d c1 6c 24 2c 31 31 29 0d 90 6a 18 |`.l$=.l$,11)..j.| 0000a6f0 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 32 33 2c 6c |.."OS_File",23,l| 0000a700 24 b8 70 25 0d 90 74 0a e7 70 25 3d 30 8c 0d 90 |$.p%..t..p%=0...| 0000a710 7e 25 4f 64 61 74 24 28 4f 62 6a 73 25 2c 34 29 |~%Odat$(Objs%,4)| 0000a720 3d 22 4f 72 69 67 69 6e 61 6c 20 4d 69 73 73 69 |="Original Missi| 0000a730 6e 67 22 0d 90 88 15 4f 66 6c 67 25 28 4f 62 6a |ng"....Oflg%(Obj| 0000a740 73 25 2c 34 29 3d 31 31 0d 90 92 05 cd 0d 90 9c |s%,4)=11........| 0000a750 05 cd 0d 90 a6 05 cc 0d 90 ce 1f 4f 64 61 74 24 |...........Odat$| 0000a760 28 4f 62 6a 73 25 2c 32 29 3d 22 41 70 70 20 28 |(Objs%,2)="App (| 0000a770 66 75 6c 6c 29 22 0d 90 d8 05 cd 0d 90 e2 19 4f |full)".........O| 0000a780 64 61 74 24 28 4f 62 6a 73 25 2c 33 29 3d 22 32 |dat$(Objs%,3)="2| 0000a790 30 30 30 22 0d 90 ec 05 7f 0d 91 14 0c 4f 62 6a |000".........Obj| 0000a7a0 73 25 2b 3d 31 0d 91 1e 26 4f 64 61 74 24 28 4f |s%+=1...&Odat$(O| 0000a7b0 62 6a 73 25 2c 31 29 3d a4 69 6e 64 69 72 65 63 |bjs%,1)=.indirec| 0000a7c0 74 28 42 75 66 31 25 2b 32 34 29 0d 91 28 2a 4f |t(Buf1%+24)..(*O| 0000a7d0 64 61 74 24 28 4f 62 6a 73 25 2c 35 29 3d 64 69 |dat$(Objs%,5)=di| 0000a7e0 72 24 2b 22 2e 22 2b 4f 64 61 74 24 28 4f 62 6a |r$+"."+Odat$(Obj| 0000a7f0 73 25 2c 31 29 0d 91 32 2d c8 99 22 4f 53 5f 43 |s%,1)..2-.."OS_C| 0000a800 6f 6e 76 65 72 74 48 65 78 34 22 2c 42 75 66 31 |onvertHex4",Buf1| 0000a810 25 21 32 30 2c 42 75 66 32 25 2c 31 32 38 b8 2c |%!20,Buf2%,128.,| 0000a820 70 25 0d 91 3c 0a 3f 70 25 3d 31 33 0d 91 46 1d |p%..<.?p%=13..F.| 0000a830 4f 64 61 74 24 28 4f 62 6a 73 25 2c 33 29 3d c2 |Odat$(Objs%,3)=.| 0000a840 24 42 75 66 32 25 2c 33 29 0d 91 50 45 c8 99 22 |$Buf2%,3)..PE.."| 0000a850 58 4f 53 5f 52 65 61 64 56 61 72 56 61 6c 22 2c |XOS_ReadVarVal",| 0000a860 22 46 69 6c 65 24 54 79 70 65 5f 22 2b 4f 64 61 |"File$Type_"+Oda| 0000a870 74 24 28 4f 62 6a 73 25 2c 33 29 2c 42 75 66 31 |t$(Objs%,3),Buf1| 0000a880 25 2c 31 32 38 2c 30 2c 33 b8 2c 2c 6c 25 0d 91 |%,128,0,3.,,l%..| 0000a890 5a 0a e7 6c 25 3d 30 8c 0d 91 82 25 4f 64 61 74 |Z..l%=0....%Odat| 0000a8a0 24 28 4f 62 6a 73 25 2c 32 29 3d 22 26 22 2b 4f |$(Objs%,2)="&"+O| 0000a8b0 64 61 74 24 28 4f 62 6a 73 25 2c 33 29 0d 91 8c |dat$(Objs%,3)...| 0000a8c0 05 cc 0d 91 b4 0f 42 75 66 31 25 3f 6c 25 3d 31 |......Buf1%?l%=1| 0000a8d0 33 0d 91 be 19 4f 64 61 74 24 28 4f 62 6a 73 25 |3....Odat$(Objs%| 0000a8e0 2c 32 29 3d 24 42 75 66 31 25 0d 91 c8 05 cd 0d |,2)=$Buf1%......| 0000a8f0 91 d2 05 cb 0d 91 fa 17 e7 4f 64 61 74 24 28 4f |.........Odat$(O| 0000a900 62 6a 73 25 2c 34 29 3d 22 22 8c 0d 92 04 08 63 |bjs%,4)="".....c| 0000a910 25 3d 30 0d 92 0e 05 f5 0d 92 18 09 63 25 2b 3d |%=0.........c%+=| 0000a920 31 0d 92 22 5e e7 28 42 6f 6f 74 5f 54 79 70 65 |1.."^.(Boot_Type| 0000a930 24 28 63 25 2c 31 29 3d 45 64 69 74 5f 54 79 70 |$(c%,1)=Edit_Typ| 0000a940 65 24 29 80 28 28 42 6f 6f 74 5f 54 79 70 65 24 |e$).((Boot_Type$| 0000a950 28 63 25 2c 32 29 3d 4f 64 61 74 24 28 4f 62 6a |(c%,2)=Odat$(Obj| 0000a960 73 25 2c 33 29 29 84 28 42 6f 6f 74 5f 54 79 70 |s%,3)).(Boot_Typ| 0000a970 65 24 28 63 25 2c 32 29 3d 22 2a 22 29 29 8c 0d |e$(c%,2)="*"))..| 0000a980 92 2c 23 4f 64 61 74 24 28 4f 62 6a 73 25 2c 34 |.,#Odat$(Objs%,4| 0000a990 29 3d 42 6f 6f 74 5f 54 79 70 65 24 28 63 25 2c |)=Boot_Type$(c%,| 0000a9a0 33 29 0d 92 36 05 cd 0d 92 40 2a fd 28 63 25 3d |3)..6....@*.(c%=| 0000a9b0 42 6f 6f 74 5f 54 79 70 65 73 25 29 84 28 4f 64 |Boot_Types%).(Od| 0000a9c0 61 74 24 28 4f 62 6a 73 25 2c 34 29 3c 3e 22 22 |at$(Objs%,4)<>""| 0000a9d0 29 0d 92 4a 05 cd 0d 92 54 19 f2 63 68 65 63 6b |)..J....T..check| 0000a9e0 5f 73 74 61 6e 64 61 72 64 5f 65 6e 74 72 79 0d |_standard_entry.| 0000a9f0 92 5e 05 cd 0d 92 68 0f fd 6f 66 66 73 65 74 25 |.^....h..offset%| 0000aa00 3d 2d 31 0d 92 72 05 e1 0d 92 c2 1a dd f2 63 68 |=-1..r........ch| 0000aa10 65 63 6b 5f 73 74 61 6e 64 61 72 64 5f 65 6e 74 |eck_standard_ent| 0000aa20 72 79 0d 92 ea 07 ea 63 25 0d 92 fe 14 e3 63 25 |ry.....c%.....c%| 0000aa30 3d 31 b8 53 74 61 6e 64 61 72 64 73 25 0d 93 08 |=1.Standards%...| 0000aa40 43 e7 28 53 74 61 6e 64 61 72 64 24 28 63 25 2c |C.(Standard$(c%,| 0000aa50 31 29 3d 45 64 69 74 5f 54 79 70 65 24 29 80 28 |1)=Edit_Type$).(| 0000aa60 53 74 61 6e 64 61 72 64 24 28 63 25 2c 32 29 3d |Standard$(c%,2)=| 0000aa70 4f 64 61 74 24 28 4f 62 6a 73 25 2c 31 29 29 8c |Odat$(Objs%,1)).| 0000aa80 0d 93 30 14 4f 66 6c 67 25 28 4f 62 6a 73 25 2c |..0.Oflg%(Objs%,| 0000aa90 31 29 3d 35 0d 93 3a 14 4f 66 6c 67 25 28 4f 62 |1)=5..:.Oflg%(Ob| 0000aaa0 6a 73 25 2c 32 29 3d 35 0d 93 44 14 4f 66 6c 67 |js%,2)=5..D.Oflg| 0000aab0 25 28 4f 62 6a 73 25 2c 33 29 3d 35 0d 93 4e 14 |%(Objs%,3)=5..N.| 0000aac0 4f 66 6c 67 25 28 4f 62 6a 73 25 2c 34 29 3d 35 |Oflg%(Objs%,4)=5| 0000aad0 0d 93 58 15 4f 66 6c 67 25 28 4f 62 6a 73 25 2c |..X.Oflg%(Objs%,| 0000aae0 35 29 3d 36 34 0d 93 62 05 cd 0d 93 6c 07 ed 63 |5)=64..b....l..c| 0000aaf0 25 0d 93 76 05 e1 0d 93 bc 16 dd f2 63 68 65 63 |%..v........chec| 0000ab00 6b 5f 69 66 5f 61 70 70 6c 69 65 64 0d 93 d0 07 |k_if_applied....| 0000ab10 ea 6b 25 0d 93 e4 0d e7 ac 53 61 76 65 64 25 8c |.k%......Saved%.| 0000ab20 0d 93 ee 35 f2 65 72 72 6f 72 5f 6d 65 73 73 61 |...5.error_messa| 0000ab30 67 65 28 22 45 4d 32 34 22 2c 45 64 69 74 5f 54 |ge("EM24",Edit_T| 0000ab40 79 70 65 24 2c 22 22 2c 22 45 54 33 22 2c 26 31 |ype$,"","ET3",&1| 0000ab50 33 2c 6b 25 29 0d 93 f8 0a e7 6b 25 3d 31 8c 0d |3,k%).....k%=1..| 0000ab60 94 20 17 f2 61 70 70 6c 79 5f 65 64 69 74 5f 63 |. ..apply_edit_c| 0000ab70 68 61 6e 67 65 73 0d 94 2a 05 cd 0d 94 34 05 cd |hanges..*....4..| 0000ab80 0d 94 3e 0c 53 61 76 65 64 25 3d b9 0d 94 48 05 |..>.Saved%=...H.| 0000ab90 e1 0d 94 98 18 dd f2 61 70 70 6c 79 5f 65 64 69 |.......apply_edi| 0000aba0 74 5f 63 68 61 6e 67 65 73 0d 94 c0 07 ea 72 25 |t_changes.....r%| 0000abb0 0d 94 d4 0f e3 72 25 3d 31 b8 4f 6e 74 72 25 0d |.....r%=1.Ontr%.| 0000abc0 94 de 12 c8 8e 4f 66 6c 67 25 28 72 25 2c 35 29 |.....Oflg%(r%,5)| 0000abd0 ca 0d 94 e8 07 c9 31 36 0d 95 10 1f f2 6d 6f 64 |......16.....mod| 0000abe0 69 66 79 5f 62 6f 6f 74 28 72 25 2c 22 72 65 6d |ify_boot(r%,"rem| 0000abf0 6f 76 65 22 2c a3 29 0d 95 1a 07 c9 33 32 0d 95 |ove",.).....32..| 0000ac00 42 1f f2 6d 6f 64 69 66 79 5f 62 6f 6f 74 28 72 |B..modify_boot(r| 0000ac10 25 2c 22 69 6e 73 65 72 74 22 2c a3 29 0d 95 4c |%,"insert",.)..L| 0000ac20 05 7f 0d 95 74 05 cb 0d 95 7e 07 ed 72 25 0d 95 |....t....~..r%..| 0000ac30 88 05 e1 0d 95 ce 26 dd f2 6d 6f 64 69 66 79 5f |......&..modify_| 0000ac40 62 6f 6f 74 28 6e 74 72 79 25 2c 6d 6f 64 65 24 |boot(ntry%,mode$| 0000ac50 2c 6e 6f 6d 65 73 73 25 29 0d 96 00 05 ea 0d 96 |,nomess%).......| 0000ac60 14 11 c8 8e 45 64 69 74 5f 54 79 70 65 24 ca 0d |....Edit_Type$..| 0000ac70 96 1e 0e c9 22 61 75 74 6f 72 75 6e 22 0d 96 28 |...."autorun"..(| 0000ac80 34 f2 6d 6f 64 69 66 79 5f 62 6f 6f 74 5f 64 69 |4.modify_boot_di| 0000ac90 72 28 6e 74 72 79 25 2c 22 3c 42 6f 6f 74 24 54 |r(ntry%,"<Boot$T| 0000aca0 6f 42 65 54 61 73 6b 73 3e 22 2c 6d 6f 64 65 24 |oBeTasks>",mode$| 0000acb0 29 0d 96 32 10 c9 22 72 65 73 6f 75 72 63 65 73 |)..2.."resources| 0000acc0 22 0d 96 3c 33 f2 6d 6f 64 69 66 79 5f 62 6f 6f |"..<3.modify_boo| 0000acd0 74 5f 66 69 6c 65 28 4f 64 61 74 24 28 6e 74 72 |t_file(Odat$(ntr| 0000ace0 79 25 2c 35 29 2c 6d 6f 64 65 24 2c 6e 6f 6d 65 |y%,5),mode$,nome| 0000acf0 73 73 25 29 0d 96 46 0b c9 22 62 6f 6f 74 22 0d |ss%)..F.."boot".| 0000ad00 96 50 33 f2 6d 6f 64 69 66 79 5f 62 6f 6f 74 5f |.P3.modify_boot_| 0000ad10 66 69 6c 65 28 4f 64 61 74 24 28 6e 74 72 79 25 |file(Odat$(ntry%| 0000ad20 2c 35 29 2c 6d 6f 64 65 24 2c 6e 6f 6d 65 73 73 |,5),mode$,nomess| 0000ad30 25 29 0d 96 5a 0e c9 22 70 72 65 64 65 73 6b 22 |%)..Z.."predesk"| 0000ad40 0d 96 64 35 f2 6d 6f 64 69 66 79 5f 62 6f 6f 74 |..d5.modify_boot| 0000ad50 5f 64 69 72 28 6e 74 72 79 25 2c 22 3c 42 6f 6f |_dir(ntry%,"<Boo| 0000ad60 74 24 54 6f 42 65 4c 6f 61 64 65 64 3e 22 2c 6d |t$ToBeLoaded>",m| 0000ad70 6f 64 65 24 29 0d 96 6e 05 cb 0d 96 78 05 e1 0d |ode$)..n....x...| 0000ad80 96 d2 1b dd f2 6d 61 6b 65 5f 61 6c 69 61 73 28 |.....make_alias(| 0000ad90 70 61 74 68 6e 61 6d 65 24 29 0d 97 0e 0a ea 66 |pathname$).....f| 0000ada0 25 2c 6c 25 0d 97 22 21 c8 99 22 4f 53 5f 46 69 |%,l%.."!.."OS_Fi| 0000adb0 6c 65 22 2c 38 2c 70 61 74 68 6e 61 6d 65 24 2c |le",8,pathname$,| 0000adc0 30 2c 30 2c 30 0d 97 2c 2d c8 99 22 4f 53 5f 46 |0,0,0..,-.."OS_F| 0000add0 69 6c 65 22 2c 31 31 2c 70 61 74 68 6e 61 6d 65 |ile",11,pathname| 0000ade0 24 2b 22 2e 21 52 75 6e 22 2c 26 46 45 42 2c 30 |$+".!Run",&FEB,0| 0000adf0 2c 30 0d 97 36 2e c8 99 22 4f 53 5f 46 69 6c 65 |,0..6..."OS_File| 0000ae00 22 2c 31 31 2c 70 61 74 68 6e 61 6d 65 24 2b 22 |",11,pathname$+"| 0000ae10 2e 21 42 6f 6f 74 22 2c 26 46 45 42 2c 30 2c 30 |.!Boot",&FEB,0,0| 0000ae20 0d 97 40 2e c8 99 22 4f 53 5f 46 69 6c 65 22 2c |..@..."OS_File",| 0000ae30 31 31 2c 70 61 74 68 6e 61 6d 65 24 2b 22 2e 21 |11,pathname$+".!| 0000ae40 48 65 6c 70 22 2c 26 46 46 46 2c 30 2c 30 0d 97 |Help",&FFF,0,0..| 0000ae50 72 25 e7 c0 53 6f 75 72 63 65 24 2c 31 29 3d 22 |r%..Source$,1)="| 0000ae60 3c 22 80 c2 53 6f 75 72 63 65 24 2c 31 29 3d 22 |<"..Source$,1)="| 0000ae70 3e 22 8c 0d 97 7c 41 c8 99 22 4f 53 5f 52 65 61 |>"...|A.."OS_Rea| 0000ae80 64 56 61 72 56 61 6c 22 2c c1 53 6f 75 72 63 65 |dVarVal",.Source| 0000ae90 24 2c 32 2c a9 28 53 6f 75 72 63 65 24 29 2d 32 |$,2,.(Source$)-2| 0000aea0 29 2c 42 75 66 31 25 2c 31 32 38 2c 30 2c 30 b8 |),Buf1%,128,0,0.| 0000aeb0 2c 2c 6c 25 0d 97 86 0f 42 75 66 31 25 3f 6c 25 |,,l%....Buf1%?l%| 0000aec0 3d 31 33 0d 97 90 12 53 6f 75 72 63 65 24 3d 24 |=13....Source$=$| 0000aed0 42 75 66 31 25 0d 97 9a 05 cd 0d 97 c2 1b 66 25 |Buf1%.........f%| 0000aee0 3d ad 28 70 61 74 68 6e 61 6d 65 24 2b 22 2e 21 |=.(pathname$+".!| 0000aef0 52 75 6e 22 29 0d 97 cc 1d d5 23 66 25 2c 22 46 |Run").....#f%,"F| 0000af00 69 6c 65 72 5f 52 75 6e 20 22 2b 53 6f 75 72 63 |iler_Run "+Sourc| 0000af10 65 24 0d 97 d6 08 d9 23 66 25 0d 97 fe 1c 66 25 |e$.....#f%....f%| 0000af20 3d ad 28 70 61 74 68 6e 61 6d 65 24 2b 22 2e 21 |=.(pathname$+".!| 0000af30 42 6f 6f 74 22 29 0d 98 08 4d d5 23 66 25 2c 22 |Boot")...M.#f%,"| 0000af40 49 66 54 68 65 72 65 20 22 2b 53 6f 75 72 63 65 |IfThere "+Source| 0000af50 24 2b 22 2e 21 53 70 72 69 74 65 73 20 54 68 65 |$+".!Sprites The| 0000af60 6e 20 49 63 6f 6e 53 70 72 69 74 65 73 20 22 2b |n IconSprites "+| 0000af70 53 6f 75 72 63 65 24 2b 22 2e 21 53 70 72 69 74 |Source$+".!Sprit| 0000af80 65 73 22 0d 98 12 45 d5 23 66 25 2c 22 49 66 54 |es"...E.#f%,"IfT| 0000af90 68 65 72 65 20 22 2b 53 6f 75 72 63 65 24 2b 22 |here "+Source$+"| 0000afa0 2e 21 42 6f 6f 74 20 54 68 65 6e 20 46 69 6c 65 |.!Boot Then File| 0000afb0 72 5f 52 75 6e 20 22 2b 53 6f 75 72 63 65 24 2b |r_Run "+Source$+| 0000afc0 22 2e 21 42 6f 6f 74 22 0d 98 1c 08 d9 23 66 25 |".!Boot".....#f%| 0000afd0 0d 98 44 1c 66 25 3d ad 28 70 61 74 68 6e 61 6d |..D.f%=.(pathnam| 0000afe0 65 24 2b 22 2e 21 48 65 6c 70 22 29 0d 98 4e 2e |e$+".!Help")..N.| 0000aff0 d5 23 66 25 2c 22 41 6c 69 61 73 20 66 6f 72 20 |.#f%,"Alias for | 0000b000 61 70 70 6c 69 63 61 74 69 6f 6e 20 22 2b 41 70 |application "+Ap| 0000b010 70 6c 69 63 61 74 69 6f 6e 24 0d 98 58 32 d5 23 |plication$..X2.#| 0000b020 66 25 2c 22 57 68 69 63 68 20 63 61 6e 20 62 65 |f%,"Which can be| 0000b030 20 66 6f 75 6e 64 20 61 74 20 6c 6f 63 61 74 69 | found at locati| 0000b040 6f 6e 20 22 2b 53 6f 75 72 63 65 24 0d 98 62 08 |on "+Source$..b.| 0000b050 d9 23 66 25 0d 98 6c 05 e1 0d 98 b2 28 dd f2 6d |.#f%..l.....(..m| 0000b060 6f 64 69 66 79 5f 62 6f 6f 74 5f 64 69 72 28 6e |odify_boot_dir(n| 0000b070 74 72 79 25 2c 64 65 73 74 24 2c 6d 6f 64 65 24 |try%,dest$,mode$| 0000b080 29 0d 98 da 0c c8 8e 6d 6f 64 65 24 ca 0d 98 e4 |)......mode$....| 0000b090 0d c9 22 69 6e 73 65 72 74 22 0d 98 ee 1b e7 4f |.."insert".....O| 0000b0a0 64 61 74 24 28 6e 74 72 79 25 2c 33 29 3d 22 32 |dat$(ntry%,3)="2| 0000b0b0 30 30 30 22 8c 0d 99 16 1a 53 6f 75 72 63 65 24 |000".....Source$| 0000b0c0 3d 4f 64 61 74 24 28 6e 74 72 79 25 2c 35 29 0d |=Odat$(ntry%,5).| 0000b0d0 99 20 1f 41 70 70 6c 69 63 61 74 69 6f 6e 24 3d |. .Application$=| 0000b0e0 4f 64 61 74 24 28 6e 74 72 79 25 2c 31 29 0d 99 |Odat$(ntry%,1)..| 0000b0f0 2a 29 f2 6d 61 6b 65 5f 61 6c 69 61 73 28 64 65 |*).make_alias(de| 0000b100 73 74 24 2b 22 2e 22 2b 4f 64 61 74 24 28 6e 74 |st$+"."+Odat$(nt| 0000b110 72 79 25 2c 31 29 29 0d 99 34 05 cc 0d 99 5c 35 |ry%,1))..4....\5| 0000b120 e7 c0 4f 64 61 74 24 28 6e 74 72 79 25 2c 35 29 |..Odat$(ntry%,5)| 0000b130 2c 32 35 29 3d 22 3c 57 69 6d 70 24 53 63 72 61 |,25)="<Wimp$Scra| 0000b140 70 44 69 72 3e 2e 42 6f 6f 74 70 6c 75 73 2e 22 |pDir>.Bootplus."| 0000b150 8c 0d 99 8e 47 ff 28 22 2a 43 4f 50 59 20 22 2b |....G.("*COPY "+| 0000b160 4f 64 61 74 24 28 6e 74 72 79 25 2c 35 29 2b 22 |Odat$(ntry%,5)+"| 0000b170 20 22 2b 64 65 73 74 24 2b 22 2e 22 2b 4f 64 61 | "+dest$+"."+Oda| 0000b180 74 24 28 6e 74 72 79 25 2c 31 29 2b 22 20 7e 56 |t$(ntry%,1)+" ~V| 0000b190 7e 50 7e 43 46 44 22 29 0d 99 98 05 cc 0d 99 c0 |~P~CFD")........| 0000b1a0 45 ff 28 22 2a 43 4f 50 59 20 22 2b 4f 64 61 74 |E.("*COPY "+Odat| 0000b1b0 24 28 6e 74 72 79 25 2c 35 29 2b 22 20 22 2b 64 |$(ntry%,5)+" "+d| 0000b1c0 65 73 74 24 2b 22 2e 22 2b 4f 64 61 74 24 28 6e |est$+"."+Odat$(n| 0000b1d0 74 72 79 25 2c 31 29 2b 22 20 7e 56 7e 50 7e 43 |try%,1)+" ~V~P~C| 0000b1e0 22 29 0d 99 ca 05 cd 0d 99 d4 05 cd 0d 99 de 0d |")..............| 0000b1f0 c9 22 72 65 6d 6f 76 65 22 0d 9a 06 28 ff 28 22 |."remove"...(.("| 0000b200 2a 57 49 50 45 20 22 2b 4f 64 61 74 24 28 6e 74 |*WIPE "+Odat$(nt| 0000b210 72 79 25 2c 35 29 2b 22 20 7e 56 46 7e 43 52 22 |ry%,5)+" ~VF~CR"| 0000b220 29 0d 9a 10 05 cb 0d 9a 42 34 2a 41 43 43 45 53 |).......B4*ACCES| 0000b230 53 20 3c 42 6f 6f 74 70 6c 75 73 24 64 69 72 3e |S <Bootplus$dir>| 0000b240 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 61 6e 67 |.Resources.chang| 0000b250 65 6c 69 73 74 20 57 52 2f 52 0d 9a 4c 2f 66 25 |elist WR/R..L/f%| 0000b260 3d 8e 28 22 3c 42 6f 6f 74 70 6c 75 73 24 64 69 |=.("<Bootplus$di| 0000b270 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 61 |r>.Resources.cha| 0000b280 6e 67 65 6c 69 73 74 22 29 0d 9a 56 2e 67 25 3d |ngelist")..V.g%=| 0000b290 ae 28 22 3c 42 6f 6f 74 70 6c 75 73 24 64 69 72 |.("<Bootplus$dir| 0000b2a0 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 61 6e |>.Resources.chan| 0000b2b0 67 65 6e 65 77 22 29 0d 9a 60 09 58 25 3d 31 30 |genew")..`.X%=10| 0000b2c0 0d 9a 6a 05 f5 0d 9a 74 0b 61 24 3d be 23 66 25 |..j....t.a$=.#f%| 0000b2d0 0d 9a 7e 09 58 25 2b 3d 34 0d 9a 88 2c e7 6d 6f |..~.X%+=4...,.mo| 0000b2e0 64 65 24 3d 22 69 6e 73 65 72 74 22 84 a7 61 24 |de$="insert"..a$| 0000b2f0 2c 4f 64 61 74 24 28 6e 74 72 79 25 2c 35 29 2c |,Odat$(ntry%,5),| 0000b300 31 29 3d 30 8c 0d 9a 92 0b d5 23 67 25 2c 61 24 |1)=0......#g%,a$| 0000b310 0d 9a 9c 05 cd 0d 9a a6 09 fd c5 23 66 25 0d 9a |...........#f%..| 0000b320 b0 14 e7 6d 6f 64 65 24 3d 22 69 6e 73 65 72 74 |...mode$="insert| 0000b330 22 8c 0d 9a ba 34 d5 23 67 25 2c 22 2a 57 49 50 |"....4.#g%,"*WIP| 0000b340 45 20 22 2b 64 65 73 74 24 2b 22 2e 22 2b 4f 64 |E "+dest$+"."+Od| 0000b350 61 74 24 28 6e 74 72 79 25 2c 31 29 2b 22 20 7e |at$(ntry%,1)+" ~| 0000b360 56 46 7e 43 52 22 0d 9a c4 05 cd 0d 9a ce 08 d9 |VF~CR"..........| 0000b370 23 66 25 0d 9a d8 08 d9 23 67 25 0d 9a e2 32 2a |#f%.....#g%...2*| 0000b380 57 49 50 45 20 3c 42 6f 6f 74 70 6c 75 73 24 64 |WIPE <Bootplus$d| 0000b390 69 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 |ir>.Resources.ch| 0000b3a0 61 6e 67 65 6c 69 73 74 20 7e 43 7e 56 0d 9a ec |angelist ~C~V...| 0000b3b0 52 2a 52 45 4e 41 4d 45 20 3c 42 6f 6f 74 70 6c |R*RENAME <Bootpl| 0000b3c0 75 73 24 64 69 72 3e 2e 52 65 73 6f 75 72 63 65 |us$dir>.Resource| 0000b3d0 73 2e 63 68 61 6e 67 65 6e 65 77 20 3c 42 6f 6f |s.changenew <Boo| 0000b3e0 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 6f 75 |tplus$dir>.Resou| 0000b3f0 72 63 65 73 2e 63 68 61 6e 67 65 6c 69 73 74 0d |rces.changelist.| 0000b400 9a f6 35 2a 53 45 54 54 59 50 45 20 3c 42 6f 6f |..5*SETTYPE <Boo| 0000b410 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 6f 75 |tplus$dir>.Resou| 0000b420 72 63 65 73 2e 63 68 61 6e 67 65 6c 69 73 74 20 |rces.changelist | 0000b430 26 46 45 42 0d 9b 00 32 2a 41 43 43 45 53 53 20 |&FEB...2*ACCESS | 0000b440 3c 42 6f 6f 74 70 6c 75 73 24 64 69 72 3e 2e 52 |<Bootplus$dir>.R| 0000b450 65 73 6f 75 72 63 65 73 2e 63 68 61 6e 67 65 6c |esources.changel| 0000b460 69 73 74 20 4c 2f 0d 9b 0a 05 e1 0d 9b 46 2a dd |ist L/.......F*.| 0000b470 f2 6d 6f 64 69 66 79 5f 62 6f 6f 74 5f 66 69 6c |.modify_boot_fil| 0000b480 65 28 61 70 70 24 2c 6d 6f 64 65 24 2c 6e 6f 6d |e(app$,mode$,nom| 0000b490 65 73 73 25 29 0d 9b 96 36 ea 66 31 25 2c 66 32 |ess%)...6.f1%,f2| 0000b4a0 25 2c 61 6c 69 6e 65 24 2c 62 6f 6f 74 6e 61 6d |%,aline$,bootnam| 0000b4b0 65 24 2c 66 74 79 70 25 2c 6f 6c 64 6e 61 6d 65 |e$,ftyp%,oldname| 0000b4c0 24 2c 74 65 6d 70 6e 61 6d 65 24 0d 9b a0 43 ea |$,tempname$...C.| 0000b4d0 66 6f 75 6e 64 25 2c 64 6f 6e 65 25 2c 66 74 79 |found%,done%,fty| 0000b4e0 70 25 2c 62 6f 6f 74 6e 61 6d 65 24 2c 74 65 6d |p%,bootname$,tem| 0000b4f0 70 6e 61 6d 65 24 2c 6f 6c 64 6e 61 6d 65 24 2c |pname$,oldname$,| 0000b500 66 31 25 2c 66 32 25 2c 61 6c 69 6e 65 24 0d 9b |f1%,f2%,aline$..| 0000b510 c8 0c 66 6f 75 6e 64 25 3d a3 0d 9b d2 0b 64 6f |..found%=.....do| 0000b520 6e 65 25 3d a3 0d 9b dc 0c 73 74 61 72 74 25 3d |ne%=.....start%=| 0000b530 a3 0d 9b e6 11 c8 8e 45 64 69 74 5f 54 79 70 65 |.......Edit_Type| 0000b540 24 ca 0d 9b f0 10 c9 22 72 65 73 6f 75 72 63 65 |$......"resource| 0000b550 73 22 0d 9b fa 0e 66 74 79 70 25 3d 26 66 65 62 |s"....ftyp%=&feb| 0000b560 0d 9c 04 2f 62 6f 6f 74 6e 61 6d 65 24 3d 22 3c |.../bootname$="<| 0000b570 63 68 6f 69 63 65 73 24 77 72 69 74 65 3e 2e 62 |choices$write>.b| 0000b580 6f 6f 74 2e 50 72 65 44 65 73 6b 74 6f 70 22 0d |oot.PreDesktop".| 0000b590 9c 0e 2f 74 65 6d 70 6e 61 6d 65 24 3d 22 3c 63 |../tempname$="<c| 0000b5a0 68 6f 69 63 65 73 24 77 72 69 74 65 3e 2e 62 6f |hoices$write>.bo| 0000b5b0 6f 74 2e 50 72 65 44 65 73 6b 6e 65 77 22 0d 9c |ot.PreDesknew"..| 0000b5c0 18 2e 6f 6c 64 6e 61 6d 65 24 3d 22 3c 63 68 6f |..oldname$="<cho| 0000b5d0 69 63 65 73 24 77 72 69 74 65 3e 2e 62 6f 6f 74 |ices$write>.boot| 0000b5e0 2e 50 72 65 44 65 73 6b 6f 6c 64 22 0d 9c 22 0b |.PreDeskold"..".| 0000b5f0 c9 22 62 6f 6f 74 22 0d 9c 2c 0e 66 74 79 70 25 |."boot"..,.ftyp%| 0000b600 3d 26 66 65 61 0d 9c 36 2c 62 6f 6f 74 6e 61 6d |=&fea..6,bootnam| 0000b610 65 24 3d 22 3c 63 68 6f 69 63 65 73 24 77 72 69 |e$="<choices$wri| 0000b620 74 65 3e 2e 62 6f 6f 74 2e 44 65 73 6b 74 6f 70 |te>.boot.Desktop| 0000b630 22 0d 9c 40 2f 74 65 6d 70 6e 61 6d 65 24 3d 22 |"..@/tempname$="| 0000b640 3c 63 68 6f 69 63 65 73 24 77 72 69 74 65 3e 2e |<choices$write>.| 0000b650 62 6f 6f 74 2e 44 65 73 6b 74 6f 70 6e 65 77 22 |boot.Desktopnew"| 0000b660 0d 9c 4a 2e 6f 6c 64 6e 61 6d 65 24 3d 22 3c 63 |..J.oldname$="<c| 0000b670 68 6f 69 63 65 73 24 77 72 69 74 65 3e 2e 62 6f |hoices$write>.bo| 0000b680 6f 74 2e 44 65 73 6b 74 6f 70 6f 6c 64 22 0d 9c |ot.Desktopold"..| 0000b690 54 05 cb 0d 9c 7c 1b c8 99 22 4f 53 5f 46 69 6c |T....|..."OS_Fil| 0000b6a0 65 22 2c 36 2c 74 65 6d 70 6e 61 6d 65 24 0d 9c |e",6,tempname$..| 0000b6b0 86 22 c8 99 22 4f 53 5f 46 69 6c 65 22 2c 31 31 |.".."OS_File",11| 0000b6c0 2c 74 65 6d 70 6e 61 6d 65 24 2c 66 74 79 70 25 |,tempname$,ftyp%| 0000b6d0 0d 9c 90 14 66 31 25 3d ad 28 74 65 6d 70 6e 61 |....f1%=.(tempna| 0000b6e0 6d 65 24 29 0d 9c 9a 14 66 32 25 3d 8e 28 62 6f |me$)....f2%=.(bo| 0000b6f0 6f 74 6e 61 6d 65 24 29 0d 9c a4 05 f5 0d 9c ae |otname$)........| 0000b700 10 61 6c 69 6e 65 24 3d be 23 66 32 25 0d 9c b8 |.aline$=.#f2%...| 0000b710 0d e7 ac 73 74 61 72 74 25 8c 0d 9c e0 5f 73 74 |...start%...._st| 0000b720 61 72 74 25 3d 28 a7 61 6c 69 6e 65 24 2c 22 7c |art%=(.aline$,"|| 0000b730 53 74 61 72 74 22 29 3e 30 80 a7 61 6c 69 6e 65 |Start")>0..aline| 0000b740 24 2c 22 4d 61 72 73 22 29 3e 30 80 a7 61 6c 69 |$,"Mars")>0..ali| 0000b750 6e 65 24 2c 22 21 42 6f 6f 74 70 6c 75 73 22 29 |ne$,"!Bootplus")| 0000b760 3e 30 80 a7 61 6c 69 6e 65 24 2c 45 64 69 74 5f |>0..aline$,Edit_| 0000b770 54 79 70 65 24 29 3e 30 29 0d 9c ea 10 d5 23 66 |Type$)>0).....#f| 0000b780 31 25 2c 61 6c 69 6e 65 24 0d 9c f4 05 cc 0d 9d |1%,aline$.......| 0000b790 1c 0c c8 8e 6d 6f 64 65 24 ca 0d 9d 26 0d c9 22 |....mode$...&.."| 0000b7a0 72 65 6d 6f 76 65 22 0d 9d 30 44 e7 28 61 70 70 |remove"..0D.(app| 0000b7b0 24 3d 22 61 6c 6c 22 80 a7 61 6c 69 6e 65 24 2c |$="all"..aline$,| 0000b7c0 22 2e 21 22 29 3e 30 80 20 73 74 61 72 74 25 29 |".!")>0. start%)| 0000b7d0 84 28 a7 61 6c 69 6e 65 24 2c 61 70 70 24 29 3e |.(.aline$,app$)>| 0000b7e0 30 80 20 73 74 61 72 74 25 29 8c 0d 9d 58 0c 66 |0. start%)...X.f| 0000b7f0 6f 75 6e 64 25 3d b9 0d 9d 62 0b 64 6f 6e 65 25 |ound%=...b.done%| 0000b800 3d b9 0d 9d 6c 05 cc 0d 9d 94 10 d5 23 66 31 25 |=...l.......#f1%| 0000b810 2c 61 6c 69 6e 65 24 0d 9d 9e 05 cd 0d 9d a8 0d |,aline$.........| 0000b820 c9 22 69 6e 73 65 72 74 22 0d 9d b2 1f e7 28 a7 |."insert".....(.| 0000b830 61 6c 69 6e 65 24 2c 61 70 70 24 29 3e 30 29 80 |aline$,app$)>0).| 0000b840 20 73 74 61 72 74 25 8c 0d 9d bc 0c 66 6f 75 6e | start%.....foun| 0000b850 64 25 3d b9 0d 9d c6 34 e7 ac 6e 6f 6d 65 73 73 |d%=....4..nomess| 0000b860 25 8c f2 65 72 72 6f 72 5f 6d 65 73 73 61 67 65 |%..error_message| 0000b870 28 22 45 4d 32 35 22 2c 61 70 70 24 2c 22 22 2c |("EM25",app$,"",| 0000b880 22 22 2c 30 2c 4b 25 29 0d 9d d0 05 cd 0d 9d da |"",0,K%)........| 0000b890 2b e7 28 a7 61 6c 69 6e 65 24 2c 22 7c 45 6e 64 |+.(.aline$,"|End| 0000b8a0 22 29 3e 30 29 80 20 73 74 61 72 74 25 80 28 ac |")>0). start%.(.| 0000b8b0 66 6f 75 6e 64 25 29 8c 0d 9e 02 11 c8 8e 45 64 |found%).......Ed| 0000b8c0 69 74 5f 54 79 70 65 24 ca 0d 9e 0c 10 c9 22 72 |it_Type$......"r| 0000b8d0 65 73 6f 75 72 63 65 73 22 0d 9e 16 18 d5 23 66 |esources".....#f| 0000b8e0 31 25 2c 22 41 64 64 41 70 70 20 22 2b 61 70 70 |1%,"AddApp "+app| 0000b8f0 24 0d 9e 20 0b c9 22 62 6f 6f 74 22 0d 9e 2a 1c |$.. .."boot"..*.| 0000b900 d5 23 66 31 25 2c 22 46 69 6c 65 72 5f 42 6f 6f |.#f1%,"Filer_Boo| 0000b910 74 20 22 2b 61 70 70 24 0d 9e 34 05 cb 0d 9e 3e |t "+app$..4....>| 0000b920 0b 64 6f 6e 65 25 3d b9 0d 9e 48 05 cd 0d 9e 52 |.done%=...H....R| 0000b930 10 d5 23 66 31 25 2c 61 6c 69 6e 65 24 0d 9e 5c |..#f1%,aline$..\| 0000b940 05 cb 0d 9e 66 05 cd 0d 9e 70 0a fd c5 23 66 32 |....f....p...#f2| 0000b950 25 0d 9e 7a 20 e7 28 ac 73 74 61 72 74 25 29 80 |%..z .(.start%).| 0000b960 28 6d 6f 64 65 24 3d 22 69 6e 73 65 72 74 22 29 |(mode$="insert")| 0000b970 8c 0d 9e a2 11 c8 8e 45 64 69 74 5f 54 79 70 65 |.......Edit_Type| 0000b980 24 ca 0d 9e ac 10 c9 22 72 65 73 6f 75 72 63 65 |$......"resource| 0000b990 73 22 0d 9e b6 0c d5 23 66 31 25 2c 22 22 0d 9e |s".....#f1%,""..| 0000b9a0 c0 41 d5 23 66 31 25 2c 22 7c 53 74 61 72 74 20 |.A.#f1%,"|Start | 0000b9b0 4d 61 72 73 20 21 42 6f 6f 74 70 6c 75 73 20 22 |Mars !Bootplus "| 0000b9c0 2b 42 6f 6f 74 70 6c 75 73 5f 56 65 72 73 69 6f |+Bootplus_Versio| 0000b9d0 6e 24 2b 22 20 72 65 73 6f 75 72 63 65 73 22 0d |n$+" resources".| 0000b9e0 9e ca 24 d5 23 66 31 25 2c 22 7c 20 2d 2d 2d 2d |..$.#f1%,"| ----| 0000b9f0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| 0000ba00 2d 2d 22 0d 9e d4 0d d5 23 66 31 25 2c 22 7c 22 |--".....#f1%,"|"| 0000ba10 0d 9e de 1d d5 23 66 31 25 2c 22 7c 20 20 20 20 |.....#f1%,"| | 0000ba20 20 20 20 72 65 73 6f 75 72 63 65 73 22 0d 9e e8 | resources"...| 0000ba30 0d d5 23 66 31 25 2c 22 7c 22 0d 9e f2 24 d5 23 |..#f1%,"|"...$.#| 0000ba40 66 31 25 2c 22 7c 20 2d 2d 2d 2d 2d 2d 2d 2d 2d |f1%,"| ---------| 0000ba50 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 22 0d 9e |-------------"..| 0000ba60 fc 37 d5 23 66 31 25 2c 22 7c 20 49 6e 73 65 72 |.7.#f1%,"| Inser| 0000ba70 74 20 52 65 73 6f 75 72 63 65 73 20 61 70 70 73 |t Resources apps| 0000ba80 20 64 69 72 65 63 74 6f 72 79 20 61 64 64 69 74 | directory addit| 0000ba90 69 6f 6e 73 22 0d 9f 06 22 d5 23 66 31 25 2c 22 |ions"...".#f1%,"| 0000baa0 7c 20 49 4e 73 65 72 74 65 64 20 62 79 20 42 6f || INserted by Bo| 0000bab0 6f 74 70 6c 75 73 22 0d 9f 10 0d d5 23 66 31 25 |otplus".....#f1%| 0000bac0 2c 22 7c 22 0d 9f 1a 18 d5 23 66 31 25 2c 22 41 |,"|".....#f1%,"A| 0000bad0 64 64 41 70 70 20 22 2b 61 70 70 24 0d 9f 24 10 |ddApp "+app$..$.| 0000bae0 d5 23 66 31 25 2c 22 7c 45 6e 64 22 0d 9f 2e 0b |.#f1%,"|End"....| 0000baf0 c9 22 62 6f 6f 74 22 0d 9f 38 0c d5 23 66 31 25 |."boot"..8..#f1%| 0000bb00 2c 22 22 0d 9f 42 3c d5 23 66 31 25 2c 22 7c 53 |,""..B<.#f1%,"|S| 0000bb10 74 61 72 74 20 4d 61 72 73 20 21 42 6f 6f 74 70 |tart Mars !Bootp| 0000bb20 6c 75 73 20 22 2b 42 6f 6f 74 70 6c 75 73 5f 56 |lus "+Bootplus_V| 0000bb30 65 72 73 69 6f 6e 24 2b 22 20 62 6f 6f 74 22 0d |ersion$+" boot".| 0000bb40 9f 4c 24 d5 23 66 31 25 2c 22 7c 20 2d 2d 2d 2d |.L$.#f1%,"| ----| 0000bb50 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |----------------| 0000bb60 2d 2d 22 0d 9f 56 0d d5 23 66 31 25 2c 22 7c 22 |--"..V..#f1%,"|"| 0000bb70 0d 9f 60 18 d5 23 66 31 25 2c 22 7c 20 20 20 20 |..`..#f1%,"| | 0000bb80 20 20 20 62 6f 6f 74 22 0d 9f 6a 0d d5 23 66 31 | boot"..j..#f1| 0000bb90 25 2c 22 7c 22 0d 9f 74 24 d5 23 66 31 25 2c 22 |%,"|"..t$.#f1%,"| 0000bba0 7c 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d || --------------| 0000bbb0 2d 2d 2d 2d 2d 2d 2d 2d 22 0d 9f 7e 21 d5 23 66 |--------"..~!.#f| 0000bbc0 31 25 2c 22 7c 20 42 6f 6f 74 65 64 20 61 70 70 |1%,"| Booted app| 0000bbd0 6c 69 63 61 74 69 6f 6e 73 22 0d 9f 88 22 d5 23 |lications"...".#| 0000bbe0 66 31 25 2c 22 7c 20 49 6e 73 65 72 74 65 64 20 |f1%,"| Inserted | 0000bbf0 62 79 20 42 6f 6f 74 70 6c 75 73 22 0d 9f 92 0d |by Bootplus"....| 0000bc00 d5 23 66 31 25 2c 22 7c 22 0d 9f 9c 1c d5 23 66 |.#f1%,"|".....#f| 0000bc10 31 25 2c 22 46 69 6c 65 72 5f 42 6f 6f 74 20 22 |1%,"Filer_Boot "| 0000bc20 2b 61 70 70 24 0d 9f a6 10 d5 23 66 31 25 2c 22 |+app$.....#f1%,"| 0000bc30 7c 45 6e 64 22 0d 9f b0 05 cb 0d 9f ba 0b 64 6f ||End".........do| 0000bc40 6e 65 25 3d b9 0d 9f c4 05 cd 0d 9f ce 09 d9 23 |ne%=...........#| 0000bc50 66 31 25 0d 9f d8 09 d9 23 66 32 25 0d a0 00 0b |f1%.....#f2%....| 0000bc60 e7 64 6f 6e 65 25 8c 0d a0 0a 1a c8 99 22 4f 53 |.done%......."OS| 0000bc70 5f 46 69 6c 65 22 2c 36 2c 6f 6c 64 6e 61 6d 65 |_File",6,oldname| 0000bc80 24 0d a0 14 2a c8 99 22 4f 53 5f 46 53 43 6f 6e |$...*.."OS_FSCon| 0000bc90 74 72 6f 6c 22 2c 32 35 2c 62 6f 6f 74 6e 61 6d |trol",25,bootnam| 0000bca0 65 24 2c 6f 6c 64 6e 61 6d 65 24 0d a0 1e 2b c8 |e$,oldname$...+.| 0000bcb0 99 22 4f 53 5f 46 53 43 6f 6e 74 72 6f 6c 22 2c |."OS_FSControl",| 0000bcc0 32 35 2c 74 65 6d 70 6e 61 6d 65 24 2c 62 6f 6f |25,tempname$,boo| 0000bcd0 74 6e 61 6d 65 24 0d a0 28 05 cc 0d a0 50 1b c8 |tname$..(....P..| 0000bce0 99 22 4f 53 5f 46 69 6c 65 22 2c 36 2c 74 65 6d |."OS_File",6,tem| 0000bcf0 70 6e 61 6d 65 24 0d a0 5a 05 cd 0d a0 64 05 e1 |pname$..Z....d..| 0000bd00 0d a0 aa 11 dd f2 63 6c 65 61 72 5f 65 64 69 74 |......clear_edit| 0000bd10 73 0d a0 d2 12 ea 66 31 25 2c 66 32 25 2c 61 24 |s.....f1%,f2%,a$| 0000bd20 2c 66 25 0d a1 04 33 c8 99 22 4f 53 5f 46 69 6c |,f%...3.."OS_Fil| 0000bd30 65 22 2c 36 2c 22 3c 63 68 6f 69 63 65 73 24 77 |e",6,"<choices$w| 0000bd40 72 69 74 65 3e 2e 62 6f 6f 74 2e 50 72 65 44 65 |rite>.boot.PreDe| 0000bd50 73 6b 4e 65 77 22 0d a1 0e 39 c8 99 22 4f 53 5f |skNew"...9.."OS_| 0000bd60 46 69 6c 65 22 2c 31 31 2c 22 3c 63 68 6f 69 63 |File",11,"<choic| 0000bd70 65 73 24 77 72 69 74 65 3e 2e 62 6f 6f 74 2e 50 |es$write>.boot.P| 0000bd80 72 65 44 65 73 6b 4e 65 77 22 2c 26 46 45 42 0d |reDeskNew",&FEB.| 0000bd90 a1 18 2c 66 31 25 3d ad 28 22 3c 63 68 6f 69 63 |..,f1%=.("<choic| 0000bda0 65 73 24 77 72 69 74 65 3e 2e 62 6f 6f 74 2e 50 |es$write>.boot.P| 0000bdb0 72 65 44 65 73 6b 4e 65 77 22 29 0d a1 22 2c 66 |reDeskNew")..",f| 0000bdc0 32 25 3d 8e 28 22 3c 63 68 6f 69 63 65 73 24 77 |2%=.("<choices$w| 0000bdd0 72 69 74 65 3e 2e 62 6f 6f 74 2e 50 72 65 44 65 |rite>.boot.PreDe| 0000bde0 73 6b 74 6f 70 22 29 0d a1 2c 05 f5 0d a1 36 0c |sktop")..,....6.| 0000bdf0 61 24 3d be 23 66 32 25 0d a1 40 3c e7 28 a7 61 |a$=.#f2%..@<.(.a| 0000be00 24 2c 22 7c 53 74 61 72 74 22 29 3e 30 29 80 28 |$,"|Start")>0).(| 0000be10 a7 61 24 2c 22 4d 61 72 73 22 29 3e 30 29 80 28 |.a$,"Mars")>0).(| 0000be20 a7 61 24 2c 22 21 42 6f 6f 74 70 6c 75 73 22 29 |.a$,"!Bootplus")| 0000be30 3e 30 29 8c 0d a1 41 05 f5 0d a1 54 0c 61 24 3d |>0)...A....T.a$=| 0000be40 be 23 66 32 25 0d a1 5e 0e fd 61 24 3d 22 7c 45 |.#f2%..^..a$="|E| 0000be50 6e 64 22 0d a1 68 05 cc 0d a1 72 0c d5 23 66 31 |nd"..h....r..#f1| 0000be60 25 2c 61 24 0d a1 7c 05 cd 0d a1 86 0a fd c5 23 |%,a$..|........#| 0000be70 66 32 25 0d a1 90 09 d9 23 66 31 25 0d a1 9a 09 |f2%.....#f1%....| 0000be80 d9 23 66 32 25 0d a1 a4 33 c8 99 22 4f 53 5f 46 |.#f2%...3.."OS_F| 0000be90 69 6c 65 22 2c 36 2c 22 3c 63 68 6f 69 63 65 73 |ile",6,"<choices| 0000bea0 24 77 72 69 74 65 3e 2e 62 6f 6f 74 2e 50 72 65 |$write>.boot.Pre| 0000beb0 44 65 73 6b 74 6f 70 22 0d a1 ae 5b c8 99 22 4f |Desktop"...[.."O| 0000bec0 53 5f 46 53 43 6f 6e 74 72 6f 6c 22 2c 32 35 2c |S_FSControl",25,| 0000bed0 22 3c 63 68 6f 69 63 65 73 24 77 72 69 74 65 3e |"<choices$write>| 0000bee0 2e 62 6f 6f 74 2e 50 72 65 44 65 73 6b 4e 65 77 |.boot.PreDeskNew| 0000bef0 22 2c 22 3c 63 68 6f 69 63 65 73 24 77 72 69 74 |","<choices$writ| 0000bf00 65 3e 2e 62 6f 6f 74 2e 50 72 65 44 65 73 6b 74 |e>.boot.PreDeskt| 0000bf10 6f 70 22 0d a1 d6 30 c8 99 22 4f 53 5f 46 69 6c |op"...0.."OS_Fil| 0000bf20 65 22 2c 36 2c 22 3c 63 68 6f 69 63 65 73 24 77 |e",6,"<choices$w| 0000bf30 72 69 74 65 3e 2e 62 6f 6f 74 2e 44 65 73 6b 4e |rite>.boot.DeskN| 0000bf40 65 77 22 0d a1 e0 36 c8 99 22 4f 53 5f 46 69 6c |ew"...6.."OS_Fil| 0000bf50 65 22 2c 31 31 2c 22 3c 63 68 6f 69 63 65 73 24 |e",11,"<choices$| 0000bf60 77 72 69 74 65 3e 2e 62 6f 6f 74 2e 44 65 73 6b |write>.boot.Desk| 0000bf70 4e 65 77 22 2c 26 46 45 41 0d a1 ea 29 66 31 25 |New",&FEA...)f1%| 0000bf80 3d ad 28 22 3c 63 68 6f 69 63 65 73 24 77 72 69 |=.("<choices$wri| 0000bf90 74 65 3e 2e 62 6f 6f 74 2e 44 65 73 6b 4e 65 77 |te>.boot.DeskNew| 0000bfa0 22 29 0d a1 f4 29 66 32 25 3d 8e 28 22 3c 63 68 |")...)f2%=.("<ch| 0000bfb0 6f 69 63 65 73 24 77 72 69 74 65 3e 2e 62 6f 6f |oices$write>.boo| 0000bfc0 74 2e 44 65 73 6b 74 6f 70 22 29 0d a1 fe 05 f5 |t.Desktop").....| 0000bfd0 0d a2 08 0c 61 24 3d be 23 66 32 25 0d a2 12 36 |....a$=.#f2%...6| 0000bfe0 e7 a7 61 24 2c 22 7c 53 74 61 72 74 22 29 3e 30 |..a$,"|Start")>0| 0000bff0 80 a7 61 24 2c 22 4d 61 72 73 22 29 3e 30 80 a7 |..a$,"Mars")>0..| 0000c000 61 24 2c 22 21 42 6f 6f 74 70 6c 75 73 22 29 3e |a$,"!Bootplus")>| 0000c010 30 8c 0d a2 1c 05 f5 0d a2 26 0c 61 24 3d be 23 |0........&.a$=.#| 0000c020 66 32 25 0d a2 30 0e fd 61 24 3d 22 7c 45 6e 64 |f2%..0..a$="|End| 0000c030 22 0d a2 3a 05 cc 0d a2 44 0c d5 23 66 31 25 2c |"..:....D..#f1%,| 0000c040 61 24 0d a2 4e 05 cd 0d a2 58 0a fd c5 23 66 32 |a$..N....X...#f2| 0000c050 25 0d a2 62 09 d9 23 66 31 25 0d a2 6c 09 d9 23 |%..b..#f1%..l..#| 0000c060 66 32 25 0d a2 76 30 c8 99 22 4f 53 5f 46 69 6c |f2%..v0.."OS_Fil| 0000c070 65 22 2c 36 2c 22 3c 63 68 6f 69 63 65 73 24 77 |e",6,"<choices$w| 0000c080 72 69 74 65 3e 2e 62 6f 6f 74 2e 44 65 73 6b 74 |rite>.boot.Deskt| 0000c090 6f 70 22 0d a2 80 55 c8 99 22 4f 53 5f 46 53 43 |op"...U.."OS_FSC| 0000c0a0 6f 6e 74 72 6f 6c 22 2c 32 35 2c 22 3c 63 68 6f |ontrol",25,"<cho| 0000c0b0 69 63 65 73 24 77 72 69 74 65 3e 2e 62 6f 6f 74 |ices$write>.boot| 0000c0c0 2e 44 65 73 6b 4e 65 77 22 2c 22 3c 63 68 6f 69 |.DeskNew","<choi| 0000c0d0 63 65 73 24 77 72 69 74 65 3e 2e 62 6f 6f 74 2e |ces$write>.boot.| 0000c0e0 44 65 73 6b 74 6f 70 22 0d a2 a8 34 2a 41 43 43 |Desktop"...4*ACC| 0000c0f0 45 53 53 20 3c 42 6f 6f 74 70 6c 75 73 24 64 69 |ESS <Bootplus$di| 0000c100 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 61 |r>.Resources.cha| 0000c110 6e 67 65 6c 69 73 74 20 57 52 2f 52 0d a2 b2 2d |ngelist WR/R...-| 0000c120 2a 4f 42 45 59 20 3c 42 6f 6f 74 70 6c 75 73 24 |*OBEY <Bootplus$| 0000c130 64 69 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 |dir>.Resources.c| 0000c140 68 61 6e 67 65 6c 69 73 74 0d a2 bc 32 2a 57 49 |hangelist...2*WI| 0000c150 50 45 20 3c 42 6f 6f 74 70 6c 75 73 24 64 69 72 |PE <Bootplus$dir| 0000c160 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 61 6e |>.Resources.chan| 0000c170 67 65 6c 69 73 74 20 7e 43 7e 56 0d a2 c6 2f 66 |gelist ~C~V.../f| 0000c180 25 3d ae 28 22 3c 42 6f 6f 74 70 6c 75 73 24 44 |%=.("<Bootplus$D| 0000c190 69 72 3e 2e 52 65 73 6f 75 72 63 65 73 2e 63 68 |ir>.Resources.ch| 0000c1a0 61 6e 67 65 6c 69 73 74 22 29 0d a2 d0 2d d5 23 |angelist")...-.#| 0000c1b0 66 25 2c 22 7c 20 66 69 6c 65 73 20 61 64 64 65 |f%,"| files adde| 0000c1c0 64 20 74 6f 20 70 72 65 64 65 73 6b 20 61 6e 64 |d to predesk and| 0000c1d0 20 74 61 73 6b 73 22 0d a2 da 08 d9 23 66 25 0d | tasks".....#f%.| 0000c1e0 a2 e4 35 2a 53 45 54 54 59 50 45 20 3c 42 6f 6f |..5*SETTYPE <Boo| 0000c1f0 74 70 6c 75 73 24 64 69 72 3e 2e 52 65 73 6f 75 |tplus$dir>.Resou| 0000c200 72 63 65 73 2e 63 68 61 6e 67 65 6c 69 73 74 20 |rces.changelist | 0000c210 26 46 45 42 0d a2 ee 32 2a 41 43 43 45 53 53 20 |&FEB...2*ACCESS | 0000c220 3c 42 6f 6f 74 70 6c 75 73 24 64 69 72 3e 2e 52 |<Bootplus$dir>.R| 0000c230 65 73 6f 75 72 63 65 73 2e 63 68 61 6e 67 65 6c |esources.changel| 0000c240 69 73 74 20 4c 2f 0d a3 16 05 e1 0d a3 5c 17 dd |ist L/.......\..| 0000c250 a4 67 65 74 5f 74 61 73 6b 5f 69 64 28 74 6e 6d |.get_task_id(tnm| 0000c260 24 29 0d a3 84 11 ea 61 25 2c 74 69 64 25 2c 6e |$).....a%,tid%,n| 0000c270 74 6e 24 0d a3 98 08 61 25 3d 30 0d a3 a2 0a 74 |tn$....a%=0....t| 0000c280 69 64 25 3d 30 0d a3 ac 0b 6e 74 6e 24 3d 22 22 |id%=0....ntn$=""| 0000c290 0d a3 b6 05 f5 0d a3 c0 31 c8 99 22 54 61 73 6b |........1.."Task| 0000c2a0 4d 61 6e 61 67 65 72 5f 45 6e 75 6d 65 72 61 74 |Manager_Enumerat| 0000c2b0 65 54 61 73 6b 73 22 2c 61 25 2c 42 75 66 31 25 |eTasks",a%,Buf1%| 0000c2c0 2c 31 36 b8 61 25 0d a3 ca 38 e7 28 61 25 3e 30 |,16.a%...8.(a%>0| 0000c2d0 29 80 28 28 42 75 66 31 25 21 31 32 80 20 31 29 |).((Buf1%!12. 1)| 0000c2e0 3d 30 29 80 28 74 6e 6d 24 3d a4 69 6e 64 69 72 |=0).(tnm$=.indir| 0000c2f0 65 63 74 28 42 75 66 31 25 21 34 29 29 8c 0d a3 |ect(Buf1%!4))...| 0000c300 f2 10 74 69 64 25 3d 42 75 66 31 25 21 30 0d a3 |..tid%=Buf1%!0..| 0000c310 fc 09 61 25 3d 2d 31 0d a4 06 05 cd 0d a4 10 09 |..a%=-1.........| 0000c320 fd 61 25 3c 30 0d a4 1a 09 3d 74 69 64 25 0d a4 |.a%<0....=tid%..| 0000c330 60 15 dd a4 69 6e 64 69 72 65 63 74 28 70 6e 74 |`...indirect(pnt| 0000c340 72 25 29 0d a4 9c 0a ea 61 6e 73 77 24 0d a4 b0 |r%).....answ$...| 0000c350 1f c8 99 22 4f 53 5f 57 72 69 74 65 4e 22 2c 70 |..."OS_WriteN",p| 0000c360 6e 74 72 25 2c 30 b8 61 6e 73 77 24 0d a4 ba 0a |ntr%,0.answ$....| 0000c370 3d 61 6e 73 77 24 0d a5 00 29 dd a4 67 65 74 5f |=answ$...)..get_| 0000c380 6d 65 73 73 61 67 65 28 74 6f 6b 65 6e 24 2c 70 |message(token$,p| 0000c390 31 24 2c 70 32 24 2c 70 33 24 2c 70 34 24 29 0d |1$,p2$,p3$,p4$).| 0000c3a0 a5 28 07 ea 73 25 0d a5 3c 48 c8 99 22 4d 65 73 |.(..s%..<H.."Mes| 0000c3b0 73 61 67 65 54 72 61 6e 73 5f 4c 6f 6f 6b 75 70 |sageTrans_Lookup| 0000c3c0 22 2c 54 6c 6d 73 25 2c 74 6f 6b 65 6e 24 2c 42 |",Tlms%,token$,B| 0000c3d0 6c 63 6b 25 2c 31 32 38 2c 70 31 24 2c 70 32 24 |lck%,128,p1$,p2$| 0000c3e0 2c 70 33 24 2c 70 34 24 b8 2c 2c 2c 73 25 0d a5 |,p3$,p4$.,,,s%..| 0000c3f0 46 0f 42 6c 63 6b 25 3f 73 25 3d 31 33 0d a5 50 |F.Blck%?s%=13..P| 0000c400 0b 3d 24 42 6c 63 6b 25 0d a5 96 3b dd f2 65 72 |.=$Blck%...;..er| 0000c410 72 6f 72 5f 6d 65 73 73 61 67 65 28 6d 65 73 73 |ror_message(mess| 0000c420 61 67 65 24 2c 70 31 24 2c 70 32 24 2c 65 74 69 |age$,p1$,p2$,eti| 0000c430 74 6c 65 24 2c 66 6c 61 67 73 25 2c f8 6b 65 79 |tle$,flags%,.key| 0000c440 63 25 29 0d a5 f0 0d ea 73 25 2c 74 24 2c 65 24 |c%).....s%,t$,e$| 0000c450 0d a6 04 2b 65 24 3d a4 67 65 74 5f 6d 65 73 73 |...+e$=.get_mess| 0000c460 61 67 65 28 6d 65 73 73 61 67 65 24 2c 70 31 24 |age(message$,p1$| 0000c470 2c 70 32 24 2c 22 22 2c 22 22 29 0d a6 0e 1d e7 |,p2$,"","").....| 0000c480 65 74 69 74 6c 65 24 3d 22 22 8c 65 74 69 74 6c |etitle$="".etitl| 0000c490 65 24 3d 22 45 54 34 22 0d a6 18 28 74 24 3d a4 |e$="ET4"...(t$=.| 0000c4a0 67 65 74 5f 6d 65 73 73 61 67 65 28 65 74 69 74 |get_message(etit| 0000c4b0 6c 65 24 2c 22 22 2c 22 22 2c 22 22 2c 22 22 29 |le$,"","","","")| 0000c4c0 0d a6 22 11 24 28 42 6c 63 6b 25 2b 34 29 3d 65 |..".$(Blck%+4)=e| 0000c4d0 24 0d a6 2c 0d 42 6c 63 6b 25 21 30 3d 30 0d a6 |$..,.Blck%!0=0..| 0000c4e0 36 2f c8 99 22 57 69 6d 70 5f 52 65 70 6f 72 74 |6/.."Wimp_Report| 0000c4f0 45 72 72 6f 72 22 2c 42 6c 63 6b 25 2c 66 6c 61 |Error",Blck%,fla| 0000c500 67 73 25 2c 74 24 b8 2c 6b 65 79 63 25 0d a6 40 |gs%,t$.,keyc%..@| 0000c510 05 e1 0d a6 90 07 dc 20 39 0d a6 9a 1b dc 20 22 |....... 9..... "| 0000c520 70 72 65 64 65 73 6b 22 2c 22 46 45 42 22 2c 22 |predesk","FEB","| 0000c530 45 57 31 22 0d a6 a4 1b dc 20 22 70 72 65 64 65 |EW1"..... "prede| 0000c540 73 6b 22 2c 22 46 46 38 22 2c 22 45 57 32 22 0d |sk","FF8","EW2".| 0000c550 a6 ae 1b dc 20 22 70 72 65 64 65 73 6b 22 2c 22 |.... "predesk","| 0000c560 46 46 39 22 2c 22 45 57 33 22 0d a6 b8 1b dc 20 |FF9","EW3"..... | 0000c570 22 70 72 65 64 65 73 6b 22 2c 22 46 46 41 22 2c |"predesk","FFA",| 0000c580 22 45 57 34 22 0d a6 c2 1b dc 20 22 70 72 65 64 |"EW4"..... "pred| 0000c590 65 73 6b 22 2c 22 46 46 42 22 2c 22 45 57 35 22 |esk","FFB","EW5"| 0000c5a0 0d a6 cc 1b dc 20 22 70 72 65 64 65 73 6b 22 2c |..... "predesk",| 0000c5b0 22 46 46 43 22 2c 22 45 57 32 22 0d a6 d6 1c dc |"FFC","EW2".....| 0000c5c0 20 22 70 72 65 64 65 73 6b 22 2c 22 31 30 30 30 | "predesk","1000| 0000c5d0 22 2c 22 45 57 36 22 0d a6 e0 19 dc 20 22 70 72 |","EW6"..... "pr| 0000c5e0 65 64 65 73 6b 22 2c 22 2a 22 2c 22 45 57 37 22 |edesk","*","EW7"| 0000c5f0 0d a6 ea 19 dc 20 22 61 75 74 6f 72 75 6e 22 2c |..... "autorun",| 0000c600 22 2a 22 2c 22 45 57 38 22 0d a7 12 07 dc 20 39 |"*","EW8"..... 9| 0000c610 0d a7 1c 1a dc 20 22 70 72 65 64 65 73 6b 22 2c |..... "predesk",| 0000c620 22 41 52 50 6c 61 79 65 72 22 0d a7 26 1b dc 20 |"ARPlayer"..&.. | 0000c630 22 70 72 65 64 65 73 6b 22 2c 22 42 61 6e 64 4c |"predesk","BandL| 0000c640 69 6d 69 74 22 0d a7 30 1a dc 20 22 70 72 65 64 |imit"..0.. "pred| 0000c650 65 73 6b 22 2c 22 53 65 74 55 70 4e 65 74 22 0d |esk","SetUpNet".| 0000c660 a7 3a 1b dc 20 22 70 72 65 64 65 73 6b 22 2c 22 |.:.. "predesk","| 0000c670 43 6f 6e 66 69 67 75 72 65 22 0d a7 44 1b dc 20 |Configure"..D.. | 0000c680 22 61 75 74 6f 72 75 6e 22 2c 22 43 6f 6e 66 69 |"autorun","Confi| 0000c690 67 75 72 65 22 0d a7 4e 1b dc 20 22 61 75 74 6f |gure"..N.. "auto| 0000c6a0 72 75 6e 22 2c 22 7e 43 44 52 65 69 6e 69 74 22 |run","~CDReinit"| 0000c6b0 0d a7 58 1b dc 20 22 61 75 74 6f 72 75 6e 22 2c |..X.. "autorun",| 0000c6c0 22 21 7a 7a 7a 7a 70 61 73 73 22 0d a7 62 1b dc |"!zzzzpass"..b..| 0000c6d0 20 22 61 75 74 6f 72 75 6e 22 2c 22 21 42 6f 6f | "autorun","!Boo| 0000c6e0 74 70 6c 75 73 22 0d a7 6c 18 dc 20 22 62 6f 6f |tplus"..l.. "boo| 0000c6f0 74 22 2c 22 21 42 6f 6f 74 70 6c 75 73 22 0d a7 |t","!Bootplus"..| 0000c700 94 1a dc 20 53 75 2c 4d 6f 2c 54 75 2c 57 65 2c |... Su,Mo,Tu,We,| 0000c710 54 68 2c 46 72 2c 53 61 0d ff |Th,Fr,Sa..| 0000c71a