Home » Archimedes archive » Archimedes World » AW-1995-05-Disc1.adf » AWMay95_1 » InTheMag/DrawBasic/!DrawBasic/Library/Examples/Chapter/Ex_7_10

InTheMag/DrawBasic/!DrawBasic/Library/Examples/Chapter/Ex_7_10

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-1995-05-Disc1.adf » AWMay95_1
Filename: InTheMag/DrawBasic/!DrawBasic/Library/Examples/Chapter/Ex_7_10
Read OK: ✔
File size: 0062 bytes
Load address: 0000
Exec address: 0000
Duplicates

There are 3 duplicate copies of this file in the archive:

File contents
 f=�Print("This is a message",1,1)
 n%=10
 FOR i%=1 TO n%
   f=�Translate(f,.5,.5)
   NEXT
�Quit

00000000  0a 20 66 3d bb 50 72 69  6e 74 28 22 54 68 69 73  |. f=.Print("This|
00000010  20 69 73 20 61 20 6d 65  73 73 61 67 65 22 2c 31  | is a message",1|
00000020  2c 31 29 0a 20 6e 25 3d  31 30 0a 20 46 4f 52 20  |,1). n%=10. FOR |
00000030  69 25 3d 31 20 54 4f 20  6e 25 0a 20 20 20 66 3d  |i%=1 TO n%.   f=|
00000040  bb 54 72 61 6e 73 6c 61  74 65 28 66 2c 2e 35 2c  |.Translate(f,.5,|
00000050  2e 35 29 0a 20 20 20 4e  45 58 54 0a a0 51 75 69  |.5).   NEXT..Qui|
00000060  74 0a                                             |t.|
00000062

© Dominic Ford 2021–2025.

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