📄 wompexam.gml
字号:
MEM_LOC (static) name "WideTitle" type 0x000b
data 90 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0004)
MEM_LOC (static) name "Jump" type 0x004b
data 00 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0004)
MEM_LOC (static) name "MonthDays" type 0x004c
data 30 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0004)
MEM_LOC (static) name "MonthName" type 0x004d
data 60 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0004)
CHANGE_SEG
data 00 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0001)
BLOCK name "main" type 0x004e start_offset 0x00000000 size 0x000000e7
PROLOG size 12 ret_addr_offset 0x00000010
Return Value:
REGISTER name "" type 0x0000: EAX
BP_OFFSET 0xfffffffc name "curr_time" type 0x001e
BP_OFFSET 0xfffffff8 name "tyme" type 0x004f
EPILOG size 05
BLOCK_END
BLOCK name "Calendar" type 0x0050 start_offset 0x000000e7 size 0x00000199
Parms:
REGISTER name "month" type 0x0006: EAX
REGISTER name "year" type 0x0006: EDX
REGISTER name "row" type 0x0006: EBX
REGISTER name "col" type 0x0006: ECX
BP_OFFSET 0x00000008 name "width" type 0x0006
BP_OFFSET 0x0000000c name "title" type 0x000b
PROLOG size 16 ret_addr_offset 0x00000004
BP_OFFSET 0xfffffffc name "start" type 0x0006
BP_OFFSET 0xfffffff8 name "days" type 0x0006
BP_OFFSET 0xfffffff4 name "box_width" type 0x0006
BP_OFFSET 0xfffffff0 name "str" type 0x000b
BP_OFFSET 0xffffffec name "i" type 0x0006
BP_OFFSET 0x0000000c name "title" type 0x000b
BP_OFFSET 0x00000008 name "width" type 0x0006
BP_OFFSET 0xffffffdc name "col" type 0x0006
BP_OFFSET 0xffffffe0 name "row" type 0x0006
BP_OFFSET 0xffffffe4 name "year" type 0x0006
BP_OFFSET 0xffffffe8 name "month" type 0x0006
EPILOG size 04
BLOCK_END
BLOCK name "Box" type 0x0051 start_offset 0x00000280 size 0x000000c4
Parms:
REGISTER name "row" type 0x0006: EAX
REGISTER name "col" type 0x0006: EDX
REGISTER name "width" type 0x0006: EBX
REGISTER name "height" type 0x0006: ECX
PROLOG size 14 ret_addr_offset 0x00000004
BP_OFFSET 0xfffffffc name "i" type 0x0006
BP_OFFSET 0xffffffec name "height" type 0x0006
BP_OFFSET 0xfffffff0 name "width" type 0x0006
BP_OFFSET 0xfffffff4 name "col" type 0x0006
BP_OFFSET 0xfffffff8 name "row" type 0x0006
EPILOG size 02
BLOCK_END
BLOCK name "Line" type 0x0052 start_offset 0x00000344 size 0x00000064
Parms:
REGISTER name "row" type 0x0006: EAX
REGISTER name "col" type 0x0006: EDX
REGISTER name "width" type 0x0006: EBX
REGISTER name "left" type 0x0008: ECX
BP_OFFSET 0x00000008 name "centre" type 0x0008
BP_OFFSET 0x0000000c name "right" type 0x0008
PROLOG size 15 ret_addr_offset 0x00000004
BP_OFFSET 0xffffffac name "buffer" type 0x0053
BP_OFFSET 0x0000000c name "right" type 0x0008
BP_OFFSET 0x00000008 name "centre" type 0x0008
BP_OFFSET 0xfffffffc name "left" type 0x0008
BP_OFFSET 0xffffffa0 name "width" type 0x0006
BP_OFFSET 0xffffffa4 name "col" type 0x0006
BP_OFFSET 0xffffffa8 name "row" type 0x0006
EPILOG size 04
BLOCK_END
BLOCK name "PosCursor" type 0x0054 start_offset 0x000003a8 size 0x00000045
Parms:
REGISTER name "row" type 0x0006: EAX
REGISTER name "col" type 0x0006: EDX
PROLOG size 15 ret_addr_offset 0x00000008
BP_OFFSET 0xffffffe4 name "regs" type 0x002c
BP_OFFSET 0xffffffdc name "col" type 0x0006
BP_OFFSET 0xffffffe0 name "row" type 0x0006
EPILOG size 03
BLOCK_END
BLOCK name "ClearScreen" type 0x001a start_offset 0x000003ed size 0x0000003c
PROLOG size 12 ret_addr_offset 0x0000000c
BP_OFFSET 0xffffffe4 name "regs" type 0x002c
EPILOG size 04
BLOCK_END
.code end
.do end
.if '&ccmd' eq 'wfc' .do begin
.code begin
&prompt.wfc sieve
&prompt.womp &sw.f- &sw.dx sieve
WATCOM Object Module Processor Version 1.0
.cpyrit 1990
.trdmrk
Converting sieve.OBJ
Miscellaneous Information
-------------------------
Processor : 8086
Memory Model : Large
Floating-point : Inline Emulation
Optimized : Yes
Lines Present : No
Types Present : No
Symbs Present : No
Source Language : Fortran
.code end
.code begin
&prompt.wfc &sw.d1 sieve
&prompt.womp &sw.f- &sw.dx sieve
WATCOM Object Module Processor Version 1.0
.cpyrit 1990
.trdmrk
Converting sieve.OBJ
Miscellaneous Information
-------------------------
Processor : 8086
Memory Model : Large
Floating-point : Inline Emulation
Optimized : Yes
Lines Present : Yes
Types Present : No
Symbs Present : No
Source Language : Fortran
.code end
.code begin
&prompt.wfc &sw.d2 sieve
&prompt.womp &sw.f- &sw.dx sieve
WATCOM Object Module Processor Version 1.0
.cpyrit 1990
.trdmrk
Converting sieve.OBJ
Miscellaneous Information
-------------------------
Processor : 8086
Memory Model : Large
Floating-point : Inline Emulation
Optimized : Yes
Lines Present : Yes
Types Present : Yes
Symbs Present : Yes
Source Language : Fortran
Type Information
----------------
0x0000: RESERVED
0x0001: RESERVED
0x0002: INTEGER size 0x00000008 bits UNSIGNED
0x0003: INTEGER size 0x00000020 bits UNSIGNED
0x0004: INTEGER size 0x00000008 bits SIGNED
0x0005: INTEGER size 0x00000010 bits SIGNED
0x0006: INTEGER size 0x00000020 bits SIGNED
0x0007: REAL size 0x00000020 bits
0x0008: REAL size 0x00000040 bits
0x0009: COMPLEX size 0x00000040 bits
0x000a: COMPLEX size 0x00000080 bits
0x000b: PROCEDURE
FAR ret_type 0x000c num_parms 00
0x000c: VOID
0x000d: SUBRANGE size 0x00000020 bits
base_type 0x0006(SIGNED) low 0x00000002 high 0x000003e8
0x000e: ARRAY size 0x00001f38 bits
base_type 0x0002 index_type 0x000d
Symbol Information
------------------
CHANGE_SEG
data 00 00 00 00
fixup SEG_REL POINTER Frame: TARGET Target: SI(0x0007)
BLOCK name "FMAIN" type 0x000b start_offset 0x00000000 size 0x00000146
PROLOG size 0b ret_addr_offset 0x0000000c
MEM_LOC (static) name "NUMBERS" type 0x000e
data 00 00 00 00
fixup SEG_REL POINTER Frame: TARGET Target: SI(0x0004)
BP_OFFSET 0xfffffff6 name "PRIMES" type 0x0006
BP_OFFSET 0xfffffff2 name "K" type 0x0006
BP_OFFSET 0xffffffee name "I" type 0x0006
EPILOG size 09
BLOCK_END
.code end
.do end
.if '&ccmd' eq 'wfc386' .do begin
.code begin
&prompt.wfc386 sieve
&prompt.womp &sw.f- &sw.dx sieve
WATCOM Object Module Processor Version 1.0
.cpyrit 1990
.trdmrk
Converting sieve.OBJ
Miscellaneous Information
-------------------------
Processor : 80386
Memory Model : Flat
Floating-point : 80x87 Inline Code
Optimized : Yes
Lines Present : No
Types Present : No
Symbs Present : No
Source Language : Fortran
.code end
.code begin
&prompt.wfc386 &sw.d1 sieve
&prompt.womp &sw.f- &sw.dx sieve
WATCOM Object Module Processor Version 1.0
.cpyrit 1990
.trdmrk
Converting sieve.OBJ
Miscellaneous Information
-------------------------
Processor : 80386
Memory Model : Flat
Floating-point : 80x87 Inline Code
Optimized : Yes
Lines Present : Yes
Types Present : No
Symbs Present : No
Source Language : Fortran
.code end
.code begin
&prompt.wfc386 &sw.d1 sieve
&prompt.womp &sw.f- &sw.dx sieve
WATCOM Object Module Processor Version 1.0
.cpyrit 1990
.trdmrk
Converting sieve.OBJ
Miscellaneous Information
-------------------------
Processor : 80386
Memory Model : Flat
Floating-point : 80x87 Inline Code
Optimized : Yes
Lines Present : Yes
Types Present : Yes
Symbs Present : Yes
Source Language : Fortran
Type Information
----------------
0x0000: RESERVED
0x0001: RESERVED
0x0002: INTEGER size 0x00000008 bits UNSIGNED
0x0003: INTEGER size 0x00000020 bits UNSIGNED
0x0004: INTEGER size 0x00000008 bits SIGNED
0x0005: INTEGER size 0x00000010 bits SIGNED
0x0006: INTEGER size 0x00000020 bits SIGNED
0x0007: REAL size 0x00000020 bits
0x0008: REAL size 0x00000040 bits
0x0009: COMPLEX size 0x00000040 bits
0x000a: COMPLEX size 0x00000080 bits
0x000b: PROCEDURE
NEAR 386 ret_type 0x000c num_parms 00
0x000c: VOID
0x000d: SUBRANGE size 0x00000020 bits
base_type 0x0006(SIGNED) low 0x00000002 high 0x000003e8
0x000e: ARRAY size 0x00001f38 bits
base_type 0x0002 index_type 0x000d
Symbol Information
------------------
CHANGE_SEG
data 00 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0007)
BLOCK name "FMAIN" type 0x000b start_offset 0x00000000 size 0x000000c3
PROLOG size 09 ret_addr_offset 0x00000010
MEM_LOC (static) name "NUMBERS" type 0x000e
data 00 00 00 00 00 00
fixup SEG_REL POINTER386 Frame: GI(0x0002) Target: SI(0x0004)
BP_OFFSET 0xfffffff8 name "PRIMES" type 0x0006
BP_OFFSET 0xfffffff4 name "K" type 0x0006
BP_OFFSET 0xfffffff0 name "I" type 0x0006
EPILOG size 05
BLOCK_END
.code end
.do end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -