mirror of
https://github.com/antoinevignau/source.git
synced 2024-09-27 08:54:49 +00:00
v1.3.4 final
w/Update Info editor (yeepee)
This commit is contained in:
parent
cce12578ca
commit
1a99fd041f
BIN
genesys/.DS_Store
vendored
BIN
genesys/.DS_Store
vendored
Binary file not shown.
@ -63,6 +63,12 @@ GSOS EQU $E100A8
|
||||
PHD
|
||||
PHK
|
||||
PLB
|
||||
|
||||
lda #L02434C
|
||||
stal $300
|
||||
lda #^L02434C
|
||||
stal $302
|
||||
|
||||
_TLStartUp
|
||||
PEA $0000
|
||||
_TLVersion
|
||||
@ -1465,12 +1471,19 @@ L020E54 PHD
|
||||
LDA #$2020
|
||||
STA L02105D
|
||||
STA L02105D+2
|
||||
sta L02105D+4
|
||||
PEA $0000
|
||||
PEA $0000
|
||||
PEA $0000
|
||||
PEA $0000
|
||||
PEA $0000
|
||||
PEA $0000
|
||||
|
||||
* AV 202010 - Fixed the About bug
|
||||
* It happened when users had more than 8MB
|
||||
|
||||
* PEA $0000
|
||||
* PEA $0000
|
||||
pha
|
||||
pha
|
||||
_RealFreeMem
|
||||
LDX #$2002
|
||||
JSL L027D42
|
||||
@ -1481,7 +1494,7 @@ L020E54 PHD
|
||||
JSL L027D42
|
||||
PEA ^L02105D
|
||||
PEA L02105D
|
||||
PEA $0004
|
||||
PEA $0006 ; was 4
|
||||
PEA $0000
|
||||
_Long2Dec
|
||||
LDX #$2004
|
||||
@ -13258,8 +13271,8 @@ strPRINTRECORD1 asc 'PRINTRECORD'00
|
||||
strPRINTRECORD2 asc 'Print Record'00
|
||||
strFONT1 asc 'FONT'00
|
||||
strFONT2 asc 'Font'00
|
||||
strVERSIONS1 asc 'VERSIONS'00
|
||||
strVERSIONS2 asc 'Versions'00
|
||||
strVERSIONS1 asc 'UPDATEINFO'00
|
||||
strVERSIONS2 asc 'Update Info'00
|
||||
|
||||
L025F5A ASC 'rType $%0.4X'00
|
||||
L025F67 ASC 'ICON'00
|
||||
|
BIN
genesys/disks/genesys_v134_program.2mg
Normal file
BIN
genesys/disks/genesys_v134_program.2mg
Normal file
Binary file not shown.
Binary file not shown.
BIN
genesys/disks/genesys_v134_templates.2mg
Normal file
BIN
genesys/disks/genesys_v134_templates.2mg
Normal file
Binary file not shown.
BIN
genesys/disks/genesys_v134_templates.po
Normal file
BIN
genesys/disks/genesys_v134_templates.po
Normal file
Binary file not shown.
19
genesys/edit/MAKE.VERSIONS.S
Normal file
19
genesys/edit/MAKE.VERSIONS.S
Normal file
@ -0,0 +1,19 @@
|
||||
*
|
||||
* Genesys v1.2.4
|
||||
* Make versions
|
||||
*
|
||||
|
||||
* Expansion linker file
|
||||
|
||||
DSK Versions
|
||||
TYP $BC
|
||||
|
||||
* Assemble files
|
||||
|
||||
XPL
|
||||
|
||||
ASM VERSIONS.S
|
||||
KND $0000
|
||||
SNA Versions
|
||||
|
||||
|
File diff suppressed because it is too large
Load Diff
4687
genesys/edit/VERSIONS.S
Normal file
4687
genesys/edit/VERSIONS.S
Normal file
File diff suppressed because it is too large
Load Diff
46
genesys/genesys buffer.txt
Normal file
46
genesys/genesys buffer.txt
Normal file
@ -0,0 +1,46 @@
|
||||
*--- The commands
|
||||
|
||||
0 - prepare me
|
||||
1 - return the name of the editor
|
||||
2 - interact with window
|
||||
3 - initializes the editor
|
||||
4 - get front windows, create a resource, dispose memory, exit
|
||||
5 - not handled
|
||||
6 - not handled
|
||||
7 - get front window, create a resource, exit
|
||||
8 - not handled
|
||||
|
||||
*--- The buffer that is passed to the editor
|
||||
|
||||
L02434C DW $0000 ; 00 event code
|
||||
L02434E ADRL $00000000 ; 02 event message
|
||||
ADRL $00000000 ; 06 tick count
|
||||
L024356 DW $0000 ; 0A mouse location
|
||||
L024358 DW $0000 ; 0C
|
||||
L02435A DW $0000 ; 0E modifiers
|
||||
L02435C ADRL $00000000 ; 10 task data
|
||||
L024360 ADRL $00000000 ; 14 task mask
|
||||
ADRL $00000000 ; 18
|
||||
L024368 DW $0000 ; 1C
|
||||
L02436A ADRL $00000000 ; 1E handle to control
|
||||
L02436E DW $0000 ; 22
|
||||
DW $0000 ;
|
||||
L024372 ADRL $00000000 ; 26 control ID - ()$0001 or $1002 or $1003 for tool table)
|
||||
DW $0000 ;
|
||||
DW $0000 ;
|
||||
L02437A ADRL $00000000 ; 2E O source pointer of data to be copied ($20 bytes) (STR 'Version')
|
||||
L02437E ADRL $00000000 ; 32 O another pointer (STR 'VERSIONS_01234567')
|
||||
L024382 DW $0000 ; 36 O supported resource type
|
||||
L024384 ADRL $00000000 ; 38 resource ID
|
||||
L024388 DW $0000 ; 3C memory ID
|
||||
L02438A DW $0000 ; 3E command (0..5)
|
||||
L02438C DW $0000 ; 40 Y-coord
|
||||
L02438E DW $0000 ; 42 X-coord
|
||||
DW $0000 ;
|
||||
DW $0000 ;
|
||||
L024394 DW $0000 ; 48 flag (bit 15: is resource formatted?, did we handle the command?)
|
||||
L024396 DW $0000 ; 4A TaskMaster result
|
||||
DW $0000 ;
|
||||
L02439A DW $0000 ; 4E Resource file ID
|
||||
L02439C DW $0000 ; 50 Resource type
|
||||
L02439E ADRL $00000000 ; 52 Resource ID
|
@ -1,20 +1,28 @@
|
||||
Genesys v1.3.4 Readme - November 2020
|
||||
|
||||
Shell
|
||||
- it is based on v1.2.4 (I do not find v1.3 reliable)
|
||||
- It is based on v1.2.4 (I do not find v1.3 reliable)
|
||||
- I've added ten resource types that were not included in the display (it does not mean the resource type has a dedicated editor)
|
||||
- the help menu is updated (the data is a resource type $5751 in file Gen.Data)
|
||||
- The help menu is updated (the data is a resource type $5751 in file Gen.Data)
|
||||
|
||||
Editors
|
||||
- Control
|
||||
- It handles the new bits in icon, line edit, and static text controls
|
||||
- I have added support for rectangle and thermometer controls
|
||||
It handles the new bits in icon, line edit, and static text controls
|
||||
I have added support for rectangle and thermometer controls
|
||||
- Update Info
|
||||
A new editor to create rUpdateInfo resources for Ewen Wannop's Versions software
|
||||
|
||||
Export
|
||||
- APW REZ
|
||||
Thanks to Chris Vavruska, one can generate rez files of new controls, new control data, and rUpdateInfo
|
||||
|
||||
Idea
|
||||
- I realized that a control can be created from the Add Control pop-up menu or after creating a window. But you cannot add to the window an already created control. You must create it from zero. That is weird, one should be able to add to the window an available control.
|
||||
|
||||
The shell and the editors communicate through a 64-byte buffer. That is mandatory to understand to write new editors. My plan is to create a Versions editor (Ewen's Versions is a cool product).
|
||||
|
||||
No work has been done on exporting resource files.
|
||||
|
||||
If you want to test, report bugs, ask for features... https://github.com/antoinevignau/source/tree/main/genesys
|
||||
|
||||
Thank you Ewen Wannop and Chris Vavruska!
|
||||
|
||||
Antoine Vignau & Olivier Zardini
|
||||
Brutal Deluxe Software
|
||||
brutaldeluxe.fr
|
||||
|
2812
genesys/templates/ApwRez.scg
Normal file
2812
genesys/templates/ApwRez.scg
Normal file
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue
Block a user