Home » Archimedes archive » Acorn Computing » 1994 05 subscription disc.adf » 9405s » BeebDisk/ShdTxt8

BeebDisk/ShdTxt8

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 Computing » 1994 05 subscription disc.adf » 9405s
Filename: BeebDisk/ShdTxt8
Read OK:
File size: 092D bytes
Load address: 0000
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10REM >ShdTxt8
   20REM by Dave Bradforth
   30REM Based on Shadow Text by Stephen Wade
   40REM (c) Acorn Computing
   50:
   60MODE 1:COLOUR 129:CLS
   70PROCshadow(200,1000,3,0,1,"Shadowed to the top-left...")
   80PROCshadow(200,900,3,0,2,"Shadowed to the top...")
   90PROCshadow(200,800,3,0,3,"Shadowed to the top-right...")
  100PROCshadow(200,700,3,0,4,"Shadowed to the left...")
  110PROCshadow(200,600,3,0,5,"Shadowed to the right...")
  120PROCshadow(200,500,3,0,6,"Shadowed to the bottom-left...")
  130PROCshadow(200,400,3,0,7,"Shadowed to the bottom...")
  140PROCshadow(200,300,3,0,8,"Shadowed to the bottom-right...")
  150PROCoutline(200,200,3,0,"...and finally outlined!")
  160END
  170:
  180DEFPROCshadow(x,y,fgcol,shcol,code,text$)
  190IF code=1 PROCtopleft(text$,x,y,fgcol,shcol)
  200IF code=2 PROCabove(text$,x,y,fgcol,shcol)
  210IF code=3 PROCtopright(text$,x,y,fgcol,shcol)
  220IF code=4 PROCleft(text$,x,y,fgcol,shcol)
  230IF code=5 PROCright(text$,x,y,fgcol,shcol)
  240IF code=6 PROCbotleft(text$,x,y,fgcol,shcol)
  250IF code=7 PROCbelow(text$,x,y,fgcol,shcol)
  260IF code=8 PROCbotright(text$,x,y,fgcol,shcol)
  270ENDPROC
  280:
  290DEFPROCoutline(x,y,fgcol,shcol,text$)
  300PROCtopleft(text$,x,y,fgcol,shcol)
  310PROCabove(text$,x,y,fgcol,shcol)
  320PROCtopright(text$,x,y,fgcol,shcol)
  330PROCleft(text$,x,y,fgcol,shcol)
  340PROCright(text$,x,y,fgcol,shcol)
  350PROCbotleft(text$,x,y,fgcol,shcol)
  360PROCbelow(text$,x,y,fgcol,shcol)
  370PROCbotright(text$,x,y,fgcol,shcol)
  380ENDPROC
  390:
  400DEFPROCtopleft(text$,x,y,fgcol,shcol)
  410VDU 5
  420GCOL 0,shcol
  430MOVE x-4,y+4
  440PRINTtext$
  450GCOL 0,fgcol
  460MOVE x,y
  470PRINTtext$
  480VDU 4
  490ENDPROC
  500:
  510DEFPROCabove(text$,x,y,fgcol,shcol)
  520VDU 5
  530GCOL 0,shcol
  540MOVE x,y+4
  550PRINTtext$
  560GCOL 0,fgcol
  570MOVE x,y
  580PRINTtext$
  590VDU 4
  600ENDPROC
  610:
  620DEFPROCtopright(text$,x,y,fgcol,shcol)
  630VDU 5
  640GCOL 0,shcol
  650MOVE x+4,y+4
  660PRINTtext$
  670GCOL 0,fgcol
  680MOVE x,y
  690PRINTtext$
  700VDU 4
  710ENDPROC
  720:
  730DEFPROCleft(text$,x,y,fgcol,shcol)
  740VDU 5
  750GCOL 0,shcol
  760MOVE x-4,y
  770PRINTtext$
  780GCOL 0,fgcol
  790MOVE x,y
  800PRINTtext$
  810VDU 4
  820ENDPROC
  830:
  840DEFPROCright(text$,x,y,fgcol,shcol)
  850VDU 5
  860GCOL 0,shcol
  870MOVE x+4,y
  880PRINTtext$
  890GCOL 0,fgcol
  900MOVE x,y
  910PRINTtext$
  920VDU 4
  930ENDPROC
  940:
  950DEFPROCbotleft(text$,x,y,fgcol,shcol)
  960VDU 5
  970GCOL 0,shcol
  980MOVE x-4,y-4
  990PRINTtext$
 1000GCOL 0,fgcol
 1010MOVE x,y
 1020PRINTtext$
 1030VDU 4
 1040ENDPROC
 1050:
 1060DEFPROCbelow(text$,x,y,fgcol,shcol)
 1070VDU 5
 1080GCOL 0,shcol
 1090MOVE x,y-4
 1100PRINTtext$
 1110GCOL 0,fgcol
 1120MOVE x,y
 1130PRINTtext$
 1140VDU 4
 1150ENDPROC
 1160:
 1170DEFPROCbotright(text$,x,y,fgcol,shcol)
 1180VDU 5
 1190GCOL 0,shcol
 1200MOVE x+4,y-4
 1210PRINTtext$
 1220GCOL 0,fgcol
 1230MOVE x,y
 1240PRINTtext$
 1250VDU 4
 1260ENDPROC

� >ShdTxt8
� by Dave Bradforth
*� Based on Shadow Text by Stephen Wade
(� (c) Acorn Computing
2:
<� 1:� 129:�
F9�shadow(200,1000,3,0,1,"Shadowed to the top-left...")
P3�shadow(200,900,3,0,2,"Shadowed to the top...")
Z9�shadow(200,800,3,0,3,"Shadowed to the top-right...")
d4�shadow(200,700,3,0,4,"Shadowed to the left...")
n5�shadow(200,600,3,0,5,"Shadowed to the right...")
x;�shadow(200,500,3,0,6,"Shadowed to the bottom-left...")
�6�shadow(200,400,3,0,7,"Shadowed to the bottom...")
�<�shadow(200,300,3,0,8,"Shadowed to the bottom-right...")
�4�outline(200,200,3,0,"...and finally outlined!")
��
�:
�(��shadow(x,y,fgcol,shcol,code,text$)
�,� code=1 �topleft(text$,x,y,fgcol,shcol)
�*� code=2 �above(text$,x,y,fgcol,shcol)
�-� code=3 �topright(text$,x,y,fgcol,shcol)
�)� code=4 �left(text$,x,y,fgcol,shcol)
�*� code=5 �right(text$,x,y,fgcol,shcol)
�,� code=6 �botleft(text$,x,y,fgcol,shcol)
�*� code=7 �below(text$,x,y,fgcol,shcol)
-� code=8 �botright(text$,x,y,fgcol,shcol)
�
:
"$��outline(x,y,fgcol,shcol,text$)
,#�topleft(text$,x,y,fgcol,shcol)
6!�above(text$,x,y,fgcol,shcol)
@$�topright(text$,x,y,fgcol,shcol)
J �left(text$,x,y,fgcol,shcol)
T!�right(text$,x,y,fgcol,shcol)
^#�botleft(text$,x,y,fgcol,shcol)
h!�below(text$,x,y,fgcol,shcol)
r$�botright(text$,x,y,fgcol,shcol)
|�
�:
�$��topleft(text$,x,y,fgcol,shcol)
�� 5
�
� 0,shcol
�
� x-4,y+4
�
�text$
�
� 0,fgcol
�	� x,y
�
�text$
�� 4
��
�:
�"��above(text$,x,y,fgcol,shcol)
� 5

� 0,shcol
� x,y+4
&
�text$
0
� 0,fgcol
:	� x,y
D
�text$
N� 4
X�
b:
l%��topright(text$,x,y,fgcol,shcol)
v� 5
�
� 0,shcol
�
� x+4,y+4
�
�text$
�
� 0,fgcol
�	� x,y
�
�text$
�� 4
��
�:
�!��left(text$,x,y,fgcol,shcol)
�� 5
�
� 0,shcol
�� x-4,y

�text$

� 0,fgcol
	� x,y
 
�text$
*� 4
4�
>:
H"��right(text$,x,y,fgcol,shcol)
R� 5
\
� 0,shcol
f� x+4,y
p
�text$
z
� 0,fgcol
�	� x,y
�
�text$
�� 4
��
�:
�$��botleft(text$,x,y,fgcol,shcol)
�� 5
�
� 0,shcol
�
� x-4,y-4
�
�text$
�
� 0,fgcol
�	� x,y
�
�text$
� 4
�
:
$"��below(text$,x,y,fgcol,shcol)
.� 5
8
� 0,shcol
B� x,y-4
L
�text$
V
� 0,fgcol
`	� x,y
j
�text$
t� 4
~�
�:
�%��botright(text$,x,y,fgcol,shcol)
�� 5
�
� 0,shcol
�
� x+4,y-4
�
�text$
�
� 0,fgcol
�	� x,y
�
�text$
�� 4
��
�
00000000  0d 00 0a 0e f4 20 3e 53  68 64 54 78 74 38 0d 00  |..... >ShdTxt8..|
00000010  14 17 f4 20 62 79 20 44  61 76 65 20 42 72 61 64  |... by Dave Brad|
00000020  66 6f 72 74 68 0d 00 1e  2a f4 20 42 61 73 65 64  |forth...*. Based|
00000030  20 6f 6e 20 53 68 61 64  6f 77 20 54 65 78 74 20  | on Shadow Text |
00000040  62 79 20 53 74 65 70 68  65 6e 20 57 61 64 65 0d  |by Stephen Wade.|
00000050  00 28 19 f4 20 28 63 29  20 41 63 6f 72 6e 20 43  |.(.. (c) Acorn C|
00000060  6f 6d 70 75 74 69 6e 67  0d 00 32 05 3a 0d 00 3c  |omputing..2.:..<|
00000070  0f eb 20 31 3a fb 20 31  32 39 3a db 0d 00 46 39  |.. 1:. 129:...F9|
00000080  f2 73 68 61 64 6f 77 28  32 30 30 2c 31 30 30 30  |.shadow(200,1000|
00000090  2c 33 2c 30 2c 31 2c 22  53 68 61 64 6f 77 65 64  |,3,0,1,"Shadowed|
000000a0  20 74 6f 20 74 68 65 20  74 6f 70 2d 6c 65 66 74  | to the top-left|
000000b0  2e 2e 2e 22 29 0d 00 50  33 f2 73 68 61 64 6f 77  |...")..P3.shadow|
000000c0  28 32 30 30 2c 39 30 30  2c 33 2c 30 2c 32 2c 22  |(200,900,3,0,2,"|
000000d0  53 68 61 64 6f 77 65 64  20 74 6f 20 74 68 65 20  |Shadowed to the |
000000e0  74 6f 70 2e 2e 2e 22 29  0d 00 5a 39 f2 73 68 61  |top...")..Z9.sha|
000000f0  64 6f 77 28 32 30 30 2c  38 30 30 2c 33 2c 30 2c  |dow(200,800,3,0,|
00000100  33 2c 22 53 68 61 64 6f  77 65 64 20 74 6f 20 74  |3,"Shadowed to t|
00000110  68 65 20 74 6f 70 2d 72  69 67 68 74 2e 2e 2e 22  |he top-right..."|
00000120  29 0d 00 64 34 f2 73 68  61 64 6f 77 28 32 30 30  |)..d4.shadow(200|
00000130  2c 37 30 30 2c 33 2c 30  2c 34 2c 22 53 68 61 64  |,700,3,0,4,"Shad|
00000140  6f 77 65 64 20 74 6f 20  74 68 65 20 6c 65 66 74  |owed to the left|
00000150  2e 2e 2e 22 29 0d 00 6e  35 f2 73 68 61 64 6f 77  |...")..n5.shadow|
00000160  28 32 30 30 2c 36 30 30  2c 33 2c 30 2c 35 2c 22  |(200,600,3,0,5,"|
00000170  53 68 61 64 6f 77 65 64  20 74 6f 20 74 68 65 20  |Shadowed to the |
00000180  72 69 67 68 74 2e 2e 2e  22 29 0d 00 78 3b f2 73  |right...")..x;.s|
00000190  68 61 64 6f 77 28 32 30  30 2c 35 30 30 2c 33 2c  |hadow(200,500,3,|
000001a0  30 2c 36 2c 22 53 68 61  64 6f 77 65 64 20 74 6f  |0,6,"Shadowed to|
000001b0  20 74 68 65 20 62 6f 74  74 6f 6d 2d 6c 65 66 74  | the bottom-left|
000001c0  2e 2e 2e 22 29 0d 00 82  36 f2 73 68 61 64 6f 77  |...")...6.shadow|
000001d0  28 32 30 30 2c 34 30 30  2c 33 2c 30 2c 37 2c 22  |(200,400,3,0,7,"|
000001e0  53 68 61 64 6f 77 65 64  20 74 6f 20 74 68 65 20  |Shadowed to the |
000001f0  62 6f 74 74 6f 6d 2e 2e  2e 22 29 0d 00 8c 3c f2  |bottom...")...<.|
00000200  73 68 61 64 6f 77 28 32  30 30 2c 33 30 30 2c 33  |shadow(200,300,3|
00000210  2c 30 2c 38 2c 22 53 68  61 64 6f 77 65 64 20 74  |,0,8,"Shadowed t|
00000220  6f 20 74 68 65 20 62 6f  74 74 6f 6d 2d 72 69 67  |o the bottom-rig|
00000230  68 74 2e 2e 2e 22 29 0d  00 96 34 f2 6f 75 74 6c  |ht...")...4.outl|
00000240  69 6e 65 28 32 30 30 2c  32 30 30 2c 33 2c 30 2c  |ine(200,200,3,0,|
00000250  22 2e 2e 2e 61 6e 64 20  66 69 6e 61 6c 6c 79 20  |"...and finally |
00000260  6f 75 74 6c 69 6e 65 64  21 22 29 0d 00 a0 05 e0  |outlined!").....|
00000270  0d 00 aa 05 3a 0d 00 b4  28 dd f2 73 68 61 64 6f  |....:...(..shado|
00000280  77 28 78 2c 79 2c 66 67  63 6f 6c 2c 73 68 63 6f  |w(x,y,fgcol,shco|
00000290  6c 2c 63 6f 64 65 2c 74  65 78 74 24 29 0d 00 be  |l,code,text$)...|
000002a0  2c e7 20 63 6f 64 65 3d  31 20 f2 74 6f 70 6c 65  |,. code=1 .tople|
000002b0  66 74 28 74 65 78 74 24  2c 78 2c 79 2c 66 67 63  |ft(text$,x,y,fgc|
000002c0  6f 6c 2c 73 68 63 6f 6c  29 0d 00 c8 2a e7 20 63  |ol,shcol)...*. c|
000002d0  6f 64 65 3d 32 20 f2 61  62 6f 76 65 28 74 65 78  |ode=2 .above(tex|
000002e0  74 24 2c 78 2c 79 2c 66  67 63 6f 6c 2c 73 68 63  |t$,x,y,fgcol,shc|
000002f0  6f 6c 29 0d 00 d2 2d e7  20 63 6f 64 65 3d 33 20  |ol)...-. code=3 |
00000300  f2 74 6f 70 72 69 67 68  74 28 74 65 78 74 24 2c  |.topright(text$,|
00000310  78 2c 79 2c 66 67 63 6f  6c 2c 73 68 63 6f 6c 29  |x,y,fgcol,shcol)|
00000320  0d 00 dc 29 e7 20 63 6f  64 65 3d 34 20 f2 6c 65  |...). code=4 .le|
00000330  66 74 28 74 65 78 74 24  2c 78 2c 79 2c 66 67 63  |ft(text$,x,y,fgc|
00000340  6f 6c 2c 73 68 63 6f 6c  29 0d 00 e6 2a e7 20 63  |ol,shcol)...*. c|
00000350  6f 64 65 3d 35 20 f2 72  69 67 68 74 28 74 65 78  |ode=5 .right(tex|
00000360  74 24 2c 78 2c 79 2c 66  67 63 6f 6c 2c 73 68 63  |t$,x,y,fgcol,shc|
00000370  6f 6c 29 0d 00 f0 2c e7  20 63 6f 64 65 3d 36 20  |ol)...,. code=6 |
00000380  f2 62 6f 74 6c 65 66 74  28 74 65 78 74 24 2c 78  |.botleft(text$,x|
00000390  2c 79 2c 66 67 63 6f 6c  2c 73 68 63 6f 6c 29 0d  |,y,fgcol,shcol).|
000003a0  00 fa 2a e7 20 63 6f 64  65 3d 37 20 f2 62 65 6c  |..*. code=7 .bel|
000003b0  6f 77 28 74 65 78 74 24  2c 78 2c 79 2c 66 67 63  |ow(text$,x,y,fgc|
000003c0  6f 6c 2c 73 68 63 6f 6c  29 0d 01 04 2d e7 20 63  |ol,shcol)...-. c|
000003d0  6f 64 65 3d 38 20 f2 62  6f 74 72 69 67 68 74 28  |ode=8 .botright(|
000003e0  74 65 78 74 24 2c 78 2c  79 2c 66 67 63 6f 6c 2c  |text$,x,y,fgcol,|
000003f0  73 68 63 6f 6c 29 0d 01  0e 05 e1 0d 01 18 05 3a  |shcol).........:|
00000400  0d 01 22 24 dd f2 6f 75  74 6c 69 6e 65 28 78 2c  |.."$..outline(x,|
00000410  79 2c 66 67 63 6f 6c 2c  73 68 63 6f 6c 2c 74 65  |y,fgcol,shcol,te|
00000420  78 74 24 29 0d 01 2c 23  f2 74 6f 70 6c 65 66 74  |xt$)..,#.topleft|
00000430  28 74 65 78 74 24 2c 78  2c 79 2c 66 67 63 6f 6c  |(text$,x,y,fgcol|
00000440  2c 73 68 63 6f 6c 29 0d  01 36 21 f2 61 62 6f 76  |,shcol)..6!.abov|
00000450  65 28 74 65 78 74 24 2c  78 2c 79 2c 66 67 63 6f  |e(text$,x,y,fgco|
00000460  6c 2c 73 68 63 6f 6c 29  0d 01 40 24 f2 74 6f 70  |l,shcol)..@$.top|
00000470  72 69 67 68 74 28 74 65  78 74 24 2c 78 2c 79 2c  |right(text$,x,y,|
00000480  66 67 63 6f 6c 2c 73 68  63 6f 6c 29 0d 01 4a 20  |fgcol,shcol)..J |
00000490  f2 6c 65 66 74 28 74 65  78 74 24 2c 78 2c 79 2c  |.left(text$,x,y,|
000004a0  66 67 63 6f 6c 2c 73 68  63 6f 6c 29 0d 01 54 21  |fgcol,shcol)..T!|
000004b0  f2 72 69 67 68 74 28 74  65 78 74 24 2c 78 2c 79  |.right(text$,x,y|
000004c0  2c 66 67 63 6f 6c 2c 73  68 63 6f 6c 29 0d 01 5e  |,fgcol,shcol)..^|
000004d0  23 f2 62 6f 74 6c 65 66  74 28 74 65 78 74 24 2c  |#.botleft(text$,|
000004e0  78 2c 79 2c 66 67 63 6f  6c 2c 73 68 63 6f 6c 29  |x,y,fgcol,shcol)|
000004f0  0d 01 68 21 f2 62 65 6c  6f 77 28 74 65 78 74 24  |..h!.below(text$|
00000500  2c 78 2c 79 2c 66 67 63  6f 6c 2c 73 68 63 6f 6c  |,x,y,fgcol,shcol|
00000510  29 0d 01 72 24 f2 62 6f  74 72 69 67 68 74 28 74  |)..r$.botright(t|
00000520  65 78 74 24 2c 78 2c 79  2c 66 67 63 6f 6c 2c 73  |ext$,x,y,fgcol,s|
00000530  68 63 6f 6c 29 0d 01 7c  05 e1 0d 01 86 05 3a 0d  |hcol)..|......:.|
00000540  01 90 24 dd f2 74 6f 70  6c 65 66 74 28 74 65 78  |..$..topleft(tex|
00000550  74 24 2c 78 2c 79 2c 66  67 63 6f 6c 2c 73 68 63  |t$,x,y,fgcol,shc|
00000560  6f 6c 29 0d 01 9a 07 ef  20 35 0d 01 a4 0d e6 20  |ol)..... 5..... |
00000570  30 2c 73 68 63 6f 6c 0d  01 ae 0d ec 20 78 2d 34  |0,shcol..... x-4|
00000580  2c 79 2b 34 0d 01 b8 0a  f1 74 65 78 74 24 0d 01  |,y+4.....text$..|
00000590  c2 0d e6 20 30 2c 66 67  63 6f 6c 0d 01 cc 09 ec  |... 0,fgcol.....|
000005a0  20 78 2c 79 0d 01 d6 0a  f1 74 65 78 74 24 0d 01  | x,y.....text$..|
000005b0  e0 07 ef 20 34 0d 01 ea  05 e1 0d 01 f4 05 3a 0d  |... 4.........:.|
000005c0  01 fe 22 dd f2 61 62 6f  76 65 28 74 65 78 74 24  |.."..above(text$|
000005d0  2c 78 2c 79 2c 66 67 63  6f 6c 2c 73 68 63 6f 6c  |,x,y,fgcol,shcol|
000005e0  29 0d 02 08 07 ef 20 35  0d 02 12 0d e6 20 30 2c  |)..... 5..... 0,|
000005f0  73 68 63 6f 6c 0d 02 1c  0b ec 20 78 2c 79 2b 34  |shcol..... x,y+4|
00000600  0d 02 26 0a f1 74 65 78  74 24 0d 02 30 0d e6 20  |..&..text$..0.. |
00000610  30 2c 66 67 63 6f 6c 0d  02 3a 09 ec 20 78 2c 79  |0,fgcol..:.. x,y|
00000620  0d 02 44 0a f1 74 65 78  74 24 0d 02 4e 07 ef 20  |..D..text$..N.. |
00000630  34 0d 02 58 05 e1 0d 02  62 05 3a 0d 02 6c 25 dd  |4..X....b.:..l%.|
00000640  f2 74 6f 70 72 69 67 68  74 28 74 65 78 74 24 2c  |.topright(text$,|
00000650  78 2c 79 2c 66 67 63 6f  6c 2c 73 68 63 6f 6c 29  |x,y,fgcol,shcol)|
00000660  0d 02 76 07 ef 20 35 0d  02 80 0d e6 20 30 2c 73  |..v.. 5..... 0,s|
00000670  68 63 6f 6c 0d 02 8a 0d  ec 20 78 2b 34 2c 79 2b  |hcol..... x+4,y+|
00000680  34 0d 02 94 0a f1 74 65  78 74 24 0d 02 9e 0d e6  |4.....text$.....|
00000690  20 30 2c 66 67 63 6f 6c  0d 02 a8 09 ec 20 78 2c  | 0,fgcol..... x,|
000006a0  79 0d 02 b2 0a f1 74 65  78 74 24 0d 02 bc 07 ef  |y.....text$.....|
000006b0  20 34 0d 02 c6 05 e1 0d  02 d0 05 3a 0d 02 da 21  | 4.........:...!|
000006c0  dd f2 6c 65 66 74 28 74  65 78 74 24 2c 78 2c 79  |..left(text$,x,y|
000006d0  2c 66 67 63 6f 6c 2c 73  68 63 6f 6c 29 0d 02 e4  |,fgcol,shcol)...|
000006e0  07 ef 20 35 0d 02 ee 0d  e6 20 30 2c 73 68 63 6f  |.. 5..... 0,shco|
000006f0  6c 0d 02 f8 0b ec 20 78  2d 34 2c 79 0d 03 02 0a  |l..... x-4,y....|
00000700  f1 74 65 78 74 24 0d 03  0c 0d e6 20 30 2c 66 67  |.text$..... 0,fg|
00000710  63 6f 6c 0d 03 16 09 ec  20 78 2c 79 0d 03 20 0a  |col..... x,y.. .|
00000720  f1 74 65 78 74 24 0d 03  2a 07 ef 20 34 0d 03 34  |.text$..*.. 4..4|
00000730  05 e1 0d 03 3e 05 3a 0d  03 48 22 dd f2 72 69 67  |....>.:..H"..rig|
00000740  68 74 28 74 65 78 74 24  2c 78 2c 79 2c 66 67 63  |ht(text$,x,y,fgc|
00000750  6f 6c 2c 73 68 63 6f 6c  29 0d 03 52 07 ef 20 35  |ol,shcol)..R.. 5|
00000760  0d 03 5c 0d e6 20 30 2c  73 68 63 6f 6c 0d 03 66  |..\.. 0,shcol..f|
00000770  0b ec 20 78 2b 34 2c 79  0d 03 70 0a f1 74 65 78  |.. x+4,y..p..tex|
00000780  74 24 0d 03 7a 0d e6 20  30 2c 66 67 63 6f 6c 0d  |t$..z.. 0,fgcol.|
00000790  03 84 09 ec 20 78 2c 79  0d 03 8e 0a f1 74 65 78  |.... x,y.....tex|
000007a0  74 24 0d 03 98 07 ef 20  34 0d 03 a2 05 e1 0d 03  |t$..... 4.......|
000007b0  ac 05 3a 0d 03 b6 24 dd  f2 62 6f 74 6c 65 66 74  |..:...$..botleft|
000007c0  28 74 65 78 74 24 2c 78  2c 79 2c 66 67 63 6f 6c  |(text$,x,y,fgcol|
000007d0  2c 73 68 63 6f 6c 29 0d  03 c0 07 ef 20 35 0d 03  |,shcol)..... 5..|
000007e0  ca 0d e6 20 30 2c 73 68  63 6f 6c 0d 03 d4 0d ec  |... 0,shcol.....|
000007f0  20 78 2d 34 2c 79 2d 34  0d 03 de 0a f1 74 65 78  | x-4,y-4.....tex|
00000800  74 24 0d 03 e8 0d e6 20  30 2c 66 67 63 6f 6c 0d  |t$..... 0,fgcol.|
00000810  03 f2 09 ec 20 78 2c 79  0d 03 fc 0a f1 74 65 78  |.... x,y.....tex|
00000820  74 24 0d 04 06 07 ef 20  34 0d 04 10 05 e1 0d 04  |t$..... 4.......|
00000830  1a 05 3a 0d 04 24 22 dd  f2 62 65 6c 6f 77 28 74  |..:..$"..below(t|
00000840  65 78 74 24 2c 78 2c 79  2c 66 67 63 6f 6c 2c 73  |ext$,x,y,fgcol,s|
00000850  68 63 6f 6c 29 0d 04 2e  07 ef 20 35 0d 04 38 0d  |hcol)..... 5..8.|
00000860  e6 20 30 2c 73 68 63 6f  6c 0d 04 42 0b ec 20 78  |. 0,shcol..B.. x|
00000870  2c 79 2d 34 0d 04 4c 0a  f1 74 65 78 74 24 0d 04  |,y-4..L..text$..|
00000880  56 0d e6 20 30 2c 66 67  63 6f 6c 0d 04 60 09 ec  |V.. 0,fgcol..`..|
00000890  20 78 2c 79 0d 04 6a 0a  f1 74 65 78 74 24 0d 04  | x,y..j..text$..|
000008a0  74 07 ef 20 34 0d 04 7e  05 e1 0d 04 88 05 3a 0d  |t.. 4..~......:.|
000008b0  04 92 25 dd f2 62 6f 74  72 69 67 68 74 28 74 65  |..%..botright(te|
000008c0  78 74 24 2c 78 2c 79 2c  66 67 63 6f 6c 2c 73 68  |xt$,x,y,fgcol,sh|
000008d0  63 6f 6c 29 0d 04 9c 07  ef 20 35 0d 04 a6 0d e6  |col)..... 5.....|
000008e0  20 30 2c 73 68 63 6f 6c  0d 04 b0 0d ec 20 78 2b  | 0,shcol..... x+|
000008f0  34 2c 79 2d 34 0d 04 ba  0a f1 74 65 78 74 24 0d  |4,y-4.....text$.|
00000900  04 c4 0d e6 20 30 2c 66  67 63 6f 6c 0d 04 ce 09  |.... 0,fgcol....|
00000910  ec 20 78 2c 79 0d 04 d8  0a f1 74 65 78 74 24 0d  |. x,y.....text$.|
00000920  04 e2 07 ef 20 34 0d 04  ec 05 e1 0d ff           |.... 4.......|
0000092d