v1.3.6 - New feaetures
Edition of resources in system ID range added. Source file generation bug fix.
This commit is contained in:
parent
b0f41ef13f
commit
3f71382330
326
genesys/GEMAIN.S
326
genesys/GEMAIN.S
File diff suppressed because it is too large
Load Diff
|
@ -62,11 +62,9 @@ L040000 ENT
|
||||||
LDA [$01],Y
|
LDA [$01],Y
|
||||||
PHA
|
PHA
|
||||||
_SetCurResourceFile
|
_SetCurResourceFile
|
||||||
* STA L02DD98
|
|
||||||
PHA
|
PHA
|
||||||
PEA $0001
|
PEA $0001
|
||||||
_SetResourceFileDepth
|
_SetResourceFileDepth
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0B
|
STA $0B
|
||||||
JSL L040D38
|
JSL L040D38
|
||||||
|
@ -91,7 +89,6 @@ L040000 ENT
|
||||||
PHA
|
PHA
|
||||||
PEI $0B
|
PEI $0B
|
||||||
_SetResourceFileDepth
|
_SetResourceFileDepth
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0B
|
STA $0B
|
||||||
LDA $07
|
LDA $07
|
||||||
|
@ -236,7 +233,6 @@ L0401BB PEA $2001
|
||||||
PHA
|
PHA
|
||||||
PEI $0B
|
PEI $0B
|
||||||
_SetResourceFileDepth
|
_SetResourceFileDepth
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0B
|
STA $0B
|
||||||
LDA $07
|
LDA $07
|
||||||
|
@ -271,7 +267,6 @@ L040217 LDA #$0002
|
||||||
PHA
|
PHA
|
||||||
PEI $0B
|
PEI $0B
|
||||||
_SetResourceFileDepth
|
_SetResourceFileDepth
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0B
|
STA $0B
|
||||||
LDA $07
|
LDA $07
|
||||||
|
@ -287,7 +282,6 @@ L040279 PEA ^L027F61
|
||||||
STA [$01]
|
STA [$01]
|
||||||
PHA
|
PHA
|
||||||
_CountTypes
|
_CountTypes
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0D
|
STA $0D
|
||||||
LDX L027EC1
|
LDX L027EC1
|
||||||
|
@ -341,7 +335,6 @@ L040307 TAX
|
||||||
L04030D PHA
|
L04030D PHA
|
||||||
PEI $07
|
PEI $07
|
||||||
_GetIndType
|
_GetIndType
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $17
|
STA $17
|
||||||
CMP #$8014
|
CMP #$8014
|
||||||
|
@ -386,7 +379,6 @@ L040371 PHA
|
||||||
PHA
|
PHA
|
||||||
PEI $17
|
PEI $17
|
||||||
_CountResources
|
_CountResources
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
PLX
|
PLX
|
||||||
STA $0F
|
STA $0F
|
||||||
|
@ -430,7 +422,6 @@ L0403CA PHA
|
||||||
L0403D7 PHX
|
L0403D7 PHX
|
||||||
PHA
|
PHA
|
||||||
_GetIndResource
|
_GetIndResource
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $19
|
STA $19
|
||||||
PLA
|
PLA
|
||||||
|
@ -459,7 +450,6 @@ L0403D7 PHX
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_GetResourceAttr
|
_GetResourceAttr
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $11
|
STA $11
|
||||||
PEA $000C
|
PEA $000C
|
||||||
|
@ -469,7 +459,6 @@ L0403D7 PHX
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_SetResourceAttr
|
_SetResourceAttr
|
||||||
* STA L02DD98
|
|
||||||
PHA
|
PHA
|
||||||
PHA
|
PHA
|
||||||
PEI $17
|
PEI $17
|
||||||
|
@ -478,7 +467,6 @@ L0403D7 PHX
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_LoadResource
|
_LoadResource
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $21
|
STA $21
|
||||||
PLA
|
PLA
|
||||||
|
@ -488,7 +476,6 @@ L0403D7 PHX
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HLock
|
_HLock
|
||||||
* STA L02DD98
|
|
||||||
PEI $11
|
PEI $11
|
||||||
PEI $17
|
PEI $17
|
||||||
LDX $1B
|
LDX $1B
|
||||||
|
@ -496,7 +483,6 @@ L0403D7 PHX
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_SetResourceAttr
|
_SetResourceAttr
|
||||||
* STA L02DD98
|
|
||||||
LDX $1F
|
LDX $1F
|
||||||
LDA $1D
|
LDA $1D
|
||||||
STX L027EC5
|
STX L027EC5
|
||||||
|
@ -542,7 +528,6 @@ L0403D7 PHX
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_GetHandleSize
|
_GetHandleSize
|
||||||
* STA L02DD98
|
|
||||||
PEA ^L028260
|
PEA ^L028260
|
||||||
PEA L028260
|
PEA L028260
|
||||||
PLA
|
PLA
|
||||||
|
@ -723,7 +708,6 @@ L040630 PEA $FFFF
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_ReleaseResource
|
_ReleaseResource
|
||||||
* STA L02DD98
|
|
||||||
INC $09
|
INC $09
|
||||||
BRL L040391
|
BRL L040391
|
||||||
L04064A INC $07
|
L04064A INC $07
|
||||||
|
@ -755,7 +739,6 @@ L04064F PEA $0002
|
||||||
PHA
|
PHA
|
||||||
PEI $0B
|
PEI $0B
|
||||||
_SetResourceFileDepth
|
_SetResourceFileDepth
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0B
|
STA $0B
|
||||||
LDA #$0000
|
LDA #$0000
|
||||||
|
@ -880,7 +863,6 @@ L040768 TSC
|
||||||
PEA $0000
|
PEA $0000
|
||||||
PEA $0000
|
PEA $0000
|
||||||
_NewHandle
|
_NewHandle
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $09
|
STA $09
|
||||||
PLA
|
PLA
|
||||||
|
@ -890,7 +872,6 @@ L040768 TSC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HLock
|
_HLock
|
||||||
* STA L02DD98
|
|
||||||
LDY #$0002
|
LDY #$0002
|
||||||
LDA [$09],Y
|
LDA [$09],Y
|
||||||
TAX
|
TAX
|
||||||
|
@ -1117,9 +1098,7 @@ L0409E4 LDA $07
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_FindHandle
|
_FindHandle
|
||||||
* STA L02DD98
|
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
LDA $0B
|
LDA $0B
|
||||||
LDX $0D
|
LDX $0D
|
||||||
STA $07
|
STA $07
|
||||||
|
@ -1175,7 +1154,6 @@ L040A6C TAX
|
||||||
PHY
|
PHY
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
INC $05
|
INC $05
|
||||||
BRA L040A24
|
BRA L040A24
|
||||||
L040A8A PLD
|
L040A8A PLD
|
||||||
|
@ -1718,7 +1696,6 @@ L040E8E PEA ^L028854
|
||||||
PEA $0000
|
PEA $0000
|
||||||
PEA $0000
|
PEA $0000
|
||||||
_NewHandle
|
_NewHandle
|
||||||
* STA L02DD98
|
|
||||||
LDA $0B
|
LDA $0B
|
||||||
ASL
|
ASL
|
||||||
ASL
|
ASL
|
||||||
|
@ -1747,7 +1724,6 @@ L040F1E LDA $0B
|
||||||
PHY
|
PHY
|
||||||
PHA
|
PHA
|
||||||
_HLock
|
_HLock
|
||||||
* STA L02DD98
|
|
||||||
LDA $0B
|
LDA $0B
|
||||||
ASL
|
ASL
|
||||||
ASL
|
ASL
|
||||||
|
@ -4699,7 +4675,6 @@ L0426D3 TSC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HLock
|
_HLock
|
||||||
* STA L02DD98
|
|
||||||
LDY #$0002
|
LDY #$0002
|
||||||
LDA [$70],Y
|
LDA [$70],Y
|
||||||
PHA
|
PHA
|
||||||
|
@ -4749,7 +4724,6 @@ L0426FB CLC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HUnlock
|
_HUnlock
|
||||||
* STA L02DD98
|
|
||||||
LDA $13
|
LDA $13
|
||||||
STA $05
|
STA $05
|
||||||
BRL L0429D0
|
BRL L0429D0
|
||||||
|
@ -4778,7 +4752,6 @@ L04275C LDA #$0001
|
||||||
PEA $0000
|
PEA $0000
|
||||||
PEA $0000
|
PEA $0000
|
||||||
_NewHandle
|
_NewHandle
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0F
|
STA $0F
|
||||||
PLA
|
PLA
|
||||||
|
@ -4806,7 +4779,6 @@ L04275C LDA #$0001
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HUnlock
|
_HUnlock
|
||||||
* STA L02DD98
|
|
||||||
LDA $13
|
LDA $13
|
||||||
STA $05
|
STA $05
|
||||||
BRL L0429D0
|
BRL L0429D0
|
||||||
|
@ -4815,7 +4787,6 @@ L0427DE LDX $11
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HLock
|
_HLock
|
||||||
* STA L02DD98
|
|
||||||
LDA #$0004
|
LDA #$0004
|
||||||
STA $5B
|
STA $5B
|
||||||
PEA $0000
|
PEA $0000
|
||||||
|
@ -4872,7 +4843,6 @@ L0427DE LDX $11
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
PEA $3232
|
PEA $3232
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -4882,7 +4852,6 @@ L0427DE LDX $11
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HUnlock
|
_HUnlock
|
||||||
* STA L02DD98
|
|
||||||
LDA $13
|
LDA $13
|
||||||
STA $05
|
STA $05
|
||||||
BRL L0429D0
|
BRL L0429D0
|
||||||
|
@ -4906,7 +4875,6 @@ L04288E PEA $2014
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
PEA $3041
|
PEA $3041
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -4916,7 +4884,6 @@ L04288E PEA $2014
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HUnlock
|
_HUnlock
|
||||||
* STA L02DD98
|
|
||||||
LDA $13
|
LDA $13
|
||||||
STA $05
|
STA $05
|
||||||
BRL L0429D0
|
BRL L0429D0
|
||||||
|
@ -4996,13 +4963,10 @@ L042953 PEA $000D
|
||||||
PHA
|
PHA
|
||||||
PHA
|
PHA
|
||||||
_FrontWindow
|
_FrontWindow
|
||||||
* STA L02DD98
|
|
||||||
PEA $0000
|
PEA $0000
|
||||||
PEA $1000
|
PEA $1000
|
||||||
_GetCtlHandleFromID
|
_GetCtlHandleFromID
|
||||||
* STA L02DD98
|
|
||||||
_TESetText
|
_TESetText
|
||||||
* STA L02DD98
|
|
||||||
PEA $3050
|
PEA $3050
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -5012,7 +4976,6 @@ L042953 PEA $000D
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
PEA $3251
|
PEA $3251
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -5022,7 +4985,6 @@ L042953 PEA $000D
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HUnlock
|
_HUnlock
|
||||||
* STA L02DD98
|
|
||||||
LDA #$0000
|
LDA #$0000
|
||||||
STA $05
|
STA $05
|
||||||
L0429D0 LDA $6E
|
L0429D0 LDA $6E
|
||||||
|
@ -5063,7 +5025,6 @@ L0429E3 ENT
|
||||||
ADC #$0015
|
ADC #$0015
|
||||||
PHA
|
PHA
|
||||||
_SFGetFile2
|
_SFGetFile2
|
||||||
* STA L02DD98
|
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
STA $13
|
STA $13
|
||||||
PEA $3110
|
PEA $3110
|
||||||
|
@ -5083,7 +5044,6 @@ L042A48 TAX
|
||||||
BNE L042A4E
|
BNE L042A4E
|
||||||
BRL L042C21
|
BRL L042C21
|
||||||
L042A4E _WaitCursor
|
L042A4E _WaitCursor
|
||||||
* STA L02DD98
|
|
||||||
LDA $1F
|
LDA $1F
|
||||||
LDX $21
|
LDX $21
|
||||||
STA $01
|
STA $01
|
||||||
|
@ -5155,7 +5115,6 @@ L042AC1 CLC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_HLock
|
_HLock
|
||||||
* STA L02DD98
|
|
||||||
PHA
|
PHA
|
||||||
PHA
|
PHA
|
||||||
LDX $0D
|
LDX $0D
|
||||||
|
@ -5173,7 +5132,6 @@ L042AC1 CLC
|
||||||
PEA $0FFB
|
PEA $0FFB
|
||||||
PEA $800E
|
PEA $800E
|
||||||
_NewWindow2
|
_NewWindow2
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $07
|
STA $07
|
||||||
PLA
|
PLA
|
||||||
|
@ -5192,7 +5150,6 @@ L042AC1 CLC
|
||||||
PEA $0000
|
PEA $0000
|
||||||
PEA $0000
|
PEA $0000
|
||||||
_NewHandle
|
_NewHandle
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $0F
|
STA $0F
|
||||||
PLA
|
PLA
|
||||||
|
@ -5210,7 +5167,6 @@ L042AC1 CLC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_SetWRefCon
|
_SetWRefCon
|
||||||
* STA L02DD98
|
|
||||||
PEA $3123
|
PEA $3123
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -5259,7 +5215,6 @@ L042AC1 CLC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_SetPort
|
_SetPort
|
||||||
* STA L02DD98
|
|
||||||
LDA $25
|
LDA $25
|
||||||
LDX $27
|
LDX $27
|
||||||
PHX
|
PHX
|
||||||
|
@ -5271,7 +5226,6 @@ L042AC1 CLC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
PEA $3124
|
PEA $3124
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -5281,13 +5235,11 @@ L042AC1 CLC
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
PEA $3125
|
PEA $3125
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
JSL L027CEB
|
JSL L027CEB
|
||||||
_InitCursor
|
_InitCursor
|
||||||
* STA L02DD98
|
|
||||||
L042C21 LDA $13
|
L042C21 LDA $13
|
||||||
STA $05
|
STA $05
|
||||||
LDY $05
|
LDY $05
|
||||||
|
@ -5313,9 +5265,7 @@ L042C42 ENT
|
||||||
PHA
|
PHA
|
||||||
PHA
|
PHA
|
||||||
_FrontWindow
|
_FrontWindow
|
||||||
* STA L02DD98
|
|
||||||
_GetWRefCon
|
_GetWRefCon
|
||||||
* STA L02DD98
|
|
||||||
PLA
|
PLA
|
||||||
STA $07
|
STA $07
|
||||||
PLA
|
PLA
|
||||||
|
@ -5342,7 +5292,6 @@ L042C91 LDX $09
|
||||||
PHX
|
PHX
|
||||||
PHA
|
PHA
|
||||||
_DisposeHandle
|
_DisposeHandle
|
||||||
* STA L02DD98
|
|
||||||
PEA $3216
|
PEA $3216
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
@ -5350,9 +5299,7 @@ L042C91 LDX $09
|
||||||
PHA
|
PHA
|
||||||
PHA
|
PHA
|
||||||
_FrontWindow
|
_FrontWindow
|
||||||
* STA L02DD98
|
|
||||||
_CloseWindow
|
_CloseWindow
|
||||||
* STA L02DD98
|
|
||||||
PEA $3220
|
PEA $3220
|
||||||
JSL L02CA27
|
JSL L02CA27
|
||||||
PHA
|
PHA
|
||||||
|
|
BIN
genesys/Genesys
BIN
genesys/Genesys
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
@ -1,3 +1,11 @@
|
||||||
|
Genesys v1.3.6 Readme - January 2022
|
||||||
|
|
||||||
|
Shell
|
||||||
|
- Now you can edit or ID resources in the system range.
|
||||||
|
- Source file generation will now search for the @:Gen.Lang folder instead of the :Genesys.2 one (the name of the second floppy disk)
|
||||||
|
|
||||||
|
###
|
||||||
|
|
||||||
Genesys v1.3.5 Readme - February 2021
|
Genesys v1.3.5 Readme - February 2021
|
||||||
|
|
||||||
Editors
|
Editors
|
||||||
|
|
Loading…
Reference in New Issue