Apple-2-SW
/
antoine-source
mirror of https://github.com/antoinevignau/source.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

First commit 

First commit
This commit is contained in:
Antoine Vignau 2020-11-04 15:56:43 +01:00
parent 8aef8fd71e
commit b8822210c0
18 changed files with 72049 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.DS_Store vendored Normal file
View File

Binary file not shown.

BIN
genesys/.DS_Store vendored Normal file
View File

Binary file not shown.

7
genesys/GEMAIN.E.S Normal file
View File

@ -0,0 +1,7 @@
* TFBD generated equates
* (c) PHC 1992,93
BUTN0 EQU $C061
GSOS EQU $E100A8

27392
genesys/GEMAIN.S Normal file
View File

File diff suppressed because it is too large Load Diff

12
genesys/GEMAIN.X.S Normal file
View File

@ -0,0 +1,12 @@
* TFBD generated externals
* (c) PHC 1992,93
EXT L042C42
EXT L030000
EXT L0300C8
EXT L0429E3
EXT L040000
EXT L030067
EXT L030108

209
genesys/GESEG3.S Normal file
View File

@ -0,0 +1,209 @@
*
* Genesys v1.2.4
* Main program: segment 3
*
mx %00
rel
lst off
*----------------------------
use 4/Ctl.Macs
use 4/Int.Macs
use 4/Line.Macs
use 4/Mem.Macs
use 4/Menu.Macs
use 4/QD.Macs
use 4/QDAux.Macs
use 4/Resource.Macs
use 4/Text.Macs
use 4/Util.Macs
use 4/Window.Macs
use GESEG3.X.S
*----------------------------
L030000 ENT
CMP #$0000
BEQ L030032
PHB
PHX
PHY
PHK
PLB
STA L030033
_InitCursor
PEA $0000
PEA $0001
PEA ^L030035
PEA L030035
LDA L030033
PHA
_ErrorWindow
PLA
PLY
PLX
LDA L030033
PLB
L030032 RTL
L030033 DW $0000
L030035 STR 'GENESYS internal error'
PEA $0000
PEA $0004
PEA $0000
PEA $0000
PEA $0000
PEA $0002
_AlertWindow
PLA
RTL
L030067 ENT
PHB
PHD
PHK
PLB
PHA
PHA
TSC
TCD
LDA [$0B]
STA $01
LDY #$0002
LDA [$0B],Y
STA $03
LDY #$000A
LDA [$01],Y
STA $0B
INY
INY
LDA [$01],Y
STA $0D
LDA $0B
STA $01
LDA $0D
STA $03
LDA [$0F]
STA $0B
LDY #$0002
LDA [$0F],Y
STA $0D
LDY #$000A
LDA [$0B],Y
STA $0F
INY
INY
LDA [$0B],Y
STA $11
LDA $05
STA $0D
LDA $07
STA $0B
LDA $0F
STA $05
LDA $11
STA $07
LDA $09
STA $11
LDA $0B
STA $0F
JSL L02BD95
PLY
PLY
PLD
PLB
RTL
L0300C8 ENT
PHD
PHB
PHK
PLB
TSC
TCD
LDA $0B
STA [$07]
INC $07
INC $07
LDA $0D
STA [$07]
INC $07
INC $07
LDA $07
STA $0B
LDA $09
STA $0D
LDA [$0F]
AND #$00FF
TAY
L0300EC LDA [$0F],Y
STA [$0B],Y
INC $07
BNE L0300F6
INC $09
L0300F6 DEY
BPL L0300EC
PLA
STA $0B,S
PLA
STA $0B,S
PLA
STA $0B,S
PLA
PLX
PLY
PLB
PLD
RTL
L030108 ENT
PHB
PHD
PHK
PLB
TSC
TCD
LDY #$0002
LDA [$07],Y
CLC
ADC #$0002
TAY
L030118 LDA [$07],Y
PHA
DEY
DEY
CPY #$0002
BNE L030118
LDA [$07]
ASL
ASL
TAX
PHK
PEA L030137
SEP #$20
LDA L030143+2,X
PHA
REP #$20
LDA L030143,X
PHA
L030137 RTL
TAY
PLD
PLA
STA $03,S
PLA
STA $03,S
TYA
PLB
RTL
L030143 ADRL $00000000
ADRL L0276F0
ADRL L02A8F0
ADRL L029CFD
ADRL L027DF7
DW $0000

10
genesys/GESEG3.X.S Normal file
View File

@ -0,0 +1,10 @@
* TFBD generated externals
* (c) PHC 1992,93
EXT L02BD95
EXT L0276F0
EXT L02A8F0
EXT L029CFD
EXT L027DF7

5370
genesys/GESEG4.S Normal file
View File

File diff suppressed because it is too large Load Diff

122
genesys/GESEG4.X.S Normal file
View File

@ -0,0 +1,122 @@
* TFBD generated externals
* (c) PHC 1992,93
EXT L025A27
EXT L026AB5
EXT L02C243
EXT L02CA27
EXT L027CEB
EXT L02DCF2
EXT L02D6DE
EXT L02DBC3
EXT L02C78E
EXT L02C68C
EXT L02ACFE
EXT L02C7C2
EXT L02C751
EXT L02DC66
EXT L02DD98
EXT L02C277
EXT L024112
EXT L027EA9
EXT L027EA7
EXT L027EB0
EXT L027EAF
EXT L027ECF
EXT L027ECD
EXT L027EB7
EXT L027EB5
EXT L027ECB
EXT L027EC1
EXT L027EBF
EXT L028230
EXT L027EBD
EXT L027EBB
EXT L0280F7
EXT L0280F5
EXT L027EEF
EXT L027EED
EXT L0280AF
EXT L0280AD
EXT L0280AB
EXT L027EF3
EXT L027EF5
EXT L027EEB
EXT L0280F1
EXT L027F61
EXT L0280F3
EXT L027EB9
EXT L027EC5
EXT L027EC3
EXT L028258
EXT L02825C
EXT L028260
EXT L028264
EXT L028268
EXT L02826C
EXT L028270
EXT L028274
EXT L028278
EXT L02827C
EXT L027ED5
EXT L027ED7
EXT L027F63
EXT L027F65
EXT L027F67
EXT L027F5F
EXT L027EC9
EXT L027EC7
EXT L028732
EXT L028730
EXT L027F71
EXT L027F3D
EXT L027F07
EXT L028854
EXT L028075
EXT L0280BD
EXT L027F03
EXT L0280B5
EXT L027F05
EXT L0280B3
EXT L0280C3
EXT L0280DF
EXT L0280E1
EXT L028856
EXT L028071
EXT L027ED9
EXT L027EDB
EXT L028073
EXT L02809B
EXT L02809D
EXT L027EDD
EXT L027EE1
EXT L027EDF
EXT L027EB3
EXT L027ED3
EXT L027ED1
EXT L02812B
EXT L027EAB
EXT L027EB1
EXT L028232
EXT L02822B
EXT L028266
EXT L027EAD
EXT L02826A
EXT L0280B1
EXT L02826E
EXT L028814
EXT L028772
EXT L028770
EXT L028824
EXT L028878
EXT L0220FD
EXT L02ACEC
EXT L02CA2C
EXT L026E47
EXT L02CA0D
EXT L02CA46
EXT L02D6AD
EXT L02DB10
EXT L02C377

26
genesys/MAKE.GENESYS.S Normal file
View File

@ -0,0 +1,26 @@
*
* Genesys v1.2.4
* Make control
*
* Expansion linker file
DSK Genesys
TYP $B3
* Assemble files
XPL
ASM GEMAIN.S
KND $0000
SNA Genesys
ASM GESEG3.S
KND $0000
SNA K_SEIDULE
ASM GESEG4.S
KND $0000
SNA K_SEIDULE

23
genesys/edit/MAKE.CONTROL.S Normal file
View File

@ -0,0 +1,23 @@
*
* Genesys v1.2.4
* Make control
*
* Expansion linker file
DSK Control
TYP $BC
* Assemble files
XPL
ASM MMCONTROL.S
KND $0000
SNA Control
ASM MMDIALOGS.S
KND $0000
SNA MMDialogs

19
genesys/edit/MAKE.TOOLTABLE.S Normal file
View File

@ -0,0 +1,19 @@
*
* Genesys v1.2.4
* Make tooltable
*
* Expansion linker file
DSK ToolTable
TYP $BC
* Assemble files
XPL
ASM TOOLTABLE.S
KND $0000
SNA ToolTable

24537
genesys/edit/MMCONTROL.S Normal file
View File

File diff suppressed because it is too large Load Diff

28
genesys/edit/MMCONTROL.X.S Normal file
View File

@ -0,0 +1,28 @@
* TFBD generated externals
* (c) PHC 1992,93
ext doRECTANGLE
ext doTHERMOMETER
EXT L030057
EXT L0310E1
EXT L03447D
EXT L03455D
EXT L03463D
EXT L03471D
EXT L030853
EXT L030B5F
EXT L030E51
EXT L03143D
EXT L03171C
EXT L0322D6
EXT L0327DA
EXT L032B88
EXT L032D53
EXT L032F4A
EXT L0334C2
EXT L0337FF
EXT L033A79
EXT L033CF3
EXT L030524

8970
genesys/edit/MMDIALOGS.S Normal file
View File

File diff suppressed because it is too large Load Diff

45
genesys/edit/MMDIALOGS.X.S Normal file
View File

@ -0,0 +1,45 @@
* TFBD generated externals
* (c) PHC 1992,93
ext keyMask
ext pwChar
ext showRECTANGLE
ext showTHERMOMETER
ext strRECTD2
ext strRECTF2
EXT L02C5F5
EXT L020419
EXT L02892D
EXT L028CE3
EXT L0203E3
EXT L02B5CB
EXT L029680
EXT L0299A5
EXT L02C444
EXT L02C4DA
EXT L029C59
EXT L029F0F
EXT L02A20A
EXT L02A6F9
EXT L02AB20
EXT L02AF0F
EXT L02B155
EXT L02B3BD
EXT L02C5AB
EXT L02C957
EXT L02BDAD
EXT L02BAAD
EXT L02B99B
EXT L02B99D
EXT L02B9AD
EXT L02B9A9
EXT L02B9AB
EXT L02BCAD
EXT L02BBAD
EXT L02B9A7
EXT L02B9A5
EXT L02B99F
EXT L02B9A1
EXT L02B9A3
EXT L02BEAD

5279
genesys/edit/TOOLTABLE.S Normal file
View File

File diff suppressed because it is too large Load Diff

BIN
genesys/genesys_2020.po Normal file
View File

Binary file not shown.