ChipMaster
/
bwBASIC
1
0
Fork 0
Code Issues 22 Pull Requests 0 Releases 17 Wiki Activity
ChipMaster's bwBASIC This also includes history going back to v2.10. *WARN* some binary files might have been corrupted by CRLF.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
11 Commits
3 Branches
4.5 MiB
 
 
 
 
 
 
Tree: 5a220d5b6b
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '5a220d5b6b'
${ noResults }
bwBASIC/C77A/IF_END_1.BAS

13 lines
301 B
Raw Blame History 

  1. 100 REM Purpose: Verify IF END command

  2. 110 REM /Author: Howard Wulf, AF5NE

  3. 120 REM    Date: 2015-12-23

  4. 130 REM

  5. 

  6. 200 IF END # 777 THEN 500

  7. 210 PRINT "ABOUT TO EXECUTE TEST"

  8. 220 OPEN "NO SUCH FILE" AS # 777

  9. 230 PRINT "TEST FAILED - 'IF END' DID NOT EXECUTE"

  10. 240 GOTO 999

  11. 500 PRINT "TEST PASSED"

  12. 999 END