Home » Archimedes archive » Archimedes World » AW-1991-04.adf » April91 » !AWApr91/Goodies/Go/!GO/!RunImage

!AWApr91/Goodies/Go/!GO/!RunImage

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1991-04.adf » April91
Filename: !AWApr91/Goodies/Go/!GO/!RunImage
Read OK: ✔
File size: 0851 bytes
Load address: 0000
Exec address: 0000
File contents
   10REM > !RunImage (Version 1.01)
   20REM LEN Andrew Young, 25-01-91
   30DIM block &300,dir &100,menu &500,submenu &500,ind &200
   40DIM taskid% 4:$taskid%="TASK"
   50SYS "Wimp_Initialise",200,!taskid%,"Directory changer"
   60SYS "Wimp_OpenTemplate",,"<Go$Dir>.Templates"
   70SYS "Wimp_LoadTemplate",,block,ind,ind+&200,-1,"Info",0
   80SYS "Wimp_CreateWindow",,block TO info
   90SYS "Wimp_CloseTemplate"
  100!block=-2:block!4=0:block!8=0:block!12=68:block!16=68
  110block!20=&2002:$(block+24)="!go":SYS "Wimp_CreateIcon",,block TO icbar
  120$dir="":quit%=FALSE
  130ON ERROR PROCerror
  140REPEAT
  150SYS "Wimp_Poll",1,block TO reason%
  160CASE reason% OF
  170WHEN 6 : PROCmouse(block)
  180WHEN 9 : PROCmenu_select(block)
  190WHEN 17,18 : PROCreceive(block)
  200ENDCASE
  210UNTIL quit%
  220SYS "Wimp_CloseDown"
  230END
  240
  250DEF PROCmouse(block)
  260CASE block!8 OF
  270WHEN 2
  280$submenu="Current dir"
  290submenu?12=7:submenu?13=2:submenu?14=7:submenu?15=0
  300width=LEN$dir*16+32:IF width<LEN$submenu*16+32 width=LEN$submenu*16+32
  310submenu!16=width:submenu!20=40:submenu!24=0
  320ptr=submenu+28:!ptr=&80:ptr!4=-1:ptr!8=(7<<24)+(1<<8)+1
  330ptr!12=dir:ptr!16=-1:ptr!20=&100
  340$menu="Mover"
  350menu?12=7:menu?13=2:menu?14=7:menu?15=0
  360menu!16=200:menu!20=40:menu!24=0
  370ptr=menu+28
  380!ptr=&00:ptr!4=info:ptr!8=&7000021:$(ptr+12)="Info"
  390ptr+=24
  400!ptr=&00:ptr!4=submenu:ptr!8=&7000021:$(ptr+12)="Current dir"
  410ptr+=24
  420!ptr=&80:ptr!4=-1:ptr!8=&7000021:$(ptr+12)="Quit"
  430SYS "Wimp_CreateMenu",,menu,!block-100,216
  440WHEN 4
  450IF block!16=icbar THEN PROCset
  460ENDCASE
  470ENDPROC
  480
  490DEF PROCmenu_select(block)
  500CASE !block OF
  510WHEN 0 : REM info window
  520WHEN 1 : REM current directory
  530PROCset
  540WHEN 2 : REM quit
  550quit%=TRUE
  560ENDCASE
  570ENDPROC
  580
  590DEF PROCreceive(block)
  600CASE block!16 OF
  610WHEN 0 : quit%=TRUE
  620WHEN 3
  630file$="":ptr%=block+44
  640WHILE ?ptr%:file$+=CHR$?ptr%:ptr%+=1:ENDWHILE
  650SYS "OS_File",&05,file$ TO dir%
  660IF NOT (dir%=2) THEN
  670off%=LEN(file$)
  680WHILE MID$(file$,off%,1)<>".":off%-=1:ENDWHILE
  690file$=LEFT$(file$,off%-1)
  700ENDIF
  710$dir=file$:PROCset
  720ENDCASE
  730ENDPROC
  740
  750DEF PROCset
  760IF $dir="" THEN ERROR 255,"No directory specified"
  770OSCLI "DIR "+$dir:OSCLI "Filer_OpenDir "+$dir
  780ENDPROC
  790
  800DEF PROCerror
  810SYS "Wimp_DragBox",,-1
  820!block=ERR
  830$(block+4)=REPORT$+CHR$0
  840SYS "Wimp_ReportError",block,1,"Directory changer"
  850ENDPROC
  860


 � > !RunImage (Version 1.01)
� � Andrew Young, 25-01-91
9� block &300,dir &100,menu &500,submenu &500,ind &200
(� taskid% 4:$taskid%="TASK"
29ș "Wimp_Initialise",200,!taskid%,"Directory changer"
<0ș "Wimp_OpenTemplate",,"<Go$Dir>.Templates"
F:ș "Wimp_LoadTemplate",,block,ind,ind+&200,-1,"Info",0
P(ș "Wimp_CreateWindow",,block � info
Zș "Wimp_CloseTemplate"
d9!block=-2:block!4=0:block!8=0:block!12=68:block!16=68
nHblock!20=&2002:$(block+24)="!go":ș "Wimp_CreateIcon",,block � icbar
x$dir="":quit%=�
�� � �error
��
�$ș "Wimp_Poll",1,block � reason%
�Ȏ reason% �
�� 6 : �mouse(block)
�� 9 : �menu_select(block)
�� 17,18 : �receive(block)
��
�� quit%
�ș "Wimp_CloseDown"
��
�
�� �mouse(block)
Ȏ block!8 �
� 2
$submenu="Current dir"
"7submenu?12=7:submenu?13=2:submenu?14=7:submenu?15=0
,Cwidth=�$dir*16+32:� width<�$submenu*16+32 width=�$submenu*16+32
6/submenu!16=width:submenu!20=40:submenu!24=0
@;ptr=submenu+28:!ptr=&80:ptr!4=-1:ptr!8=(7<<24)+(1<<8)+1
J$ptr!12=dir:ptr!16=-1:ptr!20=&100
T$menu="Mover"
^+menu?12=7:menu?13=2:menu?14=7:menu?15=0
h$menu!16=200:menu!20=40:menu!24=0
rptr=menu+28
|7!ptr=&00:ptr!4=info:ptr!8=&7000021:$(ptr+12)="Info"
�ptr+=24
�A!ptr=&00:ptr!4=submenu:ptr!8=&7000021:$(ptr+12)="Current dir"
�ptr+=24
�5!ptr=&80:ptr!4=-1:ptr!8=&7000021:$(ptr+12)="Quit"
�-ș "Wimp_CreateMenu",,menu,!block-100,216
�� 4
�� block!16=icbar � �set
��
��
�
�� �menu_select(block)
�Ȏ !block �
�� 0 : � info window
� 1 : � current directory
�set
� 2 : � quit
&quit%=�
0�
:�
D
N� �receive(block)
XȎ block!16 �
b� 0 : quit%=�
l� 3
vfile$="":ptr%=block+44
�$ȕ ?ptr%:file$+=�?ptr%:ptr%+=1:�
�!ș "OS_File",&05,file$ � dir%
�� � (dir%=2) �
�off%=�(file$)
�$ȕ �file$,off%,1)<>".":off%-=1:�
�file$=�file$,off%-1)
��
�$dir=file$:�set
��
��
�
�
� �set
�.� $dir="" � � 255,"No directory specified"
)� "DIR "+$dir:� "Filer_OpenDir "+$dir
�

 � �error
*ș "Wimp_DragBox",,-1
4!block=�
>$(block+4)=�$+�0
H5ș "Wimp_ReportError",block,1,"Directory changer"
R�
\
�
00000000  0d 00 0a 20 f4 20 3e 20  21 52 75 6e 49 6d 61 67  |... . > !RunImag|
00000010  65 20 28 56 65 72 73 69  6f 6e 20 31 2e 30 31 29  |e (Version 1.01)|
00000020  0d 00 14 1e f4 20 a9 20  41 6e 64 72 65 77 20 59  |..... . Andrew Y|
00000030  6f 75 6e 67 2c 20 32 35  2d 30 31 2d 39 31 0d 00  |oung, 25-01-91..|
00000040  1e 39 de 20 62 6c 6f 63  6b 20 26 33 30 30 2c 64  |.9. block &300,d|
00000050  69 72 20 26 31 30 30 2c  6d 65 6e 75 20 26 35 30  |ir &100,menu &50|
00000060  30 2c 73 75 62 6d 65 6e  75 20 26 35 30 30 2c 69  |0,submenu &500,i|
00000070  6e 64 20 26 32 30 30 0d  00 28 1f de 20 74 61 73  |nd &200..(.. tas|
00000080  6b 69 64 25 20 34 3a 24  74 61 73 6b 69 64 25 3d  |kid% 4:$taskid%=|
00000090  22 54 41 53 4b 22 0d 00  32 39 c8 99 20 22 57 69  |"TASK"..29.. "Wi|
000000a0  6d 70 5f 49 6e 69 74 69  61 6c 69 73 65 22 2c 32  |mp_Initialise",2|
000000b0  30 30 2c 21 74 61 73 6b  69 64 25 2c 22 44 69 72  |00,!taskid%,"Dir|
000000c0  65 63 74 6f 72 79 20 63  68 61 6e 67 65 72 22 0d  |ectory changer".|
000000d0  00 3c 30 c8 99 20 22 57  69 6d 70 5f 4f 70 65 6e  |.<0.. "Wimp_Open|
000000e0  54 65 6d 70 6c 61 74 65  22 2c 2c 22 3c 47 6f 24  |Template",,"<Go$|
000000f0  44 69 72 3e 2e 54 65 6d  70 6c 61 74 65 73 22 0d  |Dir>.Templates".|
00000100  00 46 3a c8 99 20 22 57  69 6d 70 5f 4c 6f 61 64  |.F:.. "Wimp_Load|
00000110  54 65 6d 70 6c 61 74 65  22 2c 2c 62 6c 6f 63 6b  |Template",,block|
00000120  2c 69 6e 64 2c 69 6e 64  2b 26 32 30 30 2c 2d 31  |,ind,ind+&200,-1|
00000130  2c 22 49 6e 66 6f 22 2c  30 0d 00 50 28 c8 99 20  |,"Info",0..P(.. |
00000140  22 57 69 6d 70 5f 43 72  65 61 74 65 57 69 6e 64  |"Wimp_CreateWind|
00000150  6f 77 22 2c 2c 62 6c 6f  63 6b 20 b8 20 69 6e 66  |ow",,block . inf|
00000160  6f 0d 00 5a 1b c8 99 20  22 57 69 6d 70 5f 43 6c  |o..Z... "Wimp_Cl|
00000170  6f 73 65 54 65 6d 70 6c  61 74 65 22 0d 00 64 39  |oseTemplate"..d9|
00000180  21 62 6c 6f 63 6b 3d 2d  32 3a 62 6c 6f 63 6b 21  |!block=-2:block!|
00000190  34 3d 30 3a 62 6c 6f 63  6b 21 38 3d 30 3a 62 6c  |4=0:block!8=0:bl|
000001a0  6f 63 6b 21 31 32 3d 36  38 3a 62 6c 6f 63 6b 21  |ock!12=68:block!|
000001b0  31 36 3d 36 38 0d 00 6e  48 62 6c 6f 63 6b 21 32  |16=68..nHblock!2|
000001c0  30 3d 26 32 30 30 32 3a  24 28 62 6c 6f 63 6b 2b  |0=&2002:$(block+|
000001d0  32 34 29 3d 22 21 67 6f  22 3a c8 99 20 22 57 69  |24)="!go":.. "Wi|
000001e0  6d 70 5f 43 72 65 61 74  65 49 63 6f 6e 22 2c 2c  |mp_CreateIcon",,|
000001f0  62 6c 6f 63 6b 20 b8 20  69 63 62 61 72 0d 00 78  |block . icbar..x|
00000200  13 24 64 69 72 3d 22 22  3a 71 75 69 74 25 3d a3  |.$dir="":quit%=.|
00000210  0d 00 82 0e ee 20 85 20  f2 65 72 72 6f 72 0d 00  |..... . .error..|
00000220  8c 05 f5 0d 00 96 24 c8  99 20 22 57 69 6d 70 5f  |......$.. "Wimp_|
00000230  50 6f 6c 6c 22 2c 31 2c  62 6c 6f 63 6b 20 b8 20  |Poll",1,block . |
00000240  72 65 61 73 6f 6e 25 0d  00 a0 10 c8 8e 20 72 65  |reason%...... re|
00000250  61 73 6f 6e 25 20 ca 0d  00 aa 17 c9 20 36 20 3a  |ason% ...... 6 :|
00000260  20 f2 6d 6f 75 73 65 28  62 6c 6f 63 6b 29 0d 00  | .mouse(block)..|
00000270  b4 1d c9 20 39 20 3a 20  f2 6d 65 6e 75 5f 73 65  |... 9 : .menu_se|
00000280  6c 65 63 74 28 62 6c 6f  63 6b 29 0d 00 be 1d c9  |lect(block).....|
00000290  20 31 37 2c 31 38 20 3a  20 f2 72 65 63 65 69 76  | 17,18 : .receiv|
000002a0  65 28 62 6c 6f 63 6b 29  0d 00 c8 05 cb 0d 00 d2  |e(block)........|
000002b0  0b fd 20 71 75 69 74 25  0d 00 dc 17 c8 99 20 22  |.. quit%...... "|
000002c0  57 69 6d 70 5f 43 6c 6f  73 65 44 6f 77 6e 22 0d  |Wimp_CloseDown".|
000002d0  00 e6 05 e0 0d 00 f0 04  0d 00 fa 13 dd 20 f2 6d  |............. .m|
000002e0  6f 75 73 65 28 62 6c 6f  63 6b 29 0d 01 04 10 c8  |ouse(block).....|
000002f0  8e 20 62 6c 6f 63 6b 21  38 20 ca 0d 01 0e 07 c9  |. block!8 ......|
00000300  20 32 0d 01 18 1a 24 73  75 62 6d 65 6e 75 3d 22  | 2....$submenu="|
00000310  43 75 72 72 65 6e 74 20  64 69 72 22 0d 01 22 37  |Current dir".."7|
00000320  73 75 62 6d 65 6e 75 3f  31 32 3d 37 3a 73 75 62  |submenu?12=7:sub|
00000330  6d 65 6e 75 3f 31 33 3d  32 3a 73 75 62 6d 65 6e  |menu?13=2:submen|
00000340  75 3f 31 34 3d 37 3a 73  75 62 6d 65 6e 75 3f 31  |u?14=7:submenu?1|
00000350  35 3d 30 0d 01 2c 43 77  69 64 74 68 3d a9 24 64  |5=0..,Cwidth=.$d|
00000360  69 72 2a 31 36 2b 33 32  3a e7 20 77 69 64 74 68  |ir*16+32:. width|
00000370  3c a9 24 73 75 62 6d 65  6e 75 2a 31 36 2b 33 32  |<.$submenu*16+32|
00000380  20 77 69 64 74 68 3d a9  24 73 75 62 6d 65 6e 75  | width=.$submenu|
00000390  2a 31 36 2b 33 32 0d 01  36 2f 73 75 62 6d 65 6e  |*16+32..6/submen|
000003a0  75 21 31 36 3d 77 69 64  74 68 3a 73 75 62 6d 65  |u!16=width:subme|
000003b0  6e 75 21 32 30 3d 34 30  3a 73 75 62 6d 65 6e 75  |nu!20=40:submenu|
000003c0  21 32 34 3d 30 0d 01 40  3b 70 74 72 3d 73 75 62  |!24=0..@;ptr=sub|
000003d0  6d 65 6e 75 2b 32 38 3a  21 70 74 72 3d 26 38 30  |menu+28:!ptr=&80|
000003e0  3a 70 74 72 21 34 3d 2d  31 3a 70 74 72 21 38 3d  |:ptr!4=-1:ptr!8=|
000003f0  28 37 3c 3c 32 34 29 2b  28 31 3c 3c 38 29 2b 31  |(7<<24)+(1<<8)+1|
00000400  0d 01 4a 24 70 74 72 21  31 32 3d 64 69 72 3a 70  |..J$ptr!12=dir:p|
00000410  74 72 21 31 36 3d 2d 31  3a 70 74 72 21 32 30 3d  |tr!16=-1:ptr!20=|
00000420  26 31 30 30 0d 01 54 11  24 6d 65 6e 75 3d 22 4d  |&100..T.$menu="M|
00000430  6f 76 65 72 22 0d 01 5e  2b 6d 65 6e 75 3f 31 32  |over"..^+menu?12|
00000440  3d 37 3a 6d 65 6e 75 3f  31 33 3d 32 3a 6d 65 6e  |=7:menu?13=2:men|
00000450  75 3f 31 34 3d 37 3a 6d  65 6e 75 3f 31 35 3d 30  |u?14=7:menu?15=0|
00000460  0d 01 68 24 6d 65 6e 75  21 31 36 3d 32 30 30 3a  |..h$menu!16=200:|
00000470  6d 65 6e 75 21 32 30 3d  34 30 3a 6d 65 6e 75 21  |menu!20=40:menu!|
00000480  32 34 3d 30 0d 01 72 0f  70 74 72 3d 6d 65 6e 75  |24=0..r.ptr=menu|
00000490  2b 32 38 0d 01 7c 37 21  70 74 72 3d 26 30 30 3a  |+28..|7!ptr=&00:|
000004a0  70 74 72 21 34 3d 69 6e  66 6f 3a 70 74 72 21 38  |ptr!4=info:ptr!8|
000004b0  3d 26 37 30 30 30 30 32  31 3a 24 28 70 74 72 2b  |=&7000021:$(ptr+|
000004c0  31 32 29 3d 22 49 6e 66  6f 22 0d 01 86 0b 70 74  |12)="Info"....pt|
000004d0  72 2b 3d 32 34 0d 01 90  41 21 70 74 72 3d 26 30  |r+=24...A!ptr=&0|
000004e0  30 3a 70 74 72 21 34 3d  73 75 62 6d 65 6e 75 3a  |0:ptr!4=submenu:|
000004f0  70 74 72 21 38 3d 26 37  30 30 30 30 32 31 3a 24  |ptr!8=&7000021:$|
00000500  28 70 74 72 2b 31 32 29  3d 22 43 75 72 72 65 6e  |(ptr+12)="Curren|
00000510  74 20 64 69 72 22 0d 01  9a 0b 70 74 72 2b 3d 32  |t dir"....ptr+=2|
00000520  34 0d 01 a4 35 21 70 74  72 3d 26 38 30 3a 70 74  |4...5!ptr=&80:pt|
00000530  72 21 34 3d 2d 31 3a 70  74 72 21 38 3d 26 37 30  |r!4=-1:ptr!8=&70|
00000540  30 30 30 32 31 3a 24 28  70 74 72 2b 31 32 29 3d  |00021:$(ptr+12)=|
00000550  22 51 75 69 74 22 0d 01  ae 2d c8 99 20 22 57 69  |"Quit"...-.. "Wi|
00000560  6d 70 5f 43 72 65 61 74  65 4d 65 6e 75 22 2c 2c  |mp_CreateMenu",,|
00000570  6d 65 6e 75 2c 21 62 6c  6f 63 6b 2d 31 30 30 2c  |menu,!block-100,|
00000580  32 31 36 0d 01 b8 07 c9  20 34 0d 01 c2 1b e7 20  |216..... 4..... |
00000590  62 6c 6f 63 6b 21 31 36  3d 69 63 62 61 72 20 8c  |block!16=icbar .|
000005a0  20 f2 73 65 74 0d 01 cc  05 cb 0d 01 d6 05 e1 0d  | .set...........|
000005b0  01 e0 04 0d 01 ea 19 dd  20 f2 6d 65 6e 75 5f 73  |........ .menu_s|
000005c0  65 6c 65 63 74 28 62 6c  6f 63 6b 29 0d 01 f4 0f  |elect(block)....|
000005d0  c8 8e 20 21 62 6c 6f 63  6b 20 ca 0d 01 fe 17 c9  |.. !block ......|
000005e0  20 30 20 3a 20 f4 20 69  6e 66 6f 20 77 69 6e 64  | 0 : . info wind|
000005f0  6f 77 0d 02 08 1d c9 20  31 20 3a 20 f4 20 63 75  |ow..... 1 : . cu|
00000600  72 72 65 6e 74 20 64 69  72 65 63 74 6f 72 79 0d  |rrent directory.|
00000610  02 12 08 f2 73 65 74 0d  02 1c 10 c9 20 32 20 3a  |....set..... 2 :|
00000620  20 f4 20 71 75 69 74 0d  02 26 0b 71 75 69 74 25  | . quit..&.quit%|
00000630  3d b9 0d 02 30 05 cb 0d  02 3a 05 e1 0d 02 44 04  |=...0....:....D.|
00000640  0d 02 4e 15 dd 20 f2 72  65 63 65 69 76 65 28 62  |..N.. .receive(b|
00000650  6c 6f 63 6b 29 0d 02 58  11 c8 8e 20 62 6c 6f 63  |lock)..X... bloc|
00000660  6b 21 31 36 20 ca 0d 02  62 11 c9 20 30 20 3a 20  |k!16 ...b.. 0 : |
00000670  71 75 69 74 25 3d b9 0d  02 6c 07 c9 20 33 0d 02  |quit%=...l.. 3..|
00000680  76 1a 66 69 6c 65 24 3d  22 22 3a 70 74 72 25 3d  |v.file$="":ptr%=|
00000690  62 6c 6f 63 6b 2b 34 34  0d 02 80 24 c8 95 20 3f  |block+44...$.. ?|
000006a0  70 74 72 25 3a 66 69 6c  65 24 2b 3d bd 3f 70 74  |ptr%:file$+=.?pt|
000006b0  72 25 3a 70 74 72 25 2b  3d 31 3a ce 0d 02 8a 21  |r%:ptr%+=1:....!|
000006c0  c8 99 20 22 4f 53 5f 46  69 6c 65 22 2c 26 30 35  |.. "OS_File",&05|
000006d0  2c 66 69 6c 65 24 20 b8  20 64 69 72 25 0d 02 94  |,file$ . dir%...|
000006e0  12 e7 20 ac 20 28 64 69  72 25 3d 32 29 20 8c 0d  |.. . (dir%=2) ..|
000006f0  02 9e 11 6f 66 66 25 3d  a9 28 66 69 6c 65 24 29  |...off%=.(file$)|
00000700  0d 02 a8 24 c8 95 20 c1  66 69 6c 65 24 2c 6f 66  |...$.. .file$,of|
00000710  66 25 2c 31 29 3c 3e 22  2e 22 3a 6f 66 66 25 2d  |f%,1)<>".":off%-|
00000720  3d 31 3a ce 0d 02 b2 18  66 69 6c 65 24 3d c0 66  |=1:.....file$=.f|
00000730  69 6c 65 24 2c 6f 66 66  25 2d 31 29 0d 02 bc 05  |ile$,off%-1)....|
00000740  cd 0d 02 c6 13 24 64 69  72 3d 66 69 6c 65 24 3a  |.....$dir=file$:|
00000750  f2 73 65 74 0d 02 d0 05  cb 0d 02 da 05 e1 0d 02  |.set............|
00000760  e4 04 0d 02 ee 0a dd 20  f2 73 65 74 0d 02 f8 2e  |....... .set....|
00000770  e7 20 24 64 69 72 3d 22  22 20 8c 20 85 20 32 35  |. $dir="" . . 25|
00000780  35 2c 22 4e 6f 20 64 69  72 65 63 74 6f 72 79 20  |5,"No directory |
00000790  73 70 65 63 69 66 69 65  64 22 0d 03 02 29 ff 20  |specified"...). |
000007a0  22 44 49 52 20 22 2b 24  64 69 72 3a ff 20 22 46  |"DIR "+$dir:. "F|
000007b0  69 6c 65 72 5f 4f 70 65  6e 44 69 72 20 22 2b 24  |iler_OpenDir "+$|
000007c0  64 69 72 0d 03 0c 05 e1  0d 03 16 04 0d 03 20 0c  |dir........... .|
000007d0  dd 20 f2 65 72 72 6f 72  0d 03 2a 19 c8 99 20 22  |. .error..*... "|
000007e0  57 69 6d 70 5f 44 72 61  67 42 6f 78 22 2c 2c 2d  |Wimp_DragBox",,-|
000007f0  31 0d 03 34 0c 21 62 6c  6f 63 6b 3d 9f 0d 03 3e  |1..4.!block=...>|
00000800  14 24 28 62 6c 6f 63 6b  2b 34 29 3d f6 24 2b bd  |.$(block+4)=.$+.|
00000810  30 0d 03 48 35 c8 99 20  22 57 69 6d 70 5f 52 65  |0..H5.. "Wimp_Re|
00000820  70 6f 72 74 45 72 72 6f  72 22 2c 62 6c 6f 63 6b  |portError",block|
00000830  2c 31 2c 22 44 69 72 65  63 74 6f 72 79 20 63 68  |,1,"Directory ch|
00000840  61 6e 67 65 72 22 0d 03  52 05 e1 0d 03 5c 04 0d  |anger"..R....\..|
00000850  ff                                                |.|
00000851

© Dominic Ford 2021–2025.

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