Home » CEEFAX disks » telesoftware16.adl » 18-06-89/T\Break
18-06-89/T\Break
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 » CEEFAX disks » telesoftware16.adl |
Filename: | 18-06-89/T\Break |
Read OK: | ✔ |
File size: | 036C bytes |
Load address: | 0000 |
Exec address: | FFFFFFFF |
File contents
Break Disable Utility v.2 *BREAK <ON/OFF> This routine enables a program to be kept running, even if <CTRL><BREAK> is pressed. It has been found very useful by teachers during school demonstrations etc. The <BREAK> key can be disabled using *BREAK OFF The <BREAK> key can be enabled using *BREAK ON (or use *FX247 0 to enable) It is essential that your program contains an ONERROR statement. The following is a simple demo program: 10 ONERROR RUN 20 PRINT" This is a demo" 30 IF INKEY(-1) THEN GOTO 50 40 GOTO 20 50 *FX 247 0 60 END Once this program has been entered type *BREAK OFF and run the program. Pressing <BREAK> will not stop the program but will carry out the instruction contained in the ONERROR statement. (To escape from demo press <SHIFT>) The routine is designed for a BBC model B or B+, and does not operate on a Master computer.
00000000 42 72 65 61 6b 20 44 69 73 61 62 6c 65 20 55 74 |Break Disable Ut| 00000010 69 6c 69 74 79 20 20 76 2e 32 0d 0d 2a 42 52 45 |ility v.2..*BRE| 00000020 41 4b 20 3c 4f 4e 2f 4f 46 46 3e 0d 0d 54 68 69 |AK <ON/OFF>..Thi| 00000030 73 20 72 6f 75 74 69 6e 65 20 65 6e 61 62 6c 65 |s routine enable| 00000040 73 20 61 20 70 72 6f 67 72 61 6d 20 74 6f 20 62 |s a program to b| 00000050 65 20 6b 65 70 74 20 72 75 6e 6e 69 6e 67 2c 20 |e kept running, | 00000060 65 76 65 6e 20 69 66 20 3c 43 54 52 4c 3e 3c 42 |even if <CTRL><B| 00000070 52 45 41 4b 3e 0d 69 73 20 70 72 65 73 73 65 64 |REAK>.is pressed| 00000080 2e 20 49 74 20 68 61 73 20 62 65 65 6e 20 66 6f |. It has been fo| 00000090 75 6e 64 20 76 65 72 79 20 75 73 65 66 75 6c 20 |und very useful | 000000a0 62 79 20 74 65 61 63 68 65 72 73 20 64 75 72 69 |by teachers duri| 000000b0 6e 67 20 73 63 68 6f 6f 6c 0d 64 65 6d 6f 6e 73 |ng school.demons| 000000c0 74 72 61 74 69 6f 6e 73 20 65 74 63 2e 0d 0d 54 |trations etc...T| 000000d0 68 65 20 3c 42 52 45 41 4b 3e 20 6b 65 79 20 63 |he <BREAK> key c| 000000e0 61 6e 20 62 65 20 64 69 73 61 62 6c 65 64 20 75 |an be disabled u| 000000f0 73 69 6e 67 20 2a 42 52 45 41 4b 20 4f 46 46 0d |sing *BREAK OFF.| 00000100 20 0d 54 68 65 20 3c 42 52 45 41 4b 3e 20 6b 65 | .The <BREAK> ke| 00000110 79 20 63 61 6e 20 62 65 20 65 6e 61 62 6c 65 64 |y can be enabled| 00000120 20 75 73 69 6e 67 20 2a 42 52 45 41 4b 20 4f 4e | using *BREAK ON| 00000130 0d 28 6f 72 20 75 73 65 20 2a 46 58 32 34 37 20 |.(or use *FX247 | 00000140 30 20 74 6f 20 65 6e 61 62 6c 65 29 0d 0d 49 74 |0 to enable)..It| 00000150 20 69 73 20 65 73 73 65 6e 74 69 61 6c 20 74 68 | is essential th| 00000160 61 74 20 79 6f 75 72 20 70 72 6f 67 72 61 6d 20 |at your program | 00000170 63 6f 6e 74 61 69 6e 73 20 61 6e 20 4f 4e 45 52 |contains an ONER| 00000180 52 4f 52 20 73 74 61 74 65 6d 65 6e 74 2e 20 54 |ROR statement. T| 00000190 68 65 0d 66 6f 6c 6c 6f 77 69 6e 67 20 69 73 20 |he.following is | 000001a0 61 20 73 69 6d 70 6c 65 20 64 65 6d 6f 20 70 72 |a simple demo pr| 000001b0 6f 67 72 61 6d 3a 0d 0d 20 20 20 31 30 20 4f 4e |ogram:.. 10 ON| 000001c0 45 52 52 4f 52 20 52 55 4e 0d 20 20 20 32 30 20 |ERROR RUN. 20 | 000001d0 50 52 49 4e 54 22 20 54 68 69 73 20 69 73 20 61 |PRINT" This is a| 000001e0 20 64 65 6d 6f 22 0d 20 20 20 33 30 20 49 46 20 | demo". 30 IF | 000001f0 49 4e 4b 45 59 28 2d 31 29 20 54 48 45 4e 20 47 |INKEY(-1) THEN G| 00000200 4f 54 4f 20 35 30 20 0d 20 20 20 34 30 20 47 4f |OTO 50 . 40 GO| 00000210 54 4f 20 32 30 0d 20 20 20 35 30 20 2a 46 58 20 |TO 20. 50 *FX | 00000220 32 34 37 20 30 0d 20 20 20 36 30 20 45 4e 44 0d |247 0. 60 END.| 00000230 0d 4f 6e 63 65 20 74 68 69 73 20 70 72 6f 67 72 |.Once this progr| 00000240 61 6d 20 68 61 73 20 62 65 65 6e 20 65 6e 74 65 |am has been ente| 00000250 72 65 64 20 74 79 70 65 20 2a 42 52 45 41 4b 20 |red type *BREAK | 00000260 4f 46 46 20 61 6e 64 20 72 75 6e 20 74 68 65 20 |OFF and run the | 00000270 70 72 6f 67 72 61 6d 2e 0d 50 72 65 73 73 69 6e |program..Pressin| 00000280 67 20 3c 42 52 45 41 4b 3e 20 77 69 6c 6c 20 6e |g <BREAK> will n| 00000290 6f 74 20 73 74 6f 70 20 74 68 65 20 70 72 6f 67 |ot stop the prog| 000002a0 72 61 6d 20 62 75 74 20 77 69 6c 6c 20 63 61 72 |ram but will car| 000002b0 72 79 20 6f 75 74 20 74 68 65 0d 69 6e 73 74 72 |ry out the.instr| 000002c0 75 63 74 69 6f 6e 20 63 6f 6e 74 61 69 6e 65 64 |uction contained| 000002d0 20 69 6e 20 74 68 65 20 4f 4e 45 52 52 4f 52 20 | in the ONERROR | 000002e0 73 74 61 74 65 6d 65 6e 74 2e 0d 28 54 6f 20 65 |statement..(To e| 000002f0 73 63 61 70 65 20 66 72 6f 6d 20 64 65 6d 6f 20 |scape from demo | 00000300 70 72 65 73 73 20 3c 53 48 49 46 54 3e 29 0d 0d |press <SHIFT>)..| 00000310 54 68 65 20 72 6f 75 74 69 6e 65 20 69 73 20 64 |The routine is d| 00000320 65 73 69 67 6e 65 64 20 66 6f 72 20 61 20 42 42 |esigned for a BB| 00000330 43 20 6d 6f 64 65 6c 20 42 20 6f 72 20 42 2b 2c |C model B or B+,| 00000340 20 61 6e 64 20 64 6f 65 73 20 6e 6f 74 20 6f 70 | and does not op| 00000350 65 72 61 74 65 20 6f 6e 20 61 0d 4d 61 73 74 65 |erate on a.Maste| 00000360 72 20 63 6f 6d 70 75 74 65 72 2e 0d |r computer..| 0000036c