Home » Archimedes archive » Acorn User » AU 1998-02 B.adf » JFShared » !JFShared/BasicLib/TestLib

!JFShared/BasicLib/TestLib

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 1998-02 B.adf » JFShared
Filename: !JFShared/BasicLib/TestLib
Read OK: ✔
File size: 1FFD bytes
Load address: 0000
Exec address: 0000
File contents
   10REM >Testing Library
   20REM Version 2.01
   30ERROR 0, "Do not run the testing library"
   40END
   50:
   60REM PROCinittest : Initialise testing library and set marker
   70DEFPROCinittest(app$)
   80testapp$=app$:DIM tblk% 256
   90testlog=TRUE
  100ENDPROC
  110:
  120DEFPROCenablelog:testlog=TRUE:ENDPROC
  130DEFPROCdisablelog:testlog=FALSE:ENDPROC
  140:
  150REM PROCdumpmemory : dump memory to scrap file
  160REM  b%  = pointer to memory
  170REM  len = length of memory
  180DEFPROCdumpmemory(b%,len)
  190IF NOT testlog THENENDPROC
  200LOCAL o%,I,O,a
  210o%=OPENUP("<Test$Scrap>"):PTR#o%=EXT#o%
  220BPUT#o%,testapp$+" : Dump of memory"
  230FORI=0TOlen-4 STEP4
  240 BPUT#o%," "+FNhex(I)+" : "+FNhex(b%!I)+" ";
  250 FORO=0TO3
  260  a=b%?(I+O)
  270  IF a<32 OR a=127 THENa=ASC(".")
  280  BPUT#o%,a
  290 NEXT
  300 BPUT#o%,""
  310NEXT
  320CLOSE#o%
  330ENDPROC
  340:
  350REM PROCprintmemory : display memory data on the screen
  360DEFPROCprintmemory(b%,len)
  370LOCAL I,O,a
  380FORI=0TO len-4 STEP 4
  390 PRINTFNhex(I)+" : "+FNhex(b%!I)+" ";
  400 FORO=0TO3
  410  a=b%?(I+O)
  420  IF a<32 OR a=127 THENa=ASC(".")
  430  VDU a
  440 NEXT
  450 PRINT
  460NEXT
  470ENDPROC
  480:
  490DEFFNhex(n):LOCALa$:a$=STR$~n
  500="&"+STRING$(8-LEN(a$),"0")+a$
  510:
  520REM PROClog : log a line to the scrap file
  530DEFPROClog(m$)
  540IF NOT testlog THENENDPROC
  550LOCAL o%
  560o%=OPENUP("<Test$Scrap>"):IF o%=0 THENo%=OPENOUT("<Test$Scrap>")
  580PTR#o%=EXT#o%
  590BPUT#o%,testapp$+" : "+FNsubstvars(m$)
  600CLOSE#o%
  610ENDPROC
  620:
  630REM PROCloadscrap : load the scrap text file into the editor
  640DEFPROCloadscrap
  650*Settype <Test$Scrap> Text
  660*Filer_Run <Test$Scrap>
  670ENDPROC
  680:
  690REM PROCwipescrap : start a fresh testing session
  700DEFPROCwipescrap
  710*Create <Test$Scrap>
  720ENDPROC
  730:
  740REM PROCdumpmessage : dump message block to the scrap file
  750REM  mem = pointer to block
  760REM  reason = Wimp_Poll reason (17,18,19; or 0 for N/A)
  770DEFPROCdumpmessage(mem,reason)
  780IF NOT testlog THENENDPROC
  790LOCAL a$,b$,datatype,num,ofs,more,h%,px,py,pb,pw,pi
  800h%=OPENUP("<Test$Scrap>"):PTR#h%=EXT#h%
  810BPUT#h%,Appname$+" : Message block dump"
  820BPUT#h%," Length  : "+FNd(mem!0)
  830BPUT#h%," From    : &"+STR$~(mem!4)+" ("+FNtaskname(mem!4)+")"
  840BPUT#h%," My ref  : "+FNdb(mem!8)
  850BPUT#h%," Your ref: "+FNdb(mem!12)
  860BPUT#h%," Message : "+FNdb(mem!16);
  870SYS "Wimp_GetPointerInfo",,tblk%
  880px=tblk%!0:py=tblk%!4
  890pb=tblk%!8:pw=tblk%!12
  900pi=tblk%!16
  910datatype=mem!16:more=TRUE:len=mem!0-20
  920RESTORE +30
  930REPEAT
  940 READ a$:ofs=0:b$=MID$(a$,INSTR(a$+":",":")):a$=LEFT$(a$,INSTR(a$+":",":")-1)
  950 IF LEFT$(a$,1)="-" THEN
  960  REPEAT
  970   num=-EVAL(LEFT$(a$,INSTR(a$+"-","-",2)-1))
  980   a$=MID$(a$,INSTR(a$+"-","-",2)):ofs+=1
  990  UNTIL INSTR(a$,"-")=0 OR num=datatype
 1000 ELSE
 1010  num=.5
 1020 ENDIF
 1030UNTIL num=datatype OR num=&FFFFFF
 1040IF num=datatype THEN
 1050 FORnum=1TOofs
 1060  b$=MID$(b$,INSTR(b$+":",":")+1)
 1070 NEXT
 1080 b$=LEFT$(b$,INSTR(b$+":",":")-1)
 1090 IF b$<>"" THENBPUT#h%," : "+b$;
 1100ELSE
 1110 more=FALSE
 1120ENDIF
 1130ofs=20:BPUT#h%,10
 1140WHILE len>0
 1150 num=mem!ofs
 1160 BPUT#h%," "+FNd(ofs)+" : "+FNdb(num)+" "+CHR$34;
 1170 FOR i=ofs TO ofs+3
 1180  IF ((mem!i) AND 127)<>10 THENBPUT#h%,mem!i ELSEBPUT#h%,13
 1190 NEXT
 1200 BPUT#h%,CHR$34;
 1210 IF more=FALSE THEN
 1220  IF num=px THENBPUT#h%,"  Pointer x ?";
 1230  IF num=py THENBPUT#h%,"  Pointer y ?";
 1240  IF num=pw THENBPUT#h%,"  Pointer window ?";
 1250  IF num=pi THENBPUT#h%,"  Pointer icon ?";
 1260  IF num=pb AND num<>0 THENBPUT#h%,"  Pointer buttons ?";
 1270 ELSE
 1280  READ a$
 1290  IF LEFT$(a$,1)<>"-" THENBPUT#h%,"  "+a$; ELSEmore=FALSE
 1300 ENDIF
 1310 BPUT#h%,10:len-=4:ofs+=4
 1320ENDWHILE:BPUT#h%,10:CLOSE#h%
 1330ENDPROC
 1340DEFFNr(a$):=RIGHT$("   "+a$,3)
 1350DEFFNl(a$):=LEFT$(a$+"   ",3)
 1360DEFFNd(n):="&"+FNl(STR$~n)+" ("+FNr(STR$n)+")"
 1370DEFFNdb(n):="&"+LEFT$(STR$~n+"       ",8)+" ("+RIGHT$("         "+STR$n,9)+")"
 1380:
 1390DATA -1-2-3-4-5-&80140:DataSave:DataSaveAck:DataLoad:DataLoadAck:DataOpen:PrintFile
 1400DATA  Window
 1410DATA  Icon
 1420DATA  Pointer x
 1430DATA  Pointer y
 1440DATA  Length (-1 = data not safe)
 1450DATA  File type
 1460DATA  FilenameTHEN
 1470DATA -6:RAMFetch
 1480DATA  Address for data
 1490DATA  Size of buffer
 1500DATA -7:RAMTransmit
 1510DATA  Address sent to
 1520DATA  Amount of data written
 1530DATA -8:PreQuit
 1540DATA  flag (0 to continue shutdown)
 1550DATA -9:PaletteChange
 1560DATA -&A:SaveDesktop
 1570DATA  Desktop file handle byte
 1580DATA  Flags ?
 1590DATA -&B-&C:DeviceClaim:DeviceInUse
 1600DATA  Device major id
 1610DATA  Device minor id
 1620DATA  Claimant/OwnerTHEN
 1630DATA -&D:DataSaved
 1640DATA  Reference ?
 1650DATA -&E:Shutdown
 1660DATA  Flags ?
 1670DATA -&F:ClaimEntity
 1680DATA  Flags ?
 1690DATA -&10:DataRequest
 1700DATA  Window
 1710DATA  Internal handle
 1720DATA  x,y
 1730DATA  flags
 1740DATA  File type list, -1 terminated
 1750DATA -&11:Dragging
 1760DATA  Window
 1770DATA  Icon
 1780DATA  Pointer x
 1790DATA  Pointer y
 1800DATA  Flags
 1810DATA  Left,Bottom,Right,Top
 1820DATA  File type list, -1 terminated
 1830DATA -&12:DragClaim
 1840DATA  flags
 1850DATA  File type list, -1 terminated
 1860DATA -&401:Filer_CloseDir
 1870DATA  FS number
 1880DATA  0 (reserved for flags)
 1890DATA  Flags byte + Directory nameTHEN
 1900DATA -&402:Filer_OpenDirAt
 1910DATA  FS number
 1920DATA  flags
 1930DATA  Top-left x
 1940DATA  Top-left y
 1950DATA  Width
 1960DATA  Height
 1970DATA  Flags byte + Path
 1980DATA -&403:Filer_SelectionDir
 1990DATA  Selected directory
 2000DATA -&404:Filer_AddSelection
 2010DATA  Leaf name
 2020DATA -&405:Filer_Action
 2030DATA  Operation
 2040DATA  Options
 2050DATA  DataTHEN ?
 2060DATA -&406:Filer_ControlAction
 2070DATA  Control ?
 2080DATA -&407:Filer_Selection
 2090DATA  left,bottom,right,top
 2100DATA  width,height
 2110DATA  display format
 2120DATA  col0,row0,col1,row1
 2130DATA -&500:Alarm_Set
 2140DATA  Reason
 2150DATA  Time,
 2160DATA  SenderTHEN,,,,,,,,
 2170DATA  Alarm nameTHEN
 2180DATA -&501:Alarm_GoneOff
 2190DATA  SenderTHEN,,,,,,,,
 2200DATA  Alarm nameTHEN
 2210DATA -&502:Help_Request
 2220DATA  Pointer x
 2230DATA  Pointer y
 2240DATA  Buttons
 2250DATA  Window
 2260DATA  Icon
 2270DATA -&503:Help_Reply
 2280DATA  Help stringTHEN
 2290DATA -&40040:Notify
 2300DATA  Station, Network and part of time
 2310DATA  Rest of time and message
 2320DATA -&400C0:MenuWarning
 2330DATA  Submenu pointer
 2340DATA  left,top
 2350DATA  Selection listTHEN
 2360DATA -&400C1:ModeChange
 2370DATA -&400C2:TaskInitialise
 2380DATA  CAO pointer
 2390DATA  Slot size in bytes
 2400DATA  Task nameTHEN
 2410DATA -&400C3:TaskCloseDown
 2420DATA -&400C4:SlotSize
 2430DATA  New slot size
 2440DATA  Size of the next slot
 2450DATA -&400C5:SetSlot
 2460DATA  New slot size
 2470DATA  Owners task handle
 2480DATA -&400C6:TaskNameRq
 2490DATA  Task handle
 2500DATA -&400C7:TaskNameIs
 2510DATA  Task handle
 2520DATA  Task's slot size
 2530DATA  Task nameTHEN
 2540DATA -&400C8:TaskStarted ?
 2550DATA -&400C9:MenusDeleted
 2560DATA  Menu pointer
 2570DATA -&400CA:Iconize
 2580DATA  Window
 2590DATA  Task
 2600DATA  Title
 2610DATA -&400CB:WindowClosed ?
 2620DATA  Window
 2630DATA -&400CC:WindowInfo ?
 2640DATA  Window
 2650DATA  0 (reserved)
 2660DATA  Sprite to use
 2670DATA  Title
 2680DATA -&400CD:Swap ?
 2690DATA -&400CE:ToolsChanged
 2700DATA -&400CF:FontChanged
 2710DATA  Font handle ?
 2720DATA -&42580-&42584:ThrowbackStart:ThrowbackEnd
 2730DATA -&42581-&42582-&42585:ProcessingFile:ErrorsIn:InfoForFile
 2740DATA  FilenameTHEN
 2750DATA -&42583-&42586:ErrorDetails:InfoDetails
 2760DATA  Line number
 2770DATA  "Warning, error or serious (0 for info)"
 2780DATA  DescriptionTHEN
 2790DATA -&45D80:EditRq (External Edit)
 2800DATA  Data type word (filetype+subtype)
 2810DATA  Job handle (uncompleted)
 2820DATA  Flags
 2830DATA  Parent name,,,,,Name of file
 2840DATA -&45D81:EditAck (External Edit)
 2850DATA  Data type word (filetype+subtype)
 2860DATA  Job handle (completed)
 2870DATA  Flags
 2880DATA -&45D82:EditReturn (External Edit)
 2890DATA  Data type word (filetype+subtype)
 2900DATA  Job handle
 2910DATA  Flags
 2920DATA -&45D83:EditAbort (External Edit)
 2930DATA  0 (Reserved)
 2940DATA  Job handle
 2950DATA -&45D84:EditDataSave (External Edit)
 2960DATA  Job handle
 2970DATA  0 (Reserved)
 2980DATA  0 (Reserved)
 2990DATA  0 (Reserved)
 3000DATA  Estimated size
 3010DATA  Filetype (NOT sub-type)
 3020DATA  Proposed leafname
 3030DATA -&45D85:EditCursor
 3040DATA  0 (reserved)
 3050DATA  Job handle
 3060DATA  Flags
 3070DATA  New cursor position
 3080DATA  New start of selection
 3090DATA  New end of selection
 3100DATA  Old cursor position
 3110DATA  Old start of selection
 3120DATA  Old end of selection
 3130DATA -&808C0:TaskWindow_Input
 3140DATA  Size
 3150DATA  DataTHEN
 3160DATA -&808C1:TaskWindow_Output
 3170DATA  Size
 3180DATA  DataTHEN
 3190DATA -&808C2:TaskWindow_Ego
 3200DATA  Text-handle
 3210DATA -&808C3-&808C4:TaskWindow_Morio:TaskWindow_Morite
 3220DATA -&808C5:NewTask
 3230DATA  Command to execute
 3240DATA -&808C6-&808C5:TaskWindow_Suspend:TaskWindow_Resume
 3250DATA -&80141-&80142-&80143:WillPrint:PrintSave:PrintInit
 3260DATA -&80144-&80145-&80146:PrintError:PrintTypeOdd:PrintTypeKnown
 3270DATA -&80147:SetPrinter
 3280DATA -&8014C-&8014D:PSPrinterQuery:PSPrinterAck
 3290DATA -&8014E-&8014F:PSPrinterModified:PSPrinterDefaults
 3300DATA -&80150-&80151:PSPrinterDefaulted:PSPrinterNotPS
 3310DATA -&80152-&80153:ResetPrinter:PSIsFontPrintRunning
 3320DATA -&80E1E:OLE_FileChanged
 3330DATA  Message type
 3340DATA  Session number
 3350DATA  Extra data (eg filename)THEN
 3360DATA -&80E21:OLE_OpenSession
 3370DATA  Unique name,,,
 3380DATA  Window handle
 3390DATA  x,y
 3400DATA  Session type
 3410DATA  Session number
 3420DATA  Filetype (session=0,1)
 3430DATA  Pathname (session=0,1)
 3440DATA -&80E22:OLE_OpenSessionAck
 3450DATA -&80E23:OLE_CloseSession
 3460DATA  Message type
 3470DATA  Session number (-1 for all)
 3480DATA -&FFFFFF


� >Testing Library
� Version 2.01
)� 0, "Do not run the testing library"
(�
2:
<>� PROCinittest : Initialise testing library and set marker
F��inittest(app$)
Ptestapp$=app$:� tblk% 256
Z
testlog=�
d�
n:
x��enablelog:testlog=�:�
���disablelog:testlog=�:�
�:
�0� PROCdumpmemory : dump memory to scrap file
��  b%  = pointer to memory
��  len = length of memory
���dumpmemory(b%,len)
�� � testlog ��
�� o%,I,O,a
�"o%=�("<Test$Scrap>"):�#o%=�#o%
�%�#o%,testapp$+" : Dump of memory"
��I=0�len-4 �4
�+ �#o%," "+�hex(I)+" : "+�hex(b%!I)+" ";
� �O=0�3
  a=b%?(I+O)
  � a<32 � a=127 �a=�(".")
  �#o%,a
" �
, �#o%,""
6�
@�#o%
J�
T:
^9� PROCprintmemory : display memory data on the screen
h��printmemory(b%,len)
r� I,O,a
|�I=0� len-4 � 4
�# �hex(I)+" : "+�hex(b%!I)+" ";
� �O=0�3
�  a=b%?(I+O)
�  � a<32 � a=127 �a=�(".")
�	  � a
� �
� �
��
��
�:
�ݤhex(n):�a$:a$=�~n
�="&"+�8-�(a$),"0")+a$
�:
,� PROClog : log a line to the scrap file

��log(m$)
� � testlog ��
&� o%
05o%=�("<Test$Scrap>"):� o%=0 �o%=�("<Test$Scrap>")
D
�#o%=�#o%
N&�#o%,testapp$+" : "+�substvars(m$)
X�#o%
b�
l:
v>� PROCloadscrap : load the scrap text file into the editor
���loadscrap
�*Settype <Test$Scrap> Text
�*Filer_Run <Test$Scrap>
��
�:
�3� PROCwipescrap : start a fresh testing session
���wipescrap
�*Create <Test$Scrap>
��
�:
�<� PROCdumpmessage : dump message block to the scrap file
��  mem = pointer to block
�9�  reason = Wimp_Poll reason (17,18,19; or 0 for N/A)
��dumpmessage(mem,reason)
� � testlog ��
3� a$,b$,datatype,num,ofs,more,h%,px,py,pb,pw,pi
 "h%=�("<Test$Scrap>"):�#h%=�#h%
*)�#h%,Appname$+" : Message block dump"
4 �#h%," Length  : "+�d(mem!0)
>;�#h%," From    : &"+�~(mem!4)+" ("+�taskname(mem!4)+")"
H!�#h%," My ref  : "+�db(mem!8)
R"�#h%," Your ref: "+�db(mem!12)
\#�#h%," Message : "+�db(mem!16);
f#ș "Wimp_GetPointerInfo",,tblk%
ppx=tblk%!0:py=tblk%!4
zpb=tblk%!8:pw=tblk%!12
�pi=tblk%!16
�'datatype=mem!16:more=�:len=mem!0-20
�	� +30
��
�; � a$:ofs=0:b$=�a$,�a$+":",":")):a$=�a$,�a$+":",":")-1)
� � �a$,1)="-" �
�  �
�$   num=-�(�a$,�a$+"-","-",2)-1))
�$   a$=�a$,�a$+"-","-",2)):ofs+=1
�!  � �a$,"-")=0 � num=datatype
� �
�  num=.5
� �
 � num=datatype � num=&FFFFFF
� num=datatype �
 �num=1�ofs
$  b$=�b$,�b$+":",":")+1)
. �
8 b$=�b$,�b$+":",":")-1)
B � b$<>"" ��#h%," : "+b$;
L�
V more=�
`�
jofs=20:�#h%,10
tȕ len>0
~ num=mem!ofs
�- �#h%," "+�d(ofs)+" : "+�db(num)+" "+�34;
� � i=ofs � ofs+3
�0  � ((mem!i) � 127)<>10 ��#h%,mem!i ��#h%,13
� �
� �#h%,�34;
� � more=� �
�%  � num=px ��#h%,"  Pointer x ?";
�%  � num=py ��#h%,"  Pointer y ?";
�*  � num=pw ��#h%,"  Pointer window ?";
�(  � num=pi ��#h%,"  Pointer icon ?";
�4  � num=pb � num<>0 ��#h%,"  Pointer buttons ?";
� �

  � a$

*  � �a$,1)<>"-" ��#h%,"  "+a$; �more=�
 �
 �#h%,10:len-=4:ofs+=4
(�:�#h%,10:�#h%
2�
<ݤr(a$):=�"   "+a$,3)
Fݤl(a$):=�a$+"   ",3)
P'ݤd(n):="&"+�l(�~n)+" ("+�r(�n)+")"
Z>ݤdb(n):="&"+��~n+"       ",8)+" ("+�"         "+�n,9)+")"
d:
nT� -1-2-3-4-5-&80140:DataSave:DataSaveAck:DataLoad:DataLoadAck:DataOpen:PrintFile
x
�  Window
��  Icon
��  Pointer x
��  Pointer y
�"�  Length (-1 = data not safe)
��  File type
��  Filename�
�� -6:RAMFetch
��  Address for data
��  Size of buffer
�� -7:RAMTransmit
��  Address sent to
��  Amount of data written
�� -8:PreQuit
$�  flag (0 to continue shutdown)
� -9:PaletteChange
� -&A:SaveDesktop
"�  Desktop file handle byte
,�  Flags ?
6$� -&B-&C:DeviceClaim:DeviceInUse
@�  Device major id
J�  Device minor id
T�  Claimant/Owner�
^� -&D:DataSaved
h�  Reference ?
r� -&E:Shutdown
|�  Flags ?
�� -&F:ClaimEntity
��  Flags ?
�� -&10:DataRequest
�
�  Window
��  Internal handle
�
�  x,y
��  flags
�$�  File type list, -1 terminated
�� -&11:Dragging
�
�  Window
��  Icon
��  Pointer x
��  Pointer y
�  Flags
�  Left,Bottom,Right,Top
$�  File type list, -1 terminated
&� -&12:DragClaim
0�  flags
:$�  File type list, -1 terminated
D� -&401:Filer_CloseDir
N�  FS number
X�  0 (reserved for flags)
b#�  Flags byte + Directory name�
l� -&402:Filer_OpenDirAt
v�  FS number
��  flags
��  Top-left x
��  Top-left y
��  Width
�
�  Height
��  Flags byte + Path
�� -&403:Filer_SelectionDir
��  Selected directory
�� -&404:Filer_AddSelection
��  Leaf name
�� -&405:Filer_Action
��  Operation
��  Options
�  Data� ?
� -&406:Filer_ControlAction
�  Control ?
 � -&407:Filer_Selection
*�  left,bottom,right,top
4�  width,height
>�  display format
H�  col0,row0,col1,row1
R� -&500:Alarm_Set
\
�  Reason
f�  Time,
p�  Sender�,,,,,,,,
z�  Alarm name�
�� -&501:Alarm_GoneOff
��  Sender�,,,,,,,,
��  Alarm name�
�� -&502:Help_Request
��  Pointer x
��  Pointer y
��  Buttons
�
�  Window
��  Icon
�� -&503:Help_Reply
��  Help string�
�� -&40040:Notify
�(�  Station, Network and part of time
	�  Rest of time and message
	� -&400C0:MenuWarning
	�  Submenu pointer
	$�  left,top
	.�  Selection list�
	8� -&400C1:ModeChange
	B� -&400C2:TaskInitialise
	L�  CAO pointer
	V�  Slot size in bytes
	`�  Task name�
	j� -&400C3:TaskCloseDown
	t� -&400C4:SlotSize
	~�  New slot size
	��  Size of the next slot
	�� -&400C5:SetSlot
	��  New slot size
	��  Owners task handle
	�� -&400C6:TaskNameRq
	��  Task handle
	�� -&400C7:TaskNameIs
	��  Task handle
	��  Task's slot size
	��  Task name�
	�� -&400C8:TaskStarted ?
	�� -&400C9:MenusDeleted
�  Menu pointer

� -&400CA:Iconize

�  Window
�  Task
(�  Title
2� -&400CB:WindowClosed ?
<
�  Window
F� -&400CC:WindowInfo ?
P
�  Window
Z�  0 (reserved)
d�  Sprite to use
n�  Title
x� -&400CD:Swap ?
�� -&400CE:ToolsChanged
�� -&400CF:FontChanged
��  Font handle ?
�0� -&42580-&42584:ThrowbackStart:ThrowbackEnd
�?� -&42581-&42582-&42585:ProcessingFile:ErrorsIn:InfoForFile
��  Filename�
�-� -&42583-&42586:ErrorDetails:InfoDetails
��  Line number
�/�  "Warning, error or serious (0 for info)"
��  Description�
�$� -&45D80:EditRq (External Edit)
�(�  Data type word (filetype+subtype)
��  Job handle (uncompleted)
�  Flags
#�  Parent name,,,,,Name of file
%� -&45D81:EditAck (External Edit)
"(�  Data type word (filetype+subtype)
,�  Job handle (completed)
6�  Flags
@(� -&45D82:EditReturn (External Edit)
J(�  Data type word (filetype+subtype)
T�  Job handle
^�  Flags
h'� -&45D83:EditAbort (External Edit)
r�  0 (Reserved)
|�  Job handle
�*� -&45D84:EditDataSave (External Edit)
��  Job handle
��  0 (Reserved)
��  0 (Reserved)
��  0 (Reserved)
��  Estimated size
��  Filetype (NOT sub-type)
��  Proposed leafname
�� -&45D85:EditCursor
��  0 (reserved)
��  Job handle
��  Flags
��  New cursor position
�  New start of selection
�  New end of selection
�  Old cursor position
&�  Old start of selection
0�  Old end of selection
:� -&808C0:TaskWindow_Input
D�  Size
N�  Data�
X� -&808C1:TaskWindow_Output
b�  Size
l�  Data�
v� -&808C2:TaskWindow_Ego
��  Text-handle
�7� -&808C3-&808C4:TaskWindow_Morio:TaskWindow_Morite
�� -&808C5:NewTask
��  Command to execute
�9� -&808C6-&808C5:TaskWindow_Suspend:TaskWindow_Resume
�9� -&80141-&80142-&80143:WillPrint:PrintSave:PrintInit
�B� -&80144-&80145-&80146:PrintError:PrintTypeOdd:PrintTypeKnown
�� -&80147:SetPrinter
�0� -&8014C-&8014D:PSPrinterQuery:PSPrinterAck
�8� -&8014E-&8014F:PSPrinterModified:PSPrinterDefaults
�6� -&80150-&80151:PSPrinterDefaulted:PSPrinterNotPS
�6� -&80152-&80153:ResetPrinter:PSIsFontPrintRunning
�� -&80E1E:OLE_FileChanged

�  Message type

�  Session number

 �  Extra data (eg filename)�

 � -&80E21:OLE_OpenSession

*�  Unique name,,,

4�  Window handle

>
�  x,y

H�  Session type

R�  Session number

\�  Filetype (session=0,1)

f�  Pathname (session=0,1)

p � -&80E22:OLE_OpenSessionAck

z� -&80E23:OLE_CloseSession

��  Message type

�"�  Session number (-1 for all)

�� -&FFFFFF
�
00000000  0d 00 0a 16 f4 20 3e 54  65 73 74 69 6e 67 20 4c  |..... >Testing L|
00000010  69 62 72 61 72 79 0d 00  14 12 f4 20 56 65 72 73  |ibrary..... Vers|
00000020  69 6f 6e 20 32 2e 30 31  0d 00 1e 29 85 20 30 2c  |ion 2.01...). 0,|
00000030  20 22 44 6f 20 6e 6f 74  20 72 75 6e 20 74 68 65  | "Do not run the|
00000040  20 74 65 73 74 69 6e 67  20 6c 69 62 72 61 72 79  | testing library|
00000050  22 0d 00 28 05 e0 0d 00  32 05 3a 0d 00 3c 3e f4  |"..(....2.:..<>.|
00000060  20 50 52 4f 43 69 6e 69  74 74 65 73 74 20 3a 20  | PROCinittest : |
00000070  49 6e 69 74 69 61 6c 69  73 65 20 74 65 73 74 69  |Initialise testi|
00000080  6e 67 20 6c 69 62 72 61  72 79 20 61 6e 64 20 73  |ng library and s|
00000090  65 74 20 6d 61 72 6b 65  72 0d 00 46 14 dd f2 69  |et marker..F...i|
000000a0  6e 69 74 74 65 73 74 28  61 70 70 24 29 0d 00 50  |nittest(app$)..P|
000000b0  1d 74 65 73 74 61 70 70  24 3d 61 70 70 24 3a de  |.testapp$=app$:.|
000000c0  20 74 62 6c 6b 25 20 32  35 36 0d 00 5a 0d 74 65  | tblk% 256..Z.te|
000000d0  73 74 6c 6f 67 3d b9 0d  00 64 05 e1 0d 00 6e 05  |stlog=...d....n.|
000000e0  3a 0d 00 78 1b dd f2 65  6e 61 62 6c 65 6c 6f 67  |:..x...enablelog|
000000f0  3a 74 65 73 74 6c 6f 67  3d b9 3a e1 0d 00 82 1c  |:testlog=.:.....|
00000100  dd f2 64 69 73 61 62 6c  65 6c 6f 67 3a 74 65 73  |..disablelog:tes|
00000110  74 6c 6f 67 3d a3 3a e1  0d 00 8c 05 3a 0d 00 96  |tlog=.:.....:...|
00000120  30 f4 20 50 52 4f 43 64  75 6d 70 6d 65 6d 6f 72  |0. PROCdumpmemor|
00000130  79 20 3a 20 64 75 6d 70  20 6d 65 6d 6f 72 79 20  |y : dump memory |
00000140  74 6f 20 73 63 72 61 70  20 66 69 6c 65 0d 00 a0  |to scrap file...|
00000150  1e f4 20 20 62 25 20 20  3d 20 70 6f 69 6e 74 65  |..  b%  = pointe|
00000160  72 20 74 6f 20 6d 65 6d  6f 72 79 0d 00 aa 1d f4  |r to memory.....|
00000170  20 20 6c 65 6e 20 3d 20  6c 65 6e 67 74 68 20 6f  |  len = length o|
00000180  66 20 6d 65 6d 6f 72 79  0d 00 b4 18 dd f2 64 75  |f memory......du|
00000190  6d 70 6d 65 6d 6f 72 79  28 62 25 2c 6c 65 6e 29  |mpmemory(b%,len)|
000001a0  0d 00 be 12 e7 20 ac 20  74 65 73 74 6c 6f 67 20  |..... . testlog |
000001b0  8c e1 0d 00 c8 0e ea 20  6f 25 2c 49 2c 4f 2c 61  |....... o%,I,O,a|
000001c0  0d 00 d2 22 6f 25 3d ad  28 22 3c 54 65 73 74 24  |..."o%=.("<Test$|
000001d0  53 63 72 61 70 3e 22 29  3a cf 23 6f 25 3d a2 23  |Scrap>"):.#o%=.#|
000001e0  6f 25 0d 00 dc 25 d5 23  6f 25 2c 74 65 73 74 61  |o%...%.#o%,testa|
000001f0  70 70 24 2b 22 20 3a 20  44 75 6d 70 20 6f 66 20  |pp$+" : Dump of |
00000200  6d 65 6d 6f 72 79 22 0d  00 e6 11 e3 49 3d 30 b8  |memory".....I=0.|
00000210  6c 65 6e 2d 34 20 88 34  0d 00 f0 2b 20 d5 23 6f  |len-4 .4...+ .#o|
00000220  25 2c 22 20 22 2b a4 68  65 78 28 49 29 2b 22 20  |%," "+.hex(I)+" |
00000230  3a 20 22 2b a4 68 65 78  28 62 25 21 49 29 2b 22  |: "+.hex(b%!I)+"|
00000240  20 22 3b 0d 00 fa 0b 20  e3 4f 3d 30 b8 33 0d 01  | ";.... .O=0.3..|
00000250  04 10 20 20 61 3d 62 25  3f 28 49 2b 4f 29 0d 01  |..  a=b%?(I+O)..|
00000260  0e 1e 20 20 e7 20 61 3c  33 32 20 84 20 61 3d 31  |..  . a<32 . a=1|
00000270  32 37 20 8c 61 3d 97 28  22 2e 22 29 0d 01 18 0c  |27 .a=.(".")....|
00000280  20 20 d5 23 6f 25 2c 61  0d 01 22 06 20 ed 0d 01  |  .#o%,a..". ...|
00000290  2c 0c 20 d5 23 6f 25 2c  22 22 0d 01 36 05 ed 0d  |,. .#o%,""..6...|
000002a0  01 40 08 d9 23 6f 25 0d  01 4a 05 e1 0d 01 54 05  |.@..#o%..J....T.|
000002b0  3a 0d 01 5e 39 f4 20 50  52 4f 43 70 72 69 6e 74  |:..^9. PROCprint|
000002c0  6d 65 6d 6f 72 79 20 3a  20 64 69 73 70 6c 61 79  |memory : display|
000002d0  20 6d 65 6d 6f 72 79 20  64 61 74 61 20 6f 6e 20  | memory data on |
000002e0  74 68 65 20 73 63 72 65  65 6e 0d 01 68 19 dd f2  |the screen..h...|
000002f0  70 72 69 6e 74 6d 65 6d  6f 72 79 28 62 25 2c 6c  |printmemory(b%,l|
00000300  65 6e 29 0d 01 72 0b ea  20 49 2c 4f 2c 61 0d 01  |en)..r.. I,O,a..|
00000310  7c 13 e3 49 3d 30 b8 20  6c 65 6e 2d 34 20 88 20  ||..I=0. len-4 . |
00000320  34 0d 01 86 23 20 f1 a4  68 65 78 28 49 29 2b 22  |4...# ..hex(I)+"|
00000330  20 3a 20 22 2b a4 68 65  78 28 62 25 21 49 29 2b  | : "+.hex(b%!I)+|
00000340  22 20 22 3b 0d 01 90 0b  20 e3 4f 3d 30 b8 33 0d  |" ";.... .O=0.3.|
00000350  01 9a 10 20 20 61 3d 62  25 3f 28 49 2b 4f 29 0d  |...  a=b%?(I+O).|
00000360  01 a4 1e 20 20 e7 20 61  3c 33 32 20 84 20 61 3d  |...  . a<32 . a=|
00000370  31 32 37 20 8c 61 3d 97  28 22 2e 22 29 0d 01 ae  |127 .a=.(".")...|
00000380  09 20 20 ef 20 61 0d 01  b8 06 20 ed 0d 01 c2 06  |.  . a.... .....|
00000390  20 f1 0d 01 cc 05 ed 0d  01 d6 05 e1 0d 01 e0 05  | ...............|
000003a0  3a 0d 01 ea 17 dd a4 68  65 78 28 6e 29 3a ea 61  |:......hex(n):.a|
000003b0  24 3a 61 24 3d c3 7e 6e  0d 01 f4 19 3d 22 26 22  |$:a$=.~n....="&"|
000003c0  2b c4 38 2d a9 28 61 24  29 2c 22 30 22 29 2b 61  |+.8-.(a$),"0")+a|
000003d0  24 0d 01 fe 05 3a 0d 02  08 2c f4 20 50 52 4f 43  |$....:...,. PROC|
000003e0  6c 6f 67 20 3a 20 6c 6f  67 20 61 20 6c 69 6e 65  |log : log a line|
000003f0  20 74 6f 20 74 68 65 20  73 63 72 61 70 20 66 69  | to the scrap fi|
00000400  6c 65 0d 02 12 0d dd f2  6c 6f 67 28 6d 24 29 0d  |le......log(m$).|
00000410  02 1c 12 e7 20 ac 20 74  65 73 74 6c 6f 67 20 8c  |.... . testlog .|
00000420  e1 0d 02 26 08 ea 20 6f  25 0d 02 30 35 6f 25 3d  |...&.. o%..05o%=|
00000430  ad 28 22 3c 54 65 73 74  24 53 63 72 61 70 3e 22  |.("<Test$Scrap>"|
00000440  29 3a e7 20 6f 25 3d 30  20 8c 6f 25 3d ae 28 22  |):. o%=0 .o%=.("|
00000450  3c 54 65 73 74 24 53 63  72 61 70 3e 22 29 0d 02  |<Test$Scrap>")..|
00000460  44 0d cf 23 6f 25 3d a2  23 6f 25 0d 02 4e 26 d5  |D..#o%=.#o%..N&.|
00000470  23 6f 25 2c 74 65 73 74  61 70 70 24 2b 22 20 3a  |#o%,testapp$+" :|
00000480  20 22 2b a4 73 75 62 73  74 76 61 72 73 28 6d 24  | "+.substvars(m$|
00000490  29 0d 02 58 08 d9 23 6f  25 0d 02 62 05 e1 0d 02  |)..X..#o%..b....|
000004a0  6c 05 3a 0d 02 76 3e f4  20 50 52 4f 43 6c 6f 61  |l.:..v>. PROCloa|
000004b0  64 73 63 72 61 70 20 3a  20 6c 6f 61 64 20 74 68  |dscrap : load th|
000004c0  65 20 73 63 72 61 70 20  74 65 78 74 20 66 69 6c  |e scrap text fil|
000004d0  65 20 69 6e 74 6f 20 74  68 65 20 65 64 69 74 6f  |e into the edito|
000004e0  72 0d 02 80 0f dd f2 6c  6f 61 64 73 63 72 61 70  |r......loadscrap|
000004f0  0d 02 8a 1e 2a 53 65 74  74 79 70 65 20 3c 54 65  |....*Settype <Te|
00000500  73 74 24 53 63 72 61 70  3e 20 54 65 78 74 0d 02  |st$Scrap> Text..|
00000510  94 1b 2a 46 69 6c 65 72  5f 52 75 6e 20 3c 54 65  |..*Filer_Run <Te|
00000520  73 74 24 53 63 72 61 70  3e 0d 02 9e 05 e1 0d 02  |st$Scrap>.......|
00000530  a8 05 3a 0d 02 b2 33 f4  20 50 52 4f 43 77 69 70  |..:...3. PROCwip|
00000540  65 73 63 72 61 70 20 3a  20 73 74 61 72 74 20 61  |escrap : start a|
00000550  20 66 72 65 73 68 20 74  65 73 74 69 6e 67 20 73  | fresh testing s|
00000560  65 73 73 69 6f 6e 0d 02  bc 0f dd f2 77 69 70 65  |ession......wipe|
00000570  73 63 72 61 70 0d 02 c6  18 2a 43 72 65 61 74 65  |scrap....*Create|
00000580  20 3c 54 65 73 74 24 53  63 72 61 70 3e 0d 02 d0  | <Test$Scrap>...|
00000590  05 e1 0d 02 da 05 3a 0d  02 e4 3c f4 20 50 52 4f  |......:...<. PRO|
000005a0  43 64 75 6d 70 6d 65 73  73 61 67 65 20 3a 20 64  |Cdumpmessage : d|
000005b0  75 6d 70 20 6d 65 73 73  61 67 65 20 62 6c 6f 63  |ump message bloc|
000005c0  6b 20 74 6f 20 74 68 65  20 73 63 72 61 70 20 66  |k to the scrap f|
000005d0  69 6c 65 0d 02 ee 1d f4  20 20 6d 65 6d 20 3d 20  |ile.....  mem = |
000005e0  70 6f 69 6e 74 65 72 20  74 6f 20 62 6c 6f 63 6b  |pointer to block|
000005f0  0d 02 f8 39 f4 20 20 72  65 61 73 6f 6e 20 3d 20  |...9.  reason = |
00000600  57 69 6d 70 5f 50 6f 6c  6c 20 72 65 61 73 6f 6e  |Wimp_Poll reason|
00000610  20 28 31 37 2c 31 38 2c  31 39 3b 20 6f 72 20 30  | (17,18,19; or 0|
00000620  20 66 6f 72 20 4e 2f 41  29 0d 03 02 1d dd f2 64  | for N/A)......d|
00000630  75 6d 70 6d 65 73 73 61  67 65 28 6d 65 6d 2c 72  |umpmessage(mem,r|
00000640  65 61 73 6f 6e 29 0d 03  0c 12 e7 20 ac 20 74 65  |eason)..... . te|
00000650  73 74 6c 6f 67 20 8c e1  0d 03 16 33 ea 20 61 24  |stlog .....3. a$|
00000660  2c 62 24 2c 64 61 74 61  74 79 70 65 2c 6e 75 6d  |,b$,datatype,num|
00000670  2c 6f 66 73 2c 6d 6f 72  65 2c 68 25 2c 70 78 2c  |,ofs,more,h%,px,|
00000680  70 79 2c 70 62 2c 70 77  2c 70 69 0d 03 20 22 68  |py,pb,pw,pi.. "h|
00000690  25 3d ad 28 22 3c 54 65  73 74 24 53 63 72 61 70  |%=.("<Test$Scrap|
000006a0  3e 22 29 3a cf 23 68 25  3d a2 23 68 25 0d 03 2a  |>"):.#h%=.#h%..*|
000006b0  29 d5 23 68 25 2c 41 70  70 6e 61 6d 65 24 2b 22  |).#h%,Appname$+"|
000006c0  20 3a 20 4d 65 73 73 61  67 65 20 62 6c 6f 63 6b  | : Message block|
000006d0  20 64 75 6d 70 22 0d 03  34 20 d5 23 68 25 2c 22  | dump"..4 .#h%,"|
000006e0  20 4c 65 6e 67 74 68 20  20 3a 20 22 2b a4 64 28  | Length  : "+.d(|
000006f0  6d 65 6d 21 30 29 0d 03  3e 3b d5 23 68 25 2c 22  |mem!0)..>;.#h%,"|
00000700  20 46 72 6f 6d 20 20 20  20 3a 20 26 22 2b c3 7e  | From    : &"+.~|
00000710  28 6d 65 6d 21 34 29 2b  22 20 28 22 2b a4 74 61  |(mem!4)+" ("+.ta|
00000720  73 6b 6e 61 6d 65 28 6d  65 6d 21 34 29 2b 22 29  |skname(mem!4)+")|
00000730  22 0d 03 48 21 d5 23 68  25 2c 22 20 4d 79 20 72  |"..H!.#h%," My r|
00000740  65 66 20 20 3a 20 22 2b  a4 64 62 28 6d 65 6d 21  |ef  : "+.db(mem!|
00000750  38 29 0d 03 52 22 d5 23  68 25 2c 22 20 59 6f 75  |8)..R".#h%," You|
00000760  72 20 72 65 66 3a 20 22  2b a4 64 62 28 6d 65 6d  |r ref: "+.db(mem|
00000770  21 31 32 29 0d 03 5c 23  d5 23 68 25 2c 22 20 4d  |!12)..\#.#h%," M|
00000780  65 73 73 61 67 65 20 3a  20 22 2b a4 64 62 28 6d  |essage : "+.db(m|
00000790  65 6d 21 31 36 29 3b 0d  03 66 23 c8 99 20 22 57  |em!16);..f#.. "W|
000007a0  69 6d 70 5f 47 65 74 50  6f 69 6e 74 65 72 49 6e  |imp_GetPointerIn|
000007b0  66 6f 22 2c 2c 74 62 6c  6b 25 0d 03 70 19 70 78  |fo",,tblk%..p.px|
000007c0  3d 74 62 6c 6b 25 21 30  3a 70 79 3d 74 62 6c 6b  |=tblk%!0:py=tblk|
000007d0  25 21 34 0d 03 7a 1a 70  62 3d 74 62 6c 6b 25 21  |%!4..z.pb=tblk%!|
000007e0  38 3a 70 77 3d 74 62 6c  6b 25 21 31 32 0d 03 84  |8:pw=tblk%!12...|
000007f0  0f 70 69 3d 74 62 6c 6b  25 21 31 36 0d 03 8e 27  |.pi=tblk%!16...'|
00000800  64 61 74 61 74 79 70 65  3d 6d 65 6d 21 31 36 3a  |datatype=mem!16:|
00000810  6d 6f 72 65 3d b9 3a 6c  65 6e 3d 6d 65 6d 21 30  |more=.:len=mem!0|
00000820  2d 32 30 0d 03 98 09 f7  20 2b 33 30 0d 03 a2 05  |-20..... +30....|
00000830  f5 0d 03 ac 3b 20 f3 20  61 24 3a 6f 66 73 3d 30  |....; . a$:ofs=0|
00000840  3a 62 24 3d c1 61 24 2c  a7 61 24 2b 22 3a 22 2c  |:b$=.a$,.a$+":",|
00000850  22 3a 22 29 29 3a 61 24  3d c0 61 24 2c a7 61 24  |":")):a$=.a$,.a$|
00000860  2b 22 3a 22 2c 22 3a 22  29 2d 31 29 0d 03 b6 13  |+":",":")-1)....|
00000870  20 e7 20 c0 61 24 2c 31  29 3d 22 2d 22 20 8c 0d  | . .a$,1)="-" ..|
00000880  03 c0 07 20 20 f5 0d 03  ca 24 20 20 20 6e 75 6d  |...  ....$   num|
00000890  3d 2d a0 28 c0 61 24 2c  a7 61 24 2b 22 2d 22 2c  |=-.(.a$,.a$+"-",|
000008a0  22 2d 22 2c 32 29 2d 31  29 29 0d 03 d4 24 20 20  |"-",2)-1))...$  |
000008b0  20 61 24 3d c1 61 24 2c  a7 61 24 2b 22 2d 22 2c  | a$=.a$,.a$+"-",|
000008c0  22 2d 22 2c 32 29 29 3a  6f 66 73 2b 3d 31 0d 03  |"-",2)):ofs+=1..|
000008d0  de 21 20 20 fd 20 a7 61  24 2c 22 2d 22 29 3d 30  |.!  . .a$,"-")=0|
000008e0  20 84 20 6e 75 6d 3d 64  61 74 61 74 79 70 65 0d  | . num=datatype.|
000008f0  03 e8 06 20 cc 0d 03 f2  0c 20 20 6e 75 6d 3d 2e  |... .....  num=.|
00000900  35 0d 03 fc 06 20 cd 0d  04 06 20 fd 20 6e 75 6d  |5.... .... . num|
00000910  3d 64 61 74 61 74 79 70  65 20 84 20 6e 75 6d 3d  |=datatype . num=|
00000920  26 46 46 46 46 46 46 0d  04 10 14 e7 20 6e 75 6d  |&FFFFFF..... num|
00000930  3d 64 61 74 61 74 79 70  65 20 8c 0d 04 1a 0f 20  |=datatype ..... |
00000940  e3 6e 75 6d 3d 31 b8 6f  66 73 0d 04 24 1c 20 20  |.num=1.ofs..$.  |
00000950  62 24 3d c1 62 24 2c a7  62 24 2b 22 3a 22 2c 22  |b$=.b$,.b$+":","|
00000960  3a 22 29 2b 31 29 0d 04  2e 06 20 ed 0d 04 38 1b  |:")+1).... ...8.|
00000970  20 62 24 3d c0 62 24 2c  a7 62 24 2b 22 3a 22 2c  | b$=.b$,.b$+":",|
00000980  22 3a 22 29 2d 31 29 0d  04 42 1d 20 e7 20 62 24  |":")-1)..B. . b$|
00000990  3c 3e 22 22 20 8c d5 23  68 25 2c 22 20 3a 20 22  |<>"" ..#h%," : "|
000009a0  2b 62 24 3b 0d 04 4c 05  cc 0d 04 56 0b 20 6d 6f  |+b$;..L....V. mo|
000009b0  72 65 3d a3 0d 04 60 05  cd 0d 04 6a 12 6f 66 73  |re=...`....j.ofs|
000009c0  3d 32 30 3a d5 23 68 25  2c 31 30 0d 04 74 0c c8  |=20:.#h%,10..t..|
000009d0  95 20 6c 65 6e 3e 30 0d  04 7e 10 20 6e 75 6d 3d  |. len>0..~. num=|
000009e0  6d 65 6d 21 6f 66 73 0d  04 88 2d 20 d5 23 68 25  |mem!ofs...- .#h%|
000009f0  2c 22 20 22 2b a4 64 28  6f 66 73 29 2b 22 20 3a  |," "+.d(ofs)+" :|
00000a00  20 22 2b a4 64 62 28 6e  75 6d 29 2b 22 20 22 2b  | "+.db(num)+" "+|
00000a10  bd 33 34 3b 0d 04 92 14  20 e3 20 69 3d 6f 66 73  |.34;.... . i=ofs|
00000a20  20 b8 20 6f 66 73 2b 33  0d 04 9c 30 20 20 e7 20  | . ofs+3...0  . |
00000a30  28 28 6d 65 6d 21 69 29  20 80 20 31 32 37 29 3c  |((mem!i) . 127)<|
00000a40  3e 31 30 20 8c d5 23 68  25 2c 6d 65 6d 21 69 20  |>10 ..#h%,mem!i |
00000a50  8b d5 23 68 25 2c 31 33  0d 04 a6 06 20 ed 0d 04  |..#h%,13.... ...|
00000a60  b0 0e 20 d5 23 68 25 2c  bd 33 34 3b 0d 04 ba 0f  |.. .#h%,.34;....|
00000a70  20 e7 20 6d 6f 72 65 3d  a3 20 8c 0d 04 c4 25 20  | . more=. ....% |
00000a80  20 e7 20 6e 75 6d 3d 70  78 20 8c d5 23 68 25 2c  | . num=px ..#h%,|
00000a90  22 20 20 50 6f 69 6e 74  65 72 20 78 20 3f 22 3b  |"  Pointer x ?";|
00000aa0  0d 04 ce 25 20 20 e7 20  6e 75 6d 3d 70 79 20 8c  |...%  . num=py .|
00000ab0  d5 23 68 25 2c 22 20 20  50 6f 69 6e 74 65 72 20  |.#h%,"  Pointer |
00000ac0  79 20 3f 22 3b 0d 04 d8  2a 20 20 e7 20 6e 75 6d  |y ?";...*  . num|
00000ad0  3d 70 77 20 8c d5 23 68  25 2c 22 20 20 50 6f 69  |=pw ..#h%,"  Poi|
00000ae0  6e 74 65 72 20 77 69 6e  64 6f 77 20 3f 22 3b 0d  |nter window ?";.|
00000af0  04 e2 28 20 20 e7 20 6e  75 6d 3d 70 69 20 8c d5  |..(  . num=pi ..|
00000b00  23 68 25 2c 22 20 20 50  6f 69 6e 74 65 72 20 69  |#h%,"  Pointer i|
00000b10  63 6f 6e 20 3f 22 3b 0d  04 ec 34 20 20 e7 20 6e  |con ?";...4  . n|
00000b20  75 6d 3d 70 62 20 80 20  6e 75 6d 3c 3e 30 20 8c  |um=pb . num<>0 .|
00000b30  d5 23 68 25 2c 22 20 20  50 6f 69 6e 74 65 72 20  |.#h%,"  Pointer |
00000b40  62 75 74 74 6f 6e 73 20  3f 22 3b 0d 04 f6 06 20  |buttons ?";.... |
00000b50  cc 0d 05 00 0a 20 20 f3  20 61 24 0d 05 0a 2a 20  |.....  . a$...* |
00000b60  20 e7 20 c0 61 24 2c 31  29 3c 3e 22 2d 22 20 8c  | . .a$,1)<>"-" .|
00000b70  d5 23 68 25 2c 22 20 20  22 2b 61 24 3b 20 8b 6d  |.#h%,"  "+a$; .m|
00000b80  6f 72 65 3d a3 0d 05 14  06 20 cd 0d 05 1e 1a 20  |ore=..... ..... |
00000b90  d5 23 68 25 2c 31 30 3a  6c 65 6e 2d 3d 34 3a 6f  |.#h%,10:len-=4:o|
00000ba0  66 73 2b 3d 34 0d 05 28  12 ce 3a d5 23 68 25 2c  |fs+=4..(..:.#h%,|
00000bb0  31 30 3a d9 23 68 25 0d  05 32 05 e1 0d 05 3c 19  |10:.#h%..2....<.|
00000bc0  dd a4 72 28 61 24 29 3a  3d c2 22 20 20 20 22 2b  |..r(a$):=."   "+|
00000bd0  61 24 2c 33 29 0d 05 46  19 dd a4 6c 28 61 24 29  |a$,3)..F...l(a$)|
00000be0  3a 3d c0 61 24 2b 22 20  20 20 22 2c 33 29 0d 05  |:=.a$+"   ",3)..|
00000bf0  50 27 dd a4 64 28 6e 29  3a 3d 22 26 22 2b a4 6c  |P'..d(n):="&"+.l|
00000c00  28 c3 7e 6e 29 2b 22 20  28 22 2b a4 72 28 c3 6e  |(.~n)+" ("+.r(.n|
00000c10  29 2b 22 29 22 0d 05 5a  3e dd a4 64 62 28 6e 29  |)+")"..Z>..db(n)|
00000c20  3a 3d 22 26 22 2b c0 c3  7e 6e 2b 22 20 20 20 20  |:="&"+..~n+"    |
00000c30  20 20 20 22 2c 38 29 2b  22 20 28 22 2b c2 22 20  |   ",8)+" ("+." |
00000c40  20 20 20 20 20 20 20 20  22 2b c3 6e 2c 39 29 2b  |        "+.n,9)+|
00000c50  22 29 22 0d 05 64 05 3a  0d 05 6e 54 dc 20 2d 31  |")"..d.:..nT. -1|
00000c60  2d 32 2d 33 2d 34 2d 35  2d 26 38 30 31 34 30 3a  |-2-3-4-5-&80140:|
00000c70  44 61 74 61 53 61 76 65  3a 44 61 74 61 53 61 76  |DataSave:DataSav|
00000c80  65 41 63 6b 3a 44 61 74  61 4c 6f 61 64 3a 44 61  |eAck:DataLoad:Da|
00000c90  74 61 4c 6f 61 64 41 63  6b 3a 44 61 74 61 4f 70  |taLoadAck:DataOp|
00000ca0  65 6e 3a 50 72 69 6e 74  46 69 6c 65 0d 05 78 0d  |en:PrintFile..x.|
00000cb0  dc 20 20 57 69 6e 64 6f  77 0d 05 82 0b dc 20 20  |.  Window.....  |
00000cc0  49 63 6f 6e 0d 05 8c 10  dc 20 20 50 6f 69 6e 74  |Icon.....  Point|
00000cd0  65 72 20 78 0d 05 96 10  dc 20 20 50 6f 69 6e 74  |er x.....  Point|
00000ce0  65 72 20 79 0d 05 a0 22  dc 20 20 4c 65 6e 67 74  |er y...".  Lengt|
00000cf0  68 20 28 2d 31 20 3d 20  64 61 74 61 20 6e 6f 74  |h (-1 = data not|
00000d00  20 73 61 66 65 29 0d 05  aa 10 dc 20 20 46 69 6c  | safe).....  Fil|
00000d10  65 20 74 79 70 65 0d 05  b4 10 dc 20 20 46 69 6c  |e type.....  Fil|
00000d20  65 6e 61 6d 65 8c 0d 05  be 11 dc 20 2d 36 3a 52  |ename...... -6:R|
00000d30  41 4d 46 65 74 63 68 0d  05 c8 17 dc 20 20 41 64  |AMFetch.....  Ad|
00000d40  64 72 65 73 73 20 66 6f  72 20 64 61 74 61 0d 05  |dress for data..|
00000d50  d2 15 dc 20 20 53 69 7a  65 20 6f 66 20 62 75 66  |...  Size of buf|
00000d60  66 65 72 0d 05 dc 14 dc  20 2d 37 3a 52 41 4d 54  |fer..... -7:RAMT|
00000d70  72 61 6e 73 6d 69 74 0d  05 e6 16 dc 20 20 41 64  |ransmit.....  Ad|
00000d80  64 72 65 73 73 20 73 65  6e 74 20 74 6f 0d 05 f0  |dress sent to...|
00000d90  1d dc 20 20 41 6d 6f 75  6e 74 20 6f 66 20 64 61  |..  Amount of da|
00000da0  74 61 20 77 72 69 74 74  65 6e 0d 05 fa 10 dc 20  |ta written..... |
00000db0  2d 38 3a 50 72 65 51 75  69 74 0d 06 04 24 dc 20  |-8:PreQuit...$. |
00000dc0  20 66 6c 61 67 20 28 30  20 74 6f 20 63 6f 6e 74  | flag (0 to cont|
00000dd0  69 6e 75 65 20 73 68 75  74 64 6f 77 6e 29 0d 06  |inue shutdown)..|
00000de0  0e 16 dc 20 2d 39 3a 50  61 6c 65 74 74 65 43 68  |... -9:PaletteCh|
00000df0  61 6e 67 65 0d 06 18 15  dc 20 2d 26 41 3a 53 61  |ange..... -&A:Sa|
00000e00  76 65 44 65 73 6b 74 6f  70 0d 06 22 1f dc 20 20  |veDesktop.."..  |
00000e10  44 65 73 6b 74 6f 70 20  66 69 6c 65 20 68 61 6e  |Desktop file han|
00000e20  64 6c 65 20 62 79 74 65  0d 06 2c 0e dc 20 20 46  |dle byte..,..  F|
00000e30  6c 61 67 73 20 3f 0d 06  36 24 dc 20 2d 26 42 2d  |lags ?..6$. -&B-|
00000e40  26 43 3a 44 65 76 69 63  65 43 6c 61 69 6d 3a 44  |&C:DeviceClaim:D|
00000e50  65 76 69 63 65 49 6e 55  73 65 0d 06 40 16 dc 20  |eviceInUse..@.. |
00000e60  20 44 65 76 69 63 65 20  6d 61 6a 6f 72 20 69 64  | Device major id|
00000e70  0d 06 4a 16 dc 20 20 44  65 76 69 63 65 20 6d 69  |..J..  Device mi|
00000e80  6e 6f 72 20 69 64 0d 06  54 16 dc 20 20 43 6c 61  |nor id..T..  Cla|
00000e90  69 6d 61 6e 74 2f 4f 77  6e 65 72 8c 0d 06 5e 13  |imant/Owner...^.|
00000ea0  dc 20 2d 26 44 3a 44 61  74 61 53 61 76 65 64 0d  |. -&D:DataSaved.|
00000eb0  06 68 12 dc 20 20 52 65  66 65 72 65 6e 63 65 20  |.h..  Reference |
00000ec0  3f 0d 06 72 12 dc 20 2d  26 45 3a 53 68 75 74 64  |?..r.. -&E:Shutd|
00000ed0  6f 77 6e 0d 06 7c 0e dc  20 20 46 6c 61 67 73 20  |own..|..  Flags |
00000ee0  3f 0d 06 86 15 dc 20 2d  26 46 3a 43 6c 61 69 6d  |?..... -&F:Claim|
00000ef0  45 6e 74 69 74 79 0d 06  90 0e dc 20 20 46 6c 61  |Entity.....  Fla|
00000f00  67 73 20 3f 0d 06 9a 16  dc 20 2d 26 31 30 3a 44  |gs ?..... -&10:D|
00000f10  61 74 61 52 65 71 75 65  73 74 0d 06 a4 0d dc 20  |ataRequest..... |
00000f20  20 57 69 6e 64 6f 77 0d  06 ae 16 dc 20 20 49 6e  | Window.....  In|
00000f30  74 65 72 6e 61 6c 20 68  61 6e 64 6c 65 0d 06 b8  |ternal handle...|
00000f40  0a dc 20 20 78 2c 79 0d  06 c2 0c dc 20 20 66 6c  |..  x,y.....  fl|
00000f50  61 67 73 0d 06 cc 24 dc  20 20 46 69 6c 65 20 74  |ags...$.  File t|
00000f60  79 70 65 20 6c 69 73 74  2c 20 2d 31 20 74 65 72  |ype list, -1 ter|
00000f70  6d 69 6e 61 74 65 64 0d  06 d6 13 dc 20 2d 26 31  |minated..... -&1|
00000f80  31 3a 44 72 61 67 67 69  6e 67 0d 06 e0 0d dc 20  |1:Dragging..... |
00000f90  20 57 69 6e 64 6f 77 0d  06 ea 0b dc 20 20 49 63  | Window.....  Ic|
00000fa0  6f 6e 0d 06 f4 10 dc 20  20 50 6f 69 6e 74 65 72  |on.....  Pointer|
00000fb0  20 78 0d 06 fe 10 dc 20  20 50 6f 69 6e 74 65 72  | x.....  Pointer|
00000fc0  20 79 0d 07 08 0c dc 20  20 46 6c 61 67 73 0d 07  | y.....  Flags..|
00000fd0  12 1c dc 20 20 4c 65 66  74 2c 42 6f 74 74 6f 6d  |...  Left,Bottom|
00000fe0  2c 52 69 67 68 74 2c 54  6f 70 0d 07 1c 24 dc 20  |,Right,Top...$. |
00000ff0  20 46 69 6c 65 20 74 79  70 65 20 6c 69 73 74 2c  | File type list,|
00001000  20 2d 31 20 74 65 72 6d  69 6e 61 74 65 64 0d 07  | -1 terminated..|
00001010  26 14 dc 20 2d 26 31 32  3a 44 72 61 67 43 6c 61  |&.. -&12:DragCla|
00001020  69 6d 0d 07 30 0c dc 20  20 66 6c 61 67 73 0d 07  |im..0..  flags..|
00001030  3a 24 dc 20 20 46 69 6c  65 20 74 79 70 65 20 6c  |:$.  File type l|
00001040  69 73 74 2c 20 2d 31 20  74 65 72 6d 69 6e 61 74  |ist, -1 terminat|
00001050  65 64 0d 07 44 1a dc 20  2d 26 34 30 31 3a 46 69  |ed..D.. -&401:Fi|
00001060  6c 65 72 5f 43 6c 6f 73  65 44 69 72 0d 07 4e 10  |ler_CloseDir..N.|
00001070  dc 20 20 46 53 20 6e 75  6d 62 65 72 0d 07 58 1d  |.  FS number..X.|
00001080  dc 20 20 30 20 28 72 65  73 65 72 76 65 64 20 66  |.  0 (reserved f|
00001090  6f 72 20 66 6c 61 67 73  29 0d 07 62 23 dc 20 20  |or flags)..b#.  |
000010a0  46 6c 61 67 73 20 62 79  74 65 20 2b 20 44 69 72  |Flags byte + Dir|
000010b0  65 63 74 6f 72 79 20 6e  61 6d 65 8c 0d 07 6c 1b  |ectory name...l.|
000010c0  dc 20 2d 26 34 30 32 3a  46 69 6c 65 72 5f 4f 70  |. -&402:Filer_Op|
000010d0  65 6e 44 69 72 41 74 0d  07 76 10 dc 20 20 46 53  |enDirAt..v..  FS|
000010e0  20 6e 75 6d 62 65 72 0d  07 80 0c dc 20 20 66 6c  | number.....  fl|
000010f0  61 67 73 0d 07 8a 11 dc  20 20 54 6f 70 2d 6c 65  |ags.....  Top-le|
00001100  66 74 20 78 0d 07 94 11  dc 20 20 54 6f 70 2d 6c  |ft x.....  Top-l|
00001110  65 66 74 20 79 0d 07 9e  0c dc 20 20 57 69 64 74  |eft y.....  Widt|
00001120  68 0d 07 a8 0d dc 20 20  48 65 69 67 68 74 0d 07  |h.....  Height..|
00001130  b2 18 dc 20 20 46 6c 61  67 73 20 62 79 74 65 20  |...  Flags byte |
00001140  2b 20 50 61 74 68 0d 07  bc 1e dc 20 2d 26 34 30  |+ Path..... -&40|
00001150  33 3a 46 69 6c 65 72 5f  53 65 6c 65 63 74 69 6f  |3:Filer_Selectio|
00001160  6e 44 69 72 0d 07 c6 19  dc 20 20 53 65 6c 65 63  |nDir.....  Selec|
00001170  74 65 64 20 64 69 72 65  63 74 6f 72 79 0d 07 d0  |ted directory...|
00001180  1e dc 20 2d 26 34 30 34  3a 46 69 6c 65 72 5f 41  |.. -&404:Filer_A|
00001190  64 64 53 65 6c 65 63 74  69 6f 6e 0d 07 da 10 dc  |ddSelection.....|
000011a0  20 20 4c 65 61 66 20 6e  61 6d 65 0d 07 e4 18 dc  |  Leaf name.....|
000011b0  20 2d 26 34 30 35 3a 46  69 6c 65 72 5f 41 63 74  | -&405:Filer_Act|
000011c0  69 6f 6e 0d 07 ee 10 dc  20 20 4f 70 65 72 61 74  |ion.....  Operat|
000011d0  69 6f 6e 0d 07 f8 0e dc  20 20 4f 70 74 69 6f 6e  |ion.....  Option|
000011e0  73 0d 08 02 0e dc 20 20  44 61 74 61 8c 20 3f 0d  |s.....  Data. ?.|
000011f0  08 0c 1f dc 20 2d 26 34  30 36 3a 46 69 6c 65 72  |.... -&406:Filer|
00001200  5f 43 6f 6e 74 72 6f 6c  41 63 74 69 6f 6e 0d 08  |_ControlAction..|
00001210  16 10 dc 20 20 43 6f 6e  74 72 6f 6c 20 3f 0d 08  |...  Control ?..|
00001220  20 1b dc 20 2d 26 34 30  37 3a 46 69 6c 65 72 5f  | .. -&407:Filer_|
00001230  53 65 6c 65 63 74 69 6f  6e 0d 08 2a 1c dc 20 20  |Selection..*..  |
00001240  6c 65 66 74 2c 62 6f 74  74 6f 6d 2c 72 69 67 68  |left,bottom,righ|
00001250  74 2c 74 6f 70 0d 08 34  13 dc 20 20 77 69 64 74  |t,top..4..  widt|
00001260  68 2c 68 65 69 67 68 74  0d 08 3e 15 dc 20 20 64  |h,height..>..  d|
00001270  69 73 70 6c 61 79 20 66  6f 72 6d 61 74 0d 08 48  |isplay format..H|
00001280  1a dc 20 20 63 6f 6c 30  2c 72 6f 77 30 2c 63 6f  |..  col0,row0,co|
00001290  6c 31 2c 72 6f 77 31 0d  08 52 15 dc 20 2d 26 35  |l1,row1..R.. -&5|
000012a0  30 30 3a 41 6c 61 72 6d  5f 53 65 74 0d 08 5c 0d  |00:Alarm_Set..\.|
000012b0  dc 20 20 52 65 61 73 6f  6e 0d 08 66 0c dc 20 20  |.  Reason..f..  |
000012c0  54 69 6d 65 2c 0d 08 70  16 dc 20 20 53 65 6e 64  |Time,..p..  Send|
000012d0  65 72 8c 2c 2c 2c 2c 2c  2c 2c 2c 0d 08 7a 12 dc  |er.,,,,,,,,..z..|
000012e0  20 20 41 6c 61 72 6d 20  6e 61 6d 65 8c 0d 08 84  |  Alarm name....|
000012f0  19 dc 20 2d 26 35 30 31  3a 41 6c 61 72 6d 5f 47  |.. -&501:Alarm_G|
00001300  6f 6e 65 4f 66 66 0d 08  8e 16 dc 20 20 53 65 6e  |oneOff.....  Sen|
00001310  64 65 72 8c 2c 2c 2c 2c  2c 2c 2c 2c 0d 08 98 12  |der.,,,,,,,,....|
00001320  dc 20 20 41 6c 61 72 6d  20 6e 61 6d 65 8c 0d 08  |.  Alarm name...|
00001330  a2 18 dc 20 2d 26 35 30  32 3a 48 65 6c 70 5f 52  |... -&502:Help_R|
00001340  65 71 75 65 73 74 0d 08  ac 10 dc 20 20 50 6f 69  |equest.....  Poi|
00001350  6e 74 65 72 20 78 0d 08  b6 10 dc 20 20 50 6f 69  |nter x.....  Poi|
00001360  6e 74 65 72 20 79 0d 08  c0 0e dc 20 20 42 75 74  |nter y.....  But|
00001370  74 6f 6e 73 0d 08 ca 0d  dc 20 20 57 69 6e 64 6f  |tons.....  Windo|
00001380  77 0d 08 d4 0b dc 20 20  49 63 6f 6e 0d 08 de 16  |w.....  Icon....|
00001390  dc 20 2d 26 35 30 33 3a  48 65 6c 70 5f 52 65 70  |. -&503:Help_Rep|
000013a0  6c 79 0d 08 e8 13 dc 20  20 48 65 6c 70 20 73 74  |ly.....  Help st|
000013b0  72 69 6e 67 8c 0d 08 f2  14 dc 20 2d 26 34 30 30  |ring...... -&400|
000013c0  34 30 3a 4e 6f 74 69 66  79 0d 08 fc 28 dc 20 20  |40:Notify...(.  |
000013d0  53 74 61 74 69 6f 6e 2c  20 4e 65 74 77 6f 72 6b  |Station, Network|
000013e0  20 61 6e 64 20 70 61 72  74 20 6f 66 20 74 69 6d  | and part of tim|
000013f0  65 0d 09 06 1f dc 20 20  52 65 73 74 20 6f 66 20  |e.....  Rest of |
00001400  74 69 6d 65 20 61 6e 64  20 6d 65 73 73 61 67 65  |time and message|
00001410  0d 09 10 19 dc 20 2d 26  34 30 30 43 30 3a 4d 65  |..... -&400C0:Me|
00001420  6e 75 57 61 72 6e 69 6e  67 0d 09 1a 16 dc 20 20  |nuWarning.....  |
00001430  53 75 62 6d 65 6e 75 20  70 6f 69 6e 74 65 72 0d  |Submenu pointer.|
00001440  09 24 0f dc 20 20 6c 65  66 74 2c 74 6f 70 0d 09  |.$..  left,top..|
00001450  2e 16 dc 20 20 53 65 6c  65 63 74 69 6f 6e 20 6c  |...  Selection l|
00001460  69 73 74 8c 0d 09 38 18  dc 20 2d 26 34 30 30 43  |ist...8.. -&400C|
00001470  31 3a 4d 6f 64 65 43 68  61 6e 67 65 0d 09 42 1c  |1:ModeChange..B.|
00001480  dc 20 2d 26 34 30 30 43  32 3a 54 61 73 6b 49 6e  |. -&400C2:TaskIn|
00001490  69 74 69 61 6c 69 73 65  0d 09 4c 12 dc 20 20 43  |itialise..L..  C|
000014a0  41 4f 20 70 6f 69 6e 74  65 72 0d 09 56 19 dc 20  |AO pointer..V.. |
000014b0  20 53 6c 6f 74 20 73 69  7a 65 20 69 6e 20 62 79  | Slot size in by|
000014c0  74 65 73 0d 09 60 11 dc  20 20 54 61 73 6b 20 6e  |tes..`..  Task n|
000014d0  61 6d 65 8c 0d 09 6a 1b  dc 20 2d 26 34 30 30 43  |ame...j.. -&400C|
000014e0  33 3a 54 61 73 6b 43 6c  6f 73 65 44 6f 77 6e 0d  |3:TaskCloseDown.|
000014f0  09 74 16 dc 20 2d 26 34  30 30 43 34 3a 53 6c 6f  |.t.. -&400C4:Slo|
00001500  74 53 69 7a 65 0d 09 7e  14 dc 20 20 4e 65 77 20  |tSize..~..  New |
00001510  73 6c 6f 74 20 73 69 7a  65 0d 09 88 1c dc 20 20  |slot size.....  |
00001520  53 69 7a 65 20 6f 66 20  74 68 65 20 6e 65 78 74  |Size of the next|
00001530  20 73 6c 6f 74 0d 09 92  15 dc 20 2d 26 34 30 30  | slot..... -&400|
00001540  43 35 3a 53 65 74 53 6c  6f 74 0d 09 9c 14 dc 20  |C5:SetSlot..... |
00001550  20 4e 65 77 20 73 6c 6f  74 20 73 69 7a 65 0d 09  | New slot size..|
00001560  a6 19 dc 20 20 4f 77 6e  65 72 73 20 74 61 73 6b  |...  Owners task|
00001570  20 68 61 6e 64 6c 65 0d  09 b0 18 dc 20 2d 26 34  | handle..... -&4|
00001580  30 30 43 36 3a 54 61 73  6b 4e 61 6d 65 52 71 0d  |00C6:TaskNameRq.|
00001590  09 ba 12 dc 20 20 54 61  73 6b 20 68 61 6e 64 6c  |....  Task handl|
000015a0  65 0d 09 c4 18 dc 20 2d  26 34 30 30 43 37 3a 54  |e..... -&400C7:T|
000015b0  61 73 6b 4e 61 6d 65 49  73 0d 09 ce 12 dc 20 20  |askNameIs.....  |
000015c0  54 61 73 6b 20 68 61 6e  64 6c 65 0d 09 d8 17 dc  |Task handle.....|
000015d0  20 20 54 61 73 6b 27 73  20 73 6c 6f 74 20 73 69  |  Task's slot si|
000015e0  7a 65 0d 09 e2 11 dc 20  20 54 61 73 6b 20 6e 61  |ze.....  Task na|
000015f0  6d 65 8c 0d 09 ec 1b dc  20 2d 26 34 30 30 43 38  |me...... -&400C8|
00001600  3a 54 61 73 6b 53 74 61  72 74 65 64 20 3f 0d 09  |:TaskStarted ?..|
00001610  f6 1a dc 20 2d 26 34 30  30 43 39 3a 4d 65 6e 75  |... -&400C9:Menu|
00001620  73 44 65 6c 65 74 65 64  0d 0a 00 13 dc 20 20 4d  |sDeleted.....  M|
00001630  65 6e 75 20 70 6f 69 6e  74 65 72 0d 0a 0a 15 dc  |enu pointer.....|
00001640  20 2d 26 34 30 30 43 41  3a 49 63 6f 6e 69 7a 65  | -&400CA:Iconize|
00001650  0d 0a 14 0d dc 20 20 57  69 6e 64 6f 77 0d 0a 1e  |.....  Window...|
00001660  0b dc 20 20 54 61 73 6b  0d 0a 28 0c dc 20 20 54  |..  Task..(..  T|
00001670  69 74 6c 65 0d 0a 32 1c  dc 20 2d 26 34 30 30 43  |itle..2.. -&400C|
00001680  42 3a 57 69 6e 64 6f 77  43 6c 6f 73 65 64 20 3f  |B:WindowClosed ?|
00001690  0d 0a 3c 0d dc 20 20 57  69 6e 64 6f 77 0d 0a 46  |..<..  Window..F|
000016a0  1a dc 20 2d 26 34 30 30  43 43 3a 57 69 6e 64 6f  |.. -&400CC:Windo|
000016b0  77 49 6e 66 6f 20 3f 0d  0a 50 0d dc 20 20 57 69  |wInfo ?..P..  Wi|
000016c0  6e 64 6f 77 0d 0a 5a 13  dc 20 20 30 20 28 72 65  |ndow..Z..  0 (re|
000016d0  73 65 72 76 65 64 29 0d  0a 64 14 dc 20 20 53 70  |served)..d..  Sp|
000016e0  72 69 74 65 20 74 6f 20  75 73 65 0d 0a 6e 0c dc  |rite to use..n..|
000016f0  20 20 54 69 74 6c 65 0d  0a 78 14 dc 20 2d 26 34  |  Title..x.. -&4|
00001700  30 30 43 44 3a 53 77 61  70 20 3f 0d 0a 82 1a dc  |00CD:Swap ?.....|
00001710  20 2d 26 34 30 30 43 45  3a 54 6f 6f 6c 73 43 68  | -&400CE:ToolsCh|
00001720  61 6e 67 65 64 0d 0a 8c  19 dc 20 2d 26 34 30 30  |anged..... -&400|
00001730  43 46 3a 46 6f 6e 74 43  68 61 6e 67 65 64 0d 0a  |CF:FontChanged..|
00001740  96 14 dc 20 20 46 6f 6e  74 20 68 61 6e 64 6c 65  |...  Font handle|
00001750  20 3f 0d 0a a0 30 dc 20  2d 26 34 32 35 38 30 2d  | ?...0. -&42580-|
00001760  26 34 32 35 38 34 3a 54  68 72 6f 77 62 61 63 6b  |&42584:Throwback|
00001770  53 74 61 72 74 3a 54 68  72 6f 77 62 61 63 6b 45  |Start:ThrowbackE|
00001780  6e 64 0d 0a aa 3f dc 20  2d 26 34 32 35 38 31 2d  |nd...?. -&42581-|
00001790  26 34 32 35 38 32 2d 26  34 32 35 38 35 3a 50 72  |&42582-&42585:Pr|
000017a0  6f 63 65 73 73 69 6e 67  46 69 6c 65 3a 45 72 72  |ocessingFile:Err|
000017b0  6f 72 73 49 6e 3a 49 6e  66 6f 46 6f 72 46 69 6c  |orsIn:InfoForFil|
000017c0  65 0d 0a b4 10 dc 20 20  46 69 6c 65 6e 61 6d 65  |e.....  Filename|
000017d0  8c 0d 0a be 2d dc 20 2d  26 34 32 35 38 33 2d 26  |....-. -&42583-&|
000017e0  34 32 35 38 36 3a 45 72  72 6f 72 44 65 74 61 69  |42586:ErrorDetai|
000017f0  6c 73 3a 49 6e 66 6f 44  65 74 61 69 6c 73 0d 0a  |ls:InfoDetails..|
00001800  c8 12 dc 20 20 4c 69 6e  65 20 6e 75 6d 62 65 72  |...  Line number|
00001810  0d 0a d2 2f dc 20 20 22  57 61 72 6e 69 6e 67 2c  |.../.  "Warning,|
00001820  20 65 72 72 6f 72 20 6f  72 20 73 65 72 69 6f 75  | error or seriou|
00001830  73 20 28 30 20 66 6f 72  20 69 6e 66 6f 29 22 0d  |s (0 for info)".|
00001840  0a dc 13 dc 20 20 44 65  73 63 72 69 70 74 69 6f  |....  Descriptio|
00001850  6e 8c 0d 0a e6 24 dc 20  2d 26 34 35 44 38 30 3a  |n....$. -&45D80:|
00001860  45 64 69 74 52 71 20 28  45 78 74 65 72 6e 61 6c  |EditRq (External|
00001870  20 45 64 69 74 29 0d 0a  f0 28 dc 20 20 44 61 74  | Edit)...(.  Dat|
00001880  61 20 74 79 70 65 20 77  6f 72 64 20 28 66 69 6c  |a type word (fil|
00001890  65 74 79 70 65 2b 73 75  62 74 79 70 65 29 0d 0a  |etype+subtype)..|
000018a0  fa 1f dc 20 20 4a 6f 62  20 68 61 6e 64 6c 65 20  |...  Job handle |
000018b0  28 75 6e 63 6f 6d 70 6c  65 74 65 64 29 0d 0b 04  |(uncompleted)...|
000018c0  0c dc 20 20 46 6c 61 67  73 0d 0b 0e 23 dc 20 20  |..  Flags...#.  |
000018d0  50 61 72 65 6e 74 20 6e  61 6d 65 2c 2c 2c 2c 2c  |Parent name,,,,,|
000018e0  4e 61 6d 65 20 6f 66 20  66 69 6c 65 0d 0b 18 25  |Name of file...%|
000018f0  dc 20 2d 26 34 35 44 38  31 3a 45 64 69 74 41 63  |. -&45D81:EditAc|
00001900  6b 20 28 45 78 74 65 72  6e 61 6c 20 45 64 69 74  |k (External Edit|
00001910  29 0d 0b 22 28 dc 20 20  44 61 74 61 20 74 79 70  |).."(.  Data typ|
00001920  65 20 77 6f 72 64 20 28  66 69 6c 65 74 79 70 65  |e word (filetype|
00001930  2b 73 75 62 74 79 70 65  29 0d 0b 2c 1d dc 20 20  |+subtype)..,..  |
00001940  4a 6f 62 20 68 61 6e 64  6c 65 20 28 63 6f 6d 70  |Job handle (comp|
00001950  6c 65 74 65 64 29 0d 0b  36 0c dc 20 20 46 6c 61  |leted)..6..  Fla|
00001960  67 73 0d 0b 40 28 dc 20  2d 26 34 35 44 38 32 3a  |gs..@(. -&45D82:|
00001970  45 64 69 74 52 65 74 75  72 6e 20 28 45 78 74 65  |EditReturn (Exte|
00001980  72 6e 61 6c 20 45 64 69  74 29 0d 0b 4a 28 dc 20  |rnal Edit)..J(. |
00001990  20 44 61 74 61 20 74 79  70 65 20 77 6f 72 64 20  | Data type word |
000019a0  28 66 69 6c 65 74 79 70  65 2b 73 75 62 74 79 70  |(filetype+subtyp|
000019b0  65 29 0d 0b 54 11 dc 20  20 4a 6f 62 20 68 61 6e  |e)..T..  Job han|
000019c0  64 6c 65 0d 0b 5e 0c dc  20 20 46 6c 61 67 73 0d  |dle..^..  Flags.|
000019d0  0b 68 27 dc 20 2d 26 34  35 44 38 33 3a 45 64 69  |.h'. -&45D83:Edi|
000019e0  74 41 62 6f 72 74 20 28  45 78 74 65 72 6e 61 6c  |tAbort (External|
000019f0  20 45 64 69 74 29 0d 0b  72 13 dc 20 20 30 20 28  | Edit)..r..  0 (|
00001a00  52 65 73 65 72 76 65 64  29 0d 0b 7c 11 dc 20 20  |Reserved)..|..  |
00001a10  4a 6f 62 20 68 61 6e 64  6c 65 0d 0b 86 2a dc 20  |Job handle...*. |
00001a20  2d 26 34 35 44 38 34 3a  45 64 69 74 44 61 74 61  |-&45D84:EditData|
00001a30  53 61 76 65 20 28 45 78  74 65 72 6e 61 6c 20 45  |Save (External E|
00001a40  64 69 74 29 0d 0b 90 11  dc 20 20 4a 6f 62 20 68  |dit).....  Job h|
00001a50  61 6e 64 6c 65 0d 0b 9a  13 dc 20 20 30 20 28 52  |andle.....  0 (R|
00001a60  65 73 65 72 76 65 64 29  0d 0b a4 13 dc 20 20 30  |eserved).....  0|
00001a70  20 28 52 65 73 65 72 76  65 64 29 0d 0b ae 13 dc  | (Reserved).....|
00001a80  20 20 30 20 28 52 65 73  65 72 76 65 64 29 0d 0b  |  0 (Reserved)..|
00001a90  b8 15 dc 20 20 45 73 74  69 6d 61 74 65 64 20 73  |...  Estimated s|
00001aa0  69 7a 65 0d 0b c2 1e dc  20 20 46 69 6c 65 74 79  |ize.....  Filety|
00001ab0  70 65 20 28 4e 4f 54 20  73 75 62 2d 74 79 70 65  |pe (NOT sub-type|
00001ac0  29 0d 0b cc 18 dc 20 20  50 72 6f 70 6f 73 65 64  |).....  Proposed|
00001ad0  20 6c 65 61 66 6e 61 6d  65 0d 0b d6 18 dc 20 2d  | leafname..... -|
00001ae0  26 34 35 44 38 35 3a 45  64 69 74 43 75 72 73 6f  |&45D85:EditCurso|
00001af0  72 0d 0b e0 13 dc 20 20  30 20 28 72 65 73 65 72  |r.....  0 (reser|
00001b00  76 65 64 29 0d 0b ea 11  dc 20 20 4a 6f 62 20 68  |ved).....  Job h|
00001b10  61 6e 64 6c 65 0d 0b f4  0c dc 20 20 46 6c 61 67  |andle.....  Flag|
00001b20  73 0d 0b fe 1a dc 20 20  4e 65 77 20 63 75 72 73  |s.....  New curs|
00001b30  6f 72 20 70 6f 73 69 74  69 6f 6e 0d 0c 08 1d dc  |or position.....|
00001b40  20 20 4e 65 77 20 73 74  61 72 74 20 6f 66 20 73  |  New start of s|
00001b50  65 6c 65 63 74 69 6f 6e  0d 0c 12 1b dc 20 20 4e  |election.....  N|
00001b60  65 77 20 65 6e 64 20 6f  66 20 73 65 6c 65 63 74  |ew end of select|
00001b70  69 6f 6e 0d 0c 1c 1a dc  20 20 4f 6c 64 20 63 75  |ion.....  Old cu|
00001b80  72 73 6f 72 20 70 6f 73  69 74 69 6f 6e 0d 0c 26  |rsor position..&|
00001b90  1d dc 20 20 4f 6c 64 20  73 74 61 72 74 20 6f 66  |..  Old start of|
00001ba0  20 73 65 6c 65 63 74 69  6f 6e 0d 0c 30 1b dc 20  | selection..0.. |
00001bb0  20 4f 6c 64 20 65 6e 64  20 6f 66 20 73 65 6c 65  | Old end of sele|
00001bc0  63 74 69 6f 6e 0d 0c 3a  1e dc 20 2d 26 38 30 38  |ction..:.. -&808|
00001bd0  43 30 3a 54 61 73 6b 57  69 6e 64 6f 77 5f 49 6e  |C0:TaskWindow_In|
00001be0  70 75 74 0d 0c 44 0b dc  20 20 53 69 7a 65 0d 0c  |put..D..  Size..|
00001bf0  4e 0c dc 20 20 44 61 74  61 8c 0d 0c 58 1f dc 20  |N..  Data...X.. |
00001c00  2d 26 38 30 38 43 31 3a  54 61 73 6b 57 69 6e 64  |-&808C1:TaskWind|
00001c10  6f 77 5f 4f 75 74 70 75  74 0d 0c 62 0b dc 20 20  |ow_Output..b..  |
00001c20  53 69 7a 65 0d 0c 6c 0c  dc 20 20 44 61 74 61 8c  |Size..l..  Data.|
00001c30  0d 0c 76 1c dc 20 2d 26  38 30 38 43 32 3a 54 61  |..v.. -&808C2:Ta|
00001c40  73 6b 57 69 6e 64 6f 77  5f 45 67 6f 0d 0c 80 12  |skWindow_Ego....|
00001c50  dc 20 20 54 65 78 74 2d  68 61 6e 64 6c 65 0d 0c  |.  Text-handle..|
00001c60  8a 37 dc 20 2d 26 38 30  38 43 33 2d 26 38 30 38  |.7. -&808C3-&808|
00001c70  43 34 3a 54 61 73 6b 57  69 6e 64 6f 77 5f 4d 6f  |C4:TaskWindow_Mo|
00001c80  72 69 6f 3a 54 61 73 6b  57 69 6e 64 6f 77 5f 4d  |rio:TaskWindow_M|
00001c90  6f 72 69 74 65 0d 0c 94  15 dc 20 2d 26 38 30 38  |orite..... -&808|
00001ca0  43 35 3a 4e 65 77 54 61  73 6b 0d 0c 9e 19 dc 20  |C5:NewTask..... |
00001cb0  20 43 6f 6d 6d 61 6e 64  20 74 6f 20 65 78 65 63  | Command to exec|
00001cc0  75 74 65 0d 0c a8 39 dc  20 2d 26 38 30 38 43 36  |ute...9. -&808C6|
00001cd0  2d 26 38 30 38 43 35 3a  54 61 73 6b 57 69 6e 64  |-&808C5:TaskWind|
00001ce0  6f 77 5f 53 75 73 70 65  6e 64 3a 54 61 73 6b 57  |ow_Suspend:TaskW|
00001cf0  69 6e 64 6f 77 5f 52 65  73 75 6d 65 0d 0c b2 39  |indow_Resume...9|
00001d00  dc 20 2d 26 38 30 31 34  31 2d 26 38 30 31 34 32  |. -&80141-&80142|
00001d10  2d 26 38 30 31 34 33 3a  57 69 6c 6c 50 72 69 6e  |-&80143:WillPrin|
00001d20  74 3a 50 72 69 6e 74 53  61 76 65 3a 50 72 69 6e  |t:PrintSave:Prin|
00001d30  74 49 6e 69 74 0d 0c bc  42 dc 20 2d 26 38 30 31  |tInit...B. -&801|
00001d40  34 34 2d 26 38 30 31 34  35 2d 26 38 30 31 34 36  |44-&80145-&80146|
00001d50  3a 50 72 69 6e 74 45 72  72 6f 72 3a 50 72 69 6e  |:PrintError:Prin|
00001d60  74 54 79 70 65 4f 64 64  3a 50 72 69 6e 74 54 79  |tTypeOdd:PrintTy|
00001d70  70 65 4b 6e 6f 77 6e 0d  0c c6 18 dc 20 2d 26 38  |peKnown..... -&8|
00001d80  30 31 34 37 3a 53 65 74  50 72 69 6e 74 65 72 0d  |0147:SetPrinter.|
00001d90  0c d0 30 dc 20 2d 26 38  30 31 34 43 2d 26 38 30  |..0. -&8014C-&80|
00001da0  31 34 44 3a 50 53 50 72  69 6e 74 65 72 51 75 65  |14D:PSPrinterQue|
00001db0  72 79 3a 50 53 50 72 69  6e 74 65 72 41 63 6b 0d  |ry:PSPrinterAck.|
00001dc0  0c da 38 dc 20 2d 26 38  30 31 34 45 2d 26 38 30  |..8. -&8014E-&80|
00001dd0  31 34 46 3a 50 53 50 72  69 6e 74 65 72 4d 6f 64  |14F:PSPrinterMod|
00001de0  69 66 69 65 64 3a 50 53  50 72 69 6e 74 65 72 44  |ified:PSPrinterD|
00001df0  65 66 61 75 6c 74 73 0d  0c e4 36 dc 20 2d 26 38  |efaults...6. -&8|
00001e00  30 31 35 30 2d 26 38 30  31 35 31 3a 50 53 50 72  |0150-&80151:PSPr|
00001e10  69 6e 74 65 72 44 65 66  61 75 6c 74 65 64 3a 50  |interDefaulted:P|
00001e20  53 50 72 69 6e 74 65 72  4e 6f 74 50 53 0d 0c ee  |SPrinterNotPS...|
00001e30  36 dc 20 2d 26 38 30 31  35 32 2d 26 38 30 31 35  |6. -&80152-&8015|
00001e40  33 3a 52 65 73 65 74 50  72 69 6e 74 65 72 3a 50  |3:ResetPrinter:P|
00001e50  53 49 73 46 6f 6e 74 50  72 69 6e 74 52 75 6e 6e  |SIsFontPrintRunn|
00001e60  69 6e 67 0d 0c f8 1d dc  20 2d 26 38 30 45 31 45  |ing..... -&80E1E|
00001e70  3a 4f 4c 45 5f 46 69 6c  65 43 68 61 6e 67 65 64  |:OLE_FileChanged|
00001e80  0d 0d 02 13 dc 20 20 4d  65 73 73 61 67 65 20 74  |.....  Message t|
00001e90  79 70 65 0d 0d 0c 15 dc  20 20 53 65 73 73 69 6f  |ype.....  Sessio|
00001ea0  6e 20 6e 75 6d 62 65 72  0d 0d 16 20 dc 20 20 45  |n number... .  E|
00001eb0  78 74 72 61 20 64 61 74  61 20 28 65 67 20 66 69  |xtra data (eg fi|
00001ec0  6c 65 6e 61 6d 65 29 8c  0d 0d 20 1d dc 20 2d 26  |lename)... .. -&|
00001ed0  38 30 45 32 31 3a 4f 4c  45 5f 4f 70 65 6e 53 65  |80E21:OLE_OpenSe|
00001ee0  73 73 69 6f 6e 0d 0d 2a  15 dc 20 20 55 6e 69 71  |ssion..*..  Uniq|
00001ef0  75 65 20 6e 61 6d 65 2c  2c 2c 0d 0d 34 14 dc 20  |ue name,,,..4.. |
00001f00  20 57 69 6e 64 6f 77 20  68 61 6e 64 6c 65 0d 0d  | Window handle..|
00001f10  3e 0a dc 20 20 78 2c 79  0d 0d 48 13 dc 20 20 53  |>..  x,y..H..  S|
00001f20  65 73 73 69 6f 6e 20 74  79 70 65 0d 0d 52 15 dc  |ession type..R..|
00001f30  20 20 53 65 73 73 69 6f  6e 20 6e 75 6d 62 65 72  |  Session number|
00001f40  0d 0d 5c 1d dc 20 20 46  69 6c 65 74 79 70 65 20  |..\..  Filetype |
00001f50  28 73 65 73 73 69 6f 6e  3d 30 2c 31 29 0d 0d 66  |(session=0,1)..f|
00001f60  1d dc 20 20 50 61 74 68  6e 61 6d 65 20 28 73 65  |..  Pathname (se|
00001f70  73 73 69 6f 6e 3d 30 2c  31 29 0d 0d 70 20 dc 20  |ssion=0,1)..p . |
00001f80  2d 26 38 30 45 32 32 3a  4f 4c 45 5f 4f 70 65 6e  |-&80E22:OLE_Open|
00001f90  53 65 73 73 69 6f 6e 41  63 6b 0d 0d 7a 1e dc 20  |SessionAck..z.. |
00001fa0  2d 26 38 30 45 32 33 3a  4f 4c 45 5f 43 6c 6f 73  |-&80E23:OLE_Clos|
00001fb0  65 53 65 73 73 69 6f 6e  0d 0d 84 13 dc 20 20 4d  |eSession.....  M|
00001fc0  65 73 73 61 67 65 20 74  79 70 65 0d 0d 8e 22 dc  |essage type...".|
00001fd0  20 20 53 65 73 73 69 6f  6e 20 6e 75 6d 62 65 72  |  Session number|
00001fe0  20 28 2d 31 20 66 6f 72  20 61 6c 6c 29 0d 0d 98  | (-1 for all)...|
00001ff0  0e dc 20 2d 26 46 46 46  46 46 46 0d ff           |.. -&FFFFFF..|
00001ffd

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .