antoine-source/hypercardiigs/ExpressLoad.S
Antoine Vignau 25de611f19 Adding HCGS & SynthLAB
202303 - Adding two working disassemblies of former IIgs products
2023-03-02 13:12:30 +01:00

905 lines
20 KiB
ArmAsm

*
* HypercardGS
* segment: $01 ExpressLoad
*
* (k) 2015, Brutal Deluxe Software
*
mx %00
rel
dsk ExpressLoad.l
lst off
*---------------------------------------
use ExpressLoad.E
use 4/Ctl.Macs
use 4/Desk.Macs
use 4/Dialog.Macs
use 4/Event.Macs
use 4/Int.Macs
use 4/Line.Macs
use 4/List.Macs
use 4/Locator.Macs
use 4/Mem.Macs
use 4/Menu.Macs
use 4/MidiSyn.Macs
use 4/Misc.Macs
use 4/Qd.Macs
use 4/Sound.Macs
use 4/Std.Macs
use 4/Text.Macs
use 4/Util.Macs
use 4/Window.Macs
*---------------------------------------
DS 2 ; File ref num
DS 2
DW $0023 ; # of segments -1
DA L01016E-* ; Offset to seg header
DW $0000 ; Flags
DS 4 ; Handle to segment
DA L0101B1-*
DW $0000
DS 4
DA L0101F0-*
DW $0000
DS 4
DA L010235-*
DW $0000
DS 4
DA L010278-*
DW $0000
DS 4
DA L0102BA-*
DW $0000
DS 4
DA L0102FD-*
DW $0000
DS 4
DA L010340-*
DW $0000
DS 4
DA L010385-*
DW $0000
DS 4
DA L0103C7-*
DW $0000
DS 4
DA L01040B-*
DW $0000
DS 4
DA L010450-*
DW $0000
DS 4
DA L010495-*
DW $0000
DS 4
DA L0104DA-*
DW $0000
DS 4
DA L01051D-*
DW $0000
DS 4
DA L01055C-*
DW $0000
DS 4
DA L01059F-*
DW $0000
DS 4
DA L0105E3-*
DW $0000
DS 4
DA L010627-*
DW $0000
DS 4
DA L01066C-*
DW $0000
DS 4
DA L0106AB-*
DW $0000
DS 4
DA L0106F0-*
DW $0000
DS 4
DA L010732-*
DW $0000
DS 4
DA L010776-*
DW $0000
DS 4
DA L0107BB-*
DW $0000
DS 4
DA L0107FD-*
DW $0000
DS 4
DA L010842-*
DW $0000
DS 4
DA L010886-*
DW $0000
DS 4
DA L0108CB-*
DW $0000
DS 4
DA L01090E-*
DW $0000
DS 4
DA L010953-*
DW $0000
DS 4
DA L010997-*
DW $0000
DS 4
DA L0109DA-*
DW $0000
DS 4
DA L010A1F-*
DW $0000
DS 4
DA L010A64-*
DW $0000
DS 4
DA L010AA9-*
DW $0000
DS 4
DW $0002 ; Segments numbers
DW $0003
DW $0004
DW $0005
DW $0006
DW $0007
DW $0008
DW $0009
DW $000A
DW $000B
DW $000C
DW $000D
DW $000E
DW $000F
DW $0010
DW $0011
DW $0012
DW $0013
DW $0014
DW $0015
DW $0016
DW $0017
DW $0018
DW $0019
DW $001A
DW $001B
DW $001C
DW $001D
DW $001E
DW $001F
DW $0020
DW $0021
DW $0022
DW $0023
DW $0024
DW $0025
L01016E ADRL $00000B7A ; Segments headers
ADRL $00000022
ADRL $00000000
ADRL $00000000
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0010
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0002
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'FirstSeg'
L0101B1 ADRL $00000BDD
ADRL $000039DB
ADRL $000045B8
ADRL $000008E9
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0003
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'main'
L0101F0 ADRL $00004EE8
ADRL $000040C5
ADRL $00008FAD
ADRL $000004D8
DS 1
DB $00
DB $04
DB $02
ADRL $00000000
DW $4401
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0004
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperTable'
L010235 ADRL $000094CA
ADRL $000056DC
ADRL $0000EBA6
ADRL $00000155
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0401
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0005
ADRL $0000411B
DW $002C
DW $0000
ASC 00000000000000000000
STR '~globals'
L010278 ADRL $0000ED3F
ADRL $00005000
ADRL $00000000
ADRL $00000000
DS 1
DB $00
DB $04
DB $02
ADRL $00000000
DW $0012
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0006
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR '~Direct'
L0102BA ADRL $00013D84
ADRL $0000EAA0
ADRL $00022824
ADRL $00000E2A
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0007
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperLib'
L0102FD ADRL $00023693
ADRL $00007FAB
ADRL $0002B63E
ADRL $000008BA
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0008
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperGrx'
L010340 ADRL $0002BF3F
ADRL $0000B4C5
ADRL $00037404
ADRL $00001044
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0009
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperTools'
L010385 ADRL $0003848C
ADRL $000045D0
ADRL $0003CA5C
ADRL $000009FB
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $000A
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'MainSeg'
L0103C7 ADRL $0003D49D
ADRL $00009680
ADRL $00046B1D
ADRL $00000FA7
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $000B
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperTalk'
L01040B ADRL $00047B0B
ADRL $00001363
ADRL $00048E6E
ADRL $000001E1
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $000C
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'LowMemCmdF'
L010450 ADRL $00049096
ADRL $00003232
ADRL $0004C2C8
ADRL $00000375
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $000D
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperTalk2'
L010495 ADRL $0004C684
ADRL $00003075
ADRL $0004F6F9
ADRL $0000041B
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $000E
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperTalk3'
L0104DA ADRL $0004FB59
ADRL $000017E4
ADRL $0005133D
ADRL $000002AB
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $000F
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'TalkEdit'
L01051D ADRL $00051629
ADRL $00000DB7
ADRL $000523E0
ADRL $000000ED
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0010
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'Eval'
L01055C ADRL $00052512
ADRL $0000143B
ADRL $0005394D
ADRL $000001F1
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0011
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'Commands'
L01059F ADRL $00053B84
ADRL $00002153
ADRL $00055CD7
ADRL $00000369
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0012
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'Commands2'
L0105E3 ADRL $00056086
ADRL $0000148F
ADRL $00057515
ADRL $000001C6
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0013
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'Functions'
L010627 ADRL $00057722
ADRL $0000176B
ADRL $00058E8D
ADRL $000002E5
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0014
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'BrowseOnly'
L01066C ADRL $000591B3
ADRL $0000193E
ADRL $0005AAF1
ADRL $00000251
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0015
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'PLib'
L0106AB ADRL $0005AD89
ADRL $00000C30
ADRL $00000000
ADRL $00000000
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $0002
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0016
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR '~JumpTable'
L0106F0 ADRL $0005B9FD
ADRL $00001FE8
ADRL $0005D9E5
ADRL $0000052F
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0017
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'SegInit'
L010732 ADRL $0005DF5A
ADRL $00001181
ADRL $0005F0DB
ADRL $0000024B
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0018
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperEdit'
L010776 ADRL $0005F36D
ADRL $000069E4
ADRL $00065D51
ADRL $000007FE
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0019
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'InfoDialog'
L0107BB ADRL $00066593
ADRL $0000287A
ADRL $00068E0D
ADRL $00000382
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $001A
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'Compact'
L0107FD ADRL $000691D6
ADRL $00006585
ADRL $0006F75B
ADRL $00000AA6
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $001B
ADRL $00000390
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperPaint'
L010842 ADRL $00070247
ADRL $00003F47
ADRL $0007418E
ADRL $000009AB
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $001C
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HyperPnt2'
L010886 ADRL $00074B80
ADRL $00003D2F
ADRL $000788AF
ADRL $000005AC
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $001D
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'LowMemCmds'
L0108CB ADRL $00078EA0
ADRL $0000139D
ADRL $0007A23D
ADRL $00000176
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $001E
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'XWindSeg'
L01090E ADRL $0007A3FA
ADRL $00002B7D
ADRL $0007CF77
ADRL $00000422
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $001F
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintMain'
L010953 ADRL $0007D3DF
ADRL $00001A20
ADRL $0007EDFF
ADRL $00000239
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0020
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintGrx'
L010997 ADRL $0007F07D
ADRL $00002173
ADRL $000811F0
ADRL $0000024E
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0021
ADRL $000000A8
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintHF'
L0109DA ADRL $00081485
ADRL $00003998
ADRL $00084E1D
ADRL $00000393
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0022
ADRL $000009AF
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintDlog'
L010A1F ADRL $000851F7
ADRL $00004FE0
ADRL $0008A1D7
ADRL $000005A3
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0023
ADRL $0000012A
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintRept'
L010A64 ADRL $0008A7C1
ADRL $000006E0
ADRL $0008AEA1
ADRL $000000CB
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0024
ADRL $00000000
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintCard'
L010AA9 ADRL $0008AFB2
ADRL $00000AC4
ADRL $0008BA76
ADRL $000000D9
DS 1
DB $00
DB $04
DB $02
ADRL $00010000
DW $8000
ADRL $00000000
ADRL $00000000
DB $00
DS 3
DW $0025
ADRL $00000008
DW $002C
DW $0000
ASC 00000000000000000000
STR 'HPrintMix'