aboutsummaryrefslogtreecommitdiffstats
path: root/sb_vfd/vfd.bas
diff options
context:
space:
mode:
Diffstat (limited to 'sb_vfd/vfd.bas')
-rw-r--r--sb_vfd/vfd.bas35
1 files changed, 0 insertions, 35 deletions
diff --git a/sb_vfd/vfd.bas b/sb_vfd/vfd.bas
deleted file mode 100644
index aed987c..0000000
--- a/sb_vfd/vfd.bas
+++ /dev/null
@@ -1,35 +0,0 @@
-10 GOSUB 4000 : REM initialize
-20 GOSUB 4100 : REM cursor off
-30 T$ = "Hello, World"
-40 GOSUB 4500 : REM print string
-
-999 GOTO 999
-
-4000 OUT 0, &H30 : REM function set - 8 bit
-4010 OUT 1, 0 : REM max brightness
-4020 OUT 0, 1 : REM clear display
-4030 OUT 0, &H0F : REM display on, cursor on, blink on
-4040 RETURN
-
-4099 REM turn cursor off
-4100 OUT 0, &H0C : REM display on, cursor off
-4110 RETURN
-
-4199 REM turn cursor on
-4200 OUT 0, &H0F : REM display on, cursor on, blin on
-4210 RETURN
-
-4299 REM clear screen
-4300 OUT 0, 1
-4310 RETURN
-
-4399 REM goto X, Y
-4400 DA = &H80 + (&H40 * Y) + X
-4410 OUT 0, DA
-4420 RETURN
-
-4499 REM print string
-4500 FOR I=1 to LEN(T$)
-4510 OUT 1, ASC(MID$(T$, I, 1))
-4520 NEXT I
-4530 RETURN