logo: update some stuff
This commit is contained in:
parent
ef515a991f
commit
de29430b88
|
@ -0,0 +1,12 @@
|
|||
; $650,$6d0,$750,$7d0
|
||||
clear_both_bottoms:
|
||||
lda #' '|$80
|
||||
ldx #$F7
|
||||
cbloop:
|
||||
sta $600,X
|
||||
sta $700,X
|
||||
sta $A00,X
|
||||
sta $B00,X
|
||||
dex
|
||||
bne cbloop
|
||||
|
|
@ -142,7 +142,7 @@ $BB-$BE -- editor help
|
|||
$BF -- prodos
|
||||
$C0-$CF -- I/O
|
||||
$D0-$DF -- Logo code
|
||||
$E0-$FF -- ProDOS
|
||||
$E0-$FF -- ProDOS ; empty/all zeros?
|
||||
|
||||
Info
|
||||
$300 = max num data files *9 (usually 54)
|
||||
|
|
|
@ -0,0 +1,9 @@
|
|||
{L}
|
||||
SETPC 4 SETPOS[90 80] CLEAN REPEAT 36[RT 5 FD 2 RT 5]
|
||||
REPEAT 9[RT 40 PU SETPOS[100 80] FD 25 PD BK 10]
|
||||
SETPC 5 PU HOME PD
|
||||
RT 180 FD 119 RT 90 FD 280 RT 90 FD 119
|
||||
RT 45 REPEAT 20[FD 10 RT 90 FD 10 LT 90]
|
||||
FILL BK 50
|
||||
SETPC 1 REPEAT 40[FD 1 RT 3] RT 90
|
||||
REPEAT 40[FD 1 RT 3] HT
|
Loading…
Reference in New Issue