�><zzzzpass$dir>.!Runimage
F�Tlms%16
P�Tloi%24
Z
�Buf1%512
d
�Buf2%128
n
�Blck%512
x�Task$(200)
��Taskid%(200)
��toolbox_values
��initialise
�6��4:�"!zzzzpass ";�$;" at line ";�;" !zzzzpass":�
��
�
�Logged%�
��Zzzzchk_Status%=3�
�rettim%=6000
��

,rettim%=50

6�

@�

J�Zzzzchk_Status%=3�

|rettim%=200

��

�
rettim%=0

��

��

�/ș"Wimp_PollIdle",0,Blck%,�+rettim%�reason%

��do
&
�timeouts
0
�Quit%
:&ș"Wimp_CloseDown",Thdl%,&48534154
D�
���toolbox_values
�E_TOAC%=&44ec1
�E_WATBS%=&82880
E_UQA%=1
RT_TOMO%=&44ec6
\T_TSO%=&44ec3
�XBIT%=&20000
��
���initialise
�)�f%,aline$,item$,valu$,a%,c%,b%,d%,f$
�init_variables
83ș"OS_ReadVarVal","Boot$Dir",Buf1%,128,0,0�,,l%
B	l%-=6
LBuf1%?l%=13
V"Bootdevice$=�uppercase($Buf1%)
~�get_tasks
��init_options
��init_previous
�init_traps
F
Buf1%!0=0
P
Buf2%!0=0
ZVș"Toolbox_Initialise",0,310,Buf2%,Buf1%,"<zzzzpass$dir>",Tlms%,Tloi%�,Thdl%,sprt%
��log_message("LM1","","")
��
���init_variables
Start_time%=�
Task_Starting%=�
Task_Quitting%=�
"/Logfile$="<bootplus$dir>.Resources.logfile"
,1Passfile$="<bootplus$dir>.Resources.password"
6/Optfile$="<bootplus$dir>.Resources.options"
@1Accessfile$="<bootplus$dir>.Resources.access"
J0Diefile$="<bootplus$dir>.Resources.logtimes"
T/Ownerfile$="<bootplus$dir>.Resources.owner"
^3Trapfile$="<bootplus$dir>.Resources.killriscpc"
hLogged_User$=""
rLogged_Access$=""
|
Logged%=�
�Logged_Duration%=0
�Logged_Time%=0
�
Warned%=�
�Shown%=�
�
Deaths%=0
�Dead%=�
�Dying%=�
�Quit%=�
�Booting%=�
�Zzzzchk_Status%=0
�Zzzzchk_Stopped%=�
�Watchdog_Code%=�(&FFFFFFF)
��
D��init_options
l�f%
�"�("*ACCESS "+Optfile$+" WR/R")
�f%=�(Optfile$)
��
�aline$=�#f%
�c%=�aline$,":")
�item$=�aline$,c%-2)
�valu$=�aline$,c%+2)
�Ȏitem$�
��"Allow Time"
�Allow_Time%=�(valu$)*100
��"Die Time"
Die_Time%=�(valu$)*100
�"Warn Time"
Warn_Time%=�(valu$)*100
 �"Task Starting"
*(Task_Starting%=(valu$="Y"�valu$="y")
4�"Task Quitting"
>(Task_Quitting%=(valu$="Y"�valu$="y")
H�"Directory Access"
R+Directory_Access%=(valu$="Y"�valu$="y")
\�"Test Mode Logins"
f+Test_Mode_Logins%=(valu$="Y"�valu$="y")
p�"Full Owner Access"
z,Full_Owner_Access%=(valu$="Y"�valu$="y")
��"Watchdog Off"
�'Watchdog_Off%=(valu$="Y"�valu$="y")
��
�	��#f%
��#f%
� �("*ACCESS "+Optfile$+" L/")
�O_allowed%=Allow_Time%
��Watchdog_Off%�
�.ș"Wimp_SetWatchdogState",0,Watchdog_Code%
��
	�
	L��init_previous
	t
�f%,a$
	� ș"XOS_File",4,Diefile$,,,,3
	�ș"OS_File",23,Diefile$�f%
	�
�f%=0�
	�
Deaths%=3
	�f%=�(Diefile$)
	��#f%,"3     "
	��#f%
	��
f%=�(Diefile$)
(a$=�#f%
2Deaths%=�(a$)
<�#f%
F�
Pș"OS_File",4,Diefile$,,,,9
Z�
���init_traps
��f%,a$,a%,f$
�!ș"XOS_File",4,Trapfile$,,,,3
�ș"OS_File",23,Trapfile$�f%
�
�f%=0�
f%=�(Trapfile$)
"�#f%,"| Traps"
,�#f%
6�
^#�("*ACCESS "+Trapfile$+" WR/R")
hf%=�(Trapfile$)
r�
|a$=�#f%
��a$,"!Trap")>0�
�a%=�a$," ",15)
�f$=�a$,7,a%-7)
�ș"OS_File",23,f$�a%
�
�a%=0�
�@�("*COPY <BootPlus$Dir>.Resources.Thieftrap "+f$+" ~C ~V R")
�J�("*COPY <BootPlus$Dir>.Resources.!zzzzpass "+f$+".!zzzzpass ~C ~V R")
�
�
	��#f%
&�#f%
0�
: ș"OS_File",4,Trapfile$,,,,9
D�
���do
��Dying%��die
��Booting%�
�5ș"OS_ReadVarVal","Boot$State",Buf1%,128,0,0�,,l%
�	l%-=6
�Buf1%?l%=13

Booting%=($Buf1%="desktop")

�

Ȏreason%�

 �0

H�timers

R	�&200

z�toolbox_events

�
�17,18,19

��wimp_messages

��

�	X%+=1

��get_tasks

��
��timeouts
B
�r%,f%
V
�Logged%�
~3�(Logged_User$<>"OWNER")�(�Full_Owner_Access%)�
�'�(�-Logged_Time%)>Logged_Duration%�
�'�log_message("LM2",Logged_User$,"")
�$�error_message("EM1","ET1",0,K%)
�Logged_User$=""
�Logged_Access$=""
�
Logged%=�

Warned%=�

Start_Time%=�
2�Bootplus_Status%=3�
Z
Buf1%!0=4
d)Blck%!0=32:Blck%!12=0:Blck%!16=&808c0
nBlck%!20=4:Blck%!24=Buf1%
x2ș"Wimp_SendMessage",17,Blck%,Bootplus_Handle%
��
��
��
��
��
���timers
�allow%
"�Logged%��Dead%�
TȎDeaths%�
^�0
hallow%=Allow_Time%
r�1
|allow%=Allow_Time%/2
��2
�allow%=Allow_Time%/4
��3
�allow%=600
��
�'�((�-Start_time%)>allow%)��Warned%�
�0ș"Toolbox_ShowObject",0,Warning_ID%,0,0,0,0
�
Warned%=�
�Shown%=�
��
3�((�-Start_time%)>(allow%+Warn_Time%))� Shown%�
0(ș"Toolbox_HideObject",0,Warning_ID%
:Shown%=�
D�
N(�(�-Start_time%)>(allow%+Die_Time%)�
v,ș"Toolbox_ShowObject",0,Wmi_ID%,0,0,0,0
��
��
��
��
�/�Zzzzchk_Status%=0�(�-Zzzzchk_Stopped%)>50�
�0*Filer_Run <Bootplus$Dir>.Resources.!zzzzchk
�Zzzzchk_Status%=1
��
��
4��toolbox_events
\Event_Size%=Blck%!0
fEvent_Reference%=Blck%!4
pEvent_Code%=Blck%!8
zEvent_Flags%=Blck%!12
�?�callers(0,Ancestor_ID%,Ancestor_Name$,Ancestor_Component%)
�9�callers(8,Parent_ID%,Parent_Name$,Parent_Component%)
�4�callers(16,Self_ID%,Self_Name$,Self_Component%)
�ȎSelf_Name$�
��"Warning"
��handle_warning
�"Test"
�handle_test

�"Wmi"
$�handle_wmi
.�
8�
~��wimp_messages
�#�app$,a%,b%,r%,allowed%,dir$,f%
�ȎBlck%!16�
��0
�Quit%=�
��8
��(Blck%!20� 1)=1�

Blck%!12=Blck%!8
)ș"Wimp_SendMessage",19,Blck%,Blck%!4
�
(�&400C2
P�Booting%��Log_task_init
Z�&400C3
��log_task_close
��5
��log_dbl_click
��&808c0
��log_user_messages
��
��
@��Log_task_init
h�r%,app$
|app$=�indirect(Blck%+28)
��Task_Starting%��Booting%�
�=�(app$<>"zzzzchk")�(app$<>"zzzzpass")�(app$<>"BootPlus")�
�)�log_message("LM3",Logged_User$,app$)
��
��
�r%=0
��
	r%+=1
�Taskid%(r%)=0�r%=200
�Taskid%(r%)=0�
XTaskid%(r%)=Blck%!4
bTask$(r%)=app$
l�
�Ȏapp$�
��"BootPlus"
�Bootplus_Status%=3
�Bootplus_Handle%=Blck%!4
��Logged%� Logged_User$<>""�
�)Blck%!0=32:Blck%!12=0:Blck%!16=&808c0
�Blck%!20=24:Blck%!24=Buf2%
�*!Buf2%=1:$(Buf2%+4)=Logged_User$+�(13)
2ș"Wimp_SendMessage",17,Blck%,Bootplus_Handle%
�
�"zzzzchk"
>Zzzzchk_Status%=3
HZzzzchk_Handle%=Blck%!4
R�
\�
���log_task_close
�
�r%,f%
�r%=0
��
�	r%+=1
�f%=(Taskid%(r%)=Blck%!4)
�r%=200�f%
�f%�
Taskid%(r%)=0
$�Task_Quitting%�
..�log_message("LM4",Logged_User$,Task$(r%))
8�
B�
LȎBlck%!4�
V�Zzzzchk_Handle%
�Zzzzchk_Status%=0
�Zzzzchk_Stopped%=�
��
��
���log_dbl_click
'�a%,b%,app$,dir$,allow%,u$,a$,ftyp%
2(app$=�uppercase(�indirect(Blck%+44))
<a%=�app$,"$.")
Fb%=�app$,".",a%+3)
P(dir$=�uppercase(�app$,a%+2,b%-a%-2))
Zu$=�uppercase(Logged_User$)
d�u$=""�u$="xxx"
n!a$=�uppercase(Logged_Access$)
x�a$=""�a$="xxx"
�ftyp%=Blck%!40
��app$,"!ZZZZPASS")>0�
�Blck%!12=Blck%!8
�Blck%!16=4
�)ș"Wimp_SendMessage",17,Blck%,Blck%!4
�$�error_message("EM2","ET3",0,K%)
��
T�app$,Bootdevice$)=1�
|allow%=(dir$="PUBLIC")
�:allow%=(allow%�(Logged%�(Bootdevice$+".GROUPS"=app$)))
�@allow%=(allow%�(Logged%�(Bootdevice$+".GROUPS.GUEST"=app$)))
�4allow%=(allow%�(u$="OWNER"� Full_Owner_Access%))
�8allow%=(allow%�(�app$,".!BOOTPLUS")>0)� ftyp%=&2000)
�/allow%=(allow%�((�app$,"$.GROUPS."+u$)>0)))
��app$,".!BOOTPLUS")=0�
�>allow%=(allow%�(�a$,"|"+dir$+"|")>0��app$,"$.GROUPS.")=0))
��
�
�allow%�
&Blck%!12=Blck%!8
0Blck%!16=4
:)ș"Wimp_SendMessage",17,Blck%,Blck%!4
bȎBlck%!40�
l
�&1000
v$�error_message("EM3","ET4",0,K%)
�
�&2000
�$�error_message("EM4","ET5",0,K%)
�
�$�error_message("EM5","ET6",0,K%)
��
�)�log_message("LM5",Logged_User$,app$)
��
�Directory_Access%�
)�log_message("LM6",Logged_User$,app$)
�
 �
*�
4�
>�
���log_user_messages
�Blck%!4=Bootplus_Handle%�
8Iș"Wimp_TransferBlock",Bootplus_Handle%,Blck%!24,Thdl%,Buf1%,Blck%!20
BȎBuf1%!0�
L�1
t
�log_user
~�2
��3
�Quit%=�
��4

�
�
�
d��log_user
��np%,dp%,a%
�np%=Buf1%!4
�dp%=Buf1%!12
��$(Buf1%+np%)="LOGOFF"�
Logged_User$=""
"Logged_Access$=""
,Logged_Time%=�
6Logged_Duration%=&7FFFFFFF
@.ș"Wimp_SetWatchdogState",0,Watchdog_Code%
J�
rLogged_User$=$(Buf1%+np%)
|Logged_Access$=$(Buf1%+dp%)
�Logged_Time%=�
�"Logged_Duration%=Buf1%!16*6000
�
Logged%=�
��Watchdog_Off%�
��Logged_User$="OWNER"�
�.ș"Wimp_SetWatchdogState",1,Watchdog_Code%
��
�.ș"Wimp_SetWatchdogState",0,Watchdog_Code%
��
��
 &
Deaths%=0
 0ș"OS_File",4,Diefile$,,,,3
 :f%=�(Diefile$)
 D�#f%,"0     "
 N�#f%
 Xș"OS_File",4,Diefile$,,,,9
 �/Blck%!0=32:Blck%!12=Blck%!8:Blck%!16=&808c0
 �Blck%!20=4:Blck%!24=Buf2%
 �!Buf2%=2
 �2ș"Wimp_SendMessage",17,Blck%,Bootplus_Handle%
 ��
 ��
 �	��die
!4�log_message("LM7","","")
!\Dying%=�
!fDead%=�
!pDeaths%+=1
!z�Deaths%=4�Deaths%=3
!�ș"OS_File",4,Diefile$,,,,3
!�f%=�(Diefile$)
!��#f%,�(Deaths%)+"     "
!��#f%
!�ș"OS_File",4,Diefile$,,,,9
!��Test_Mode_Logins%�
!�șT_TSO%,0,Test_ID%,0,0,0,0
"�
".!ș"Wimp_SetWatchdogState",0,0
"8
�a%=0
"B�
"La%=0
"V��
"`�
"j�
"�'��callers(offset%,�id%,�id$,�cpnt%)
#	�ptr%
#ptr%=Tloi%+offset%
#
id%=!ptr%
#(�id%<>0�
#2/ș"Toolbox_GetTemplateName",0,id%,Buf1%,128
#<id$=�indirect(Buf1%)
#F�
#P
id$=""
#Z�
#dcpnt%=ptr%!4
#n�
#���handle_warning
#�ȎEvent_Code%�
#��E_TOAC%
$Warning_ID%=Self_ID%
$�
$"�
$h��handle_test
$�ȎEvent_Code%�
$��E_TOAC%
$�Test_ID%=Self_ID%
$��
$��
%��handle_wmi
%D
�f%,a%,a$
%XȎEvent_Code%�
%b�E_TOAC%
%�Wmi_ID%=Self_ID%
%�
�E_WATBS%
%�!ș"OS_File",4,Ownerfile$,,,,3
%�f%=�(Ownerfile$)
%��a%=1�5
%�a$=�#f%
%�$șT_TOMO%,0,Self_ID%,448,a%+4,a$
%��a%
%��#f%
&!ș"OS_File",4,Ownerfile$,,,,9
&*Dying%=�
&4�
&>�
&�ݤindirect(pntr%)
&�
�answ$
&�ș"OS_WriteN",pntr%,0�answ$
&�
=answ$
'��log_message(msg$,p1$,p2$)
'B�f%,ext%,m$,l$
'V'l$=�get_message(msg$,p1$,p2$,"","")
'`!Buf1%=0
'jș"OS_Word",14,Buf1%
't&m$=�indirect(Buf1%)+" : "+l$+�(10)
'�ș"OS_Find",&C3,Logfile$�f%
'�ș"OS_Args",2,f%�,,ext%
'�"ș"OS_GBPB",1,f%,m$,�(m$),ext%
'�ș"OS_Find",0,f%
'��
(ݤuppercase(astring$)
(F$Buf1%=astring$
(P�a%=0��(astring$)-1
(Z6�Buf1%?a%>=97� Buf1%?a%<=122�Buf1%?a%=Buf1%?a%�&DF
(d�a%
(n=$Buf1%
(���get_tasks
(�
�a%,b%,q%
(�a%=0
)b%=0
)q%=0
)Bootplus_Status%=0
)"Bootplus_Handle%=0
),(�Zzzzchk_Status%=3�Zzzzchk_Status%=0
)6Zzzzchk_Handle%=0
)@�
)J1ș"TaskManager_EnumerateTasks",a%,Buf1%,16�a%
)T�a%>0�((Buf1%!12� 1)=0)�
)^	b%+=1
)hTaskid%(b%)=Buf1%!0
)r Task$(b%)=�indirect(Buf1%!4)
)|ȎTask$(b%)�
)��"BootPlus"
)�Bootplus_Status%=3
)� Bootplus_Handle%=Taskid%(b%)
)��"zzzzchk"
)�Zzzzchk_Status%=3
)�Zzzzchk_Handle%=Taskid%(b%)
)��
)��
)�	�a%<0
)��
*&)ݤget_message(token$,p1$,p2$,p3$,p4$)
*N�s%
*bHș"MessageTrans_Lookup",Tlms%,token$,Blck%,128,p1$,p2$,p3$,p4$�,,,s%
*lBlck%?s%=13
*v=$Blck%
*�2��error_message(message$,title$,flags%,�keyc%)
+ 
�s%,t$,e$
+4)e$=�get_message(message$,"","","","")
+>�title$=""�title$="ET2"
+H't$=�get_message(title$,"","","","")
+R$(Blck%+4)=e$
+\
Blck%!0=0
+f/ș"Wimp_ReportError",Blck%,flags%,t$�,keyc%
+p�
�

00000000  0d 00 0a 1e f4 3e 3c 7a  7a 7a 7a 70 61 73 73 24  |.....><zzzzpass$|
00000010  64 69 72 3e 2e 21 52 75  6e 69 6d 61 67 65 0d 00  |dir>.!Runimage..|
00000020  46 0c de 54 6c 6d 73 25  31 36 0d 00 50 0c de 54  |F..Tlms%16..P..T|
00000030  6c 6f 69 25 32 34 0d 00  5a 0d de 42 75 66 31 25  |loi%24..Z..Buf1%|
00000040  35 31 32 0d 00 64 0d de  42 75 66 32 25 31 32 38  |512..d..Buf2%128|
00000050  0d 00 6e 0d de 42 6c 63  6b 25 35 31 32 0d 00 78  |..n..Blck%512..x|
00000060  0f de 54 61 73 6b 24 28  32 30 30 29 0d 00 82 11  |..Task$(200)....|
00000070  de 54 61 73 6b 69 64 25  28 32 30 30 29 0d 00 8c  |.Taskid%(200)...|
00000080  13 f2 74 6f 6f 6c 62 6f  78 5f 76 61 6c 75 65 73  |..toolbox_values|
00000090  0d 00 96 0f f2 69 6e 69  74 69 61 6c 69 73 65 0d  |.....initialise.|
000000a0  00 a0 36 ee 85 ef 34 3a  f1 22 21 7a 7a 7a 7a 70  |..6...4:."!zzzzp|
000000b0  61 73 73 20 22 3b f6 24  3b 22 20 61 74 20 6c 69  |ass ";.$;" at li|
000000c0  6e 65 20 22 3b 9e 3b 22  20 21 7a 7a 7a 7a 70 61  |ne ";.;" !zzzzpa|
000000d0  73 73 22 3a e0 0d 00 aa  05 f5 0d 00 b4 0d e7 4c  |ss":...........L|
000000e0  6f 67 67 65 64 25 8c 0d  00 be 17 e7 5a 7a 7a 7a  |ogged%......Zzzz|
000000f0  63 68 6b 5f 53 74 61 74  75 73 25 3d 33 8c 0d 00  |chk_Status%=3...|
00000100  f0 10 72 65 74 74 69 6d  25 3d 36 30 30 30 0d 00  |..rettim%=6000..|
00000110  fa 05 cc 0d 01 2c 0e 72  65 74 74 69 6d 25 3d 35  |.....,.rettim%=5|
00000120  30 0d 01 36 05 cd 0d 01  40 05 cc 0d 01 4a 17 e7  |0..6....@....J..|
00000130  5a 7a 7a 7a 63 68 6b 5f  53 74 61 74 75 73 25 3d  |Zzzzchk_Status%=|
00000140  33 8c 0d 01 7c 0f 72 65  74 74 69 6d 25 3d 32 30  |3...|.rettim%=20|
00000150  30 0d 01 86 05 cc 0d 01  b8 0d 72 65 74 74 69 6d  |0.........rettim|
00000160  25 3d 30 0d 01 c2 05 cd  0d 01 cc 05 cd 0d 01 f4  |%=0.............|
00000170  2f c8 99 22 57 69 6d 70  5f 50 6f 6c 6c 49 64 6c  |/.."Wimp_PollIdl|
00000180  65 22 2c 30 2c 42 6c 63  6b 25 2c 91 2b 72 65 74  |e",0,Blck%,.+ret|
00000190  74 69 6d 25 b8 72 65 61  73 6f 6e 25 0d 01 fe 07  |tim%.reason%....|
000001a0  f2 64 6f 0d 02 26 0d f2  74 69 6d 65 6f 75 74 73  |.do..&..timeouts|
000001b0  0d 02 30 0a fd 51 75 69  74 25 0d 02 3a 26 c8 99  |..0..Quit%..:&..|
000001c0  22 57 69 6d 70 5f 43 6c  6f 73 65 44 6f 77 6e 22  |"Wimp_CloseDown"|
000001d0  2c 54 68 64 6c 25 2c 26  34 38 35 33 34 31 35 34  |,Thdl%,&48534154|
000001e0  0d 02 44 05 e0 0d 02 8a  14 dd f2 74 6f 6f 6c 62  |..D........toolb|
000001f0  6f 78 5f 76 61 6c 75 65  73 0d 02 da 12 45 5f 54  |ox_values....E_T|
00000200  4f 41 43 25 3d 26 34 34  65 63 31 0d 02 e4 13 45  |OAC%=&44ec1....E|
00000210  5f 57 41 54 42 53 25 3d  26 38 32 38 38 30 0d 03  |_WATBS%=&82880..|
00000220  0c 0c 45 5f 55 51 41 25  3d 31 0d 03 52 12 54 5f  |..E_UQA%=1..R.T_|
00000230  54 4f 4d 4f 25 3d 26 34  34 65 63 36 0d 03 5c 11  |TOMO%=&44ec6..\.|
00000240  54 5f 54 53 4f 25 3d 26  34 34 65 63 33 0d 03 84  |T_TSO%=&44ec3...|
00000250  10 58 42 49 54 25 3d 26  32 30 30 30 30 0d 03 8e  |.XBIT%=&20000...|
00000260  05 e1 0d 03 d4 10 dd f2  69 6e 69 74 69 61 6c 69  |........initiali|
00000270  73 65 0d 03 fc 29 ea 66  25 2c 61 6c 69 6e 65 24  |se...).f%,aline$|
00000280  2c 69 74 65 6d 24 2c 76  61 6c 75 24 2c 61 25 2c  |,item$,valu$,a%,|
00000290  63 25 2c 62 25 2c 64 25  2c 66 24 0d 04 10 13 f2  |c%,b%,d%,f$.....|
000002a0  69 6e 69 74 5f 76 61 72  69 61 62 6c 65 73 0d 04  |init_variables..|
000002b0  38 33 c8 99 22 4f 53 5f  52 65 61 64 56 61 72 56  |83.."OS_ReadVarV|
000002c0  61 6c 22 2c 22 42 6f 6f  74 24 44 69 72 22 2c 42  |al","Boot$Dir",B|
000002d0  75 66 31 25 2c 31 32 38  2c 30 2c 30 b8 2c 2c 6c  |uf1%,128,0,0.,,l|
000002e0  25 0d 04 42 09 6c 25 2d  3d 36 0d 04 4c 0f 42 75  |%..B.l%-=6..L.Bu|
000002f0  66 31 25 3f 6c 25 3d 31  33 0d 04 56 22 42 6f 6f  |f1%?l%=13..V"Boo|
00000300  74 64 65 76 69 63 65 24  3d a4 75 70 70 65 72 63  |tdevice$=.upperc|
00000310  61 73 65 28 24 42 75 66  31 25 29 0d 04 7e 0e f2  |ase($Buf1%)..~..|
00000320  67 65 74 5f 74 61 73 6b  73 0d 04 b0 11 f2 69 6e  |get_tasks.....in|
00000330  69 74 5f 6f 70 74 69 6f  6e 73 0d 04 e2 12 f2 69  |it_options.....i|
00000340  6e 69 74 5f 70 72 65 76  69 6f 75 73 0d 05 14 0f  |nit_previous....|
00000350  f2 69 6e 69 74 5f 74 72  61 70 73 0d 05 46 0d 42  |.init_traps..F.B|
00000360  75 66 31 25 21 30 3d 30  0d 05 50 0d 42 75 66 32  |uf1%!0=0..P.Buf2|
00000370  25 21 30 3d 30 0d 05 5a  56 c8 99 22 54 6f 6f 6c  |%!0=0..ZV.."Tool|
00000380  62 6f 78 5f 49 6e 69 74  69 61 6c 69 73 65 22 2c  |box_Initialise",|
00000390  30 2c 33 31 30 2c 42 75  66 32 25 2c 42 75 66 31  |0,310,Buf2%,Buf1|
000003a0  25 2c 22 3c 7a 7a 7a 7a  70 61 73 73 24 64 69 72  |%,"<zzzzpass$dir|
000003b0  3e 22 2c 54 6c 6d 73 25  2c 54 6c 6f 69 25 b8 2c  |>",Tlms%,Tloi%.,|
000003c0  54 68 64 6c 25 2c 73 70  72 74 25 0d 05 82 1d f2  |Thdl%,sprt%.....|
000003d0  6c 6f 67 5f 6d 65 73 73  61 67 65 28 22 4c 4d 31  |log_message("LM1|
000003e0  22 2c 22 22 2c 22 22 29  0d 05 96 05 e1 0d 05 dc  |","","")........|
000003f0  14 dd f2 69 6e 69 74 5f  76 61 72 69 61 62 6c 65  |...init_variable|
00000400  73 0d 06 04 11 53 74 61  72 74 5f 74 69 6d 65 25  |s....Start_time%|
00000410  3d 91 0d 06 0e 14 54 61  73 6b 5f 53 74 61 72 74  |=.....Task_Start|
00000420  69 6e 67 25 3d b9 0d 06  18 14 54 61 73 6b 5f 51  |ing%=.....Task_Q|
00000430  75 69 74 74 69 6e 67 25  3d b9 0d 06 22 2f 4c 6f  |uitting%=..."/Lo|
00000440  67 66 69 6c 65 24 3d 22  3c 62 6f 6f 74 70 6c 75  |gfile$="<bootplu|
00000450  73 24 64 69 72 3e 2e 52  65 73 6f 75 72 63 65 73  |s$dir>.Resources|
00000460  2e 6c 6f 67 66 69 6c 65  22 0d 06 2c 31 50 61 73  |.logfile"..,1Pas|
00000470  73 66 69 6c 65 24 3d 22  3c 62 6f 6f 74 70 6c 75  |sfile$="<bootplu|
00000480  73 24 64 69 72 3e 2e 52  65 73 6f 75 72 63 65 73  |s$dir>.Resources|
00000490  2e 70 61 73 73 77 6f 72  64 22 0d 06 36 2f 4f 70  |.password"..6/Op|
000004a0  74 66 69 6c 65 24 3d 22  3c 62 6f 6f 74 70 6c 75  |tfile$="<bootplu|
000004b0  73 24 64 69 72 3e 2e 52  65 73 6f 75 72 63 65 73  |s$dir>.Resources|
000004c0  2e 6f 70 74 69 6f 6e 73  22 0d 06 40 31 41 63 63  |.options"..@1Acc|
000004d0  65 73 73 66 69 6c 65 24  3d 22 3c 62 6f 6f 74 70  |essfile$="<bootp|
000004e0  6c 75 73 24 64 69 72 3e  2e 52 65 73 6f 75 72 63  |lus$dir>.Resourc|
000004f0  65 73 2e 61 63 63 65 73  73 22 0d 06 4a 30 44 69  |es.access"..J0Di|
00000500  65 66 69 6c 65 24 3d 22  3c 62 6f 6f 74 70 6c 75  |efile$="<bootplu|
00000510  73 24 64 69 72 3e 2e 52  65 73 6f 75 72 63 65 73  |s$dir>.Resources|
00000520  2e 6c 6f 67 74 69 6d 65  73 22 0d 06 54 2f 4f 77  |.logtimes"..T/Ow|
00000530  6e 65 72 66 69 6c 65 24  3d 22 3c 62 6f 6f 74 70  |nerfile$="<bootp|
00000540  6c 75 73 24 64 69 72 3e  2e 52 65 73 6f 75 72 63  |lus$dir>.Resourc|
00000550  65 73 2e 6f 77 6e 65 72  22 0d 06 5e 33 54 72 61  |es.owner"..^3Tra|
00000560  70 66 69 6c 65 24 3d 22  3c 62 6f 6f 74 70 6c 75  |pfile$="<bootplu|
00000570  73 24 64 69 72 3e 2e 52  65 73 6f 75 72 63 65 73  |s$dir>.Resources|
00000580  2e 6b 69 6c 6c 72 69 73  63 70 63 22 0d 06 68 13  |.killriscpc"..h.|
00000590  4c 6f 67 67 65 64 5f 55  73 65 72 24 3d 22 22 0d  |Logged_User$="".|
000005a0  06 72 15 4c 6f 67 67 65  64 5f 41 63 63 65 73 73  |.r.Logged_Access|
000005b0  24 3d 22 22 0d 06 7c 0d  4c 6f 67 67 65 64 25 3d  |$=""..|.Logged%=|
000005c0  a3 0d 06 86 16 4c 6f 67  67 65 64 5f 44 75 72 61  |.....Logged_Dura|
000005d0  74 69 6f 6e 25 3d 30 0d  06 90 12 4c 6f 67 67 65  |tion%=0....Logge|
000005e0  64 5f 54 69 6d 65 25 3d  30 0d 06 9a 0d 57 61 72  |d_Time%=0....War|
000005f0  6e 65 64 25 3d a3 0d 06  a4 0c 53 68 6f 77 6e 25  |ned%=.....Shown%|
00000600  3d a3 0d 06 ae 0d 44 65  61 74 68 73 25 3d 30 0d  |=.....Deaths%=0.|
00000610  06 b8 0b 44 65 61 64 25  3d a3 0d 06 c2 0c 44 79  |...Dead%=.....Dy|
00000620  69 6e 67 25 3d a3 0d 06  cc 0b 51 75 69 74 25 3d  |ing%=.....Quit%=|
00000630  a3 0d 06 d6 0e 42 6f 6f  74 69 6e 67 25 3d b9 0d  |.....Booting%=..|
00000640  06 e0 15 5a 7a 7a 7a 63  68 6b 5f 53 74 61 74 75  |...Zzzzchk_Statu|
00000650  73 25 3d 30 0d 06 ea 16  5a 7a 7a 7a 63 68 6b 5f  |s%=0....Zzzzchk_|
00000660  53 74 6f 70 70 65 64 25  3d 91 0d 06 f4 1e 57 61  |Stopped%=.....Wa|
00000670  74 63 68 64 6f 67 5f 43  6f 64 65 25 3d b3 28 26  |tchdog_Code%=.(&|
00000680  46 46 46 46 46 46 46 29  0d 06 fe 05 e1 0d 07 44  |FFFFFFF).......D|
00000690  12 dd f2 69 6e 69 74 5f  6f 70 74 69 6f 6e 73 0d  |...init_options.|
000006a0  07 6c 07 ea 66 25 0d 07  94 22 ff 28 22 2a 41 43  |.l..f%...".("*AC|
000006b0  43 45 53 53 20 22 2b 4f  70 74 66 69 6c 65 24 2b  |CESS "+Optfile$+|
000006c0  22 20 57 52 2f 52 22 29  0d 07 9e 12 66 25 3d 8e  |" WR/R")....f%=.|
000006d0  28 4f 70 74 66 69 6c 65  24 29 0d 07 a8 05 f5 0d  |(Optfile$)......|
000006e0  07 b2 0f 61 6c 69 6e 65  24 3d be 23 66 25 0d 07  |...aline$=.#f%..|
000006f0  bc 13 63 25 3d a7 61 6c  69 6e 65 24 2c 22 3a 22  |..c%=.aline$,":"|
00000700  29 0d 07 c6 17 69 74 65  6d 24 3d c0 61 6c 69 6e  |)....item$=.alin|
00000710  65 24 2c 63 25 2d 32 29  0d 07 d0 17 76 61 6c 75  |e$,c%-2)....valu|
00000720  24 3d c1 61 6c 69 6e 65  24 2c 63 25 2b 32 29 0d  |$=.aline$,c%+2).|
00000730  07 da 0c c8 8e 69 74 65  6d 24 ca 0d 07 e4 11 c9  |.....item$......|
00000740  22 41 6c 6c 6f 77 20 54  69 6d 65 22 0d 07 ee 1c  |"Allow Time"....|
00000750  41 6c 6c 6f 77 5f 54 69  6d 65 25 3d bb 28 76 61  |Allow_Time%=.(va|
00000760  6c 75 24 29 2a 31 30 30  0d 07 f8 0f c9 22 44 69  |lu$)*100....."Di|
00000770  65 20 54 69 6d 65 22 0d  08 02 1a 44 69 65 5f 54  |e Time"....Die_T|
00000780  69 6d 65 25 3d bb 28 76  61 6c 75 24 29 2a 31 30  |ime%=.(valu$)*10|
00000790  30 0d 08 0c 10 c9 22 57  61 72 6e 20 54 69 6d 65  |0....."Warn Time|
000007a0  22 0d 08 16 1b 57 61 72  6e 5f 54 69 6d 65 25 3d  |"....Warn_Time%=|
000007b0  bb 28 76 61 6c 75 24 29  2a 31 30 30 0d 08 20 14  |.(valu$)*100.. .|
000007c0  c9 22 54 61 73 6b 20 53  74 61 72 74 69 6e 67 22  |."Task Starting"|
000007d0  0d 08 2a 28 54 61 73 6b  5f 53 74 61 72 74 69 6e  |..*(Task_Startin|
000007e0  67 25 3d 28 76 61 6c 75  24 3d 22 59 22 84 76 61  |g%=(valu$="Y".va|
000007f0  6c 75 24 3d 22 79 22 29  0d 08 34 14 c9 22 54 61  |lu$="y")..4.."Ta|
00000800  73 6b 20 51 75 69 74 74  69 6e 67 22 0d 08 3e 28  |sk Quitting"..>(|
00000810  54 61 73 6b 5f 51 75 69  74 74 69 6e 67 25 3d 28  |Task_Quitting%=(|
00000820  76 61 6c 75 24 3d 22 59  22 84 76 61 6c 75 24 3d  |valu$="Y".valu$=|
00000830  22 79 22 29 0d 08 48 17  c9 22 44 69 72 65 63 74  |"y")..H.."Direct|
00000840  6f 72 79 20 41 63 63 65  73 73 22 0d 08 52 2b 44  |ory Access"..R+D|
00000850  69 72 65 63 74 6f 72 79  5f 41 63 63 65 73 73 25  |irectory_Access%|
00000860  3d 28 76 61 6c 75 24 3d  22 59 22 84 76 61 6c 75  |=(valu$="Y".valu|
00000870  24 3d 22 79 22 29 0d 08  5c 17 c9 22 54 65 73 74  |$="y")..\.."Test|
00000880  20 4d 6f 64 65 20 4c 6f  67 69 6e 73 22 0d 08 66  | Mode Logins"..f|
00000890  2b 54 65 73 74 5f 4d 6f  64 65 5f 4c 6f 67 69 6e  |+Test_Mode_Login|
000008a0  73 25 3d 28 76 61 6c 75  24 3d 22 59 22 84 76 61  |s%=(valu$="Y".va|
000008b0  6c 75 24 3d 22 79 22 29  0d 08 70 18 c9 22 46 75  |lu$="y")..p.."Fu|
000008c0  6c 6c 20 4f 77 6e 65 72  20 41 63 63 65 73 73 22  |ll Owner Access"|
000008d0  0d 08 7a 2c 46 75 6c 6c  5f 4f 77 6e 65 72 5f 41  |..z,Full_Owner_A|
000008e0  63 63 65 73 73 25 3d 28  76 61 6c 75 24 3d 22 59  |ccess%=(valu$="Y|
000008f0  22 84 76 61 6c 75 24 3d  22 79 22 29 0d 08 84 13  |".valu$="y")....|
00000900  c9 22 57 61 74 63 68 64  6f 67 20 4f 66 66 22 0d  |."Watchdog Off".|
00000910  08 8e 27 57 61 74 63 68  64 6f 67 5f 4f 66 66 25  |..'Watchdog_Off%|
00000920  3d 28 76 61 6c 75 24 3d  22 59 22 84 76 61 6c 75  |=(valu$="Y".valu|
00000930  24 3d 22 79 22 29 0d 08  98 05 cb 0d 08 a2 09 fd  |$="y")..........|
00000940  c5 23 66 25 0d 08 ac 08  d9 23 66 25 0d 08 b6 20  |.#f%.....#f%... |
00000950  ff 28 22 2a 41 43 43 45  53 53 20 22 2b 4f 70 74  |.("*ACCESS "+Opt|
00000960  66 69 6c 65 24 2b 22 20  4c 2f 22 29 0d 08 c0 1a  |file$+" L/")....|
00000970  4f 5f 61 6c 6c 6f 77 65  64 25 3d 41 6c 6c 6f 77  |O_allowed%=Allow|
00000980  5f 54 69 6d 65 25 0d 08  e8 13 e7 57 61 74 63 68  |_Time%.....Watch|
00000990  64 6f 67 5f 4f 66 66 25  8c 0d 08 f2 2e c8 99 22  |dog_Off%......."|
000009a0  57 69 6d 70 5f 53 65 74  57 61 74 63 68 64 6f 67  |Wimp_SetWatchdog|
000009b0  53 74 61 74 65 22 2c 30  2c 57 61 74 63 68 64 6f  |State",0,Watchdo|
000009c0  67 5f 43 6f 64 65 25 0d  08 fc 05 cd 0d 09 06 05  |g_Code%.........|
000009d0  e1 0d 09 4c 13 dd f2 69  6e 69 74 5f 70 72 65 76  |...L...init_prev|
000009e0  69 6f 75 73 0d 09 74 0a  ea 66 25 2c 61 24 0d 09  |ious..t..f%,a$..|
000009f0  88 20 c8 99 22 58 4f 53  5f 46 69 6c 65 22 2c 34  |. .."XOS_File",4|
00000a00  2c 44 69 65 66 69 6c 65  24 2c 2c 2c 2c 33 0d 09  |,Diefile$,,,,3..|
00000a10  92 1e c8 99 22 4f 53 5f  46 69 6c 65 22 2c 32 33  |...."OS_File",23|
00000a20  2c 44 69 65 66 69 6c 65  24 b8 66 25 0d 09 9c 0a  |,Diefile$.f%....|
00000a30  e7 66 25 3d 30 8c 0d 09  c4 0d 44 65 61 74 68 73  |.f%=0.....Deaths|
00000a40  25 3d 33 0d 09 ce 12 66  25 3d ae 28 44 69 65 66  |%=3....f%=.(Dief|
00000a50  69 6c 65 24 29 0d 09 d8  11 d5 23 66 25 2c 22 33  |ile$).....#f%,"3|
00000a60  20 20 20 20 20 22 0d 09  e2 08 d9 23 66 25 0d 09  |     ".....#f%..|
00000a70  f6 05 cc 0d 0a 1e 12 66  25 3d ad 28 44 69 65 66  |.......f%=.(Dief|
00000a80  69 6c 65 24 29 0d 0a 28  0b 61 24 3d be 23 66 25  |ile$)..(.a$=.#f%|
00000a90  0d 0a 32 11 44 65 61 74  68 73 25 3d bb 28 61 24  |..2.Deaths%=.(a$|
00000aa0  29 0d 0a 3c 08 d9 23 66  25 0d 0a 46 05 cd 0d 0a  |)..<..#f%..F....|
00000ab0  50 1f c8 99 22 4f 53 5f  46 69 6c 65 22 2c 34 2c  |P..."OS_File",4,|
00000ac0  44 69 65 66 69 6c 65 24  2c 2c 2c 2c 39 0d 0a 5a  |Diefile$,,,,9..Z|
00000ad0  05 e1 0d 0a a0 10 dd f2  69 6e 69 74 5f 74 72 61  |........init_tra|
00000ae0  70 73 0d 0a c8 10 ea 66  25 2c 61 24 2c 61 25 2c  |ps.....f%,a$,a%,|
00000af0  66 24 0d 0a dc 21 c8 99  22 58 4f 53 5f 46 69 6c  |f$...!.."XOS_Fil|
00000b00  65 22 2c 34 2c 54 72 61  70 66 69 6c 65 24 2c 2c  |e",4,Trapfile$,,|
00000b10  2c 2c 33 0d 0a e6 1f c8  99 22 4f 53 5f 46 69 6c  |,,3......"OS_Fil|
00000b20  65 22 2c 32 33 2c 54 72  61 70 66 69 6c 65 24 b8  |e",23,Trapfile$.|
00000b30  66 25 0d 0a f0 0a e7 66  25 3d 30 8c 0d 0b 18 13  |f%.....f%=0.....|
00000b40  66 25 3d ae 28 54 72 61  70 66 69 6c 65 24 29 0d  |f%=.(Trapfile$).|
00000b50  0b 22 12 d5 23 66 25 2c  22 7c 20 54 72 61 70 73  |."..#f%,"| Traps|
00000b60  22 0d 0b 2c 08 d9 23 66  25 0d 0b 36 05 cc 0d 0b  |"..,..#f%..6....|
00000b70  5e 23 ff 28 22 2a 41 43  43 45 53 53 20 22 2b 54  |^#.("*ACCESS "+T|
00000b80  72 61 70 66 69 6c 65 24  2b 22 20 57 52 2f 52 22  |rapfile$+" WR/R"|
00000b90  29 0d 0b 68 13 66 25 3d  8e 28 54 72 61 70 66 69  |)..h.f%=.(Trapfi|
00000ba0  6c 65 24 29 0d 0b 72 05  f5 0d 0b 7c 0b 61 24 3d  |le$)..r....|.a$=|
00000bb0  be 23 66 25 0d 0b 86 14  e7 a7 61 24 2c 22 21 54  |.#f%......a$,"!T|
00000bc0  72 61 70 22 29 3e 30 8c  0d 0b ae 12 61 25 3d a7  |rap")>0.....a%=.|
00000bd0  61 24 2c 22 20 22 2c 31  35 29 0d 0b b8 12 66 24  |a$," ",15)....f$|
00000be0  3d c1 61 24 2c 37 2c 61  25 2d 37 29 0d 0b c2 18  |=.a$,7,a%-7)....|
00000bf0  c8 99 22 4f 53 5f 46 69  6c 65 22 2c 32 33 2c 66  |.."OS_File",23,f|
00000c00  24 b8 61 25 0d 0b cc 0a  e7 61 25 3d 30 8c 0d 0b  |$.a%.....a%=0...|
00000c10  f4 40 ff 28 22 2a 43 4f  50 59 20 3c 42 6f 6f 74  |.@.("*COPY <Boot|
00000c20  50 6c 75 73 24 44 69 72  3e 2e 52 65 73 6f 75 72  |Plus$Dir>.Resour|
00000c30  63 65 73 2e 54 68 69 65  66 74 72 61 70 20 22 2b  |ces.Thieftrap "+|
00000c40  66 24 2b 22 20 7e 43 20  7e 56 20 52 22 29 0d 0b  |f$+" ~C ~V R")..|
00000c50  fe 4a ff 28 22 2a 43 4f  50 59 20 3c 42 6f 6f 74  |.J.("*COPY <Boot|
00000c60  50 6c 75 73 24 44 69 72  3e 2e 52 65 73 6f 75 72  |Plus$Dir>.Resour|
00000c70  63 65 73 2e 21 7a 7a 7a  7a 70 61 73 73 20 22 2b  |ces.!zzzzpass "+|
00000c80  66 24 2b 22 2e 21 7a 7a  7a 7a 70 61 73 73 20 7e  |f$+".!zzzzpass ~|
00000c90  43 20 7e 56 20 52 22 29  0d 0c 08 05 cd 0d 0c 12  |C ~V R")........|
00000ca0  05 cd 0d 0c 1c 09 fd c5  23 66 25 0d 0c 26 08 d9  |........#f%..&..|
00000cb0  23 66 25 0d 0c 30 05 cd  0d 0c 3a 20 c8 99 22 4f  |#f%..0....: .."O|
00000cc0  53 5f 46 69 6c 65 22 2c  34 2c 54 72 61 70 66 69  |S_File",4,Trapfi|
00000cd0  6c 65 24 2c 2c 2c 2c 39  0d 0c 44 05 e1 0d 0c 8a  |le$,,,,9..D.....|
00000ce0  08 dd f2 64 6f 0d 0c b2  10 e7 44 79 69 6e 67 25  |...do.....Dying%|
00000cf0  8c f2 64 69 65 0d 0c bc  0e e7 42 6f 6f 74 69 6e  |..die.....Bootin|
00000d00  67 25 8c 0d 0c e4 35 c8  99 22 4f 53 5f 52 65 61  |g%....5.."OS_Rea|
00000d10  64 56 61 72 56 61 6c 22  2c 22 42 6f 6f 74 24 53  |dVarVal","Boot$S|
00000d20  74 61 74 65 22 2c 42 75  66 31 25 2c 31 32 38 2c  |tate",Buf1%,128,|
00000d30  30 2c 30 b8 2c 2c 6c 25  0d 0c ee 09 6c 25 2d 3d  |0,0.,,l%....l%-=|
00000d40  36 0d 0c f8 0f 42 75 66  31 25 3f 6c 25 3d 31 33  |6....Buf1%?l%=13|
00000d50  0d 0d 02 1f 42 6f 6f 74  69 6e 67 25 3d 28 24 42  |....Booting%=($B|
00000d60  75 66 31 25 3d 22 64 65  73 6b 74 6f 70 22 29 0d  |uf1%="desktop").|
00000d70  0d 0c 05 cd 0d 0d 16 0e  c8 8e 72 65 61 73 6f 6e  |..........reason|
00000d80  25 ca 0d 0d 20 06 c9 30  0d 0d 48 0b f2 74 69 6d  |%... ..0..H..tim|
00000d90  65 72 73 0d 0d 52 09 c9  26 32 30 30 0d 0d 7a 13  |ers..R..&200..z.|
00000da0  f2 74 6f 6f 6c 62 6f 78  5f 65 76 65 6e 74 73 0d  |.toolbox_events.|
00000db0  0d 84 0d c9 31 37 2c 31  38 2c 31 39 0d 0d ac 12  |....17,18,19....|
00000dc0  f2 77 69 6d 70 5f 6d 65  73 73 61 67 65 73 0d 0d  |.wimp_messages..|
00000dd0  b6 05 cb 0d 0d c0 09 58  25 2b 3d 31 0d 0d ca 0e  |.......X%+=1....|
00000de0  f2 67 65 74 5f 74 61 73  6b 73 0d 0d d4 05 e1 0d  |.get_tasks......|
00000df0  0e 1a 0e dd f2 74 69 6d  65 6f 75 74 73 0d 0e 42  |.....timeouts..B|
00000e00  0a ea 72 25 2c 66 25 0d  0e 56 0d e7 4c 6f 67 67  |..r%,f%..V..Logg|
00000e10  65 64 25 8c 0d 0e 7e 33  e7 28 4c 6f 67 67 65 64  |ed%...~3.(Logged|
00000e20  5f 55 73 65 72 24 3c 3e  22 4f 57 4e 45 52 22 29  |_User$<>"OWNER")|
00000e30  84 28 ac 46 75 6c 6c 5f  4f 77 6e 65 72 5f 41 63  |.(.Full_Owner_Ac|
00000e40  63 65 73 73 25 29 8c 0d  0e a6 27 e7 28 91 2d 4c  |cess%)....'.(.-L|
00000e50  6f 67 67 65 64 5f 54 69  6d 65 25 29 3e 4c 6f 67  |ogged_Time%)>Log|
00000e60  67 65 64 5f 44 75 72 61  74 69 6f 6e 25 8c 0d 0e  |ged_Duration%...|
00000e70  ce 27 f2 6c 6f 67 5f 6d  65 73 73 61 67 65 28 22  |.'.log_message("|
00000e80  4c 4d 32 22 2c 4c 6f 67  67 65 64 5f 55 73 65 72  |LM2",Logged_User|
00000e90  24 2c 22 22 29 0d 0e d8  24 f2 65 72 72 6f 72 5f  |$,"")...$.error_|
00000ea0  6d 65 73 73 61 67 65 28  22 45 4d 31 22 2c 22 45  |message("EM1","E|
00000eb0  54 31 22 2c 30 2c 4b 25  29 0d 0e e2 13 4c 6f 67  |T1",0,K%)....Log|
00000ec0  67 65 64 5f 55 73 65 72  24 3d 22 22 0d 0e ec 15  |ged_User$=""....|
00000ed0  4c 6f 67 67 65 64 5f 41  63 63 65 73 73 24 3d 22  |Logged_Access$="|
00000ee0  22 0d 0e f6 0d 4c 6f 67  67 65 64 25 3d a3 0d 0f  |"....Logged%=...|
00000ef0  00 0d 57 61 72 6e 65 64  25 3d a3 0d 0f 0a 11 53  |..Warned%=.....S|
00000f00  74 61 72 74 5f 54 69 6d  65 25 3d 91 0d 0f 32 18  |tart_Time%=...2.|
00000f10  e7 42 6f 6f 74 70 6c 75  73 5f 53 74 61 74 75 73  |.Bootplus_Status|
00000f20  25 3d 33 8c 0d 0f 5a 0d  42 75 66 31 25 21 30 3d  |%=3...Z.Buf1%!0=|
00000f30  34 0d 0f 64 29 42 6c 63  6b 25 21 30 3d 33 32 3a  |4..d)Blck%!0=32:|
00000f40  42 6c 63 6b 25 21 31 32  3d 30 3a 42 6c 63 6b 25  |Blck%!12=0:Blck%|
00000f50  21 31 36 3d 26 38 30 38  63 30 0d 0f 6e 1d 42 6c  |!16=&808c0..n.Bl|
00000f60  63 6b 25 21 32 30 3d 34  3a 42 6c 63 6b 25 21 32  |ck%!20=4:Blck%!2|
00000f70  34 3d 42 75 66 31 25 0d  0f 78 32 c8 99 22 57 69  |4=Buf1%..x2.."Wi|
00000f80  6d 70 5f 53 65 6e 64 4d  65 73 73 61 67 65 22 2c  |mp_SendMessage",|
00000f90  31 37 2c 42 6c 63 6b 25  2c 42 6f 6f 74 70 6c 75  |17,Blck%,Bootplu|
00000fa0  73 5f 48 61 6e 64 6c 65  25 0d 0f 82 05 cd 0d 0f  |s_Handle%.......|
00000fb0  8c 05 cd 0d 0f 96 05 cd  0d 0f a0 05 cd 0d 0f aa  |................|
00000fc0  05 e1 0d 0f f0 0c dd f2  74 69 6d 65 72 73 0d 10  |........timers..|
00000fd0  0e 0b ea 61 6c 6c 6f 77  25 0d 10 22 15 e7 ac 4c  |...allow%.."...L|
00000fe0  6f 67 67 65 64 25 80 ac  44 65 61 64 25 8c 0d 10  |ogged%..Dead%...|
00000ff0  54 0e c8 8e 44 65 61 74  68 73 25 ca 0d 10 5e 06  |T...Deaths%...^.|
00001000  c9 30 0d 10 68 16 61 6c  6c 6f 77 25 3d 41 6c 6c  |.0..h.allow%=All|
00001010  6f 77 5f 54 69 6d 65 25  0d 10 72 06 c9 31 0d 10  |ow_Time%..r..1..|
00001020  7c 18 61 6c 6c 6f 77 25  3d 41 6c 6c 6f 77 5f 54  ||.allow%=Allow_T|
00001030  69 6d 65 25 2f 32 0d 10  86 06 c9 32 0d 10 90 18  |ime%/2.....2....|
00001040  61 6c 6c 6f 77 25 3d 41  6c 6c 6f 77 5f 54 69 6d  |allow%=Allow_Tim|
00001050  65 25 2f 34 0d 10 9a 06  c9 33 0d 10 a4 0e 61 6c  |e%/4.....3....al|
00001060  6c 6f 77 25 3d 36 30 30  0d 10 ae 05 cb 0d 10 b8  |low%=600........|
00001070  27 e7 28 28 91 2d 53 74  61 72 74 5f 74 69 6d 65  |'.((.-Start_time|
00001080  25 29 3e 61 6c 6c 6f 77  25 29 80 ac 57 61 72 6e  |%)>allow%)..Warn|
00001090  65 64 25 8c 0d 10 e0 30  c8 99 22 54 6f 6f 6c 62  |ed%....0.."Toolb|
000010a0  6f 78 5f 53 68 6f 77 4f  62 6a 65 63 74 22 2c 30  |ox_ShowObject",0|
000010b0  2c 57 61 72 6e 69 6e 67  5f 49 44 25 2c 30 2c 30  |,Warning_ID%,0,0|
000010c0  2c 30 2c 30 0d 10 ea 0d  57 61 72 6e 65 64 25 3d  |,0,0....Warned%=|
000010d0  b9 0d 10 f4 0c 53 68 6f  77 6e 25 3d b9 0d 10 fe  |.....Shown%=....|
000010e0  05 cc 0d 11 08 33 e7 28  28 91 2d 53 74 61 72 74  |.....3.((.-Start|
000010f0  5f 74 69 6d 65 25 29 3e  28 61 6c 6c 6f 77 25 2b  |_time%)>(allow%+|
00001100  57 61 72 6e 5f 54 69 6d  65 25 29 29 80 20 53 68  |Warn_Time%)). Sh|
00001110  6f 77 6e 25 8c 0d 11 30  28 c8 99 22 54 6f 6f 6c  |own%...0(.."Tool|
00001120  62 6f 78 5f 48 69 64 65  4f 62 6a 65 63 74 22 2c  |box_HideObject",|
00001130  30 2c 57 61 72 6e 69 6e  67 5f 49 44 25 0d 11 3a  |0,Warning_ID%..:|
00001140  0c 53 68 6f 77 6e 25 3d  a3 0d 11 44 05 cc 0d 11  |.Shown%=...D....|
00001150  4e 28 e7 28 91 2d 53 74  61 72 74 5f 74 69 6d 65  |N(.(.-Start_time|
00001160  25 29 3e 28 61 6c 6c 6f  77 25 2b 44 69 65 5f 54  |%)>(allow%+Die_T|
00001170  69 6d 65 25 29 8c 0d 11  76 2c c8 99 22 54 6f 6f  |ime%)...v,.."Too|
00001180  6c 62 6f 78 5f 53 68 6f  77 4f 62 6a 65 63 74 22  |lbox_ShowObject"|
00001190  2c 30 2c 57 6d 69 5f 49  44 25 2c 30 2c 30 2c 30  |,0,Wmi_ID%,0,0,0|
000011a0  2c 30 0d 11 80 05 cd 0d  11 8a 05 cd 0d 11 94 05  |,0..............|
000011b0  cd 0d 11 9e 05 cd 0d 11  c6 2f e7 5a 7a 7a 7a 63  |........./.Zzzzc|
000011c0  68 6b 5f 53 74 61 74 75  73 25 3d 30 80 28 91 2d  |hk_Status%=0.(.-|
000011d0  5a 7a 7a 7a 63 68 6b 5f  53 74 6f 70 70 65 64 25  |Zzzzchk_Stopped%|
000011e0  29 3e 35 30 8c 0d 11 d0  30 2a 46 69 6c 65 72 5f  |)>50....0*Filer_|
000011f0  52 75 6e 20 3c 42 6f 6f  74 70 6c 75 73 24 44 69  |Run <Bootplus$Di|
00001200  72 3e 2e 52 65 73 6f 75  72 63 65 73 2e 21 7a 7a  |r>.Resources.!zz|
00001210  7a 7a 63 68 6b 0d 11 da  15 5a 7a 7a 7a 63 68 6b  |zzchk....Zzzzchk|
00001220  5f 53 74 61 74 75 73 25  3d 31 0d 11 e4 05 cd 0d  |_Status%=1......|
00001230  11 ee 05 e1 0d 12 34 14  dd f2 74 6f 6f 6c 62 6f  |......4...toolbo|
00001240  78 5f 65 76 65 6e 74 73  0d 12 5c 17 45 76 65 6e  |x_events..\.Even|
00001250  74 5f 53 69 7a 65 25 3d  42 6c 63 6b 25 21 30 0d  |t_Size%=Blck%!0.|
00001260  12 66 1c 45 76 65 6e 74  5f 52 65 66 65 72 65 6e  |.f.Event_Referen|
00001270  63 65 25 3d 42 6c 63 6b  25 21 34 0d 12 70 17 45  |ce%=Blck%!4..p.E|
00001280  76 65 6e 74 5f 43 6f 64  65 25 3d 42 6c 63 6b 25  |vent_Code%=Blck%|
00001290  21 38 0d 12 7a 19 45 76  65 6e 74 5f 46 6c 61 67  |!8..z.Event_Flag|
000012a0  73 25 3d 42 6c 63 6b 25  21 31 32 0d 12 a2 3f f2  |s%=Blck%!12...?.|
000012b0  63 61 6c 6c 65 72 73 28  30 2c 41 6e 63 65 73 74  |callers(0,Ancest|
000012c0  6f 72 5f 49 44 25 2c 41  6e 63 65 73 74 6f 72 5f  |or_ID%,Ancestor_|
000012d0  4e 61 6d 65 24 2c 41 6e  63 65 73 74 6f 72 5f 43  |Name$,Ancestor_C|
000012e0  6f 6d 70 6f 6e 65 6e 74  25 29 0d 12 ac 39 f2 63  |omponent%)...9.c|
000012f0  61 6c 6c 65 72 73 28 38  2c 50 61 72 65 6e 74 5f  |allers(8,Parent_|
00001300  49 44 25 2c 50 61 72 65  6e 74 5f 4e 61 6d 65 24  |ID%,Parent_Name$|
00001310  2c 50 61 72 65 6e 74 5f  43 6f 6d 70 6f 6e 65 6e  |,Parent_Componen|
00001320  74 25 29 0d 12 b6 34 f2  63 61 6c 6c 65 72 73 28  |t%)...4.callers(|
00001330  31 36 2c 53 65 6c 66 5f  49 44 25 2c 53 65 6c 66  |16,Self_ID%,Self|
00001340  5f 4e 61 6d 65 24 2c 53  65 6c 66 5f 43 6f 6d 70  |_Name$,Self_Comp|
00001350  6f 6e 65 6e 74 25 29 0d  12 e8 11 c8 8e 53 65 6c  |onent%)......Sel|
00001360  66 5f 4e 61 6d 65 24 ca  0d 12 f2 0e c9 22 57 61  |f_Name$......"Wa|
00001370  72 6e 69 6e 67 22 0d 12  fc 13 f2 68 61 6e 64 6c  |rning".....handl|
00001380  65 5f 77 61 72 6e 69 6e  67 0d 13 06 0b c9 22 54  |e_warning....."T|
00001390  65 73 74 22 0d 13 10 10  f2 68 61 6e 64 6c 65 5f  |est".....handle_|
000013a0  74 65 73 74 0d 13 1a 0a  c9 22 57 6d 69 22 0d 13  |test....."Wmi"..|
000013b0  24 0f f2 68 61 6e 64 6c  65 5f 77 6d 69 0d 13 2e  |$..handle_wmi...|
000013c0  05 cb 0d 13 38 05 e1 0d  13 7e 13 dd f2 77 69 6d  |....8....~...wim|
000013d0  70 5f 6d 65 73 73 61 67  65 73 0d 13 a6 23 ea 61  |p_messages...#.a|
000013e0  70 70 24 2c 61 25 2c 62  25 2c 72 25 2c 61 6c 6c  |pp$,a%,b%,r%,all|
000013f0  6f 77 65 64 25 2c 64 69  72 24 2c 66 25 0d 13 ba  |owed%,dir$,f%...|
00001400  0f c8 8e 42 6c 63 6b 25  21 31 36 ca 0d 13 c4 06  |...Blck%!16.....|
00001410  c9 30 0d 13 ce 0b 51 75  69 74 25 3d b9 0d 13 d8  |.0....Quit%=....|
00001420  06 c9 38 0d 13 e2 15 e7  28 42 6c 63 6b 25 21 32  |..8.....(Blck%!2|
00001430  30 80 20 31 29 3d 31 8c  0d 14 0a 14 42 6c 63 6b  |0. 1)=1.....Blck|
00001440  25 21 31 32 3d 42 6c 63  6b 25 21 38 0d 14 14 29  |%!12=Blck%!8...)|
00001450  c8 99 22 57 69 6d 70 5f  53 65 6e 64 4d 65 73 73  |.."Wimp_SendMess|
00001460  61 67 65 22 2c 31 39 2c  42 6c 63 6b 25 2c 42 6c  |age",19,Blck%,Bl|
00001470  63 6b 25 21 34 0d 14 1e  05 cd 0d 14 28 0b c9 26  |ck%!4.......(..&|
00001480  34 30 30 43 32 0d 14 50  1d e7 ac 42 6f 6f 74 69  |400C2..P...Booti|
00001490  6e 67 25 8c f2 4c 6f 67  5f 74 61 73 6b 5f 69 6e  |ng%..Log_task_in|
000014a0  69 74 0d 14 5a 0b c9 26  34 30 30 43 33 0d 14 82  |it..Z..&400C3...|
000014b0  13 f2 6c 6f 67 5f 74 61  73 6b 5f 63 6c 6f 73 65  |..log_task_close|
000014c0  0d 14 8c 06 c9 35 0d 14  b4 12 f2 6c 6f 67 5f 64  |.....5.....log_d|
000014d0  62 6c 5f 63 6c 69 63 6b  0d 14 be 0b c9 26 38 30  |bl_click.....&80|
000014e0  38 63 30 0d 14 e6 16 f2  6c 6f 67 5f 75 73 65 72  |8c0.....log_user|
000014f0  5f 6d 65 73 73 61 67 65  73 0d 14 f0 05 cb 0d 14  |_messages.......|
00001500  fa 05 e1 0d 15 40 13 dd  f2 4c 6f 67 5f 74 61 73  |.....@...Log_tas|
00001510  6b 5f 69 6e 69 74 0d 15  68 0c ea 72 25 2c 61 70  |k_init..h..r%,ap|
00001520  70 24 0d 15 7c 1c 61 70  70 24 3d a4 69 6e 64 69  |p$..|.app$=.indi|
00001530  72 65 63 74 28 42 6c 63  6b 25 2b 32 38 29 0d 15  |rect(Blck%+28)..|
00001540  86 1e e7 54 61 73 6b 5f  53 74 61 72 74 69 6e 67  |...Task_Starting|
00001550  25 80 ac 42 6f 6f 74 69  6e 67 25 8c 0d 15 ae 3d  |%..Booting%....=|
00001560  e7 28 61 70 70 24 3c 3e  22 7a 7a 7a 7a 63 68 6b  |.(app$<>"zzzzchk|
00001570  22 29 80 28 61 70 70 24  3c 3e 22 7a 7a 7a 7a 70  |").(app$<>"zzzzp|
00001580  61 73 73 22 29 80 28 61  70 70 24 3c 3e 22 42 6f  |ass").(app$<>"Bo|
00001590  6f 74 50 6c 75 73 22 29  8c 0d 15 b8 29 f2 6c 6f  |otPlus")....).lo|
000015a0  67 5f 6d 65 73 73 61 67  65 28 22 4c 4d 33 22 2c  |g_message("LM3",|
000015b0  4c 6f 67 67 65 64 5f 55  73 65 72 24 2c 61 70 70  |Logged_User$,app|
000015c0  24 29 0d 15 c2 05 cd 0d  15 cc 05 cd 0d 15 f4 08  |$)..............|
000015d0  72 25 3d 30 0d 15 fe 05  f5 0d 16 08 09 72 25 2b  |r%=0.........r%+|
000015e0  3d 31 0d 16 12 19 fd 54  61 73 6b 69 64 25 28 72  |=1.....Taskid%(r|
000015f0  25 29 3d 30 84 72 25 3d  32 30 30 0d 16 1c 13 e7  |%)=0.r%=200.....|
00001600  54 61 73 6b 69 64 25 28  72 25 29 3d 30 8c 0d 16  |Taskid%(r%)=0...|
00001610  58 17 54 61 73 6b 69 64  25 28 72 25 29 3d 42 6c  |X.Taskid%(r%)=Bl|
00001620  63 6b 25 21 34 0d 16 62  12 54 61 73 6b 24 28 72  |ck%!4..b.Task$(r|
00001630  25 29 3d 61 70 70 24 0d  16 6c 05 cd 0d 16 94 0b  |%)=app$..l......|
00001640  c8 8e 61 70 70 24 ca 0d  16 9e 0f c9 22 42 6f 6f  |..app$......"Boo|
00001650  74 50 6c 75 73 22 0d 16  a8 16 42 6f 6f 74 70 6c  |tPlus"....Bootpl|
00001660  75 73 5f 53 74 61 74 75  73 25 3d 33 0d 16 b2 1c  |us_Status%=3....|
00001670  42 6f 6f 74 70 6c 75 73  5f 48 61 6e 64 6c 65 25  |Bootplus_Handle%|
00001680  3d 42 6c 63 6b 25 21 34  0d 16 da 1f e7 4c 6f 67  |=Blck%!4.....Log|
00001690  67 65 64 25 80 20 4c 6f  67 67 65 64 5f 55 73 65  |ged%. Logged_Use|
000016a0  72 24 3c 3e 22 22 8c 0d  16 e4 29 42 6c 63 6b 25  |r$<>""....)Blck%|
000016b0  21 30 3d 33 32 3a 42 6c  63 6b 25 21 31 32 3d 30  |!0=32:Blck%!12=0|
000016c0  3a 42 6c 63 6b 25 21 31  36 3d 26 38 30 38 63 30  |:Blck%!16=&808c0|
000016d0  0d 16 ee 1e 42 6c 63 6b  25 21 32 30 3d 32 34 3a  |....Blck%!20=24:|
000016e0  42 6c 63 6b 25 21 32 34  3d 42 75 66 32 25 0d 16  |Blck%!24=Buf2%..|
000016f0  f8 2a 21 42 75 66 32 25  3d 31 3a 24 28 42 75 66  |.*!Buf2%=1:$(Buf|
00001700  32 25 2b 34 29 3d 4c 6f  67 67 65 64 5f 55 73 65  |2%+4)=Logged_Use|
00001710  72 24 2b bd 28 31 33 29  0d 17 02 32 c8 99 22 57  |r$+.(13)...2.."W|
00001720  69 6d 70 5f 53 65 6e 64  4d 65 73 73 61 67 65 22  |imp_SendMessage"|
00001730  2c 31 37 2c 42 6c 63 6b  25 2c 42 6f 6f 74 70 6c  |,17,Blck%,Bootpl|
00001740  75 73 5f 48 61 6e 64 6c  65 25 0d 17 0c 05 cd 0d  |us_Handle%......|
00001750  17 16 0e c9 22 7a 7a 7a  7a 63 68 6b 22 0d 17 3e  |...."zzzzchk"..>|
00001760  15 5a 7a 7a 7a 63 68 6b  5f 53 74 61 74 75 73 25  |.Zzzzchk_Status%|
00001770  3d 33 0d 17 48 1b 5a 7a  7a 7a 63 68 6b 5f 48 61  |=3..H.Zzzzchk_Ha|
00001780  6e 64 6c 65 25 3d 42 6c  63 6b 25 21 34 0d 17 52  |ndle%=Blck%!4..R|
00001790  05 cb 0d 17 5c 05 e1 0d  17 a2 14 dd f2 6c 6f 67  |....\........log|
000017a0  5f 74 61 73 6b 5f 63 6c  6f 73 65 0d 17 ca 0a ea  |_task_close.....|
000017b0  72 25 2c 66 25 0d 17 de  08 72 25 3d 30 0d 17 e8  |r%,f%....r%=0...|
000017c0  05 f5 0d 17 f2 09 72 25  2b 3d 31 0d 17 fc 1c 66  |......r%+=1....f|
000017d0  25 3d 28 54 61 73 6b 69  64 25 28 72 25 29 3d 42  |%=(Taskid%(r%)=B|
000017e0  6c 63 6b 25 21 34 29 0d  18 06 0e fd 72 25 3d 32  |lck%!4).....r%=2|
000017f0  30 30 84 66 25 0d 18 10  08 e7 66 25 8c 0d 18 1a  |00.f%.....f%....|
00001800  11 54 61 73 6b 69 64 25  28 72 25 29 3d 30 0d 18  |.Taskid%(r%)=0..|
00001810  24 14 e7 54 61 73 6b 5f  51 75 69 74 74 69 6e 67  |$..Task_Quitting|
00001820  25 8c 0d 18 2e 2e f2 6c  6f 67 5f 6d 65 73 73 61  |%......log_messa|
00001830  67 65 28 22 4c 4d 34 22  2c 4c 6f 67 67 65 64 5f  |ge("LM4",Logged_|
00001840  55 73 65 72 24 2c 54 61  73 6b 24 28 72 25 29 29  |User$,Task$(r%))|
00001850  0d 18 38 05 cd 0d 18 42  05 cd 0d 18 4c 0e c8 8e  |..8....B....L...|
00001860  42 6c 63 6b 25 21 34 ca  0d 18 56 14 c9 5a 7a 7a  |Blck%!4...V..Zzz|
00001870  7a 63 68 6b 5f 48 61 6e  64 6c 65 25 0d 18 88 15  |zchk_Handle%....|
00001880  5a 7a 7a 7a 63 68 6b 5f  53 74 61 74 75 73 25 3d  |Zzzzchk_Status%=|
00001890  30 0d 18 92 16 5a 7a 7a  7a 63 68 6b 5f 53 74 6f  |0....Zzzzchk_Sto|
000018a0  70 70 65 64 25 3d 91 0d  18 9c 05 cb 0d 18 a6 05  |pped%=..........|
000018b0  e1 0d 18 ec 13 dd f2 6c  6f 67 5f 64 62 6c 5f 63  |.......log_dbl_c|
000018c0  6c 69 63 6b 0d 19 1e 27  ea 61 25 2c 62 25 2c 61  |lick...'.a%,b%,a|
000018d0  70 70 24 2c 64 69 72 24  2c 61 6c 6c 6f 77 25 2c  |pp$,dir$,allow%,|
000018e0  75 24 2c 61 24 2c 66 74  79 70 25 0d 19 32 28 61  |u$,a$,ftyp%..2(a|
000018f0  70 70 24 3d a4 75 70 70  65 72 63 61 73 65 28 a4  |pp$=.uppercase(.|
00001900  69 6e 64 69 72 65 63 74  28 42 6c 63 6b 25 2b 34  |indirect(Blck%+4|
00001910  34 29 29 0d 19 3c 12 61  25 3d a7 61 70 70 24 2c  |4))..<.a%=.app$,|
00001920  22 24 2e 22 29 0d 19 46  16 62 25 3d a7 61 70 70  |"$.")..F.b%=.app|
00001930  24 2c 22 2e 22 2c 61 25  2b 33 29 0d 19 50 28 64  |$,".",a%+3)..P(d|
00001940  69 72 24 3d a4 75 70 70  65 72 63 61 73 65 28 c1  |ir$=.uppercase(.|
00001950  61 70 70 24 2c 61 25 2b  32 2c 62 25 2d 61 25 2d  |app$,a%+2,b%-a%-|
00001960  32 29 29 0d 19 5a 1f 75  24 3d a4 75 70 70 65 72  |2))..Z.u$=.upper|
00001970  63 61 73 65 28 4c 6f 67  67 65 64 5f 55 73 65 72  |case(Logged_User|
00001980  24 29 0d 19 64 13 e7 75  24 3d 22 22 8c 75 24 3d  |$)..d..u$="".u$=|
00001990  22 78 78 78 22 0d 19 6e  21 61 24 3d a4 75 70 70  |"xxx"..n!a$=.upp|
000019a0  65 72 63 61 73 65 28 4c  6f 67 67 65 64 5f 41 63  |ercase(Logged_Ac|
000019b0  63 65 73 73 24 29 0d 19  78 13 e7 61 24 3d 22 22  |cess$)..x..a$=""|
000019c0  8c 61 24 3d 22 78 78 78  22 0d 19 82 12 66 74 79  |.a$="xxx"....fty|
000019d0  70 25 3d 42 6c 63 6b 25  21 34 30 0d 19 8c 1a e7  |p%=Blck%!40.....|
000019e0  a7 61 70 70 24 2c 22 21  5a 5a 5a 5a 50 41 53 53  |.app$,"!ZZZZPASS|
000019f0  22 29 3e 30 8c 0d 19 b4  14 42 6c 63 6b 25 21 31  |")>0.....Blck%!1|
00001a00  32 3d 42 6c 63 6b 25 21  38 0d 19 be 0e 42 6c 63  |2=Blck%!8....Blc|
00001a10  6b 25 21 31 36 3d 34 0d  19 c8 29 c8 99 22 57 69  |k%!16=4...).."Wi|
00001a20  6d 70 5f 53 65 6e 64 4d  65 73 73 61 67 65 22 2c  |mp_SendMessage",|
00001a30  31 37 2c 42 6c 63 6b 25  2c 42 6c 63 6b 25 21 34  |17,Blck%,Blck%!4|
00001a40  0d 19 d2 24 f2 65 72 72  6f 72 5f 6d 65 73 73 61  |...$.error_messa|
00001a50  67 65 28 22 45 4d 32 22  2c 22 45 54 33 22 2c 30  |ge("EM2","ET3",0|
00001a60  2c 4b 25 29 0d 19 dc 05  cc 0d 1a 54 1a e7 a7 61  |,K%).......T...a|
00001a70  70 70 24 2c 42 6f 6f 74  64 65 76 69 63 65 24 29  |pp$,Bootdevice$)|
00001a80  3d 31 8c 0d 1a 7c 1a 61  6c 6c 6f 77 25 3d 28 64  |=1...|.allow%=(d|
00001a90  69 72 24 3d 22 50 55 42  4c 49 43 22 29 0d 1a 86  |ir$="PUBLIC")...|
00001aa0  3a 61 6c 6c 6f 77 25 3d  28 61 6c 6c 6f 77 25 84  |:allow%=(allow%.|
00001ab0  28 4c 6f 67 67 65 64 25  80 28 42 6f 6f 74 64 65  |(Logged%.(Bootde|
00001ac0  76 69 63 65 24 2b 22 2e  47 52 4f 55 50 53 22 3d  |vice$+".GROUPS"=|
00001ad0  61 70 70 24 29 29 29 0d  1a 90 40 61 6c 6c 6f 77  |app$)))...@allow|
00001ae0  25 3d 28 61 6c 6c 6f 77  25 84 28 4c 6f 67 67 65  |%=(allow%.(Logge|
00001af0  64 25 80 28 42 6f 6f 74  64 65 76 69 63 65 24 2b  |d%.(Bootdevice$+|
00001b00  22 2e 47 52 4f 55 50 53  2e 47 55 45 53 54 22 3d  |".GROUPS.GUEST"=|
00001b10  61 70 70 24 29 29 29 0d  1a 9a 34 61 6c 6c 6f 77  |app$)))...4allow|
00001b20  25 3d 28 61 6c 6c 6f 77  25 84 28 75 24 3d 22 4f  |%=(allow%.(u$="O|
00001b30  57 4e 45 52 22 80 20 46  75 6c 6c 5f 4f 77 6e 65  |WNER". Full_Owne|
00001b40  72 5f 41 63 63 65 73 73  25 29 29 0d 1a a4 38 61  |r_Access%))...8a|
00001b50  6c 6c 6f 77 25 3d 28 61  6c 6c 6f 77 25 84 28 a7  |llow%=(allow%.(.|
00001b60  61 70 70 24 2c 22 2e 21  42 4f 4f 54 50 4c 55 53  |app$,".!BOOTPLUS|
00001b70  22 29 3e 30 29 80 20 66  74 79 70 25 3d 26 32 30  |")>0). ftyp%=&20|
00001b80  30 30 29 0d 1a ae 2f 61  6c 6c 6f 77 25 3d 28 61  |00).../allow%=(a|
00001b90  6c 6c 6f 77 25 84 28 28  a7 61 70 70 24 2c 22 24  |llow%.((.app$,"$|
00001ba0  2e 47 52 4f 55 50 53 2e  22 2b 75 24 29 3e 30 29  |.GROUPS."+u$)>0)|
00001bb0  29 29 0d 1a b8 1b e7 a7  61 70 70 24 2c 22 2e 21  |))......app$,".!|
00001bc0  42 4f 4f 54 50 4c 55 53  22 29 3d 30 8c 0d 1a e0  |BOOTPLUS")=0....|
00001bd0  3e 61 6c 6c 6f 77 25 3d  28 61 6c 6c 6f 77 25 84  |>allow%=(allow%.|
00001be0  28 a7 61 24 2c 22 7c 22  2b 64 69 72 24 2b 22 7c  |(.a$,"|"+dir$+"||
00001bf0  22 29 3e 30 80 a7 61 70  70 24 2c 22 24 2e 47 52  |")>0..app$,"$.GR|
00001c00  4f 55 50 53 2e 22 29 3d  30 29 29 0d 1a ea 05 cd  |OUPS.")=0)).....|
00001c10  0d 1a f4 0d e7 ac 61 6c  6c 6f 77 25 8c 0d 1b 26  |......allow%...&|
00001c20  14 42 6c 63 6b 25 21 31  32 3d 42 6c 63 6b 25 21  |.Blck%!12=Blck%!|
00001c30  38 0d 1b 30 0e 42 6c 63  6b 25 21 31 36 3d 34 0d  |8..0.Blck%!16=4.|
00001c40  1b 3a 29 c8 99 22 57 69  6d 70 5f 53 65 6e 64 4d  |.:).."Wimp_SendM|
00001c50  65 73 73 61 67 65 22 2c  31 37 2c 42 6c 63 6b 25  |essage",17,Blck%|
00001c60  2c 42 6c 63 6b 25 21 34  0d 1b 62 0f c8 8e 42 6c  |,Blck%!4..b...Bl|
00001c70  63 6b 25 21 34 30 ca 0d  1b 6c 0a c9 26 31 30 30  |ck%!40...l..&100|
00001c80  30 0d 1b 76 24 f2 65 72  72 6f 72 5f 6d 65 73 73  |0..v$.error_mess|
00001c90  61 67 65 28 22 45 4d 33  22 2c 22 45 54 34 22 2c  |age("EM3","ET4",|
00001ca0  30 2c 4b 25 29 0d 1b 80  0a c9 26 32 30 30 30 0d  |0,K%).....&2000.|
00001cb0  1b 8a 24 f2 65 72 72 6f  72 5f 6d 65 73 73 61 67  |..$.error_messag|
00001cc0  65 28 22 45 4d 34 22 2c  22 45 54 35 22 2c 30 2c  |e("EM4","ET5",0,|
00001cd0  4b 25 29 0d 1b 94 05 7f  0d 1b 9e 24 f2 65 72 72  |K%)........$.err|
00001ce0  6f 72 5f 6d 65 73 73 61  67 65 28 22 45 4d 35 22  |or_message("EM5"|
00001cf0  2c 22 45 54 36 22 2c 30  2c 4b 25 29 0d 1b a8 05  |,"ET6",0,K%)....|
00001d00  cb 0d 1b d0 29 f2 6c 6f  67 5f 6d 65 73 73 61 67  |....).log_messag|
00001d10  65 28 22 4c 4d 35 22 2c  4c 6f 67 67 65 64 5f 55  |e("LM5",Logged_U|
00001d20  73 65 72 24 2c 61 70 70  24 29 0d 1b da 05 cc 0d  |ser$,app$)......|
00001d30  1c 02 17 e7 44 69 72 65  63 74 6f 72 79 5f 41 63  |....Directory_Ac|
00001d40  63 65 73 73 25 8c 0d 1c  0c 29 f2 6c 6f 67 5f 6d  |cess%....).log_m|
00001d50  65 73 73 61 67 65 28 22  4c 4d 36 22 2c 4c 6f 67  |essage("LM6",Log|
00001d60  67 65 64 5f 55 73 65 72  24 2c 61 70 70 24 29 0d  |ged_User$,app$).|
00001d70  1c 16 05 cd 0d 1c 20 05  cd 0d 1c 2a 05 cd 0d 1c  |...... ....*....|
00001d80  34 05 cd 0d 1c 3e 05 e1  0d 1c 84 17 dd f2 6c 6f  |4....>........lo|
00001d90  67 5f 75 73 65 72 5f 6d  65 73 73 61 67 65 73 0d  |g_user_messages.|
00001da0  1d 10 1e e7 42 6c 63 6b  25 21 34 3d 42 6f 6f 74  |....Blck%!4=Boot|
00001db0  70 6c 75 73 5f 48 61 6e  64 6c 65 25 8c 0d 1d 38  |plus_Handle%...8|
00001dc0  49 c8 99 22 57 69 6d 70  5f 54 72 61 6e 73 66 65  |I.."Wimp_Transfe|
00001dd0  72 42 6c 6f 63 6b 22 2c  42 6f 6f 74 70 6c 75 73  |rBlock",Bootplus|
00001de0  5f 48 61 6e 64 6c 65 25  2c 42 6c 63 6b 25 21 32  |_Handle%,Blck%!2|
00001df0  34 2c 54 68 64 6c 25 2c  42 75 66 31 25 2c 42 6c  |4,Thdl%,Buf1%,Bl|
00001e00  63 6b 25 21 32 30 0d 1d  42 0e c8 8e 42 75 66 31  |ck%!20..B...Buf1|
00001e10  25 21 30 ca 0d 1d 4c 06  c9 31 0d 1d 74 0d f2 6c  |%!0...L..1..t..l|
00001e20  6f 67 5f 75 73 65 72 0d  1d 7e 06 c9 32 0d 1d b0  |og_user..~..2...|
00001e30  06 c9 33 0d 1d d8 0b 51  75 69 74 25 3d b9 0d 1d  |..3....Quit%=...|
00001e40  e2 06 c9 34 0d 1e 0a 05  cb 0d 1e 14 05 cd 0d 1e  |...4............|
00001e50  1e 05 e1 0d 1e 64 0e dd  f2 6c 6f 67 5f 75 73 65  |.....d...log_use|
00001e60  72 0d 1e c8 0f ea 6e 70  25 2c 64 70 25 2c 61 25  |r.....np%,dp%,a%|
00001e70  0d 1e dc 0f 6e 70 25 3d  42 75 66 31 25 21 34 0d  |....np%=Buf1%!4.|
00001e80  1e e6 10 64 70 25 3d 42  75 66 31 25 21 31 32 0d  |...dp%=Buf1%!12.|
00001e90  1e f0 1b e7 24 28 42 75  66 31 25 2b 6e 70 25 29  |....$(Buf1%+np%)|
00001ea0  3d 22 4c 4f 47 4f 46 46  22 8c 0d 1f 18 13 4c 6f  |="LOGOFF".....Lo|
00001eb0  67 67 65 64 5f 55 73 65  72 24 3d 22 22 0d 1f 22  |gged_User$="".."|
00001ec0  15 4c 6f 67 67 65 64 5f  41 63 63 65 73 73 24 3d  |.Logged_Access$=|
00001ed0  22 22 0d 1f 2c 12 4c 6f  67 67 65 64 5f 54 69 6d  |""..,.Logged_Tim|
00001ee0  65 25 3d 91 0d 1f 36 1e  4c 6f 67 67 65 64 5f 44  |e%=...6.Logged_D|
00001ef0  75 72 61 74 69 6f 6e 25  3d 26 37 46 46 46 46 46  |uration%=&7FFFFF|
00001f00  46 46 0d 1f 40 2e c8 99  22 57 69 6d 70 5f 53 65  |FF..@..."Wimp_Se|
00001f10  74 57 61 74 63 68 64 6f  67 53 74 61 74 65 22 2c  |tWatchdogState",|
00001f20  30 2c 57 61 74 63 68 64  6f 67 5f 43 6f 64 65 25  |0,Watchdog_Code%|
00001f30  0d 1f 4a 05 cc 0d 1f 72  1d 4c 6f 67 67 65 64 5f  |..J....r.Logged_|
00001f40  55 73 65 72 24 3d 24 28  42 75 66 31 25 2b 6e 70  |User$=$(Buf1%+np|
00001f50  25 29 0d 1f 7c 1f 4c 6f  67 67 65 64 5f 41 63 63  |%)..|.Logged_Acc|
00001f60  65 73 73 24 3d 24 28 42  75 66 31 25 2b 64 70 25  |ess$=$(Buf1%+dp%|
00001f70  29 0d 1f 86 12 4c 6f 67  67 65 64 5f 54 69 6d 65  |)....Logged_Time|
00001f80  25 3d 91 0d 1f 90 22 4c  6f 67 67 65 64 5f 44 75  |%=...."Logged_Du|
00001f90  72 61 74 69 6f 6e 25 3d  42 75 66 31 25 21 31 36  |ration%=Buf1%!16|
00001fa0  2a 36 30 30 30 0d 1f 9a  0d 4c 6f 67 67 65 64 25  |*6000....Logged%|
00001fb0  3d b9 0d 1f a4 13 e7 57  61 74 63 68 64 6f 67 5f  |=......Watchdog_|
00001fc0  4f 66 66 25 8c 0d 1f cc  1a e7 4c 6f 67 67 65 64  |Off%......Logged|
00001fd0  5f 55 73 65 72 24 3d 22  4f 57 4e 45 52 22 8c 0d  |_User$="OWNER"..|
00001fe0  1f d6 2e c8 99 22 57 69  6d 70 5f 53 65 74 57 61  |....."Wimp_SetWa|
00001ff0  74 63 68 64 6f 67 53 74  61 74 65 22 2c 31 2c 57  |tchdogState",1,W|
00002000  61 74 63 68 64 6f 67 5f  43 6f 64 65 25 0d 1f e0  |atchdog_Code%...|
00002010  05 cc 0d 1f ea 2e c8 99  22 57 69 6d 70 5f 53 65  |........"Wimp_Se|
00002020  74 57 61 74 63 68 64 6f  67 53 74 61 74 65 22 2c  |tWatchdogState",|
00002030  30 2c 57 61 74 63 68 64  6f 67 5f 43 6f 64 65 25  |0,Watchdog_Code%|
00002040  0d 1f f4 05 cd 0d 1f fe  05 cd 0d 20 26 0d 44 65  |........... &.De|
00002050  61 74 68 73 25 3d 30 0d  20 30 1f c8 99 22 4f 53  |aths%=0. 0..."OS|
00002060  5f 46 69 6c 65 22 2c 34  2c 44 69 65 66 69 6c 65  |_File",4,Diefile|
00002070  24 2c 2c 2c 2c 33 0d 20  3a 12 66 25 3d ae 28 44  |$,,,,3. :.f%=.(D|
00002080  69 65 66 69 6c 65 24 29  0d 20 44 11 d5 23 66 25  |iefile$). D..#f%|
00002090  2c 22 30 20 20 20 20 20  22 0d 20 4e 08 d9 23 66  |,"0     ". N..#f|
000020a0  25 0d 20 58 1f c8 99 22  4f 53 5f 46 69 6c 65 22  |%. X..."OS_File"|
000020b0  2c 34 2c 44 69 65 66 69  6c 65 24 2c 2c 2c 2c 39  |,4,Diefile$,,,,9|
000020c0  0d 20 80 2f 42 6c 63 6b  25 21 30 3d 33 32 3a 42  |. ./Blck%!0=32:B|
000020d0  6c 63 6b 25 21 31 32 3d  42 6c 63 6b 25 21 38 3a  |lck%!12=Blck%!8:|
000020e0  42 6c 63 6b 25 21 31 36  3d 26 38 30 38 63 30 0d  |Blck%!16=&808c0.|
000020f0  20 8a 1d 42 6c 63 6b 25  21 32 30 3d 34 3a 42 6c  | ..Blck%!20=4:Bl|
00002100  63 6b 25 21 32 34 3d 42  75 66 32 25 0d 20 94 0c  |ck%!24=Buf2%. ..|
00002110  21 42 75 66 32 25 3d 32  0d 20 9e 32 c8 99 22 57  |!Buf2%=2. .2.."W|
00002120  69 6d 70 5f 53 65 6e 64  4d 65 73 73 61 67 65 22  |imp_SendMessage"|
00002130  2c 31 37 2c 42 6c 63 6b  25 2c 42 6f 6f 74 70 6c  |,17,Blck%,Bootpl|
00002140  75 73 5f 48 61 6e 64 6c  65 25 0d 20 a8 05 cd 0d  |us_Handle%. ....|
00002150  20 b2 05 e1 0d 20 f8 09  dd f2 64 69 65 0d 21 34  | .... ....die.!4|
00002160  1d f2 6c 6f 67 5f 6d 65  73 73 61 67 65 28 22 4c  |..log_message("L|
00002170  4d 37 22 2c 22 22 2c 22  22 29 0d 21 5c 0c 44 79  |M7","","").!\.Dy|
00002180  69 6e 67 25 3d a3 0d 21  66 0b 44 65 61 64 25 3d  |ing%=..!f.Dead%=|
00002190  b9 0d 21 70 0e 44 65 61  74 68 73 25 2b 3d 31 0d  |..!p.Deaths%+=1.|
000021a0  21 7a 18 e7 44 65 61 74  68 73 25 3d 34 8c 44 65  |!z..Deaths%=4.De|
000021b0  61 74 68 73 25 3d 33 0d  21 84 1f c8 99 22 4f 53  |aths%=3.!...."OS|
000021c0  5f 46 69 6c 65 22 2c 34  2c 44 69 65 66 69 6c 65  |_File",4,Diefile|
000021d0  24 2c 2c 2c 2c 33 0d 21  8e 12 66 25 3d ad 28 44  |$,,,,3.!..f%=.(D|
000021e0  69 65 66 69 6c 65 24 29  0d 21 98 1b d5 23 66 25  |iefile$).!...#f%|
000021f0  2c c3 28 44 65 61 74 68  73 25 29 2b 22 20 20 20  |,.(Deaths%)+"   |
00002200  20 20 22 0d 21 a2 08 d9  23 66 25 0d 21 ac 1f c8  |  ".!...#f%.!...|
00002210  99 22 4f 53 5f 46 69 6c  65 22 2c 34 2c 44 69 65  |."OS_File",4,Die|
00002220  66 69 6c 65 24 2c 2c 2c  2c 39 0d 21 d4 17 e7 54  |file$,,,,9.!...T|
00002230  65 73 74 5f 4d 6f 64 65  5f 4c 6f 67 69 6e 73 25  |est_Mode_Logins%|
00002240  8c 0d 21 fc 1f c8 99 54  5f 54 53 4f 25 2c 30 2c  |..!....T_TSO%,0,|
00002250  54 65 73 74 5f 49 44 25  2c 30 2c 30 2c 30 2c 30  |Test_ID%,0,0,0,0|
00002260  0d 22 06 05 cc 0d 22 2e  21 c8 99 22 57 69 6d 70  |."....".!.."Wimp|
00002270  5f 53 65 74 57 61 74 63  68 64 6f 67 53 74 61 74  |_SetWatchdogStat|
00002280  65 22 2c 30 2c 30 0d 22  38 0a ee 85 61 25 3d 30  |e",0,0."8...a%=0|
00002290  0d 22 42 05 f5 0d 22 4c  08 61 25 3d 30 0d 22 56  |."B..."L.a%=0."V|
000022a0  06 fd a3 0d 22 60 05 cd  0d 22 6a 05 e1 0d 22 b0  |...."`..."j...".|
000022b0  27 dd f2 63 61 6c 6c 65  72 73 28 6f 66 66 73 65  |'..callers(offse|
000022c0  74 25 2c f8 69 64 25 2c  f8 69 64 24 2c f8 63 70  |t%,.id%,.id$,.cp|
000022d0  6e 74 25 29 0d 23 00 09  ea 70 74 72 25 0d 23 14  |nt%).#...ptr%.#.|
000022e0  16 70 74 72 25 3d 54 6c  6f 69 25 2b 6f 66 66 73  |.ptr%=Tloi%+offs|
000022f0  65 74 25 0d 23 1e 0d 69  64 25 3d 21 70 74 72 25  |et%.#..id%=!ptr%|
00002300  0d 23 28 0c e7 69 64 25  3c 3e 30 8c 0d 23 32 2f  |.#(..id%<>0..#2/|
00002310  c8 99 22 54 6f 6f 6c 62  6f 78 5f 47 65 74 54 65  |.."Toolbox_GetTe|
00002320  6d 70 6c 61 74 65 4e 61  6d 65 22 2c 30 2c 69 64  |mplateName",0,id|
00002330  25 2c 42 75 66 31 25 2c  31 32 38 0d 23 3c 18 69  |%,Buf1%,128.#<.i|
00002340  64 24 3d a4 69 6e 64 69  72 65 63 74 28 42 75 66  |d$=.indirect(Buf|
00002350  31 25 29 0d 23 46 05 cc  0d 23 50 0a 69 64 24 3d  |1%).#F...#P.id$=|
00002360  22 22 0d 23 5a 05 cd 0d  23 64 10 63 70 6e 74 25  |"".#Z...#d.cpnt%|
00002370  3d 70 74 72 25 21 34 0d  23 6e 05 e1 0d 23 b4 14  |=ptr%!4.#n...#..|
00002380  dd f2 68 61 6e 64 6c 65  5f 77 61 72 6e 69 6e 67  |..handle_warning|
00002390  0d 23 dc 12 c8 8e 45 76  65 6e 74 5f 43 6f 64 65  |.#....Event_Code|
000023a0  25 ca 0d 23 e6 0c c9 45  5f 54 4f 41 43 25 0d 24  |%..#...E_TOAC%.$|
000023b0  0e 18 57 61 72 6e 69 6e  67 5f 49 44 25 3d 53 65  |..Warning_ID%=Se|
000023c0  6c 66 5f 49 44 25 0d 24  18 05 cb 0d 24 22 05 e1  |lf_ID%.$....$"..|
000023d0  0d 24 68 11 dd f2 68 61  6e 64 6c 65 5f 74 65 73  |.$h...handle_tes|
000023e0  74 0d 24 90 12 c8 8e 45  76 65 6e 74 5f 43 6f 64  |t.$....Event_Cod|
000023f0  65 25 ca 0d 24 9a 0c c9  45 5f 54 4f 41 43 25 0d  |e%..$...E_TOAC%.|
00002400  24 c2 15 54 65 73 74 5f  49 44 25 3d 53 65 6c 66  |$..Test_ID%=Self|
00002410  5f 49 44 25 0d 24 cc 05  cb 0d 24 d6 05 e1 0d 25  |_ID%.$....$....%|
00002420  1c 10 dd f2 68 61 6e 64  6c 65 5f 77 6d 69 0d 25  |....handle_wmi.%|
00002430  44 0d ea 66 25 2c 61 25  2c 61 24 0d 25 58 12 c8  |D..f%,a%,a$.%X..|
00002440  8e 45 76 65 6e 74 5f 43  6f 64 65 25 ca 0d 25 62  |.Event_Code%..%b|
00002450  0c c9 45 5f 54 4f 41 43  25 0d 25 8a 14 57 6d 69  |..E_TOAC%.%..Wmi|
00002460  5f 49 44 25 3d 53 65 6c  66 5f 49 44 25 0d 25 94  |_ID%=Self_ID%.%.|
00002470  0d c9 45 5f 57 41 54 42  53 25 0d 25 bc 21 c8 99  |..E_WATBS%.%.!..|
00002480  22 4f 53 5f 46 69 6c 65  22 2c 34 2c 4f 77 6e 65  |"OS_File",4,Owne|
00002490  72 66 69 6c 65 24 2c 2c  2c 2c 33 0d 25 c6 14 66  |rfile$,,,,3.%..f|
000024a0  25 3d 8e 28 4f 77 6e 65  72 66 69 6c 65 24 29 0d  |%=.(Ownerfile$).|
000024b0  25 d0 0b e3 61 25 3d 31  b8 35 0d 25 da 0b 61 24  |%...a%=1.5.%..a$|
000024c0  3d be 23 66 25 0d 25 e4  24 c8 99 54 5f 54 4f 4d  |=.#f%.%.$..T_TOM|
000024d0  4f 25 2c 30 2c 53 65 6c  66 5f 49 44 25 2c 34 34  |O%,0,Self_ID%,44|
000024e0  38 2c 61 25 2b 34 2c 61  24 0d 25 ee 07 ed 61 25  |8,a%+4,a$.%...a%|
000024f0  0d 25 f8 08 d9 23 66 25  0d 26 02 21 c8 99 22 4f  |.%...#f%.&.!.."O|
00002500  53 5f 46 69 6c 65 22 2c  34 2c 4f 77 6e 65 72 66  |S_File",4,Ownerf|
00002510  69 6c 65 24 2c 2c 2c 2c  39 0d 26 2a 0c 44 79 69  |ile$,,,,9.&*.Dyi|
00002520  6e 67 25 3d b9 0d 26 34  05 cb 0d 26 3e 05 e1 0d  |ng%=..&4...&>...|
00002530  26 84 15 dd a4 69 6e 64  69 72 65 63 74 28 70 6e  |&....indirect(pn|
00002540  74 72 25 29 0d 26 b6 0a  ea 61 6e 73 77 24 0d 26  |tr%).&...answ$.&|
00002550  ca 1f c8 99 22 4f 53 5f  57 72 69 74 65 4e 22 2c  |...."OS_WriteN",|
00002560  70 6e 74 72 25 2c 30 b8  61 6e 73 77 24 0d 26 d4  |pntr%,0.answ$.&.|
00002570  0a 3d 61 6e 73 77 24 0d  27 10 1f dd f2 6c 6f 67  |.=answ$.'....log|
00002580  5f 6d 65 73 73 61 67 65  28 6d 73 67 24 2c 70 31  |_message(msg$,p1|
00002590  24 2c 70 32 24 29 0d 27  42 12 ea 66 25 2c 65 78  |$,p2$).'B..f%,ex|
000025a0  74 25 2c 6d 24 2c 6c 24  0d 27 56 27 6c 24 3d a4  |t%,m$,l$.'V'l$=.|
000025b0  67 65 74 5f 6d 65 73 73  61 67 65 28 6d 73 67 24  |get_message(msg$|
000025c0  2c 70 31 24 2c 70 32 24  2c 22 22 2c 22 22 29 0d  |,p1$,p2$,"","").|
000025d0  27 60 0c 21 42 75 66 31  25 3d 30 0d 27 6a 18 c8  |'`.!Buf1%=0.'j..|
000025e0  99 22 4f 53 5f 57 6f 72  64 22 2c 31 34 2c 42 75  |."OS_Word",14,Bu|
000025f0  66 31 25 0d 27 74 26 6d  24 3d a4 69 6e 64 69 72  |f1%.'t&m$=.indir|
00002600  65 63 74 28 42 75 66 31  25 29 2b 22 20 3a 20 22  |ect(Buf1%)+" : "|
00002610  2b 6c 24 2b bd 28 31 30  29 0d 27 9c 1f c8 99 22  |+l$+.(10).'...."|
00002620  4f 53 5f 46 69 6e 64 22  2c 26 43 33 2c 4c 6f 67  |OS_Find",&C3,Log|
00002630  66 69 6c 65 24 b8 66 25  0d 27 a6 1b c8 99 22 4f  |file$.f%.'...."O|
00002640  53 5f 41 72 67 73 22 2c  32 2c 66 25 b8 2c 2c 65  |S_Args",2,f%.,,e|
00002650  78 74 25 0d 27 b0 22 c8  99 22 4f 53 5f 47 42 50  |xt%.'.".."OS_GBP|
00002660  42 22 2c 31 2c 66 25 2c  6d 24 2c a9 28 6d 24 29  |B",1,f%,m$,.(m$)|
00002670  2c 65 78 74 25 0d 27 ba  14 c8 99 22 4f 53 5f 46  |,ext%.'...."OS_F|
00002680  69 6e 64 22 2c 30 2c 66  25 0d 27 c4 05 e1 0d 28  |ind",0,f%.'....(|
00002690  1e 19 dd a4 75 70 70 65  72 63 61 73 65 28 61 73  |....uppercase(as|
000026a0  74 72 69 6e 67 24 29 0d  28 46 13 24 42 75 66 31  |tring$).(F.$Buf1|
000026b0  25 3d 61 73 74 72 69 6e  67 24 0d 28 50 17 e3 61  |%=astring$.(P..a|
000026c0  25 3d 30 b8 a9 28 61 73  74 72 69 6e 67 24 29 2d  |%=0..(astring$)-|
000026d0  31 0d 28 5a 36 e7 42 75  66 31 25 3f 61 25 3e 3d  |1.(Z6.Buf1%?a%>=|
000026e0  39 37 80 20 42 75 66 31  25 3f 61 25 3c 3d 31 32  |97. Buf1%?a%<=12|
000026f0  32 8c 42 75 66 31 25 3f  61 25 3d 42 75 66 31 25  |2.Buf1%?a%=Buf1%|
00002700  3f 61 25 80 26 44 46 0d  28 64 07 ed 61 25 0d 28  |?a%.&DF.(d..a%.(|
00002710  6e 0b 3d 24 42 75 66 31  25 0d 28 be 0f dd f2 67  |n.=$Buf1%.(....g|
00002720  65 74 5f 74 61 73 6b 73  0d 28 e6 0d ea 61 25 2c  |et_tasks.(...a%,|
00002730  62 25 2c 71 25 0d 28 fa  08 61 25 3d 30 0d 29 04  |b%,q%.(..a%=0.).|
00002740  08 62 25 3d 30 0d 29 0e  08 71 25 3d 30 0d 29 18  |.b%=0.)..q%=0.).|
00002750  16 42 6f 6f 74 70 6c 75  73 5f 53 74 61 74 75 73  |.Bootplus_Status|
00002760  25 3d 30 0d 29 22 16 42  6f 6f 74 70 6c 75 73 5f  |%=0.)".Bootplus_|
00002770  48 61 6e 64 6c 65 25 3d  30 0d 29 2c 28 e7 5a 7a  |Handle%=0.),(.Zz|
00002780  7a 7a 63 68 6b 5f 53 74  61 74 75 73 25 3d 33 8c  |zzchk_Status%=3.|
00002790  5a 7a 7a 7a 63 68 6b 5f  53 74 61 74 75 73 25 3d  |Zzzzchk_Status%=|
000027a0  30 0d 29 36 15 5a 7a 7a  7a 63 68 6b 5f 48 61 6e  |0.)6.Zzzzchk_Han|
000027b0  64 6c 65 25 3d 30 0d 29  40 05 f5 0d 29 4a 31 c8  |dle%=0.)@...)J1.|
000027c0  99 22 54 61 73 6b 4d 61  6e 61 67 65 72 5f 45 6e  |."TaskManager_En|
000027d0  75 6d 65 72 61 74 65 54  61 73 6b 73 22 2c 61 25  |umerateTasks",a%|
000027e0  2c 42 75 66 31 25 2c 31  36 b8 61 25 0d 29 54 1c  |,Buf1%,16.a%.)T.|
000027f0  e7 61 25 3e 30 80 28 28  42 75 66 31 25 21 31 32  |.a%>0.((Buf1%!12|
00002800  80 20 31 29 3d 30 29 8c  0d 29 5e 09 62 25 2b 3d  |. 1)=0)..)^.b%+=|
00002810  31 0d 29 68 17 54 61 73  6b 69 64 25 28 62 25 29  |1.)h.Taskid%(b%)|
00002820  3d 42 75 66 31 25 21 30  0d 29 72 20 54 61 73 6b  |=Buf1%!0.)r Task|
00002830  24 28 62 25 29 3d a4 69  6e 64 69 72 65 63 74 28  |$(b%)=.indirect(|
00002840  42 75 66 31 25 21 34 29  0d 29 7c 10 c8 8e 54 61  |Buf1%!4).)|...Ta|
00002850  73 6b 24 28 62 25 29 ca  0d 29 86 0f c9 22 42 6f  |sk$(b%)..)..."Bo|
00002860  6f 74 50 6c 75 73 22 0d  29 90 16 42 6f 6f 74 70  |otPlus".)..Bootp|
00002870  6c 75 73 5f 53 74 61 74  75 73 25 3d 33 0d 29 9a  |lus_Status%=3.).|
00002880  20 42 6f 6f 74 70 6c 75  73 5f 48 61 6e 64 6c 65  | Bootplus_Handle|
00002890  25 3d 54 61 73 6b 69 64  25 28 62 25 29 0d 29 a4  |%=Taskid%(b%).).|
000028a0  0e c9 22 7a 7a 7a 7a 63  68 6b 22 0d 29 ae 15 5a  |.."zzzzchk".)..Z|
000028b0  7a 7a 7a 63 68 6b 5f 53  74 61 74 75 73 25 3d 33  |zzzchk_Status%=3|
000028c0  0d 29 b8 1f 5a 7a 7a 7a  63 68 6b 5f 48 61 6e 64  |.)..Zzzzchk_Hand|
000028d0  6c 65 25 3d 54 61 73 6b  69 64 25 28 62 25 29 0d  |le%=Taskid%(b%).|
000028e0  29 c2 05 cb 0d 29 cc 05  cd 0d 29 d6 09 fd 61 25  |)....)....)...a%|
000028f0  3c 30 0d 29 e0 05 e1 0d  2a 26 29 dd a4 67 65 74  |<0.)....*&)..get|
00002900  5f 6d 65 73 73 61 67 65  28 74 6f 6b 65 6e 24 2c  |_message(token$,|
00002910  70 31 24 2c 70 32 24 2c  70 33 24 2c 70 34 24 29  |p1$,p2$,p3$,p4$)|
00002920  0d 2a 4e 07 ea 73 25 0d  2a 62 48 c8 99 22 4d 65  |.*N..s%.*bH.."Me|
00002930  73 73 61 67 65 54 72 61  6e 73 5f 4c 6f 6f 6b 75  |ssageTrans_Looku|
00002940  70 22 2c 54 6c 6d 73 25  2c 74 6f 6b 65 6e 24 2c  |p",Tlms%,token$,|
00002950  42 6c 63 6b 25 2c 31 32  38 2c 70 31 24 2c 70 32  |Blck%,128,p1$,p2|
00002960  24 2c 70 33 24 2c 70 34  24 b8 2c 2c 2c 73 25 0d  |$,p3$,p4$.,,,s%.|
00002970  2a 6c 0f 42 6c 63 6b 25  3f 73 25 3d 31 33 0d 2a  |*l.Blck%?s%=13.*|
00002980  76 0b 3d 24 42 6c 63 6b  25 0d 2a c6 32 dd f2 65  |v.=$Blck%.*.2..e|
00002990  72 72 6f 72 5f 6d 65 73  73 61 67 65 28 6d 65 73  |rror_message(mes|
000029a0  73 61 67 65 24 2c 74 69  74 6c 65 24 2c 66 6c 61  |sage$,title$,fla|
000029b0  67 73 25 2c f8 6b 65 79  63 25 29 0d 2b 20 0d ea  |gs%,.keyc%).+ ..|
000029c0  73 25 2c 74 24 2c 65 24  0d 2b 34 29 65 24 3d a4  |s%,t$,e$.+4)e$=.|
000029d0  67 65 74 5f 6d 65 73 73  61 67 65 28 6d 65 73 73  |get_message(mess|
000029e0  61 67 65 24 2c 22 22 2c  22 22 2c 22 22 2c 22 22  |age$,"","","",""|
000029f0  29 0d 2b 3e 1b e7 74 69  74 6c 65 24 3d 22 22 8c  |).+>..title$="".|
00002a00  74 69 74 6c 65 24 3d 22  45 54 32 22 0d 2b 48 27  |title$="ET2".+H'|
00002a10  74 24 3d a4 67 65 74 5f  6d 65 73 73 61 67 65 28  |t$=.get_message(|
00002a20  74 69 74 6c 65 24 2c 22  22 2c 22 22 2c 22 22 2c  |title$,"","","",|
00002a30  22 22 29 0d 2b 52 11 24  28 42 6c 63 6b 25 2b 34  |"").+R.$(Blck%+4|
00002a40  29 3d 65 24 0d 2b 5c 0d  42 6c 63 6b 25 21 30 3d  |)=e$.+\.Blck%!0=|
00002a50  30 0d 2b 66 2f c8 99 22  57 69 6d 70 5f 52 65 70  |0.+f/.."Wimp_Rep|
00002a60  6f 72 74 45 72 72 6f 72  22 2c 42 6c 63 6b 25 2c  |ortError",Blck%,|
00002a70  66 6c 61 67 73 25 2c 74  24 b8 2c 6b 65 79 63 25  |flags%,t$.,keyc%|
00002a80  0d 2b 70 05 e1 0d ff                              |.+p....|
00002a87