diff --git a/duke/duke.png b/duke/duke.png index 205e4826..4528858f 100644 Binary files a/duke/duke.png and b/duke/duke.png differ diff --git a/hgr/Makefile b/hgr/Makefile new file mode 100644 index 00000000..6be621ff --- /dev/null +++ b/hgr/Makefile @@ -0,0 +1,23 @@ +include ../Makefile.inc + +DOS33 = ../dos33fs-utils/dos33 +TOKENIZE = ../asoft_basic-utils/tokenize_asoft + +all: hgr.dsk + +hgr.dsk: SNOW + cp empty.dsk hgr.dsk + $(DOS33) -y hgr.dsk BSAVE -a 0x0300 SNOW + +### + +SNOW: snow.o + ld65 -o SNOW snow.o -C ../linker_scripts/apple2_300.inc + +snow.o: snow.s + ca65 -o snow.o snow.s -l snow.lst + +### + +clean: + rm -f *~ *.o *.lst SNOW diff --git a/hgr/empty.dsk b/hgr/empty.dsk new file mode 100644 index 00000000..b34eb519 Binary files /dev/null and b/hgr/empty.dsk differ diff --git a/hgr/snow.s b/hgr/snow.s new file mode 100644 index 00000000..a027d716 --- /dev/null +++ b/hgr/snow.s @@ -0,0 +1,74 @@ +GBASL = $26 +GBASH = $27 +HGRPAGE = $E6 + +HGR = $F3E2 +HGR2 = $F3D8 +HPOSN = $F411 + +snow: + jsr HGR + +snow_loop: + ldy xhi + ldx xlo + lda ylo + jsr HPOSN + + ldx #0 +line_loop: +ll_smc: + lda flake,X + sta (GBASL),Y + + inx + iny + cpx #6 + bne line_loop + + lda ll_smc+1 +c_smc: + clc +dir_smc: + adc #6 + sta ll_smc+1 + + inc ylo + dec line + beq forever + + lda line + cmp #12 + bne snow_loop + + lda #$E9 ; sbc imm + sta dir_smc + + lda #$38 ; sec + sta c_smc + + jmp snow_loop + +forever: + jmp forever + +xhi: .byte $00 +xlo: .byte 77 +ylo: .byte 100 +line: .byte 23 + + +flake: + .byte $00,$00,$40,$01,$00,$00 + .byte $00,$00,$0C,$18,$00,$00 + .byte $00,$00,$70,$07,$00,$00 + .byte $00,$00,$43,$61,$00,$00 + .byte $00,$00,$4C,$19,$00,$00 + .byte $33,$00,$70,$07,$00,$66 + .byte $30,$06,$40,$01,$30,$06 + .byte $3f,$06,$40,$01,$30,$7e + .byte $40,$07,$30,$06,$70,$01 + .byte $7c,$07,$30,$06,$70,$1f + .byte $00,$18,$0F,$78,$0C,$00 + .byte $00,$60,$40,$01,$03,$00 + diff --git a/mist/TODO b/mist/TODO index b2c1c8b6..1cedbdc4 100644 --- a/mist/TODO +++ b/mist/TODO @@ -14,6 +14,10 @@ For release 1.0 -- open door to clock puzzle? -- another stop on path to spaceship. Out of room though :( -- MIST_ROCKET_PATH_PAD probably missing ship-raised background + -- (reported by user) the generator entrance/path just shows + open hand icon so it's unclear you can take the path in + addition to entering the generator. Not much we can + do about that with the current engine though + OCTAGON -- animation on the fireplace opening/closing