MediaWiki:Sitenotice:
2024-03-02: The wiki ran out of disk space, so things were not working. This has been resolved by adding another 5GB of quota ;-) Thanks to Tim Lindner for reporting the issues. 2020-05-17: If a page gives you an error about some revision not being found, just EDIT the page and the old page should appear in the editor. If it does, just SAVE that and the page should be restored. OS-9 Al (talk) 12:22, 17 May 2020 (CDT)

SAINTS: Difference between revisions

From CoCopedia - The Tandy/Radio Shack Color Computer Wiki
Jump to navigation Jump to search
(Created page with " 100 DATA -1,-1,89,4,125,4,133,4,147,16,-2,-2,147,4,89,4,123,4,133,4,147,16 110 DATA -3,-3,147,4,89,4,125,4,133,4,147,8,125,8,89,8,125,8,108,16 120 DATA -4,-4,108,8,125,4,10...")
 
(Category)
 
Line 15: Line 15:
  240 IF A=-5 THEN PRINT@257,"WHEN THE SAINTS GO MARCHING IN":GOTO 160
  240 IF A=-5 THEN PRINT@257,"WHEN THE SAINTS GO MARCHING IN":GOTO 160
  250 RESTORE: GOTO 150
  250 RESTORE: GOTO 150
[[Category:BASIC]]

Latest revision as of 21:27, 10 September 2015

100 DATA -1,-1,89,4,125,4,133,4,147,16,-2,-2,147,4,89,4,123,4,133,4,147,16
110 DATA -3,-3,147,4,89,4,125,4,133,4,147,8,125,8,89,8,125,8,108,16
120 DATA -4,-4,108,8,125,4,108,4,89,8,89,4,89,4,108,8,147,4,147,4,147,4
130 DATA -5,-5,133,8,133,4,133,8,125,4,133,4,147,8,123,8,89,8,108,8
140 DATA 89,16,-6,-6
150 CLS
160 READ A,B: IF A<0 THEN 190
170 SOUND A,B
180 GOTO 160
190 IF A=-1 THEN PRINT@263,"OH WHEN THE SAINTS":GOTO 160
200 IF A=-2 THEN PRINT@263," GO MARCHING IN":GOTO 160
210 IF A=-3 THEN PRINT@263, "OH WHEN THE SAINTS"
220 IF A=-3 THEN PRINT@297,"GO MARCHING IN": GOTO 160
230 IF A=-4 THEN PRINT@259,"I WANT TO BE IN THAT NUMBER":PRINT:GOTO 160
240 IF A=-5 THEN PRINT@257,"WHEN THE SAINTS GO MARCHING IN":GOTO 160
250 RESTORE: GOTO 150