BBC BASIC Programmers' Reference

User Tools

Site Tools

Trace: • sending_20a_20serial_20break • sending_20an_20email_20with_20attachments • sound_20and_20envelope_20in_20assembler • cascaded_20on_20close_20handling
determining_20how_20a_20macro_20was_20run

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Next revision		Previous revision
determining_20how_20a_20macro_20was_20run [2018/03/31 13:19] – external edit 127.0.0.1determining_20how_20a_20macro_20was_20run [2024/01/05 00:22] (current) – external edit 127.0.0.1
Line 4: Line 4:
 ==== Method One ==== ==== Method One ====
 \\  \\ 
 +<code bb4w>
         Called% = NOT(!384>=PAGE AND !384<=TOP)         Called% = NOT(!384>=PAGE AND !384<=TOP)
 +</code>
 \\  \\ 
 ==== Method Two ==== ==== Method Two ====
 \\  \\ 
 +<code bb4w>
         P%=0         P%=0
         ON ERROR P%=!408:ON ERROR OFF         ON ERROR P%=!408:ON ERROR OFF
         IF P%=0 ERROR         IF P%=0 ERROR
         Called%=NOT(P%>=PAGE AND P% <=TOP)         Called%=NOT(P%>=PAGE AND P% <=TOP)
 +</code>
 \\  Both methods set **Called%** to TRUE if the program was run using "CALL "filename"" and FALSE if the program is running as the main program.\\ \\ **Note:** The code for both methods is unsuitable for refactoring into a subroutine and must be called in-line to guarantee correct results; the code will fail in the case where a subroutine with the same name is present in the main program because the main program has precedence. \\  Both methods set **Called%** to TRUE if the program was run using "CALL "filename"" and FALSE if the program is running as the main program.\\ \\ **Note:** The code for both methods is unsuitable for refactoring into a subroutine and must be called in-line to guarantee correct results; the code will fail in the case where a subroutine with the same name is present in the main program because the main program has precedence.
determining_20how_20a_20macro_20was_20run.1522502355.txt.gz · Last modified: 2024/01/05 00:18 (external edit)