|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1ef091
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0238 | 8 | .CONST 0x0238 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00fd | | .CONST 0x00fd ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0024 | $ | .CONST 0x0024 ; Number of locals
000b INIT_0008:
000b e002 | | Load 0x0,0x2
000c 1b20 | | Execute Package,Field_Read,Field_Number 0x20
000d 0322 | " | Declare_Variable Record
000e 4800 |H | Short_Literal 0x0
000f 00d9 | | Load_Top At_Offset_1
0010 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0011 00d8 | | Load_Top At_Offset_0
0012 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0013 4801 |H | Short_Literal 0x1
0014 00d9 | | Load_Top At_Offset_1
0015 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0016 4800 |H | Short_Literal 0x0
0017 00d9 | | Load_Top At_Offset_1
0018 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0019 4800 |H | Short_Literal 0x0
001a 00d9 | | Load_Top At_Offset_1
001b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
001c 4800 |H | Short_Literal 0x0
001d 00d9 | | Load_Top At_Offset_1
001e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
001f 4800 |H | Short_Literal 0x0
0020 00d9 | | Load_Top At_Offset_1
0021 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0022 4800 |H | Short_Literal 0x0
0023 00d9 | | Load_Top At_Offset_1
0024 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0025 4800 |H | Short_Literal 0x0
0026 00d9 | | Load_Top At_Offset_1
0027 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0028 4800 |H | Short_Literal 0x0
0029 00d0 | | Action Swap_Control
002a 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
002b 0129 | ) | Execute Any,Make_Visible
002c e002 | | Load 0x0,0x2
002d 1b20 | | Execute Package,Field_Read,Field_Number 0x20
002e 0322 | " | Declare_Variable Record
002f 4800 |H | Short_Literal 0x0
0030 00d9 | | Load_Top At_Offset_1
0031 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0032 00d8 | | Load_Top At_Offset_0
0033 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0034 4801 |H | Short_Literal 0x1
0035 00d9 | | Load_Top At_Offset_1
0036 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0037 4800 |H | Short_Literal 0x0
0038 00d9 | | Load_Top At_Offset_1
0039 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
003a 4800 |H | Short_Literal 0x0
003b 00d9 | | Load_Top At_Offset_1
003c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
003d 4800 |H | Short_Literal 0x0
003e 00d9 | | Load_Top At_Offset_1
003f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0040 4800 |H | Short_Literal 0x0
0041 00d9 | | Load_Top At_Offset_1
0042 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0043 4800 |H | Short_Literal 0x0
0044 00d9 | | Load_Top At_Offset_1
0045 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0046 4800 |H | Short_Literal 0x0
0047 00d9 | | Load_Top At_Offset_1
0048 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0049 4800 |H | Short_Literal 0x0
004a 00d0 | | Action Swap_Control
004b 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
004c 0129 | ) | Execute Any,Make_Visible
004d e002 | | Load 0x0,0x2
004e 1b20 | | Execute Package,Field_Read,Field_Number 0x20
004f 0322 | " | Declare_Variable Record
0050 4800 |H | Short_Literal 0x0
0051 00d9 | | Load_Top At_Offset_1
0052 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0053 00d8 | | Load_Top At_Offset_0
0054 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0055 4801 |H | Short_Literal 0x1
0056 00d9 | | Load_Top At_Offset_1
0057 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0058 4801 |H | Short_Literal 0x1
0059 00d9 | | Load_Top At_Offset_1
005a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
005b 4800 |H | Short_Literal 0x0
005c 00d9 | | Load_Top At_Offset_1
005d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
005e 4800 |H | Short_Literal 0x0
005f 00d9 | | Load_Top At_Offset_1
0060 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0061 4800 |H | Short_Literal 0x0
0062 00d9 | | Load_Top At_Offset_1
0063 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0064 4800 |H | Short_Literal 0x0
0065 00d9 | | Load_Top At_Offset_1
0066 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0067 4800 |H | Short_Literal 0x0
0068 00d9 | | Load_Top At_Offset_1
0069 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
006a 4800 |H | Short_Literal 0x0
006b 00d0 | | Action Swap_Control
006c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
006d 0129 | ) | Execute Any,Make_Visible
006e e002 | | Load 0x0,0x2
006f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0070 0322 | " | Declare_Variable Record
0071 4800 |H | Short_Literal 0x0
0072 00d9 | | Load_Top At_Offset_1
0073 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0074 00d8 | | Load_Top At_Offset_0
0075 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0076 4801 |H | Short_Literal 0x1
0077 00d9 | | Load_Top At_Offset_1
0078 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0079 4800 |H | Short_Literal 0x0
007a 00d9 | | Load_Top At_Offset_1
007b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
007c 4800 |H | Short_Literal 0x0
007d 00d9 | | Load_Top At_Offset_1
007e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
007f 4800 |H | Short_Literal 0x0
0080 00d9 | | Load_Top At_Offset_1
0081 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0082 4800 |H | Short_Literal 0x0
0083 00d9 | | Load_Top At_Offset_1
0084 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0085 4800 |H | Short_Literal 0x0
0086 00d9 | | Load_Top At_Offset_1
0087 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0088 4800 |H | Short_Literal 0x0
0089 00d9 | | Load_Top At_Offset_1
008a 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
008b 4800 |H | Short_Literal 0x0
008c 00d0 | | Action Swap_Control
008d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
008e 0129 | ) | Execute Any,Make_Visible
008f e002 | | Load 0x0,0x2
0090 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0091 0322 | " | Declare_Variable Record
0092 4800 |H | Short_Literal 0x0
0093 00d9 | | Load_Top At_Offset_1
0094 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0095 00d8 | | Load_Top At_Offset_0
0096 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0097 4801 |H | Short_Literal 0x1
0098 00d9 | | Load_Top At_Offset_1
0099 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
009a 4801 |H | Short_Literal 0x1
009b 00d9 | | Load_Top At_Offset_1
009c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
009d 4800 |H | Short_Literal 0x0
009e 00d9 | | Load_Top At_Offset_1
009f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00a0 4800 |H | Short_Literal 0x0
00a1 00d9 | | Load_Top At_Offset_1
00a2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00a3 4800 |H | Short_Literal 0x0
00a4 00d9 | | Load_Top At_Offset_1
00a5 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
00a6 4800 |H | Short_Literal 0x0
00a7 00d9 | | Load_Top At_Offset_1
00a8 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
00a9 4800 |H | Short_Literal 0x0
00aa 00d9 | | Load_Top At_Offset_1
00ab 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
00ac 4800 |H | Short_Literal 0x0
00ad 00d0 | | Action Swap_Control
00ae 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
00af 0129 | ) | Execute Any,Make_Visible
00b0 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
00b2 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
00b4 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated
00b6 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
00b8 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
00ba 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
00bc 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
00be 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
00c0 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
00c2 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
00c4 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
00c6 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated
00c8 00bf | | Action Accept_Activation
00c9 e002 | | Load 0x0,0x2
00ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00cb 02c7 | | Declare_Variable Any
00cc 00d8 | | Load_Top At_Offset_0
00cd 1c00 | | Execute_Immediate Run_Utility,0x0
00ce e002 | | Load 0x0,0x2
00cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d0 02c7 | | Declare_Variable Any
00d1 00d8 | | Load_Top At_Offset_0
00d2 1c00 | | Execute_Immediate Run_Utility,0x0
00d3 e002 | | Load 0x0,0x2
00d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d5 02c7 | | Declare_Variable Any
00d6 00d8 | | Load_Top At_Offset_0
00d7 1c00 | | Execute_Immediate Run_Utility,0x0
00d8 e002 | | Load 0x0,0x2
00d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00da 02c7 | | Declare_Variable Any
00db 00d8 | | Load_Top At_Offset_0
00dc 1c00 | | Execute_Immediate Run_Utility,0x0
00dd e002 | | Load 0x0,0x2
00de 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00df 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00e0 e002 | | Load 0x0,0x2
00e1 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00e2 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
00e3 029d 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call
00e5 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00e6 00c7 | | Action Elaborate_Subprogram
00e7 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00e8 00c7 | | Action Elaborate_Subprogram
00e9 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00ea 00c7 | | Action Elaborate_Subprogram
00eb 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00ec 00c7 | | Action Elaborate_Subprogram
00ed 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00ee 00c7 | | Action Elaborate_Subprogram
00ef 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00f0 00c7 | | Action Elaborate_Subprogram
00f1 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00f2 00c7 | | Action Elaborate_Subprogram
00f3 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00f4 00c7 | | Action Elaborate_Subprogram
00f5 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00f6 00c7 | | Action Elaborate_Subprogram
00f7 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00f8 00c7 | | Action Elaborate_Subprogram
00f9 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00fa 00c7 | | Action Elaborate_Subprogram
00fb 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00fc 00c7 | | Action Elaborate_Subprogram
00fd BODY_0008:
00fd 00bc | | Action Signal_Activated
00fe 00bb | | Action Signal_Completion
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 e21e | | Load 0x1,0x1e
0104 00ea | | Load_Encached Null_String_Cache
0105 0092 0209 | | Action Push_String_Extended,0x209 ; "Fenetre Joueur"
0107 4800 |H | Short_Literal 0x0
0108 e002 | | Load 0x0,0x2
0109 1810 | | Execute Package,Field_Execute,Field_Number 0x10
010a c21e | | Store 0x1,0x1e
010b e21f | | Load 0x1,0x1f
010c 00ea | | Load_Encached Null_String_Cache
010d 0092 0209 | | Action Push_String_Extended,0x209 ; "Fenetre Joueur"
010f 4801 |H | Short_Literal 0x1
0110 e002 | | Load 0x0,0x2
0111 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0112 c21f | | Store 0x1,0x1f
0113 0092 020a | | Action Push_String_Extended,0x20a ; "Fred Ged Xav LSIs 95"
0115 0092 020b | | Action Push_String_Extended,0x20b ; "Field_3"
0117 e21e | | Load 0x1,0x1e
0118 e002 | | Load 0x0,0x2
0119 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
011a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011b 0000 0000 | | .BLANK 0000[0x5]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 e21e | | Load 0x1,0x1e
0124 e002 | | Load 0x0,0x2
0125 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0126 c21e | | Store 0x1,0x1e
0127 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0131 | 1 | .CONST 0x0131 ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0003 | | .CONST 0x0003 ; Number of locals
012b INIT_0128:
012b 4801 |H | Short_Literal 0x1
012c 4850 |HP | Short_Literal 0x50
012d 00e9 | | Load_Encached String_Cache
012e 035b | [ | Declare_Type Array,Constrained
012f 0337 | 7 | Declare_Variable Array
0130 00e3 | | Load_Encached Natural_Cache
0131 BODY_0128:
0131 e21e | | Load 0x1,0x1e
0132 e002 | | Load 0x0,0x2
0133 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0134 6820 |h | Jump_Zero 0x155
0135 e002 | | Load 0x0,0x2
0136 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0137 e002 | | Load 0x0,0x2
0138 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0139 e21e | | Load 0x1,0x1e
013a e002 | | Load 0x0,0x2
013b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
013c c222 | " | Store 0x1,0x22
013d c223 | # | Store 0x1,0x23
013e 00e3 | | Load_Encached Natural_Cache
013f 00da | | Load_Top At_Offset_2
0140 4801 |H | Short_Literal 0x1
0141 e222 | " | Load 0x1,0x22
0142 0092 020c | | Action Push_String_Extended,0x20c ; ">"
0144 e21f | | Load 0x1,0x1f
0145 e21e | | Load 0x1,0x1e
0146 8224 | $ | Call 0x1,0x24
0147 00d1 | | Pop_Control Pop_Count_1
0148 0059 | Y | Store_Top Discrete,At_Offset_1
0149 4801 |H | Short_Literal 0x1
014a 00d9 | | Load_Top At_Offset_1
014b 00db | | Load_Top At_Offset_3
014c 01cf | | Execute Vector,Slice_Read
014d e003 | | Load 0x0,0x3
014e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
014f 4801 |H | Short_Literal 0x1
0150 00da | | Load_Top At_Offset_2
0151 e5ff | | Load 0x2,-0x1
0152 01ce | | Execute Vector,Slice_Write
0153 00d8 | | Load_Top At_Offset_0
0154 a5fe | | Store_Unchecked 0x2,-0x2
0155 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0156 0000 0000 | | .XXX[0x2]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b e21f | | Load 0x1,0x1f
015c e002 | | Load 0x0,0x2
015d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
015e 680a |h | Jump_Zero 0x169
015f 4800 |H | Short_Literal 0x0
0160 e5fe | | Load 0x2,-0x2
0161 e5ff | | Load 0x2,-0x1
0162 e21f | | Load 0x1,0x1f
0163 e002 | | Load 0x0,0x2
0164 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0165 4801 |H | Short_Literal 0x1
0166 e21f | | Load 0x1,0x1f
0167 e002 | | Load 0x0,0x2
0168 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0169 4503 |E | Exit_Suprogram New_Top_Offset 0x3
016a 0000 0000 | | .BLANK 0000[0x6]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 e220 | | Load 0x1,0x20
0174 00ea | | Load_Encached Null_String_Cache
0175 0092 020d | | Action Push_String_Extended,0x20d ; "Fenetre Monde"
0177 4801 |H | Short_Literal 0x1
0178 e002 | | Load 0x0,0x2
0179 1810 | | Execute Package,Field_Execute,Field_Number 0x10
017a c220 | | Store 0x1,0x20
017b 0092 020a | | Action Push_String_Extended,0x20a ; "Fred Ged Xav LSIs 95"
017d 0092 020b | | Action Push_String_Extended,0x20b ; "Field_3"
017f e220 | | Load 0x1,0x20
0180 e002 | | Load 0x0,0x2
0181 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0182 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0183 0000 0000 | | .BLANK 0000[0x5]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b e220 | | Load 0x1,0x20
018c e002 | | Load 0x0,0x2
018d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
018e c220 | | Store 0x1,0x20
018f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 e220 | | Load 0x1,0x20
0194 e002 | | Load 0x0,0x2
0195 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0196 6806 |h | Jump_Zero 0x19d
0197 4800 |H | Short_Literal 0x0
0198 e5fe | | Load 0x2,-0x2
0199 e5ff | | Load 0x2,-0x1
019a e220 | | Load 0x1,0x20
019b e002 | | Load 0x0,0x2
019c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
019d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
019e 0000 0000 | | .XXX[0x2]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 00da | | Load_Top At_Offset_2
01a4 e220 | | Load 0x1,0x20
01a5 e002 | | Load 0x0,0x2
01a6 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
01a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab e221 | ! | Load 0x1,0x21
01ac 00ea | | Load_Encached Null_String_Cache
01ad 0092 020e | | Action Push_String_Extended,0x20e ; "Fenetre d'aide"
01af 4801 |H | Short_Literal 0x1
01b0 e002 | | Load 0x0,0x2
01b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b2 c221 | ! | Store 0x1,0x21
01b3 0092 020a | | Action Push_String_Extended,0x20a ; "Fred Ged Xav LSIs 95"
01b5 0092 020b | | Action Push_String_Extended,0x20b ; "Field_3"
01b7 e221 | ! | Load 0x1,0x21
01b8 e002 | | Load 0x0,0x2
01b9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01bb 0000 0000 | | .BLANK 0000[0x5]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 e221 | ! | Load 0x1,0x21
01c4 e002 | | Load 0x0,0x2
01c5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01c6 c221 | ! | Store 0x1,0x21
01c7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb e221 | ! | Load 0x1,0x21
01cc e002 | | Load 0x0,0x2
01cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01ce 6806 |h | Jump_Zero 0x1d5
01cf 4800 |H | Short_Literal 0x0
01d0 e5fe | | Load 0x2,-0x2
01d1 e5ff | | Load 0x2,-0x1
01d2 e221 | ! | Load 0x1,0x21
01d3 e002 | | Load 0x0,0x2
01d4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01d5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01d6 0000 0000 | | .XXX[0x2]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db | | .CONST 0x01db ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0001 | | .CONST 0x0001 ; Number of locals
01db BODY_01d8:
01db INIT_01d8:
01db 00da | | Load_Top At_Offset_2
01dc e221 | ! | Load 0x1,0x21
01dd e002 | | Load 0x0,0x2
01de 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
01df 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 4800 |H | Short_Literal 0x0
01e4 e5fb | | Load 0x2,-0x5
01e5 e5fc | | Load 0x2,-0x4
01e6 e5fe | | Load 0x2,-0x2
01e7 e002 | | Load 0x0,0x2
01e8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
01e9 4801 |H | Short_Literal 0x1
01ea e5fe | | Load 0x2,-0x2
01eb e002 | | Load 0x0,0x2
01ec 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01ed 4801 |H | Short_Literal 0x1
01ee e002 | | Load 0x0,0x2
01ef 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
01f0 e5fd | | Load 0x2,-0x3
01f1 e5fe | | Load 0x2,-0x2
01f2 e002 | | Load 0x0,0x2
01f3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01f4 4800 |H | Short_Literal 0x0
01f5 e5fb | | Load 0x2,-0x5
01f6 0a01 | | Execute_Immediate Plus,0x1
01f7 00d8 | | Load_Top At_Offset_0
01f8 00e4 | | Load_Encached Positive_Cache
01f9 0260 | ` | Execute Discrete,In_Type
01fa 7001 |p | Jump_Nonzero 0x1fc
01fb 0801 | | Execute_Immediate Raise,0x1
01fc e5fc | | Load 0x2,-0x4
01fd e5ff | | Load 0x2,-0x1
01fe e002 | | Load 0x0,0x2
01ff 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0200 00e3 | | Load_Encached Natural_Cache
0201 e5fa | | Load 0x2,-0x6
0202 00ea | | Load_Encached Null_String_Cache
0203 e5ff | | Load 0x2,-0x1
0204 e002 | | Load 0x0,0x2
0205 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0206 00d1 | | Pop_Control Pop_Count_1
0207 c5f9 | | Store 0x2,-0x7
0208 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0209 ; --------------------------------------------------------------------------------------
0209 ; STRING TABLE
0209 ; --------------------------------------------------------------------------------------
0209 000e | | .STRTAB 0x000e->0x0210 ; "Fenetre Joueur"
020a 001a | | .STRTAB 0x001a->0x0217 ; "Fred Ged Xav LSIs 95"
020b 002c | , | .STRTAB 0x002c->0x0221 ; "Field_3"
020c 0031 | 1 | .STRTAB 0x0031->0x0224 ; ">"
020d 0030 | 0 | .STRTAB 0x0030->0x0225 ; "Fenetre Monde"
020e 003b | ; | .STRTAB 0x003b->0x022b ; "Fenetre d'aide"
020f 0047 | G | .STREND 0x0047->0x0232
0210 4665 6e65 |Fene| .STRTAB_STRINGS
0233 0000 0000 | | .BLANK 0000[0x5]
0238 ; --------------------------------------------------------------------------------------
0238 ; Debug Table
0238 ; --------------------------------------------------------------------------------------
0238 0004 0008 | | .DEBUG4 0x0004,0x0008,0xc8ab,0x0000,0x0001,0x000f
023e 000b 027a | z| .DBG4T 0x000b,0x027a,0x8000,0x8000
0242 00c9 029e | | .DBG4T 0x00c9,0x029e,0x8000,0x0000
0246 0103 02b0 | | .DBG4T 0x0103,0x02b0,0x0001,0x0000
024a 0123 02b5 | # | .DBG4T 0x0123,0x02b5,0x0001,0x0000
024e 012b 02b8 | + | .DBG4T 0x012b,0x02b8,0x0001,0x0000
0252 015b 02c1 | [ | .DBG4T 0x015b,0x02c1,0x0001,0x0000
0256 0173 02c6 | s | .DBG4T 0x0173,0x02c6,0x0001,0x0000
025a 018b 02ca | | .DBG4T 0x018b,0x02ca,0x0001,0x0000
025e 0193 02cd | | .DBG4T 0x0193,0x02cd,0x0001,0x0000
0262 01a3 02d1 | | .DBG4T 0x01a3,0x02d1,0x0001,0x0000
0266 01ab 02d4 | | .DBG4T 0x01ab,0x02d4,0x0001,0x0000
026a 01c3 02d8 | | .DBG4T 0x01c3,0x02d8,0x0001,0x0000
026e 01cb 02db | | .DBG4T 0x01cb,0x02db,0x0001,0x0000
0272 01db 02df | | .DBG4T 0x01db,0x02df,0x0001,0x0000
0276 01e3 02e2 | | .DBG4T 0x01e3,0x02e2,0x0001,0x0000
027a ; --------------------------------------------------------------------------------------
027a ; Debug chain
027a ; --------------------------------------------------------------------------------------
027a 0011 0000 | | .DBGLEN 0x0011,0x0000
027c 000b 002c | ,| .DBGLNO 0x000b,0x002c,0x004d,0x006e,0x008f,0x00b0,0x00b2,0x00b4,0x00b6,0x00b8,0x00ba,0x00bc,0x00be,0x00c0,0x00c2,0x00c4,0x00c6
028d 0001 0002 | | .XXX[0x11]
028f 0003 0004 | |
0291 0006 0007 | |
0293 0008 0009 | |
0295 000a 000b | |
0297 000c 000d | |
0299 000e 000f | |
029b 0010 0011 | |
029d 0012 | |
029e ; --------------------------------------------------------------------------------------
029e ; Debug chain
029e ; --------------------------------------------------------------------------------------
029e 0010 0000 | | .DBGLEN 0x0010,0x0000
02a0 00c9 00dd | | .DBGLNO 0x00c9,0x00dd,0x00e0,0x00e3,0x00e5,0x00e7,0x00e9,0x00eb,0x00ed,0x00ef,0x00f1,0x00f3,0x00f5,0x00f7,0x00f9,0x00fb
02b0 ; --------------------------------------------------------------------------------------
02b0 ; Debug chain
02b0 ; --------------------------------------------------------------------------------------
02b0 0000 0003 | | .DBGLEN 0x0000,0x0003
02b2 0103 010b | | .DBGLNO 0x0103,0x010b,0x0113
02b5 ; --------------------------------------------------------------------------------------
02b5 ; Debug chain
02b5 ; --------------------------------------------------------------------------------------
02b5 0000 0001 | | .DBGLEN 0x0000,0x0001
02b7 0123 | # | .DBGLNO 0x0123
02b8 ; --------------------------------------------------------------------------------------
02b8 ; Debug chain
02b8 ; --------------------------------------------------------------------------------------
02b8 0002 0005 | | .DBGLEN 0x0002,0x0005
02ba 012b 0130 | + 0| .DBGLNO 0x012b,0x0130,0x0131,0x0135,0x013e,0x0149,0x0153
02c1 ; --------------------------------------------------------------------------------------
02c1 ; Debug chain
02c1 ; --------------------------------------------------------------------------------------
02c1 0000 0003 | | .DBGLEN 0x0000,0x0003
02c3 015b 015f | [ _| .DBGLNO 0x015b,0x015f,0x0165
02c6 ; --------------------------------------------------------------------------------------
02c6 ; Debug chain
02c6 ; --------------------------------------------------------------------------------------
02c6 0000 0002 | | .DBGLEN 0x0000,0x0002
02c8 0173 017b | s {| .DBGLNO 0x0173,0x017b
02ca ; --------------------------------------------------------------------------------------
02ca ; Debug chain
02ca ; --------------------------------------------------------------------------------------
02ca 0000 0001 | | .DBGLEN 0x0000,0x0001
02cc 018b | | .DBGLNO 0x018b
02cd ; --------------------------------------------------------------------------------------
02cd ; Debug chain
02cd ; --------------------------------------------------------------------------------------
02cd 0000 0002 | | .DBGLEN 0x0000,0x0002
02cf 0193 0197 | | .DBGLNO 0x0193,0x0197
02d1 ; --------------------------------------------------------------------------------------
02d1 ; Debug chain
02d1 ; --------------------------------------------------------------------------------------
02d1 0000 0001 | | .DBGLEN 0x0000,0x0001
02d3 01a3 | | .DBGLNO 0x01a3
02d4 ; --------------------------------------------------------------------------------------
02d4 ; Debug chain
02d4 ; --------------------------------------------------------------------------------------
02d4 0000 0002 | | .DBGLEN 0x0000,0x0002
02d6 01ab 01b3 | | .DBGLNO 0x01ab,0x01b3
02d8 ; --------------------------------------------------------------------------------------
02d8 ; Debug chain
02d8 ; --------------------------------------------------------------------------------------
02d8 0000 0001 | | .DBGLEN 0x0000,0x0001
02da 01c3 | | .DBGLNO 0x01c3
02db ; --------------------------------------------------------------------------------------
02db ; Debug chain
02db ; --------------------------------------------------------------------------------------
02db 0000 0002 | | .DBGLEN 0x0000,0x0002
02dd 01cb 01cf | | .DBGLNO 0x01cb,0x01cf
02df ; --------------------------------------------------------------------------------------
02df ; Debug chain
02df ; --------------------------------------------------------------------------------------
02df 0000 0001 | | .DBGLEN 0x0000,0x0001
02e1 01db | | .DBGLNO 0x01db
02e2 ; --------------------------------------------------------------------------------------
02e2 ; Debug chain
02e2 ; --------------------------------------------------------------------------------------
02e2 0000 0005 | | .DBGLEN 0x0000,0x0005
02e4 01e3 01e9 | | .DBGLNO 0x01e3,0x01e9,0x01ed,0x01f4,0x0200
02e9 0000 0000 | | .BLANK 0000[0x117]