H

README.md

@@ -1,10 +1,8 @@
-# Among-Us-Drip-C64
+# Among Us Drip C64
 
 It's the Among Us drip meme on a Commodore 64. What else did you expect? 
 
-Created by:
+Created by IanSkinner1982 (code, sound and graphics)
 
-	- IanSkinner1982
-	
-SID play code from https://youtu.be/LzXJifSjFpk.
+SID playing code from https://youtu.be/LzXJifSjFpk.
 

prg.bas

@@ -0,0 +1,19 @@
+10 ifx=3then150
+20 ifx=2then130
+30 poke53280,0:poke53281,0:?"{clear}copyright (c) 2022 very terrible code":?"loading..."
+40 me=49152
+50 readop
+60 ifop>998thengoto100
+70 pokeme,op
+80 me=me+1
+90 goto50
+100 goto120
+110 data120,169,0,32,0,16,32,3,16,173,18,208,201,112,208,249,173,1,220,201,255,240,239,169,0,141,24,212,88,96,999
+120 x=2:load"sustune.dat",8,1
+130 poke56,92:print"hold on you sussy baka! i'm still loading!"
+140 x=3:load"susground.kla",8,1
+150 poke88,0:poke89,95:poke90,64:poke91,130:poke781,4:poke782,0:sys41964
+160 poke88,0:poke89,219:poke90,40:poke91,134:poke781,4:poke782,0:sys41964
+170 poke56576,150
+180 v=53248:pokev+17,59:pokev+22,216:pokev+24,121:pokev+32,0:pokev+33,0
+190 sys49152:goto190

prg.txt

@@ -1,33 +0,0 @@
-0 ifx=3then310
-5 ifx=2then300
-7 ?"copyright (c) 2021 very terrible code{return}program by ianskinner1982":?"loading the sus"
-10 me=49152:rem here be stolen code
-20 readop
-30 ifop>998thengoto99
-40 pokeme,op
-50 me=me+1
-60 goto20
-99 goto250
-100 data120:rem sei
-110 data169,0:rem lda #0
-120 data32,0,16:rem jsr $1000
-130 data32,3,16:rem jsr $1003
-140 data173,18,208:rem lda $d012
-150 data201,112:rem cmp #112
-160 data208,249:rem bne l140
-170 data173,1,220:rem lda $dc01
-180 data201,255:rem cmp #$ff
-190 data240,239:rem bne l130
-200 data169,0:rem lda #0
-210 data141,24,212:rem sta $d418
-220 data88:rem cli
-230 data96:rem rts
-240 data999
-250 x=2:load"sustune.dat",8,1
-300 poke56,92:print"hold on you sussy baka! i'm still loading!"
-305 x=3:load"sus.kla",8,1
-310 poke88,0:poke89,95:poke90,64:poke91,130:poke781,4:poke782,0:sys41964:rem copy memory i think.
-320 poke88,0:poke89,219:poke90,40:poke91,134:poke781,4:poke782,0:sys41964:rem more of the same. probably.
-330 poke56576,150:rem i dunno man
-340 v=53248:pokev+17,59:pokev+22,216:pokev+24,121:pokev+32,0:pokev+33,0:rem help
-350 sys49152:goto350