Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-08-12 12:29:04 +00:00
Code Issues Projects Releases Wiki Activity

check_email: sorta have fake lowercase going

Browse Source
This commit is contained in:
Vince Weaver 2018-09-29 14:56:43 -04:00
parent ea57943f1e
commit 23de53dc81
4 changed files with 63 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
megademo/TODO
View File

@ -52,3 +52,15 @@ DEATER IS COOL
DAATA :S C ! " DAATA :S C ! "
DEATEF YS C88I U DEATEF YS C88I U
Apple IIe: Apple II+
0 *****
1 * *****
2 * *
3 ***** *
4 * *****
5 * *
6 ****** *
7 *****

50
megademo/check_email.s
View File

@ -22,11 +22,11 @@ init_email_letters:
sta LETTERL sta LETTERL
lda #>em_letters lda #>em_letters
sta LETTERH sta LETTERH
lda #39 lda #18
sta LETTERX sta LETTERX
lda #22 lda #4
sta LETTERY sta LETTERY
lda #25 lda #4
sta LETTERD sta LETTERD
@ -161,7 +161,7 @@ em_outer_loop:
sta draw_line_p1+1 ; 4 sta draw_line_p1+1 ; 4
jsr draw_line_1 ; 6 jsr draw_line_1 ; 6
;== line3 ;== line3
bit PAGE0 ; 4 bit PAGE1 ; 4
lda #$55 ; 2 lda #$55 ; 2
sta draw_line_p1+1 ; 4 sta draw_line_p1+1 ; 4
jsr draw_line_1 ; 6 jsr draw_line_1 ; 6
@ -202,22 +202,24 @@ em_outer_loop:
; +1 fallthrough from above ; +1 fallthrough from above
; -10 keypress ; -10 keypress
; -2 ldy at top ; -2 ldy at top
; -132 move letters
; =========== ; ===========
; 4539 ; 4407
; Try X=6 Y=126 cycles=4537 R2
; Try X=13 Y=62 cycles=4403 R4
nop ; 2 nop ; 2
nop
ldy #126 ; 2 ldy #62 ; 2
emloop1:ldx #6 ; 2 emloop1:ldx #13 ; 2
emloop2:dex ; 2 emloop2:dex ; 2
bne emloop2 ; 2nt/3 bne emloop2 ; 2nt/3
dey ; 2 dey ; 2
bne emloop1 ; 2nt/3 bne emloop1 ; 2nt/3
jsr move_letters ; 6+126
lda KEYPRESS ; 4 lda KEYPRESS ; 4
bpl em_no_keypress ; 3 bpl em_no_keypress ; 3
@ -316,19 +318,31 @@ draw_line_p2:
em_letters: em_letters:
; .byte 22,28, ; note it is y,x
.byte " ",128 ; .byte 4,4,
.byte 22+128,25," ",128 .byte "DA LA ",128 ; DEATER
.byte 4+128,4,"DE&FEF",198
.byte 23,25, " ",128 .byte 5,4, " S C !.",128 ; IS COOL
.byte 23+128,25," ",128 .byte 5+128,4,"YS C88I.",128
.byte 22,26, "CODE BY",128 .byte 7,3, "W M",$22,"SSE J A",128
.byte 22+128,26,"CODE BY",128 .byte 7+128,3,"WYF MGSSEH 8YE",128
.byte 23,26, "DEATER",128 .byte 8,3, " A SAS LA KS",128
.byte 23+128,26,"DEATER",198 .byte 8+128,3,"FEYSESEHEEKS",128
.byte 9,3, "EI L",$22,"SE .",128
.byte 9+128,3,"EIHLOSEH.",128
.byte 12,4, " /I",128
.byte 12+128,4," /Y",128
.byte 13,4, " __ __/_I",128
.byte 13+128,4," __ __/_Y",128
.byte 14,4, " /__] I/",128
.byte 14+128,4," /__] Y/",128
.byte 15,4, "/_____ I\",128
.byte 15+128,4,"/_____EEEE\"
.byte 255 .byte 255

16
megademo/fireworks.s
View File

@ -5,14 +5,14 @@
; Zero Page ; Zero Page
FRAMEBUFFER = $00 ; $00 - $0F FRAMEBUFFER = $00 ; $00 - $0F
;YPOS = $10 ;YPOS = $10
FRAME = $60 ;FRAME = $60
WAITING = $62 ;WAITING = $62
LETTERL = $63 ;LETTERL = $63
LETTERH = $64 ;LETTERH = $64
LETTERX = $65 ;LETTERX = $65
LETTERY = $66 ;LETTERY = $66
LETTERD = $67 ;LETTERD = $67
LETTER = $68 ;LETTER = $68
BLARGH = $69 BLARGH = $69
HGR_COLOR = $E4 HGR_COLOR = $E4
STATE = $ED STATE = $ED

11
megademo/zp.inc
View File

@ -37,6 +37,17 @@ DOSBUFH = $63
FILEML = $64 FILEML = $64
FILEMH = $65 FILEMH = $65
FRAME = $60
WAITING = $62
LETTERL = $63
LETTERH = $64
LETTERX = $65
LETTERY = $66
LETTERD = $67
LETTER = $68
;FACTOR_I = $66 ;FACTOR_I = $66
;FACTOR_F = $67 ;FACTOR_F = $67
;DX_I = $68 ;DX_I = $68