tfv: start work on ill-advised new project

This commit is contained in:
Vince Weaver 2017-04-30 22:24:49 -04:00
parent b483313d94
commit 1f8c57d71e
10 changed files with 196 additions and 0 deletions

21
tfv/Apple II Lowres.gpl Normal file
View File

@ -0,0 +1,21 @@
GIMP Palette
Name: Apple II Lowres
Columns: 0
#
0 0 0 Untitled
227 30 96 Untitled
96 78 189 Untitled
255 68 253 Untitled
0 163 96 Untitled
156 156 156 Untitled
20 207 253 Untitled
208 195 255 Untitled
96 114 3 Untitled
255 106 60 Untitled
157 157 157 Untitled
255 160 208 Untitled
20 245 60 Untitled
208 221 141 Untitled
114 255 208 Untitled
255 255 255 Untitled

16
tfv/Makefile Normal file
View File

@ -0,0 +1,16 @@
include ../Makefile.inc
DOS33 = ../dos33fs-utils/dos33
PNG2GR = ../gr-utils/png2gr
all: tfv.dsk
tfv.dsk: TITLE.GR
$(DOS33) -y tfv.dsk BSAVE -a 0x400 TITLE.GR
TITLE.GR: title.png
$(PNG2GR) title.png TITLE.GR
clean:
rm -f *~ TITLE.GR

156
tfv/duet.s Normal file
View File

@ -0,0 +1,156 @@
/***************************************************************************
* Copyright (C) 1979-2015 by Paul Lutus *
* http://arachnoid.com/administration *
* *
* This program is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
* *
* This program is distributed in the hope that it will be useful, *
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
* GNU General Public License for more details. *
* *
* You should have received a copy of the GNU General Public License *
* along with this program; if not, write to the *
* Free Software Foundation, Inc., *
* 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
***************************************************************************/
/* Electric Duet Player Routine circa 1980 */
$0900> A9 01: LDA #$01 ; 2 *!*
$0902> 85 09: STA $09 ; 3
$0904> 85 1D: STA $1D ; 3
$0906> 48: PHA ; 3
$0907> 48: PHA ; 3
$0908> 48: PHA ; 3
$0909> D0 15: BNE $0920 ; 4 *!* blah1
blah2:
$090B> C8: INY ; 2
$090C> B1 1E: LDA ($1E),Y ; 5 *!*
$090E> 85 09: STA $09 ; 3
$0910> C8: INY ; 2
$0911> B1 1E: LDA ($1E),Y ; 5 *!*
$0913> 85 1D: STA $1D ; 3
$0915> A5 1E: LDA $1E ; 3 *!*
$0917> 18: CLC ; 2
$0918> 69 03: ADC #$03 ; 2 *!*
$091A> 85 1E: STA $1E ; 3
$091C> 90 02: BCC $0920 ; 4 *!*
blah1
$091E> E6 1F: INC $1F ; 5
blah1:
$0920> A0 00: LDY #$00 ; 2 *!*
$0922> B1 1E: LDA ($1E),Y ; 5 *!*
$0924> C9 01: CMP #$01 ; 2
$0926> F0 E3: BEQ $090B ; 4 *!*
blah2
$0928> B0 0D: BCS $0937 ; 4 *!*
$092A> 68: PLA ; 4
$092B> 68: PLA ; 4
$092C> 68: PLA ; 4
blah5:
$092D> A2 49: LDX #$49 ; 2 *!*
$092F> C8: INY ; 2
$0930> B1 1E: LDA ($1E),Y ; 5 *!*
$0932> D0 02: BNE $0936 ; 4 *!*
$0934> A2 C9: LDX #$c9 ; 2 *!*
$0936> 60: RTS ; 6
blah3:
$0937> 85 08: STA $08 ; 3
$0939> 20 2D09: JSR $092D ; 6
blah5
$093C> 8E 8309: STX $0983 ; 4
$093F> 85 06: STA $06 ; 3
$0941> A6 09: LDX $09 ; 3 *!*
$0943> 4A: LSR A ; 2
$0944> CA: DEX ; 2
$0945> D0 FC: BNE $0943 ; 4 *!*
$0947> 8D 7C09: STA $097C ; 4
$094A> 20 2D09: JSR $092D ; 6
$094D> 8E BB09: STX $09BB ; 4
$0950> 85 07: STA $07 ; 3
$0952> A6 1D: LDX $1D ; 3 *!*
$0954> 4A: LSR A ; 2
$0955> CA: DEX ; 2
$0956> D0 FC: BNE $0954 ; 4 *!*
$0958> 8D B409: STA $09B4 ; 4
$095B> 68: PLA ; 4
$095C> A8: TAY ; 2
$095D> 68: PLA ; 4
$095E> AA: TAX ; 2
$095F> 68: PLA ; 4
$0960> D0 03: BNE $0965 ; 4 *!*
$0962> 2C 30C0: BIT $C030 ; 4
$0965> C9 00: CMP #$00 ; 2
$0967> 30 03: BMI $096C ; 4 *!*
$0969> EA: NOP ; 2
$096A> 10 03: BPL $096F ; 4 *!*
$096C> 2C 30C0: BIT $C030 ; 4
$096F> 85 4E: STA $4E ; 3
$0971> 2C 00C0: BIT $C000 ; 4
$0974> 30 C0: BMI $0936 ; 4 *!*
$0976> 88: DEY ; 2
$0977> D0 02: BNE $097B ; 4 *!*
$0979> F0 06: BEQ $0981 ; 4 *!*
$097B> C0 00: CPY #$00 ; 2
$097D> F0 04: BEQ $0983 ; 4 *!*
$097F> D0 04: BNE $0985 ; 4 *!*
$0981> A4 06: LDY $06 ; 3 *!*
$0983> 49 40: EOR #$40 ; 2 *!*
$0985> 24 4E: BIT $4E ; 3
$0987> 50 07: BVC $0990 ; 4 *!*
$0989> 70 00: BVS $098B ; 4 *!*
$098B> 10 09: BPL $0996 ; 4 *!*
$098D> EA: NOP ; 2
$098E> 30 09: BMI $0999 ; 4 *!*
$0990> EA: NOP ; 2
$0991> 30 03: BMI $0996 ; 4 *!*
$0993> EA: NOP ; 2
$0994> 10 03: BPL $0999 ; 4 *!*
$0996> CD 30C0: CMP $C030 ; 4
$0999> C6 4F: DEC $4F ; 5
$099B> D0 11: BNE $09AE ; 4 *!*
$099D> C6 08: DEC $08 ; 5
$099F> D0 0D: BNE $09AE ; 4 *!*
$09A1> 50 03: BVC $09A6 ; 4 *!*
$09A3> 2C 30C0: BIT $C030 ; 4
$09A6> 48: PHA ; 3
$09A7> 8A: TXA ; 2
$09A8> 48: PHA ; 3
$09A9> 98: TYA ; 2
$09AA> 48: PHA ; 3
$09AB> 4C 1509: JMP $0915 ; 3
$09AE> CA: DEX ; 2
$09AF> D0 02: BNE $09B3 ; 4 *!*
$09B1> F0 06: BEQ $09B9 ; 4 *!*
$09B3> E0 00: CPX #$00 ; 2
$09B5> F0 04: BEQ $09BB ; 4 *!*
$09B7> D0 04: BNE $09BD ; 4 *!*
$09B9> A6 07: LDX $07 ; 3 *!*
$09BB> 49 80: EOR #$80 ; 2 *!*
$09BD> 70 A3: BVS $0962 ; 4 *!*
$09BF> EA: NOP ; 2
$09C0> 50 A3: BVC $0965 ; 4 *!*

1
tfv/sprites.piskel Normal file
View File

@ -0,0 +1 @@
{"modelVersion":2,"piskel":{"name":"sprites","description":"","fps":2,"height":40,"width":80,"layers":["{\"name\":\"Layer 1\",\"opacity\":0.5,\"frameCount\":2,\"chunks\":[{\"layout\":[[0],[1]],\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAAoCAYAAAB5LPGYAAABF0lEQVR4nO3YzW3CMBiAYaSuxZEzM/TMsXt0BxZhhyzQUZB7wRG1FLX+aWyj55F85FPyYieIwwEAAAAAAICdLF+f4Xn1vp7Z6FcphgvXJYTrImAm/R5KT+BWwNx5sz8J9Ku0hrgcQ7gcq288d97sTwL9KtWenPfzLTyv0hMcA84WUr9KrQKWzpv9FaLfL9IL3Fql82pPcPoFjEa/RloF3Jr36gH1a6RVwHRebcC4wukewuk+bNDR+5Vex+5a/WZYA368/Vh//fx04R5G7Tf6AV7l/m3wX/Nm2YDx/tLVa960T77IBsyT3l+rDVg6L+02S8eVDVind7+X2YCtQha/Sgp/+/TWu1/aa7Z+AAAAAAAAAAAAwP6+AVvhyi6VmIOlAAAAAElFTkSuQmCC\"}]}"]}}

BIN
tfv/sprites.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 359 B

BIN
tfv/tfv.dsk Normal file

Binary file not shown.

1
tfv/title.piskel Normal file
View File

@ -0,0 +1 @@
{"modelVersion":2,"piskel":{"name":"tfv","description":"","fps":12,"height":40,"width":80,"layers":["{\"name\":\"Layer 1\",\"opacity\":1,\"frameCount\":1,\"chunks\":[{\"layout\":[[0]],\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAFAAAAAoCAYAAABpYH0BAAAB0klEQVRoge3avW3DMBAFYA3hOpOkTJ0ZtJA3YBHAc2SGaAFXniGloRQSBZjg6XiPx9/QwANsESbIz0dTsjxN07SORGV7Mn9+N58qAC8/T2/cwUqP+/qmILi+qX6MMasx5mWCj7fZm+m2hfwwuHYUMLQ9BAZ9XTWgtMIQQLRv7nhTgCUqEAF0IS2MGxeObA/dRGIrMAR3AIKA6CbSFGCLOQNMfhpjYwfRcooCjoCA1O7aa5IBcl/coRsDcpoj6S92k1Nc7jJAaTsKGNrOwRYDRAcmnbC0YpsB5CaGVpoUEK1Qrv/qK1ALEB1XN4Cpl3B1Ffhfog5oU/oqoparluPaWQo48goYAFl+sDVAAXB+wMvve1RSTHK5X9flfg0+HgMIRBnwNm8pAIeAqgMesRBMKMCYXS4lHHWPBFi6DOAebhfTBLQQsamjApmQS1cBcP1aoHQBGPPrcE5AhaWLAaaoPBJwf9h27njTgBr3JXJUYPZNJEfliQA/nlt6AdS8I+bupl44D2ATu3CK8z0RYMDSHYADUAfQvrZA1PeUbafefxb3Q+gCkJskFY2+uwRMMWH7E392wCM7XGuA1D0UhbFhb0z5hx5qsmcpABcHmCIInBY0mj+cujaiUF9VMQAAAABJRU5ErkJggg==\"}]}"]}}

BIN
tfv/title.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 523 B

1
tfv/worldmap.piskel Normal file
View File

@ -0,0 +1 @@
{"modelVersion":2,"piskel":{"name":"worldmap","description":"","fps":12,"height":40,"width":80,"layers":["{\"name\":\"Layer 1\",\"opacity\":1,\"frameCount\":1,\"chunks\":[{\"layout\":[[0]],\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAFAAAAAoCAYAAABpYH0BAAABwklEQVRoge3YwW3DMAwFUAFeIeNkGJ979B7dQDp1oGaBjtFjoJ5kxHQZkhIdSg4F/EOcRA6fKdlIuHzfs6c+wfoHjB4HdEAH7CJwqANiw7pwLbDa+lBA6bAG0Ybj1icCjDGuGQ2ydYgBS2KMOaXUfCLrPF78Zw0AP0fNy94D4cTSE/USClI632nuwlYrYHhAbAk6oBDOAYWZlynPy7QDLMep799+Plk5PSAV7Pv548pKN4Dlii75Jkr4mjcphUGo8n557KIgu+lAWCAWKSA2D7fzMGB4IZo7kAtQG63OW/c8pAMhVHmdUsoxRhwSGewaewPE5sHgKNASuLQhYAghhxB2NyMzQOslK13S2HlfDgg3YS4gtVdxQbgd+AxIBG7deRggtVS5sFjK3khdsPJgjkJaw3E78ail3Lz0ewWE4e6hrUDcu7waoBacVri/WwIHl/EG8myAUsjaznVAIeR/XTgvkwNKQdX3QGtI+NypVQ87owFag11+r5uoP0ifDW4HBo4f/meCFpx1p2E5HHC0UB3ngEw470AhXC3k2wKSMMjndvDWhfQGJwa1LsgasBnWuqBeOk8KvM5tXdirASlQaUf+Ae/t6N9rwExgAAAAAElFTkSuQmCC\"}]}"]}}

BIN
tfv/worldmap.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 507 B