Home » Archimedes archive » Micro User » MU 1991-04.adf » PD-Stuff » !LoadBasic/!Help
!LoadBasic/!Help
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 » Micro User » MU 1991-04.adf » PD-Stuff |
| Filename: | !LoadBasic/!Help |
| Read OK: | ✔ |
| File size: | 0454 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
Basic Edit utility ================== Transfer the BasicEdit module from Apps disc 2 to the !LoadBasic directory (open this up using Shift+Double Click). Double-click on filer window icon to load on to icon bar. Once loaded just drag a Basic program on to the icon to load the file into Basic, you can now RUN or EDIT. To enter Basic without a file, just click with Select on the icon. System Variable --------------- Rather than have to set the current directory to the place where the Basic program came from, or include the entire directory path name in the first line of the Basic program, this utility creates a system variable called �BasicSave$Dir' this is always set to the directory the current Basic program came from. The save line in your program need only be: 10 REM > <BasicSave$Dir>.ProgName Any data files can be accessed using this directory name as well DURING DEVELOPMENT ONLY. The advantage of this is that you can move files around without worrying about path names or setting the current directory (which is bad practice anyway and just a hangover from the earlier ADFS).
00000000 0a 20 42 61 73 69 63 20 45 64 69 74 20 75 74 69 |. Basic Edit uti| 00000010 6c 69 74 79 0a 20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d |lity. ==========| 00000020 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 54 72 61 6e 73 66 |========..Transf| 00000030 65 72 20 74 68 65 20 42 61 73 69 63 45 64 69 74 |er the BasicEdit| 00000040 20 6d 6f 64 75 6c 65 20 66 72 6f 6d 20 41 70 70 | module from App| 00000050 73 20 64 69 73 63 20 32 20 74 6f 20 74 68 65 20 |s disc 2 to the | 00000060 21 4c 6f 61 64 42 61 73 69 63 0a 64 69 72 65 63 |!LoadBasic.direc| 00000070 74 6f 72 79 20 28 6f 70 65 6e 20 74 68 69 73 20 |tory (open this | 00000080 75 70 20 75 73 69 6e 67 20 53 68 69 66 74 2b 44 |up using Shift+D| 00000090 6f 75 62 6c 65 20 43 6c 69 63 6b 29 2e 0a 0a 44 |ouble Click)...D| 000000a0 6f 75 62 6c 65 2d 63 6c 69 63 6b 20 6f 6e 20 66 |ouble-click on f| 000000b0 69 6c 65 72 20 77 69 6e 64 6f 77 20 69 63 6f 6e |iler window icon| 000000c0 20 74 6f 20 6c 6f 61 64 20 6f 6e 20 74 6f 20 69 | to load on to i| 000000d0 63 6f 6e 20 62 61 72 2e 0a 0a 4f 6e 63 65 20 6c |con bar...Once l| 000000e0 6f 61 64 65 64 20 6a 75 73 74 20 64 72 61 67 20 |oaded just drag | 000000f0 61 20 42 61 73 69 63 20 70 72 6f 67 72 61 6d 20 |a Basic program | 00000100 6f 6e 20 74 6f 20 74 68 65 20 69 63 6f 6e 20 74 |on to the icon t| 00000110 6f 20 6c 6f 61 64 20 74 68 65 20 66 69 6c 65 0a |o load the file.| 00000120 69 6e 74 6f 20 42 61 73 69 63 2c 20 79 6f 75 20 |into Basic, you | 00000130 63 61 6e 20 6e 6f 77 20 52 55 4e 20 6f 72 20 45 |can now RUN or E| 00000140 44 49 54 2e 0a 0a 54 6f 20 65 6e 74 65 72 20 42 |DIT...To enter B| 00000150 61 73 69 63 20 77 69 74 68 6f 75 74 20 61 20 66 |asic without a f| 00000160 69 6c 65 2c 20 6a 75 73 74 20 63 6c 69 63 6b 20 |ile, just click | 00000170 77 69 74 68 20 53 65 6c 65 63 74 20 6f 6e 20 74 |with Select on t| 00000180 68 65 20 69 63 6f 6e 2e 0a 0a 53 79 73 74 65 6d |he icon...System| 00000190 20 56 61 72 69 61 62 6c 65 0a 2d 2d 2d 2d 2d 2d | Variable.------| 000001a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 0a 52 61 74 68 65 |---------..Rathe| 000001b0 72 20 74 68 61 6e 20 68 61 76 65 20 74 6f 20 73 |r than have to s| 000001c0 65 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 |et the current d| 000001d0 69 72 65 63 74 6f 72 79 20 74 6f 20 74 68 65 20 |irectory to the | 000001e0 70 6c 61 63 65 20 77 68 65 72 65 20 74 68 65 0a |place where the.| 000001f0 42 61 73 69 63 20 70 72 6f 67 72 61 6d 20 63 61 |Basic program ca| 00000200 6d 65 20 66 72 6f 6d 2c 20 6f 72 20 69 6e 63 6c |me from, or incl| 00000210 75 64 65 20 74 68 65 20 65 6e 74 69 72 65 20 64 |ude the entire d| 00000220 69 72 65 63 74 6f 72 79 20 70 61 74 68 20 6e 61 |irectory path na| 00000230 6d 65 20 69 6e 0a 74 68 65 20 66 69 72 73 74 20 |me in.the first | 00000240 6c 69 6e 65 20 6f 66 20 74 68 65 20 42 61 73 69 |line of the Basi| 00000250 63 20 70 72 6f 67 72 61 6d 2c 20 74 68 69 73 20 |c program, this | 00000260 75 74 69 6c 69 74 79 20 63 72 65 61 74 65 73 20 |utility creates | 00000270 61 20 73 79 73 74 65 6d 0a 76 61 72 69 61 62 6c |a system.variabl| 00000280 65 20 63 61 6c 6c 65 64 20 bb 42 61 73 69 63 53 |e called .BasicS| 00000290 61 76 65 24 44 69 72 27 20 74 68 69 73 20 69 73 |ave$Dir' this is| 000002a0 20 61 6c 77 61 79 73 20 73 65 74 20 74 6f 20 74 | always set to t| 000002b0 68 65 20 64 69 72 65 63 74 6f 72 79 0a 74 68 65 |he directory.the| 000002c0 20 63 75 72 72 65 6e 74 20 42 61 73 69 63 20 70 | current Basic p| 000002d0 72 6f 67 72 61 6d 20 63 61 6d 65 20 66 72 6f 6d |rogram came from| 000002e0 2e 0a 0a 54 68 65 20 73 61 76 65 20 6c 69 6e 65 |...The save line| 000002f0 20 69 6e 20 79 6f 75 72 20 70 72 6f 67 72 61 6d | in your program| 00000300 20 6e 65 65 64 20 6f 6e 6c 79 20 62 65 3a 0a 0a | need only be:..| 00000310 31 30 20 52 45 4d 20 3e 20 3c 42 61 73 69 63 53 |10 REM > <BasicS| 00000320 61 76 65 24 44 69 72 3e 2e 50 72 6f 67 4e 61 6d |ave$Dir>.ProgNam| 00000330 65 0a 0a 41 6e 79 20 64 61 74 61 20 66 69 6c 65 |e..Any data file| 00000340 73 20 63 61 6e 20 62 65 20 61 63 63 65 73 73 65 |s can be accesse| 00000350 64 20 75 73 69 6e 67 20 74 68 69 73 20 64 69 72 |d using this dir| 00000360 65 63 74 6f 72 79 20 6e 61 6d 65 20 61 73 20 77 |ectory name as w| 00000370 65 6c 6c 20 44 55 52 49 4e 47 0a 44 45 56 45 4c |ell DURING.DEVEL| 00000380 4f 50 4d 45 4e 54 20 4f 4e 4c 59 2e 0a 0a 54 68 |OPMENT ONLY...Th| 00000390 65 20 61 64 76 61 6e 74 61 67 65 20 6f 66 20 74 |e advantage of t| 000003a0 68 69 73 20 69 73 20 74 68 61 74 20 79 6f 75 20 |his is that you | 000003b0 63 61 6e 20 6d 6f 76 65 20 66 69 6c 65 73 20 61 |can move files a| 000003c0 72 6f 75 6e 64 20 77 69 74 68 6f 75 74 20 77 6f |round without wo| 000003d0 72 72 79 69 6e 67 0a 61 62 6f 75 74 20 70 61 74 |rrying.about pat| 000003e0 68 20 6e 61 6d 65 73 20 6f 72 20 73 65 74 74 69 |h names or setti| 000003f0 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 |ng the current d| 00000400 69 72 65 63 74 6f 72 79 20 28 77 68 69 63 68 20 |irectory (which | 00000410 69 73 20 62 61 64 20 70 72 61 63 74 69 63 65 0a |is bad practice.| 00000420 61 6e 79 77 61 79 20 61 6e 64 20 6a 75 73 74 20 |anyway and just | 00000430 61 20 68 61 6e 67 6f 76 65 72 20 66 72 6f 6d 20 |a hangover from | 00000440 74 68 65 20 65 61 72 6c 69 65 72 20 41 44 46 53 |the earlier ADFS| 00000450 29 2e 0a 0a |)...| 00000454
.