classicgamer_27330 Posted February 4 Share Posted February 4 Let's see how this goes. Here are some ground rules. - Your line can be inserted anywhere in the program. - No double posting without waiting 24 hours. - You can cause an error in the program. E.g if I started the program with a simple GOTO line, we would get an UNDEF'D STATEMENT ERROR, or another user could put RETURN, and get a RETURN WITHOUT GOSUB ERROR. These should be corrected though - The program must keep going (no END without another path running or have an infinite loop without an escape hatch) I'll start 0 HOME 1 Quote Link to comment Share on other sites More sharing options...
+skr Posted May 6 Share Posted May 6 10 COLOR = 2 Quote Link to comment Share on other sites More sharing options...
ClausB Posted May 7 Share Posted May 7 (edited) 0 HOME 10 COLOR = 2 20 GR Edited May 7 by ClausB Quote Link to comment Share on other sites More sharing options...
+skr Posted May 7 Share Posted May 7 0 HOME 10 COLOR = 2 20 GR 30 VLIN 0,30 AT 19 Quote Link to comment Share on other sites More sharing options...
khaibitgfx Posted May 8 Share Posted May 8 (edited) Something I created sometime ago incase anyone missed it.. It's not a scan but a recreation that looks identical to the original. Applesoft II 1978.pdf Edited May 8 by khaibitgfx 2 2 Quote Link to comment Share on other sites More sharing options...
khaibitgfx Posted May 25 Share Posted May 25 (edited) Apple II Redbook recreation, not a scan. Best viewed with an up to date PDF viewer. Apple II Redbook.pdf Edited May 25 by khaibitgfx 2 Quote Link to comment Share on other sites More sharing options...
khaibitgfx Posted May 25 Share Posted May 25 (edited) Looking for a high quality version of the Bluebook to recreate. Edited May 25 by khaibitgfx 1 Quote Link to comment Share on other sites More sharing options...
DeathAdderSF Posted June 1 Share Posted June 1 40 REM Why is someone posting scans in here? 1 Quote Link to comment Share on other sites More sharing options...
polyex Posted June 2 Share Posted June 2 50 COLOR = 2: VLIN 0, 30 AT 19 Quote Link to comment Share on other sites More sharing options...
classicgamer_27330 Posted August 9 Author Share Posted August 9 60 PRINT "SOME SERIOUS ?SYANTAX ERRORS HERE" Quote Link to comment Share on other sites More sharing options...
khaibitgfx Posted August 10 Share Posted August 10 On 5/31/2024 at 10:19 PM, DeathAdderSF said: 40 REM Why is someone posting scans in here? They are recreations not scans.....text and vector graphics..... Quote Link to comment Share on other sites More sharing options...
Osgeld Posted August 22 Share Posted August 22 (edited) 0 HOME 1 ?"ATARIAGE Create an applesoft basic":?"program one line at a time":?:?"PRESS ANY NUMBER TO START":INPUT P:IF P=<128 THEN GOTO 10:rem osgeld 10 COLOR = 2 20 GR 30 REM DUPE OF 50 VLIN 0,30 AT 19 40 REM Why is someone posting scans in here? 50 COLOR = 2: VLIN 0, 30 AT 19 Edited August 22 by Osgeld Quote Link to comment Share on other sites More sharing options...
Osgeld Posted August 23 Share Posted August 23 I changed line 0 and changed line 1 to 5 0 TEXT:HOME:REM skr, osgeld edit 5 ?"ATARIAGE Create an applesoft basic":?"program one line at a time":?:?"PRESS ANY KEY TO START":INPUT N$:REM osgeld 10 COLOR = 2:REM skr 20 GR:REM ClausB 30 REM DUPE OF 50 VLIN 0,30 AT 19: REM skr 40 REM Why is someone posting scans in here? DeathAdderSF 50 COLOR = 2: VLIN 0, 30 AT 19:REM polyex 60 PRINT "SOME SERIOUS ?SYANTAX ERRORS HERE":REM classicgamer_27330 Quote Link to comment Share on other sites More sharing options...
DeathAdderSF Posted August 23 Share Posted August 23 On 8/10/2024 at 1:44 PM, khaibitgfx said: They are recreations not scans.....text and vector graphics..... My question remains unanswered. Quote Link to comment Share on other sites More sharing options...
khaibitgfx Posted August 25 Share Posted August 25 Quote Link to comment Share on other sites More sharing options...
classicgamer_27330 Posted August 29 Author Share Posted August 29 70 INPUT "TO CONTINUE, INPUT THE SECRET NUMBER?";A : REM classicgamer_27330 Quote Link to comment Share on other sites More sharing options...
Osgeld Posted September 1 Share Posted September 1 (edited) On 8/29/2024 at 1:22 PM, classicgamer_27330 said: 70 INPUT "TO CONTINUE, INPUT THE SECRET NUMBER?";A : REM classicgamer_27330 not sure where you're going with that but we shall see forget it I havent posted in a few days so I made some sound subroutines, its 5 lines but its been almost 8 days since I posted last 0 TEXT:HOME:REM skr, osgeld edit 5 ?"ATARIAGE Create an applesoft basic":?"program one line at a time":?:?"PRESS ANY KEY TO START":INPUT N$:REM osgeld 10 COLOR = 2:REM skr 20 GR:REM ClausB 30 REM DUPE OF 50 VLIN 0,30 AT 19: REM skr 40 REM Why is someone posting scans in here? DeathAdderSF 50 COLOR = 2: VLIN 0, 30 AT 19:REM polyex 60 PRINT "SOME SERIOUS ?SYANTAX ERRORS HERE":REM classicgamer_27330 70 INPUT "TO CONTINUE, INPUT THE SECRET NUMBER?";A : REM classicgamer_27330 80 GOSUB 5000:GOSUB 5010:REM OSGELD 4999 END:REM OSGELD 5000 BN=-16336:FOR BT = 1 TO 25:B1=PEEK(BN) + (BT*BT):NEXT BT:RETURN:REM OSGELD MID TONE 5005 BN=-16336:FOR BT = 1 TO 25:B1=PEEK(BN) + (BT/255):NEXT BT:RETURN:REM OSGELD LOW TONE 5010 BN=-16336:FOR BT = 1 TO 25:B1=PEEK(BN) + (BT):NEXT BT:RETURN:REM OSGELD HIGH TONE Edited September 1 by Osgeld Quote Link to comment Share on other sites More sharing options...
InternetJunkie2 Posted September 7 Share Posted September 7 On 8/23/2024 at 7:24 AM, DeathAdderSF said: My question remains unanswered. Considering the unlikelihood of anything coherent getting made in this exercise, I find the scans recreations a welcome diversion. I welcome a rebutle! Please anyone find me such an exercise, writing one line of Basic at a time, and I mean any flavor of Basic on any platform!, producing anything that can be run. Please give us a link. A funny human-readable story is possible, but a program? I don't believe it can be done. Quote Link to comment Share on other sites More sharing options...
DeathAdderSF Posted September 8 Share Posted September 8 19 hours ago, InternetJunkie2 said: I welcome a rebutle! You spelled "rebuttal" incorrectly. Quote Link to comment Share on other sites More sharing options...
DeathAdderSF Posted September 8 Share Posted September 8 (edited) 85 IF A="666" THEN PRINT "GO TO HEAVEN!":PRINT:GOTO 70 Edited September 8 by DeathAdderSF Quote Link to comment Share on other sites More sharing options...
classicgamer_27330 Posted September 9 Author Share Posted September 9 77 IF A=77 THEN PRINT "THE SECRET NUMBER IS NOT THIS LINE NUMBER" : GOTO 70 : REM classicgamer_27330 Quote Link to comment Share on other sites More sharing options...
+OLD CS1 Posted September 11 Share Posted September 11 On 9/7/2024 at 5:01 PM, InternetJunkie2 said: Considering the unlikelihood of anything coherent getting made in this exercise, I find the scans recreations a welcome diversion. I welcome a rebutle! Please anyone find me such an exercise, writing one line of Basic at a time, and I mean any flavor of Basic on any platform!, producing anything that can be run. Please give us a link. A funny human-readable story is possible, but a program? I don't believe it can be done. 1 Quote Link to comment Share on other sites More sharing options...
DeathAdderSF Posted September 11 Share Posted September 11 1 hour ago, OLD CS1 said: Does it turn them to stone? Quote Link to comment Share on other sites More sharing options...
Osgeld Posted September 13 Share Posted September 13 On 9/7/2024 at 4:01 PM, InternetJunkie2 said: Considering the unlikelihood of anything coherent getting made in this exercise, I find the scans recreations a welcome diversion. I welcome a rebutle! Please anyone find me such an exercise, writing one line of Basic at a time, and I mean any flavor of Basic on any platform!, producing anything that can be run. Please give us a link. A funny human-readable story is possible, but a program? I don't believe it can be done. I mean it runs ... it doesnt do anything but it runs Quote Link to comment Share on other sites More sharing options...
Osgeld Posted September 13 Share Posted September 13 (edited) 0 TEXT:HOME:REM skr, osgeld edit 5 ?"ATARIAGE Create an applesoft basic":?"program one line at a time":?:?"PRESS ANY KEY TO START":INPUT N$:REM osgeld 10 COLOR = 2:REM skr 20 GR:REM ClausB 30 REM DUPE OF 50 VLIN 0,30 AT 19: REM skr 40 REM Why is someone posting scans in here? DeathAdderSF 50 COLOR = 2: VLIN 0, 30 AT 19:REM polyex 60 PRINT "SOME SERIOUS ?SYANTAX ERRORS HERE":REM classicgamer_27330 70 INPUT "TO CONTINUE, INPUT THE SECRET NUMBER?";A : REM classicgamer_27330 77 IF A=77 THEN PRINT "THE SECRET NUMBER IS NOT THIS LINE NUMBER" : GOTO 70 : REM classicgamer_27330 80 GOSUB 5000:GOSUB 5010:REM OSGELD 85 IF A=666 THEN PRINT "GO TO HEAVEN!":GOTO 70:REM DeathAdderSF 90 IF A=2 THEN ? "INTERNETJUNKIE2 STRIKES": ?"ENGAGE TROLL SPRAY!":GOSUB 5000:GOSUB 5005:COLOR=12:FOR TS = 1 TO 100:SX = INT(40*RND(1)):SY = INT(40*RND(1)):PLOT SX,SY:NEXT TS:REM OSGELD 4999 END:REM OSGELD 5000 BN=-16336:FOR BT = 1 TO 25:B1=PEEK(BN) + (BT*BT):NEXT BT:RETURN:REM OSGELD MID TONE 5005 BN=-16336:FOR BT = 1 TO 25:B1=PEEK(BN) + (BT/255):NEXT BT:RETURN:REM OSGELD LOW TONE 5010 BN=-16336:FOR BT = 1 TO 25:B1=PEEK(BN) + (BT):NEXT BT:RETURN:REM OSGELD HIGH TONE Edited September 13 by Osgeld Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.