Home » Archimedes archive » Acorn User » AU 1997-06 B.adf » Extras » RiscUtils/!RuInstall/Install/User_Area/Demo's/!SpeedTest/PrintNumb

RiscUtils/!RuInstall/Install/User_Area/Demo's/!SpeedTest/PrintNumb

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 1997-06 B.adf » Extras
Filename: RiscUtils/!RuInstall/Install/User_Area/Demo's/!SpeedTest/PrintNumb
Read OK:
File size: 00C2 bytes
Load address: 0000
Exec address: 0000
File contents
   10F=TIME
   20
   30OSCLI "ECHO �Check_KeyboardNumber ��������"+STR$(F)+"�������������������� "+STR$(F/40)
   40
   50A=200:Y=25
   60RECTANGLE 0,340+Y,1025+A,280
   70LINE 645+A,340+Y,645+A,620+Y
   80LINE 265+A,340+Y,265+A,620+Y

F=�

P� "ECHO �Check_KeyboardNumber ��������"+�(F)+"�������������������� "+�(F/40)
(
2A=200:Y=25
<ȓ 0,340+Y,1025+A,280
F� 645+A,340+Y,645+A,620+Y
P� 265+A,340+Y,265+A,620+Y
�
00000000  0d 00 0a 07 46 3d 91 0d  00 14 04 0d 00 1e 50 ff  |....F=........P.|
00000010  20 22 45 43 48 4f 20 a0  43 68 65 63 6b 5f 4b 65  | "ECHO .Check_Ke|
00000020  79 62 6f 61 72 64 4e 75  6d 62 65 72 20 a0 a0 a0  |yboardNumber ...|
00000030  a0 a0 a0 a0 a0 22 2b c3  28 46 29 2b 22 a0 a0 a0  |....."+.(F)+"...|
00000040  a0 a0 a0 a0 a0 a0 a0 a0  a0 a0 a0 a0 a0 a0 a0 a0  |................|
00000050  a0 20 22 2b c3 28 46 2f  34 30 29 0d 00 28 04 0d  |. "+.(F/40)..(..|
00000060  00 32 0e 41 3d 32 30 30  3a 59 3d 32 35 0d 00 3c  |.2.A=200:Y=25..<|
00000070  19 c8 93 20 30 2c 33 34  30 2b 59 2c 31 30 32 35  |... 0,340+Y,1025|
00000080  2b 41 2c 32 38 30 0d 00  46 1d 86 20 36 34 35 2b  |+A,280..F.. 645+|
00000090  41 2c 33 34 30 2b 59 2c  36 34 35 2b 41 2c 36 32  |A,340+Y,645+A,62|
000000a0  30 2b 59 0d 00 50 1d 86  20 32 36 35 2b 41 2c 33  |0+Y..P.. 265+A,3|
000000b0  34 30 2b 59 2c 32 36 35  2b 41 2c 36 32 30 2b 59  |40+Y,265+A,620+Y|
000000c0  0d ff                                             |..|
000000c2