Skip to content

Instantly share code, notes, and snippets.

View jblang's full-sized avatar

J.B. Langston jblang

122 followers · 0 following
View GitHub Profile
@jblang
jblang / lcd.bas
Created November 27, 2018 18:53
AppleSoft BASIC program to control an LCD
10 IR = 47104: REM CONTROL REGISTER $B800
20 DR = 47360: REM DATA REGISTER $B900
30 GOSUB 100
40 INPUT "WHAT DO YOU WANT TO PRINT? ";S$
50 GOSUB 200
60 END
100 REM INITIALIZE LCD
110 FOR I = 1 TO 4
120 POKE IR,56: REM 8-BIT BUS, 5X8 FONT, 2 LINES
@jblang
jblang / pcjr.md
Created June 5, 2019 12:57
IBM PCjr Resources
@jblang
jblang / music.md
Last active February 8, 2020 05:16
SN76489 Music Player for PCjr
@jblang
jblang / a2advgraf.bas
Last active February 1, 2022 06:59
AppleSoft Advanced Graphics Techniques
1 REM Advanced Graphics Techniques--Part II by Bob Boothe
2 REM 80 Microcomputing Magazine, May 1981, Page 119-142
3 REM https://archive.org/details/80-microcomputing-magazine-1981-05/page/n121/mode/2up
4 REM Converted to AppleSoft by J.B. Langston, January 2022
10 HOME : HGR : HCOLOR= 3: POKE 49234,0
20 PI = 3.14:XC = 139:YC = 95:SC = YC
30 R1 = SC:R2 = SC:V = 18: GOSUB 100: GOSUB 2000
40 GOSUB 200: GOSUB 300: GOSUB 400: GOSUB 500: GOSUB 600
50 SD = 76:TD = 3:TM = 2: GOSUB 700
60 SD = 60:TD = 2:TM = 2: GOSUB 700
@jblang
jblang / 00-notes.md
Last active January 7, 2026 01:06
Heathkit H89 Survival Guide

H89 Survival Guide

This is a work-in-progress collection of notes I've been making as I'm exploring the Heathkit H89.

@jblang
jblang / Advanced Graphics.bas
Created August 17, 2023 02:17
Advanced Graphics Techniques for Mac QuickBASIC
' Advanced Graphics Techniques--Part II by Bob Boothe
' 80 Microcomputing Magazine, May 1981, Page 119-142
' https://archive.org/details/80-microcomputing-magazine-1981-05/page/n121/mode/2up
' Converted to QuickBASIC for Mac by J.B. Langston, August 2023
w=WINDOW(2): h=WINDOW(3)
pi=3.14: xc=w/2: yc=h/2: sc=yc
CALL Poly18
CALL TheEye
CALL Moire