From f58f40aa3fde54cc6c3a54817367f4e210b222f5 Mon Sep 17 00:00:00 2001
From: giomba <giomba@glgprograms.it>
Date: Sun, 4 Dec 2022 01:00:17 +0100
Subject: [PATCH] First commit.

---
 .gitignore          |   3 +++
 Makefile            |  12 +++++++++
 res/stillenacht.prg | Bin 0 -> 1536 bytes
 src/main.asm        |  64 ++++++++++++++++++++++++++++++++++++++++++++
 4 files changed, 79 insertions(+)
 create mode 100644 .gitignore
 create mode 100644 Makefile
 create mode 100644 res/stillenacht.prg
 create mode 100644 src/main.asm

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..e50caec
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,3 @@
+build/
+bin/
+
diff --git a/Makefile b/Makefile
new file mode 100644
index 0000000..47c3f43
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,12 @@
+.POSIX:
+
+.PHONY: env
+
+ASM=$(wildcard src/*asm)
+
+vic20term.prg: env $(ASM)
+	dasm src/main.asm -Isrc/ -f3 -T1 -sbuild/vic20term.prg.symbols.txt -obin/vic20term.bin
+
+env:
+	mkdir -p {bin,build}
+
diff --git a/res/stillenacht.prg b/res/stillenacht.prg
new file mode 100644
index 0000000000000000000000000000000000000000..bb391dd2f841f40ea43bf9c60e2fa09b5f3a8ceb
GIT binary patch
literal 1536
zcmaJ>U5MON6h6r)EK(%DrAVpcWv5I^D7nc@X3St^CV$PSQ<(|F6iO*7;)5Ux_Nfou
zZK<q-OCQ9t3R22K%5E)gq}m4&w6rP+zVu0u`cQljEEWVs@aN>-1XnD5nB?5=`|dg4
zJ?CZw=~3w+I7OzDdhGORY=^E{ulr?4;0b95X9H(U1AD;PG4<`(C2&l7n6rIk`?l{4
z@M%_=T4S5QDM`AIq&=ntE=bDu8j%yw0cP>tkY)H>(m3rqF%9k5iO@(v`;5LV?JVdN
zO`|P}KTL{rwL+T@%DcEEMleQ6jK|n6Xv&XpL4<+`1<`f^GnvS{?<2t?FUouFQN%6W
zU>D^2JxO+g^D+v^v|kVLXrb+6?J6R0MPB4&<OT)dhFI&Sytf2fzTL;RMA(pj_uQ46
z)t>*8JCuDD8I-LI-I%#F6q8dSrVYz6U`6KAR`w$~Bk;WP0*oe&-1eqv?zr7f%R4h_
zG!ZhpmSLvPu-Gss&+-6HDCc1*$*pyic&JQF%g8Nn8P=4~U~;gLQ`hsSm@gSE=7e~D
z@q`P?kMLI4vLIJ}fq8+=NY<tnTvPri)*o$=Dao9c1>YzS2u%6CvP)pf3CW6ta7Q5=
z=re%A--^kBlmQkjsIIVLI~FKvDn#RalR`s1$~8X85V7qxbk&zQ6qHaGo>E`qP{<*N
z!cp}EhoTa);Z^kvhvE`y!)f&_htN}z-s!+O^<54PO6YO8sIGHp%pePHsF#H~GnlQB
zCrQs=?2%+dde}4XEPSh8<t_MG{X$3@Id<8fVw*Q;(Qp>#Ndp$N9|XQm8b*G-=`R`^
zIDkvh7-a1y-iSTgUqUr4XlV;#F~`KnsaH%E0}BpoyTvs!J(Tz%8t9RO{R!!ngYA*g
zp){P}e}lGHTu$J)=7}s_%R4tsHxje!A-bdm;!=QDg2Jjc;sU%K@SZjkhdHkZm$m1_
z`EaXDoVgtfKGt3qaU0yyj*FwTkvADRG(NynY+l*EGK@=z!LQm$an6lz<+vm3v~lSA
zn__tw{@S4MnEtlN4gNO`H1+q3b9D5J;?fWuckt#8;eeit%K;?%r{(Ejrr%%*sEL9E
zUeUi3*RD2aMvn{*V?*jshfzx4b^W$@5>D%Ps<sZX_B;CTl^@Gnaq-Tt>-Ac7=U3qq
zeP3;Ut%;+??q_e{8@|+AHT)*NDnOGOa7#Z>!!ZAv0bIL@_;31{C#sVVi*Lvz*-G(I
L{iz?RtpdP5(XW)k

literal 0
HcmV?d00001

diff --git a/src/main.asm b/src/main.asm
new file mode 100644
index 0000000..775c147
--- /dev/null
+++ b/src/main.asm
@@ -0,0 +1,64 @@
+    processor 6502
+
+    org $a000
+
+    WORD .coldstart
+    WORD .warmstart
+    BYTE #$41, #$30, #$c3, #$c2, #$cd
+
+.coldstart:
+    cld
+    sei
+    ;jmp .coldstart
+    jsr $fd8d
+    jsr $fd52
+    jsr $fdf9
+    jsr $e518
+    lda $0288
+    sta $0294
+    jsr $e45b
+    jsr $e3a4
+    jsr $e404
+    cli
+
+.warmstart:
+    lda #$02
+    ldx #$00
+clear_color_ram:
+    sta $9400,x
+    sta $9500,x
+    sta $9600,x
+    sta $9700,x
+    dex
+    bne clear_color_ram
+
+    ldx #$00
+print:
+    lda message,x
+    beq .end
+    sec
+    sbc #$40
+    sta 7724,x
+    sta 7746,x
+    sta 7768,x
+    sta 7790,x
+    inx
+    jmp print
+
+.end:
+
+
+restart:
+    ldx #$00
+loop:
+    stx 7680
+    dex
+    bne loop
+    jmp restart
+
+
+message:
+    BYTE "CIAO DEVELER BY GIOMBA",#$0
+
+. = $bfff
+    BYTE #$ff