Home » Archimedes archive » Acorn User » AU 1998-08.adf » Freeware » Shareware/IconizeBar/!IconizBar/SetCountry

Shareware/IconizeBar/!IconizBar/SetCountry

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-08.adf » Freeware
Filename: Shareware/IconizeBar/!IconizBar/SetCountry
Read OK:
File size: 00C7 bytes
Load address: 0000
Exec address: 0000
File contents
   10REM >SetCountry v0.01 -- Copyright LEN Tabsoft 1996 (Kees Grinwis ??-11-1995)
   20DIMb%100:SYS6,70,127TO,c%
   30SYS"OS_ServiceCall",,&43,2,c%,b%,255TO,,,,,l%:b%?l%=&D:c$=LEFT$($b%,10)
   40OSCLI"Set Wimp$Country "+c$

M� >SetCountry v0.01 -- Copyright � Tabsoft 1996 (Kees Grinwis ??-11-1995)
�b%100:ș6,70,127�,c%
Dș"OS_ServiceCall",,&43,2,c%,b%,255�,,,,,l%:b%?l%=&D:c$=�$b%,10)
(�"Set Wimp$Country "+c$
�
00000000  0d 00 0a 4d f4 20 3e 53  65 74 43 6f 75 6e 74 72  |...M. >SetCountr|
00000010  79 20 76 30 2e 30 31 20  2d 2d 20 43 6f 70 79 72  |y v0.01 -- Copyr|
00000020  69 67 68 74 20 a9 20 54  61 62 73 6f 66 74 20 31  |ight . Tabsoft 1|
00000030  39 39 36 20 28 4b 65 65  73 20 47 72 69 6e 77 69  |996 (Kees Grinwi|
00000040  73 20 3f 3f 2d 31 31 2d  31 39 39 35 29 0d 00 14  |s ??-11-1995)...|
00000050  19 de 62 25 31 30 30 3a  c8 99 36 2c 37 30 2c 31  |..b%100:..6,70,1|
00000060  32 37 b8 2c 63 25 0d 00  1e 44 c8 99 22 4f 53 5f  |27.,c%...D.."OS_|
00000070  53 65 72 76 69 63 65 43  61 6c 6c 22 2c 2c 26 34  |ServiceCall",,&4|
00000080  33 2c 32 2c 63 25 2c 62  25 2c 32 35 35 b8 2c 2c  |3,2,c%,b%,255.,,|
00000090  2c 2c 2c 6c 25 3a 62 25  3f 6c 25 3d 26 44 3a 63  |,,,l%:b%?l%=&D:c|
000000a0  24 3d c0 24 62 25 2c 31  30 29 0d 00 28 1b ff 22  |$=.$b%,10)..(.."|
000000b0  53 65 74 20 57 69 6d 70  24 43 6f 75 6e 74 72 79  |Set Wimp$Country|
000000c0  20 22 2b 63 24 0d ff                              | "+c$..|
000000c7