#Retro/#RetroComputing Commitment Day 2:

I while back, I had to "teach" a CS overview class. Within it was a programming tour - a tour of some languages. I wanted to be complete and include older stuff as well. Ended up finding this site:

https://www.calormen.com/jsbasic/

#Apple][ #AppleSoftBasic in Javascript. It was a nice way to teach #BASIC but include HiRes Graphics as well (not so easy with #C64; #C128 could have worked too but I couldn't find a decent online emulator with easy data entry).

Here is one of the programs I had the students work/make:

10 HGR2
50 FOR X=0 TO 279
60   Y=25*SIN(0.1*X)+96      
63   IF Y <= 96 THEN HCOLOR=3
65   IF Y > 96 THEN HCOLOR=5
70   HPLOT X, Y    
75   Y=25*COS(0.1*X+14)+96  
76   IF Y <= 96 THEN HCOLOR=3
77   IF Y > 96 THEN HCOLOR=5
78   HPLOT X, Y    
80 NEXT X

The site even has an Applesoft BASIC Quick Reference for handiness.

Enjoy!

#c64whiz_rcc

Edit: Added #c64whiz_rcc hashtag.

Hey hey, I posted an Apple BASIC game you can play right in your browser.

Press the button to drop bombs and try to time it to blow up the boat. Runs in an Apple II BASIC emulator.

If you like this subscribe via RSS, I post one BASIC program a week, refactored from old type-in listings

https://basic-code.bearblog.dev/applesoft-air-attackbas/

#retroComputing #gameDev #devLog #appleii #applesoftBasic

https://mmphosis.netlify.app/10print/llm/
#vibecoding in #applesoftbasic

#LLMs #llamafile #AppleII #apple2 #Applesoft #BasicCoding

Episódio 162 – BASIC.BAS – Parte A

https://retropolis.com.br/2025/04/09/episodio-162-parte-a/

#Podcast #6502BASIC #ApplesoftBASIC #AtariBasic #AtariMSBASIC #BASIC #BASIC68 #BASIC69 #BASIC80 #BillGates #CommodoreBASIC #CreativeComputing #DartmouthBASIC #DartmouthCollege #DavidHAhl #DEC #FOCAL #Hanover #HP #HPTimeSharedBASIC #IA #IntegerBasic #JohnGKemeny #JohnMcCarthy #LinguagemDeProgramao #LISP #mainframe #mbasic #MicroSoft #microcomputador #Minicomputadores #MonteDavidoff #PaulAllen #podc

1 GR : DEF FN C(I) = ASC ( MID$ (A$,I)) - 58: FOR C = 1 TO 7: READ A$: COLOR= FN C(1): FOR I = 2 TO LEN (A$) STEP 3: VLIN FN C(I), FN C(I + 1) AT FN C(I + 2): NEXT I,C
2 DATA"K?E?@ba??@CC@DEA",S@EC??DCCD@EE,W?EG,V?EI@AJBCK?EL,Q?EN??OBBOEEO@APCDP,L@DR??SEES@DT,M?EVCDWABXCDY?EZ

#apple2 #rainbow #Applesoft #applesoftbasic #AppleII

https://rosettacode.org/wiki/Rainbow#Applesoft_BASIC

#rosettacode #applesoftbasic #lzw #compression and #decompress in #Applesoft #BASIC
https://rosettacode.org/wiki/LZW_compression#Applesoft_BASIC