- Get this old stuff working (kind of)

.gitignore

@@ -12,6 +12,11 @@ cfg/*
 !Balloon/Balloonr.bin
 !Balloon/Ballon.bin
 !Balloon/Scene1.bin
+!Rick/Pix.bin
+!Rick/Guy.bin
+!Rick/Screen.asm
+!Rick/Halt.asm
+
 
 
 

Rick/Halt.asm

@@ -0,0 +1 @@
+HALT	MACRO	ORCC	#$50	LDS	\2	LDA	#$34	LDX	#$FF00	STA	1,X	STA	3,X	STA	$21,X	STA	$23,X	LDA	,X	LDA	2,X	LDA	$20,X	LDA	$22,X	LDA	#$EE	STA	$90,X	LDA	#8	STA	$92,X	LDA	$92,X	LDA	$93,X	LDA	#$7E	LDX	\1	STA	$10C	STX	$10D	ENDM

Rick/Makefile

@@ -0,0 +1,35 @@
+CFLAGS=
+TARGET=Rick.dsk
+RICK_BAS=Rick.bas
+RICK_BIN=Rick.bin
+MESS_DIR=~/Applications/MacSDLMESS/mame0163
+MESS=$(MESS_DIR)/mess64
+
+$(TARGET) : $(RICK_BAS) $(RICK_BIN)
+	rm -f $@
+	decb dskini $@
+	decb copy $(RICK_BAS) $@,RICK.BAS -t
+	decb attr $@,RICK.BAS -0
+	decb copy $(RICK_BIN) $@,RICK.BIN
+	decb attr $@,RICK.BIN -2 -b
+	decb copy Guy.bin $@,GUY.BIN
+	decb attr $@,Guy.BIN -2 -b
+	decb copy Pix.bin $@,PIX.BIN
+	decb attr $@,PIX.BIN -2 -b
+
+$(RICK_BIN) : Rick.c 
+	cmoc $(CFLAGS) $< 
+
+%.bin : %.c
+	cmoc $(CFLAGS) $< 
+
+clean :
+	rm -rf $(TARGET) $(RICK_BIN) *.i *.lst Rick.asm *.hex
+
+debug : $(TARGET)
+	$(MESS) coco3 -rompath $(MESS_DIR)/roms -window -flop1 $(TARGET) -cfg_directory ../cfgs/rgb
+
+debug_cmp : $(TARGET)
+	$(MESS) coco3 -rompath $(MESS_DIR)/roms -window -flop1 $(TARGET) -cfg_directory ../cfgs/cmp
+
+

Rick/Rick.bas

@@ -0,0 +1,6 @@
+10 POKE55232,0:POKE55318,20
+20 CLEAR200,&H5000
+30 PCLEAR8
+40 LOADM"GUY":LOADM"PIX",6144:LOADM"RICK"
+50 POKE65497,0
+60 RGB

Rick/Rick.c

@@ -0,0 +1 @@
+#pragma org 0x5000void PlayRick();int main() {  PlayRick();  return 0;}asm void PlayRick() {  asm {        jmp STARTRICK1R	EQU	$E00RICK2R	EQU	$108ARICK1L	EQU	$1314RICK2L	EQU	$15B6BADGUY	EQU	$185CBULLET	EQU	$1A9CRICKNL	EQU	$1C6ERICKNR	EQU	$1AB7	INCLUDE	Halt.asm	INCLUDE	Screen.asm	SETDP	$50XAXIS	FCB	$7FYAXIS	FCB	$75MEMAR	FDB	$6240TEMPA	FDB	$4778XCOUNT	FDB	$4F65BUBBLE	FDB	$5056OFFSET	FDB	$5960SCENE	FCB	$4AXGOOD	FCB	$42YGOOD	FCB	$49GDTM1	FDB	$6A00GDTM2	FDB	0DFLAG	FCB	0POINTS	RMB	6TEMRES	FDB	4FLAG	FCB	0FLAG2	FCB	0FLAG3	FCB	0COSFLG	FCB	0PRCOL	FCB	170PRCOUT	FCB	0PRCNT	FCB	0UP1	FCC	/1Up:/	FCB	0FIR	RMB	12BADMEN	RMB	8STACK	RMB	60PRINT	PSHS	U	LDB	YAXIS	CLRA	CMPB	#8	BLO	PSET1	SUBB	#8	CMPB	#8	BLO	PSET2	SUBB	#8	INCAPSET2	INCAPSET1	TST	SCENE	BEQ	PR000	ADDA	#6PR000	STA	$FFA3	LDA	#8	MUL	LDA	#128	MUL	ADDA	#$60	TFR	D,X	LDB	XAXIS	LDA	#4	MUL	ABX	LDY	MEMARPR001	LDA	,Y+	TSTA	BEQ	PREND	SUBA	#33	LDB	#8	MUL	ADDD	#61605	TFR	D,U	LDA	#8	STA	PRCNTPR002	LDA	,U+	BSR	PRTROT	LEAX	124,X	DEC	PRCNT	BNE	PR002	LEAX	-1020,X	BRA	PR001PRTROT	LDB	#4	STB	PRCOUTLDCL	LDB	PRCOL	TSTA	BPL	PRROT1	ANDB	#15PRROT1	ROLA	BPL	PRROT2	ANDB	#240PRROT2	STB	,X+	ROLA	DEC	PRCOUT	BNE	LDCL	RTSPREND	PULS	U	RTSPUT	LDD	OFFSET	SUBD	#2	SUBD	MEMAR	STD	R1+2	STD	END+2	STD	ADDY+2	LDD	XAXIS	ADDA	#2	ANDA	#127	LDX	MEMAR	STA	TEMPA+1	CLR	XCOUNT+1	TST	SCENE	BNE	PNXT	CLRA	BRA	PNXT1PNXT	LDA	#6PNXT1	STA	$FFAB	INCA	STA	$FFAC	INCA	STA	$FFAD	LDA	$FF91	ORA	#1	STA	$FF91	LDA	#128	MUL	ADDD	TEMPA	ADDD	#$6000	TFR	D,YCHEK1	LDD	,X++	INC	XCOUNT+1	INC	XCOUNT+1	CMPA	#$FF	BEQ	ADDYSTA	STD	BUBBLE	LDD	,YR1	STD	800,X	LDA	BUBBLE	TFR	A,B	ANDA	#15	TSTA	BEQ	FLY00	LDB	,Y	ANDB	#240	STB	,Y	ORA	,Y	STA	,YFLY00	LDB	BUBBLE	ANDB	#240	TSTB	BEQ	BLAR	LDA	,Y	ANDA	#15	STA	,Y	ORB	,Y	STB	,YBLAR	LEAY	1,YCHEK03	LDA	BUBBLE+1	ANDA	#15	TSTA	BEQ	FLY01	LDB	,Y	ANDB	#240	STB	,Y	ORA	,Y	STA	,YFLY01	LDB	BUBBLE+1	ANDB	#240	TSTB	BEQ	BLAR1	LDA	,Y	ANDA	#15	STA	,Y	ORB	,Y	STB	,YBLAR1	LEAY	1,Y	BRA	CHEK1ADDY	STD	800,X	LDD	,X++	CMPA	#$FF	BEQ	END	LEAY	128,Y	EXG	Y,D	SUBD	XCOUNT	CLR	XCOUNT+1	EXG	Y,D	BRA	STAEND	STD	800,XENDD	LDA	$FF91	ANDA	#$FE	STA	$FF91	RTSDECOMP	LDX	#$6000	LDA	#3	STA	DFLAG	PSHS	U	LDA	#6	LDB	SCENE	MUL	STB	$FFA3	LDY	#$E00+6144DSUB	LDA	,Y+	CMPA	#$FF	BEQ	DDSTR	STA	,X+	CMPX	#$8000	BLO	DSUB	DEC	DFLAG	BEQ	DSTOP	INC	$FFA3	LDX	#$6000	BRA	DSUBDDSTR	LDD	,Y++	TFR	D,U	LDA	,Y+DSTR0	LEAU	-1,U	STA	,X+	CMPU	#0	BEQ	DSUB	CMPX	#$8000	BLO	DSTR0	DEC	DFLAG	BEQ	DSTOP	LDX	#$6000	INC	$FFA3	BRA	DSTR0DSTOP	PULS	U	RTSCLEAR	LDD	XAXIS	ADDA	#2	ANDA	#127	LDX	MEMAR	STA	TEMPA+1	CLR	XCOUNT+1	TST	SCENE	BNE	CNXT	CLRA	BRA	CNXT1CNXT	LDA	#6CNXT1	STA	$FFAB	INCA	STA	$FFAC	INCA	STA	$FFAD	LDA	$FF91	ORA	#1	STA	$FF91	LDA	#128	MUL	ADDD	TEMPA	ADDD	#$6000	TFR	D,YCCEK1	LDD	,X++	INC	XCOUNT+1	INC	XCOUNT+1	CMPA	#$FF	BEQ	ADDSTA2	STA	,Y+CCEK03	STB	,Y+	BRA	CCEK1ADD	LDD	,X++	CMPA	#$FF	LBEQ	ENDD	LEAY	128,Y	EXG	Y,D	SUBD	XCOUNT	CLR	XCOUNT+1	EXG	Y,D	BRA	STA2SCORE	LDX	#POINTS+3	LDY	#TEMRES+3	ANDCC	#$FE	LDA	,-X	ADCA	#$10	DAA	STA	,-Y	LDA	,-X	ADCA	#0	DAA	STA	,-Y	LDA	,-X	ADCA	#0	DAA	STA	,-Y	LDA	TEMRES	STA	POINTS	PSHS	A	ANDA	#240	RORA	RORA	RORA	RORA	CMPA	#10	BLO	SLOOP3	CLRASLOOP3	TFR	A,B	PULS	A	ANDA	#15	EXG	A,B	ADDD	#$3030	STD	1024	LDA	TEMRES+1 	STA	POINTS+1	PSHS	A	ANDA	#240	RORA	RORA	RORA	RORA	ANDA	#15	TFR	A,B	PULS	A	ANDA	#15	EXG	A,B	ADDD	#$3030	STD	1026	LDA	TEMRES+2	STA	POINTS+2	PSHS	A	ANDA	#240	RORA	RORA	RORA	RORA	TFR	A,B	PULS	A	ANDA	#15	EXG	A,B	ADDD	#$3030	STD	1028	CLR	1030	LDD	#$0600	STD	XAXIS	LDD	#1024	STD	MEMAR	LDA	#170	STA	PRCOL	JSR	CHNGSC	JSR	PRINT	JSR	CHNGSC	JSR	PRINT	RTSCHNGSC	COM	SCENE	TST	SCENE	BEQ	CSC000	LDA	#3	LDB	#8	BRA	CSC001CSC000	LDA	#4	LDB	#9CSC001	STA	$FFA6	STA	$FFAE	STB	$FFA7	STB	$FFAF	RTSINTH	LDA	$FF92	RTIKEYIN	PSHS	U	JSR	[$A000]	PULS	U	RTSJOYIN	PSHS	U	JSR	[$A00A]	PULS	U	RTSSTART	CLR	$71	HALT	#INTH,#STACK+60	LDX	#XAXIS	LDY	#$FFB0PALSET	LDA	,X	CLR	,X+	STA	,Y+	CMPY	#$FFBF	BLO	PALSET	LDX	#BADMENCLRBD	CLR	,X+	CMPX	#BADMEN+8	BLO	CLRBD	CLR	FLAG3	LDX	#$FFA0	CLR	FLAG2SLD	LDA	,X	STA	8,X	LEAX	1,X	CMPX	#$FFA8	BLE	SLD	LDA	#$50	TFR	A,DP	LDX	#0	STX	POINTS	STX	POINTS+2	STX	POINTS+4	STX	FIR	STX	FIR+2	STX	FIR+4	STX	FIR+6	STX	FIR+8	STX	FIR+10	CLR	SCENE	LBSR	DECOMP	INC	SCENE	LBSR	DECOMP	CLR	SCENE	LBSR	CHNGSC	LDD	#135	STD	XGOOD	STD	GDTM1	STD	GDTM2	LDD	#0	STD	POINTS	STD	POINTS+2	STD	POINTS+4	STD	XAXIS	LDD	#UP1	STD	MEMAR	LDA	#170	STA	PRCOL	LBSR	PRINT	LBSR	SCORE	LBSR	CHNGSC	LDD	#$FFFF	STD	$C100	STD	$C102	STD	$C104	LBSR	CHNGSC	LDD	#$FFFF	STD	$C100	STD	$C102	STD	$C104GO	LBSR	KEYIN	CMPA	#13	LBEQ	PAUSEGCONT	LBSR	JOYIN	LDA	$FF00	ANDA	#2	BNE	FSKIP	LBSR	FIREFSKIP	LBSR	BULPUT	LBSR	GENBAD	LBSR	PUTBAD	TST	FLAG2	BEQ	JUMP	LDA	YGOOD	ADDA	#8	STA	YGOOD	DEC	FLAG3	BNE	JSKP	CLR	FLAG2JUMP	LDA	$FF00	ANDA	#8	BEQ	JGO	TST	FLAG3	BEQ	JSKP	INC	FLAG2	BRA	JSKPJGO	LDA	YGOOD	CLR	FLAG2	LDB	FLAG3	CMPB	#8	BLO	JNXT	INC	FLAG2	BRA	JSKPJNXT	SUBA	#8	STA	YGOOD	INC	FLAG3JSKP	LDA	$15C	CMPA	#22	BLO	MOVL	CMPA	#44	BHI	MOVR	LBRA	MOVNNXT	SCREEN	SCENE	LBSR	CHNGSC	LDD	$C000	STD	XAXIS	LDD	#$C100	STD	MEMAR	LBSR	CLEAR	LBSR	CLRBAD	LBSR	FXBLL	LBRA	GOMOVL	INC	COSFLG	LDD	XGOOD	TSTA	BLE	MVL	SUBA	#3MVL	STD	XGOOD	STD	XAXIS	STD	$C000	LDD	#$C100	STD	OFFSET	TST	SCENE	BNE	MOVL0	LDD	#RICK1L	BRA	MOVL1MOVL0	LDD	#RICK2LMOVL1	STD	MEMAR	LBSR	PUT	LBRA	NXTMOVR	CLR	COSFLG	LDD	XGOOD	CMPA	#112	BHI	MVR	ADDA	#3MVR	STD	XAXIS	STD	XGOOD	STD	$C000	LDD	#$C100	STD	OFFSET	TST	SCENE	BNE	MOVR0	LDD	#RICK1R	BRA	MOVL1MOVR0	LDD	#RICK2R	BRA	MOVL1MOVN	TST	COSFLG	BEQ	MOVN0	LDA	$15D	CMPA	#40	BLO	MOVNU	TST	FLAG3	BNE	MOVNU	LDD	#RICKNR	BRA	MOVN1MOVNU	LDD	#RICK1L	BRA	MOVN1MOVN0	LDA	$15D	CMPA	#40	BLO	MOVN2	TST	FLAG3	BNE	MOVN2	LDD	#RICKNL	BRA	MOVN1MOVN2	LDD	#RICK1RMOVN1	STD	MEMAR	LDD	#$C100	STD	OFFSET	LDD	XGOOD	STD	$C000	STD	XAXIS	LBSR	PUT	LBRA	NXTPAUSE	LBSR	KEYIN	CMPA	#13	BNE	PAUSE	LBRA	GCONTFIRE	LDX	#FIRFSUB	LDA	,X	TSTA	BEQ	FYES	LEAX	4,X	CMPX	#FIR+12	BHS	FEND	BRA	FSUBFYES	LDA	COSFLG	INC	,X+	STA	,X+	LDD	XGOOD	ADDB	#22	STD	,X	LEAX	-FIR,X	TFR	X,D	LDA	#8	MUL	TFR	D,X	LBSR	CHNGSC	LDD	#$FFFF	STD	$C400,X	STD	$C402,X	LBSR	CHNGSCFEND	RTSBULPUT	LDX	#FIRBLLSUB	LDA	,X+	CMPA	#137	BEQ	BLLPLS	TSTA	BNE	BLLYESBLLPLS	LEAX	3,X	CMPX	#FIR+12	BLO	BLLSUB	RTSBLLYES	PSHS	X	LDB	,X+	TSTB	BEQ	BLLR	LDD	,X	CMPA	#5	BLE	BRSET	SUBA	#5BLLSB	STD	XAXIS	STD	,X	LEAX	-FIR,X	STD	$C002,X	TFR	X,D	LDA	#8	MUL	ADDD	#$C400	STD	OFFSET	LDD	#BULLET	STD	MEMAR	LBSR	PUT	PULS	X	BRA	BLLPLSBRSET	LEAX	-2,X	LDA	#137	STA	,X	PULS	X	BRA	BLLPLSBLLR	LDD	,X	CMPA	#120	BHS	BRSET	ADDA	#5	BRA	BLLSBFXBLL	LDX	#FIR+12FXSUB	LEAX	-4,X	LDA	,X++	CMPA	#137	BEQ	FXCLR	TSTA	BEQ	FXBL2	BRA	FXNXTFXCLR	LEAX	-2,X	CLR	,X	LEAX	2,X	BRA	FXNXTFXBL2	LEAX	-2,X	CMPX	#FIR	BHI	FXSUB	RTSFXNXT	PSHS	X	LEAX	-FIR,X	LDD	$C002,X	STD	XAXIS	TFR	X,D	LDA	#8	MUL	ADDD	#$C400	STD	MEMAR	LBSR	CLEAR	PULS	X	BRA	FXBL2PUTBAD	LDX	#BADMENPDLOAD	LDA	,X+	BNE	FBDLOCBDPLUS	LEAX	3,X	CMPX	#BADMEN+8	BLO	PDLOAD	RTSFBDLOC	PSHS	X	LDD	,X++	TST	,X	BEQ	PTBDRT	SUBA	#4	BRA	PBDNXTPTBDRT	ADDA	#4PBDNXT	STD	XAXIS	STD	-2,X	LEAX	-BADMEN,X	STD	$C020,X	TFR	X,D	LDA	#150	MUL	TFR	D,X	LEAX	$C600,X	STX	OFFSET	LDY	#BADGUY	STY	MEMAR	LBSR	PUT	PULS	X	BRA	BDPLUSGENBAD	LDX	#BADMENGENLD	LDA	,X	BEQ	BDMARK	LEAX	4,X	CMPX	#BADMEN+8	BLO	GENLD	RTSBDMARK	INC	,X+	TST	SCENE	BNE	BDLFT	LDD	#$208B	STD	,X++	CLR	,X	BRA	BDCAREBDLFT	LDD	#$8B	STD	,X++	LDA	#1	STA	,XBDCARE	LEAX	-BADMEN,X	TFR	X,D	LDA	#150	MUL	ADDD	#$C600	TFR	D,X	PSHS	X	JSR	CHNGSC	PULS	X	LDD	#$FFFF	STD	,X++	STD	,X++	JSR	CHNGSC	RTSCLRBAD	LDX	#BADMEN+8BDTST	LEAX	-4,X	LDA	,X	TSTA	BNE	BDCYESBCLRSB	CMPX	#BADMEN	BHI	BDTST	RTSBDCYES	PSHS	X	LEAX	3,X	LEAX	-BADMEN,X	LDD	$C020,X	STD	XAXIS	TFR	X,D	LDA	#150	MUL	TFR	D,X	LEAX	$C600,X	STX	MEMAR	LBSR	CLEAR	PULS	X	BRA	BCLRSB	  }}

Rick/Screen.asm

@@ -0,0 +1 @@
+SCREEN MACRO	ANDCC	#$EF	CWAI	#$EF	ORCC	#$50	LDA	$FF90	ANDA	#127	STA	$FF90	LDA	#128	STA	$FF98	LDA	#26	STA	$FF99	CLR	$FF9E	LDA	\1	TSTA	BNE	Screen1Screen0		CLRA	BRA	FinishScreen1	LDA	#24Finish	STA	$FF9D	ENDM