mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-02-04 14:35:41 +00:00
tfv: start work on ill-advised new project
This commit is contained in:
parent
b483313d94
commit
1f8c57d71e
21
tfv/Apple II Lowres.gpl
Normal file
21
tfv/Apple II Lowres.gpl
Normal 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
16
tfv/Makefile
Normal 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
156
tfv/duet.s
Normal 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
1
tfv/sprites.piskel
Normal 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
BIN
tfv/sprites.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 359 B |
BIN
tfv/tfv.dsk
Normal file
BIN
tfv/tfv.dsk
Normal file
Binary file not shown.
1
tfv/title.piskel
Normal file
1
tfv/title.piskel
Normal 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
BIN
tfv/title.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 523 B |
1
tfv/worldmap.piskel
Normal file
1
tfv/worldmap.piskel
Normal 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
BIN
tfv/worldmap.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 507 B |
Loading…
x
Reference in New Issue
Block a user