Home » Archimedes archive » Acorn User » AU 1995-03.adf » !StarInfo_StarInfo » RiscPC/Tent256

RiscPC/Tent256

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 1995-03.adf » !StarInfo_StarInfo
Filename: RiscPC/Tent256
Read OK:
File size: 087B bytes
Load address: 0000
Exec address: 0000
File contents
   10REM >Tent256
   20REM Original by Jan Vibe
   30REM Adapted for Risc PC by DA
   40REM (c) AU March 1994
   50:
   51ON ERROR ERROR EXT ERR,REPORT$+" at line "+STR$ERL:END
   60PROCselect_mode
   70OFF
   80DIM spr &40000,sz% &10
   90DIM a%(200),dx%(200),dy%(200),tx%(200),ty%(200)
  100DIM p%(255)
  110FOR i%=0 TO 255
  120 SYS "ColourTrans_ColourNumberToGCOL",i% TO p%(i%)
  130 COLOUR i%,150+105*(i%/255),i%,i%
  140NEXT
  150COLOUR 0,0,0,240
  160VDU 19,0,24,0,0,240
  180spr!0=&40000
  190spr!4=0
  200spr!8=16
  210spr!12=16
  220sz%!00=256
  230sz%!04=256
  240sz%!08=256
  250sz%!12=256
  260br%=100
  270bd=2*br%
  280xc%=br%
  290yc%=br%
  300r%=br%
  310xp%=.4*r%
  320yp%=.7*r%
  330r2%=r%^2
  340d=(r%*2.4)/400
  350FOR y%=-r% TO r% STEP 2
  360 b%=SQR(r2%-y%^2)
  370 FOR x%=-b% TO b% STEP 2
  380  c%=255-(SQR((x%-xp%)^2+(y%-yp%)^2)-RND(2*d)+d)/d
  390  IF c%>255 c%=255
  400  IF c%<1 c%=1
  410  GCOL p%(c%)>>2 TINT (p%(c%) AND 3)<<6
  420  POINT x%+xc%,y%+yc%
  430 NEXT
  440NEXT
  450SYS "OS_SpriteOp",256+16,spr,"ball",0,0,0,bd,bd
  460SYS "OS_SpriteOp",256+29,spr,"ball"
  470SYS "OS_SpriteOp",256+61,spr,"ball",0
  480GCOL 0 TINT 0
  490RECTANGLE FILL 0,0,bd
  500GCOL 63 TINT 192
  501CIRCLE FILL bd/2,bd/2,bd/2-4
  550SYS "OS_SpriteOp",256+61,spr,0,0
  551COLOUR 128 TINT 0
  560CLS
  570OFF
  580:
  590q%=0
  600REPEAT
  610 c%=0
  620 REPEAT
  630  x%=RND(1600)
  640  y%=RND(1200)
  641  c%+=1
  650 UNTIL POINT(x%,y%)=0 AND TINT(x%,y%)=0 OR c%>=15000
  660 IF c%<15000 THEN
  670  q%+=1
  680  a%(q%)=RND(360)
  690  tx%(q%)=x%
  700  ty%(q%)=y%
  710  SYS "OS_SpriteOp",256+52,spr,"ball",tx%(q%)-br%,ty%(q%)-br%,8,sz%,0
  720 ENDIF
  730UNTIL c%>=15000
  740:
  750z%=256
  760REPEAT
  770 z%+=12
  780 dm%=bd*256/z%
  790 b%=-br%*256/z%
  800 sz%!08=z%
  810 sz%!12=z%
  820 FOR n%=1 TO q%
  830  a%(n%)+=(RND(3)-2)*30
  840  t=RADa%(n%)
  850  dx%(n%)+=4*SIN(t)
  860  dy%(n%)+=4*COS(t)
  870  x%=tx%(n%)+b%+dx%(n%)
  880  y%=ty%(n%)+b%+dy%(n%)
  890  SYS "OS_SpriteOp",256+52,spr,"ball",x%,y%,8,sz%,0
  900 NEXT
  910UNTIL dm%<=32
  920IF GET
  921SYS "Wimp_CommandWindow",-1
  930END
  940
  950DEF PROCselect_mode
  960DIM mode% 32
  970!mode%=1
  980mode%!4=480
  990mode%!8=352
 1000mode%!12=3
 1010mode%!16=-1
 1020mode%!20=3
 1030mode%!24=255
 1040mode%!28=-1
 1050MODE mode%
 1060OFF
 1070SYS "OS_ReadModeVariable",-1,11 TO ,,XWindLimit
 1080SYS "OS_ReadModeVariable",-1,12 TO ,,YWindLimit
 1090SYS "OS_ReadModeVariable",-1,4  TO ,,XEigFactor
 1100SYS "OS_ReadModeVariable",-1,5  TO ,,YEigFactor
 1110width=(XWindLimit+1)<<XEigFactor
 1120height=(YWindLimit+1)<<YEigFactor
 1130ENDPROC

� >Tent256
� Original by Jan Vibe
� Adapted for Risc PC by DA
(� (c) AU March 1994
2:
3!� � � � �,�$+" at line "+Þ:�
<�select_mode
F�
P� spr &40000,sz% &10
Z1� a%(200),dx%(200),dy%(200),tx%(200),ty%(200)
d
� p%(255)
n� i%=0 � 255
x4 ș "ColourTrans_ColourNumberToGCOL",i% � p%(i%)
�  � i%,150+105*(i%/255),i%,i%
��
�� 0,0,0,240
�� 19,0,24,0,0,240
�spr!0=&40000
�spr!4=0
�spr!8=16
�
spr!12=16
�sz%!00=256
�sz%!04=256
�sz%!08=256
�sz%!12=256
br%=100
bd=2*br%
xc%=br%
"yc%=br%
,
r%=br%
6
xp%=.4*r%
@
yp%=.7*r%
Jr2%=r%^2
Td=(r%*2.4)/400
^� y%=-r% � r% � 2
h b%=�(r2%-y%^2)
r � x%=-b% � b% � 2
|2  c%=255-(�((x%-xp%)^2+(y%-yp%)^2)-�(2*d)+d)/d
�  � c%>255 c%=255
�  � c%<1 c%=1
�$  � p%(c%)>>2 Ȝ (p%(c%) � 3)<<6
�  Ȓ x%+xc%,y%+yc%
� �
��
�2ș "OS_SpriteOp",256+16,spr,"ball",0,0,0,bd,bd
�&ș "OS_SpriteOp",256+29,spr,"ball"
�(ș "OS_SpriteOp",256+61,spr,"ball",0
�� 0 Ȝ 0
�ȓ Ȑ 0,0,bd
�� 63 Ȝ 192
�ȏ Ȑ bd/2,bd/2,bd/2-4
&#ș "OS_SpriteOp",256+61,spr,0,0
'� 128 Ȝ 0
0�
:�
D:
Nq%=0
X�
b	 c%=0
l �
v  x%=�(1600)
�  y%=�(1200)
�  c%+=1
�* � �x%,y%)=0 � Ȝ(x%,y%)=0 � c%>=15000
� � c%<15000 �
�  q%+=1
�  a%(q%)=�(360)
�  tx%(q%)=x%
�  ty%(q%)=y%
�H  ș "OS_SpriteOp",256+52,spr,"ball",tx%(q%)-br%,ty%(q%)-br%,8,sz%,0
� �
�� c%>=15000
�:
�
z%=256
��
 z%+=12
 dm%=bd*256/z%
 b%=-br%*256/z%
  sz%!08=z%
* sz%!12=z%
4 � n%=1 � q%
>  a%(n%)+=(�(3)-2)*30
H  t=�a%(n%)
R  dx%(n%)+=4*�(t)
\  dy%(n%)+=4*�(t)
f  x%=tx%(n%)+b%+dx%(n%)
p  y%=ty%(n%)+b%+dy%(n%)
z6  ș "OS_SpriteOp",256+52,spr,"ball",x%,y%,8,sz%,0
� �
�
� dm%<=32
�� �
�ș "Wimp_CommandWindow",-1
��
�
�� �select_mode
�� mode% 32
�!mode%=1
�mode%!4=480
�mode%!8=352
�mode%!12=3
�mode%!16=-1
�mode%!20=3
mode%!24=255
mode%!28=-1
� mode%
$�
.1ș "OS_ReadModeVariable",-1,11 � ,,XWindLimit
81ș "OS_ReadModeVariable",-1,12 � ,,YWindLimit
B1ș "OS_ReadModeVariable",-1,4  � ,,XEigFactor
L1ș "OS_ReadModeVariable",-1,5  � ,,YEigFactor
V$width=(XWindLimit+1)<<XEigFactor
`%height=(YWindLimit+1)<<YEigFactor
j�
�
00000000  0d 00 0a 0e f4 20 3e 54  65 6e 74 32 35 36 0d 00  |..... >Tent256..|
00000010  14 1a f4 20 4f 72 69 67  69 6e 61 6c 20 62 79 20  |... Original by |
00000020  4a 61 6e 20 56 69 62 65  0d 00 1e 1f f4 20 41 64  |Jan Vibe..... Ad|
00000030  61 70 74 65 64 20 66 6f  72 20 52 69 73 63 20 50  |apted for Risc P|
00000040  43 20 62 79 20 44 41 0d  00 28 17 f4 20 28 63 29  |C by DA..(.. (c)|
00000050  20 41 55 20 4d 61 72 63  68 20 31 39 39 34 0d 00  | AU March 1994..|
00000060  32 05 3a 0d 00 33 21 ee  20 85 20 85 20 a2 20 9f  |2.:..3!. . . . .|
00000070  2c f6 24 2b 22 20 61 74  20 6c 69 6e 65 20 22 2b  |,.$+" at line "+|
00000080  c3 9e 3a e0 0d 00 3c 10  f2 73 65 6c 65 63 74 5f  |..:...<..select_|
00000090  6d 6f 64 65 0d 00 46 05  87 0d 00 50 18 de 20 73  |mode..F....P.. s|
000000a0  70 72 20 26 34 30 30 30  30 2c 73 7a 25 20 26 31  |pr &40000,sz% &1|
000000b0  30 0d 00 5a 31 de 20 61  25 28 32 30 30 29 2c 64  |0..Z1. a%(200),d|
000000c0  78 25 28 32 30 30 29 2c  64 79 25 28 32 30 30 29  |x%(200),dy%(200)|
000000d0  2c 74 78 25 28 32 30 30  29 2c 74 79 25 28 32 30  |,tx%(200),ty%(20|
000000e0  30 29 0d 00 64 0d de 20  70 25 28 32 35 35 29 0d  |0)..d.. p%(255).|
000000f0  00 6e 10 e3 20 69 25 3d  30 20 b8 20 32 35 35 0d  |.n.. i%=0 . 255.|
00000100  00 78 34 20 c8 99 20 22  43 6f 6c 6f 75 72 54 72  |.x4 .. "ColourTr|
00000110  61 6e 73 5f 43 6f 6c 6f  75 72 4e 75 6d 62 65 72  |ans_ColourNumber|
00000120  54 6f 47 43 4f 4c 22 2c  69 25 20 b8 20 70 25 28  |ToGCOL",i% . p%(|
00000130  69 25 29 0d 00 82 20 20  fb 20 69 25 2c 31 35 30  |i%)...  . i%,150|
00000140  2b 31 30 35 2a 28 69 25  2f 32 35 35 29 2c 69 25  |+105*(i%/255),i%|
00000150  2c 69 25 0d 00 8c 05 ed  0d 00 96 0f fb 20 30 2c  |,i%.......... 0,|
00000160  30 2c 30 2c 32 34 30 0d  00 a0 15 ef 20 31 39 2c  |0,0,240..... 19,|
00000170  30 2c 32 34 2c 30 2c 30  2c 32 34 30 0d 00 b4 10  |0,24,0,0,240....|
00000180  73 70 72 21 30 3d 26 34  30 30 30 30 0d 00 be 0b  |spr!0=&40000....|
00000190  73 70 72 21 34 3d 30 0d  00 c8 0c 73 70 72 21 38  |spr!4=0....spr!8|
000001a0  3d 31 36 0d 00 d2 0d 73  70 72 21 31 32 3d 31 36  |=16....spr!12=16|
000001b0  0d 00 dc 0e 73 7a 25 21  30 30 3d 32 35 36 0d 00  |....sz%!00=256..|
000001c0  e6 0e 73 7a 25 21 30 34  3d 32 35 36 0d 00 f0 0e  |..sz%!04=256....|
000001d0  73 7a 25 21 30 38 3d 32  35 36 0d 00 fa 0e 73 7a  |sz%!08=256....sz|
000001e0  25 21 31 32 3d 32 35 36  0d 01 04 0b 62 72 25 3d  |%!12=256....br%=|
000001f0  31 30 30 0d 01 0e 0c 62  64 3d 32 2a 62 72 25 0d  |100....bd=2*br%.|
00000200  01 18 0b 78 63 25 3d 62  72 25 0d 01 22 0b 79 63  |...xc%=br%..".yc|
00000210  25 3d 62 72 25 0d 01 2c  0a 72 25 3d 62 72 25 0d  |%=br%..,.r%=br%.|
00000220  01 36 0d 78 70 25 3d 2e  34 2a 72 25 0d 01 40 0d  |.6.xp%=.4*r%..@.|
00000230  79 70 25 3d 2e 37 2a 72  25 0d 01 4a 0c 72 32 25  |yp%=.7*r%..J.r2%|
00000240  3d 72 25 5e 32 0d 01 54  12 64 3d 28 72 25 2a 32  |=r%^2..T.d=(r%*2|
00000250  2e 34 29 2f 34 30 30 0d  01 5e 15 e3 20 79 25 3d  |.4)/400..^.. y%=|
00000260  2d 72 25 20 b8 20 72 25  20 88 20 32 0d 01 68 13  |-r% . r% . 2..h.|
00000270  20 62 25 3d b6 28 72 32  25 2d 79 25 5e 32 29 0d  | b%=.(r2%-y%^2).|
00000280  01 72 16 20 e3 20 78 25  3d 2d 62 25 20 b8 20 62  |.r. . x%=-b% . b|
00000290  25 20 88 20 32 0d 01 7c  32 20 20 63 25 3d 32 35  |% . 2..|2  c%=25|
000002a0  35 2d 28 b6 28 28 78 25  2d 78 70 25 29 5e 32 2b  |5-(.((x%-xp%)^2+|
000002b0  28 79 25 2d 79 70 25 29  5e 32 29 2d b3 28 32 2a  |(y%-yp%)^2)-.(2*|
000002c0  64 29 2b 64 29 2f 64 0d  01 86 15 20 20 e7 20 63  |d)+d)/d....  . c|
000002d0  25 3e 32 35 35 20 63 25  3d 32 35 35 0d 01 90 11  |%>255 c%=255....|
000002e0  20 20 e7 20 63 25 3c 31  20 63 25 3d 31 0d 01 9a  |  . c%<1 c%=1...|
000002f0  24 20 20 e6 20 70 25 28  63 25 29 3e 3e 32 20 c8  |$  . p%(c%)>>2 .|
00000300  9c 20 28 70 25 28 63 25  29 20 80 20 33 29 3c 3c  |. (p%(c%) . 3)<<|
00000310  36 0d 01 a4 16 20 20 c8  92 20 78 25 2b 78 63 25  |6....  .. x%+xc%|
00000320  2c 79 25 2b 79 63 25 0d  01 ae 06 20 ed 0d 01 b8  |,y%+yc%.... ....|
00000330  05 ed 0d 01 c2 32 c8 99  20 22 4f 53 5f 53 70 72  |.....2.. "OS_Spr|
00000340  69 74 65 4f 70 22 2c 32  35 36 2b 31 36 2c 73 70  |iteOp",256+16,sp|
00000350  72 2c 22 62 61 6c 6c 22  2c 30 2c 30 2c 30 2c 62  |r,"ball",0,0,0,b|
00000360  64 2c 62 64 0d 01 cc 26  c8 99 20 22 4f 53 5f 53  |d,bd...&.. "OS_S|
00000370  70 72 69 74 65 4f 70 22  2c 32 35 36 2b 32 39 2c  |priteOp",256+29,|
00000380  73 70 72 2c 22 62 61 6c  6c 22 0d 01 d6 28 c8 99  |spr,"ball"...(..|
00000390  20 22 4f 53 5f 53 70 72  69 74 65 4f 70 22 2c 32  | "OS_SpriteOp",2|
000003a0  35 36 2b 36 31 2c 73 70  72 2c 22 62 61 6c 6c 22  |56+61,spr,"ball"|
000003b0  2c 30 0d 01 e0 0c e6 20  30 20 c8 9c 20 30 0d 01  |,0..... 0 .. 0..|
000003c0  ea 10 c8 93 20 c8 90 20  30 2c 30 2c 62 64 0d 01  |.... .. 0,0,bd..|
000003d0  f4 0f e6 20 36 33 20 c8  9c 20 31 39 32 0d 01 f5  |... 63 .. 192...|
000003e0  1a c8 8f 20 c8 90 20 62  64 2f 32 2c 62 64 2f 32  |... .. bd/2,bd/2|
000003f0  2c 62 64 2f 32 2d 34 0d  02 26 23 c8 99 20 22 4f  |,bd/2-4..&#.. "O|
00000400  53 5f 53 70 72 69 74 65  4f 70 22 2c 32 35 36 2b  |S_SpriteOp",256+|
00000410  36 31 2c 73 70 72 2c 30  2c 30 0d 02 27 0e fb 20  |61,spr,0,0..'.. |
00000420  31 32 38 20 c8 9c 20 30  0d 02 30 05 db 0d 02 3a  |128 .. 0..0....:|
00000430  05 87 0d 02 44 05 3a 0d  02 4e 08 71 25 3d 30 0d  |....D.:..N.q%=0.|
00000440  02 58 05 f5 0d 02 62 09  20 63 25 3d 30 0d 02 6c  |.X....b. c%=0..l|
00000450  06 20 f5 0d 02 76 10 20  20 78 25 3d b3 28 31 36  |. ...v.  x%=.(16|
00000460  30 30 29 0d 02 80 10 20  20 79 25 3d b3 28 31 32  |00)....  y%=.(12|
00000470  30 30 29 0d 02 81 0b 20  20 63 25 2b 3d 31 0d 02  |00)....  c%+=1..|
00000480  8a 2a 20 fd 20 b0 78 25  2c 79 25 29 3d 30 20 80  |.* . .x%,y%)=0 .|
00000490  20 c8 9c 28 78 25 2c 79  25 29 3d 30 20 84 20 63  | ..(x%,y%)=0 . c|
000004a0  25 3e 3d 31 35 30 30 30  0d 02 94 11 20 e7 20 63  |%>=15000.... . c|
000004b0  25 3c 31 35 30 30 30 20  8c 0d 02 9e 0b 20 20 71  |%<15000 .....  q|
000004c0  25 2b 3d 31 0d 02 a8 13  20 20 61 25 28 71 25 29  |%+=1....  a%(q%)|
000004d0  3d b3 28 33 36 30 29 0d  02 b2 10 20 20 74 78 25  |=.(360)....  tx%|
000004e0  28 71 25 29 3d 78 25 0d  02 bc 10 20 20 74 79 25  |(q%)=x%....  ty%|
000004f0  28 71 25 29 3d 79 25 0d  02 c6 48 20 20 c8 99 20  |(q%)=y%...H  .. |
00000500  22 4f 53 5f 53 70 72 69  74 65 4f 70 22 2c 32 35  |"OS_SpriteOp",25|
00000510  36 2b 35 32 2c 73 70 72  2c 22 62 61 6c 6c 22 2c  |6+52,spr,"ball",|
00000520  74 78 25 28 71 25 29 2d  62 72 25 2c 74 79 25 28  |tx%(q%)-br%,ty%(|
00000530  71 25 29 2d 62 72 25 2c  38 2c 73 7a 25 2c 30 0d  |q%)-br%,8,sz%,0.|
00000540  02 d0 06 20 cd 0d 02 da  0f fd 20 63 25 3e 3d 31  |... ...... c%>=1|
00000550  35 30 30 30 0d 02 e4 05  3a 0d 02 ee 0a 7a 25 3d  |5000....:....z%=|
00000560  32 35 36 0d 02 f8 05 f5  0d 03 02 0b 20 7a 25 2b  |256......... z%+|
00000570  3d 31 32 0d 03 0c 12 20  64 6d 25 3d 62 64 2a 32  |=12.... dm%=bd*2|
00000580  35 36 2f 7a 25 0d 03 16  13 20 62 25 3d 2d 62 72  |56/z%.... b%=-br|
00000590  25 2a 32 35 36 2f 7a 25  0d 03 20 0e 20 73 7a 25  |%*256/z%.. . sz%|
000005a0  21 30 38 3d 7a 25 0d 03  2a 0e 20 73 7a 25 21 31  |!08=z%..*. sz%!1|
000005b0  32 3d 7a 25 0d 03 34 10  20 e3 20 6e 25 3d 31 20  |2=z%..4. . n%=1 |
000005c0  b8 20 71 25 0d 03 3e 19  20 20 61 25 28 6e 25 29  |. q%..>.  a%(n%)|
000005d0  2b 3d 28 b3 28 33 29 2d  32 29 2a 33 30 0d 03 48  |+=(.(3)-2)*30..H|
000005e0  0f 20 20 74 3d b2 61 25  28 6e 25 29 0d 03 52 15  |.  t=.a%(n%)..R.|
000005f0  20 20 64 78 25 28 6e 25  29 2b 3d 34 2a b5 28 74  |  dx%(n%)+=4*.(t|
00000600  29 0d 03 5c 15 20 20 64  79 25 28 6e 25 29 2b 3d  |)..\.  dy%(n%)+=|
00000610  34 2a 9b 28 74 29 0d 03  66 1b 20 20 78 25 3d 74  |4*.(t)..f.  x%=t|
00000620  78 25 28 6e 25 29 2b 62  25 2b 64 78 25 28 6e 25  |x%(n%)+b%+dx%(n%|
00000630  29 0d 03 70 1b 20 20 79  25 3d 74 79 25 28 6e 25  |)..p.  y%=ty%(n%|
00000640  29 2b 62 25 2b 64 79 25  28 6e 25 29 0d 03 7a 36  |)+b%+dy%(n%)..z6|
00000650  20 20 c8 99 20 22 4f 53  5f 53 70 72 69 74 65 4f  |  .. "OS_SpriteO|
00000660  70 22 2c 32 35 36 2b 35  32 2c 73 70 72 2c 22 62  |p",256+52,spr,"b|
00000670  61 6c 6c 22 2c 78 25 2c  79 25 2c 38 2c 73 7a 25  |all",x%,y%,8,sz%|
00000680  2c 30 0d 03 84 06 20 ed  0d 03 8e 0d fd 20 64 6d  |,0.... ...... dm|
00000690  25 3c 3d 33 32 0d 03 98  07 e7 20 a5 0d 03 99 1e  |%<=32..... .....|
000006a0  c8 99 20 22 57 69 6d 70  5f 43 6f 6d 6d 61 6e 64  |.. "Wimp_Command|
000006b0  57 69 6e 64 6f 77 22 2c  2d 31 0d 03 a2 05 e0 0d  |Window",-1......|
000006c0  03 ac 04 0d 03 b6 12 dd  20 f2 73 65 6c 65 63 74  |........ .select|
000006d0  5f 6d 6f 64 65 0d 03 c0  0e de 20 6d 6f 64 65 25  |_mode..... mode%|
000006e0  20 33 32 0d 03 ca 0c 21  6d 6f 64 65 25 3d 31 0d  | 32....!mode%=1.|
000006f0  03 d4 0f 6d 6f 64 65 25  21 34 3d 34 38 30 0d 03  |...mode%!4=480..|
00000700  de 0f 6d 6f 64 65 25 21  38 3d 33 35 32 0d 03 e8  |..mode%!8=352...|
00000710  0e 6d 6f 64 65 25 21 31  32 3d 33 0d 03 f2 0f 6d  |.mode%!12=3....m|
00000720  6f 64 65 25 21 31 36 3d  2d 31 0d 03 fc 0e 6d 6f  |ode%!16=-1....mo|
00000730  64 65 25 21 32 30 3d 33  0d 04 06 10 6d 6f 64 65  |de%!20=3....mode|
00000740  25 21 32 34 3d 32 35 35  0d 04 10 0f 6d 6f 64 65  |%!24=255....mode|
00000750  25 21 32 38 3d 2d 31 0d  04 1a 0b eb 20 6d 6f 64  |%!28=-1..... mod|
00000760  65 25 0d 04 24 05 87 0d  04 2e 31 c8 99 20 22 4f  |e%..$.....1.. "O|
00000770  53 5f 52 65 61 64 4d 6f  64 65 56 61 72 69 61 62  |S_ReadModeVariab|
00000780  6c 65 22 2c 2d 31 2c 31  31 20 b8 20 2c 2c 58 57  |le",-1,11 . ,,XW|
00000790  69 6e 64 4c 69 6d 69 74  0d 04 38 31 c8 99 20 22  |indLimit..81.. "|
000007a0  4f 53 5f 52 65 61 64 4d  6f 64 65 56 61 72 69 61  |OS_ReadModeVaria|
000007b0  62 6c 65 22 2c 2d 31 2c  31 32 20 b8 20 2c 2c 59  |ble",-1,12 . ,,Y|
000007c0  57 69 6e 64 4c 69 6d 69  74 0d 04 42 31 c8 99 20  |WindLimit..B1.. |
000007d0  22 4f 53 5f 52 65 61 64  4d 6f 64 65 56 61 72 69  |"OS_ReadModeVari|
000007e0  61 62 6c 65 22 2c 2d 31  2c 34 20 20 b8 20 2c 2c  |able",-1,4  . ,,|
000007f0  58 45 69 67 46 61 63 74  6f 72 0d 04 4c 31 c8 99  |XEigFactor..L1..|
00000800  20 22 4f 53 5f 52 65 61  64 4d 6f 64 65 56 61 72  | "OS_ReadModeVar|
00000810  69 61 62 6c 65 22 2c 2d  31 2c 35 20 20 b8 20 2c  |iable",-1,5  . ,|
00000820  2c 59 45 69 67 46 61 63  74 6f 72 0d 04 56 24 77  |,YEigFactor..V$w|
00000830  69 64 74 68 3d 28 58 57  69 6e 64 4c 69 6d 69 74  |idth=(XWindLimit|
00000840  2b 31 29 3c 3c 58 45 69  67 46 61 63 74 6f 72 0d  |+1)<<XEigFactor.|
00000850  04 60 25 68 65 69 67 68  74 3d 28 59 57 69 6e 64  |.`%height=(YWind|
00000860  4c 69 6d 69 74 2b 31 29  3c 3c 59 45 69 67 46 61  |Limit+1)<<YEigFa|
00000870  63 74 6f 72 0d 04 6a 05  e1 0d ff                 |ctor..j....|
0000087b