EuroAssembler Index Manual Download Source Macros


Sitemap Links Forum Tests Projects

Test t7013: Compile OMF 16bit Dos linking OMF 16bit Dos


Description
Test creates linkable 16bit OMF file t7013.obj from linkable 16bit OMF module.
See also
LinkerCombinations  
Tested procedures
PfomfCompile   PfomfLoadPgm  
Source & expected listing t7013.htm.lst
| | EUROASM DEBUG=OFF,PROFILE=OFF,AUTOSEGMENT=ON,LIST=ON, \ | | DUMP=ON,DUMPWIDTH=25,DUMPALL=OFF,CPU=086 | |;; | |t7013OW PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=16, \ | | LISTMAP=ON,LISTGLOBALS=ON | | PUBLIC Write.D16 |[CODE] ::::Section changed. |0000: |Write.D16: PROC ; Write ASCIIZ string DS:SI in 16bit DOS. |0000:B402 | MOV AH,02h ; Dos function WRITE CHARACTER FROM DL TO STANDARD OUTPUT. |0002:8A14 |.1:MOV DL,[SI] ; Get one character. |0004:84D2 | TEST DL ; Test if it is the terminating zero. |0006:7405 | JZ .9: ; Go to the end if so. |0008:CD21 | INT 21h ; Call DOS service to write a character. |000A:46 | INC SI ; Let SI point to the next character. |000B:EBF5 | JMP .1: ; Repeat until DL=0. |000D:C3 |.9:RET |000E: | ENDPROC Write.D16: | |ENDPROGRAM t7013OW | **** ListMap "t7013OW.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=0000000Eh=14,width=16,align=0010h,purpose=CODE | **** ListGlobals "t7013OW.obj",Global=0,Public=1,Extern=0,eXport=0,Import=0 | Write.D16,[CODE]:00000000h,scope='P' | |;; | |t7013OB PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=16, \ | | LISTMAP=ON,LISTGLOBALS=ON | | PUBLIC Beep.D16 |[CODE] ::::Section changed. |0000: |Beep.D16: PROC ; Echo beep sound in 16bit DOS. |0000:B207 | MOV DL,7 ; BEL character, interpreted as beep sound. |0002:B402 | MOV AH,2 ; DOS function WRITE CHARACTER TO STANDARD OUTPUT. |0004:CD21 | INT 0x21 ; Call DOS service to send a BEL. |0006:C3 | RET ; Return to caller. |0007: | ENDPROC Beep.D16: | |ENDPROGRAM t7013OB | **** ListMap "t7013OB.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=00000007h=7,width=16,align=0010h,purpose=CODE | **** ListGlobals "t7013OB.obj",Global=0,Public=1,Extern=0,eXport=0,Import=0 | Beep.D16,[CODE]:00000000h,scope='P' | |;; | |t7013OE PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=16, \ | | LISTMAP=ON,LISTGLOBALS=ON | | PUBLIC Exit.D16 |[CODE] ::::Section changed. |0000: |Exit.D16: PROC ; Terminate program in 16bit DOS. |0000:B8004C | MOV AX,4C00h ; DOS function TERMINATE WITH RETURN CODE IN AL. |0003:CD21 | INT 21h ; Call DOS service to terminate the program. |0005: | ENDPROC Exit.D16: | |ENDPROGRAM t7013OE | **** ListMap "t7013OE.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=00000005h=5,width=16,align=0010h,purpose=CODE | **** ListGlobals "t7013OE.obj",Global=0,Public=1,Extern=0,eXport=0,Import=0 | Exit.D16,[CODE]:00000000h,scope='P' | |;; | |t7013 PROGRAM FORMAT=OMF,MODEL=SMALL,WIDTH=16, \ | | LISTMAP=ON,LISTGLOBALS=ON | | LINK t7013OW.obj, t7013OB.obj, t7013OE.obj | |ENDPROGRAM t7013 |# I0560 Linking OMF module ".\t7013OW.obj". |# I0560 Linking OMF module ".\t7013OB.obj". |# I0560 Linking OMF module ".\t7013OE.obj". | **** ListMap "t7013.obj",groups=0,segments=1,entry=,stack= | [CODE],RVA=00000000h,size=00000025h=37,width=16,align=0010h,purpose=CODE | **** ListGlobals "t7013.obj",Global=0,Public=3,Extern=0,eXport=0,Import=0 | Beep.D16,[CODE]:00000010h,scope='P' | Exit.D16,[CODE]:00000020h,scope='P' | Write.D16,[CODE]:00000000h,scope='P'
Expected messages t7013.out
I0180 Assembling source file "t7013.htm". I0270 Assembling source "t7013". I0310 Assembling source pass 1. I0330 Assembling source pass 2 - final. I0470 Assembling program "t7013OW". "t7013.htm"{62} I0510 Assembling program pass 1. "t7013.htm"{62} I0510 Assembling program pass 2. "t7013.htm"{62} I0530 Assembling program pass 3 - final. "t7013.htm"{62} I0660 16bit SMALL OMF file "t7013OW.obj" created, size=104. "t7013.htm"{76} I0650 Program "t7013OW" assembled in 3 passes with errorlevel 0. "t7013.htm"{76} I0470 Assembling program "t7013OB". "t7013.htm"{82} I0510 Assembling program pass 1. "t7013.htm"{82} I0510 Assembling program pass 2. "t7013.htm"{82} I0530 Assembling program pass 3 - final. "t7013.htm"{82} I0660 16bit SMALL OMF file "t7013OB.obj" created, size=96. "t7013.htm"{92} I0650 Program "t7013OB" assembled in 3 passes with errorlevel 0. "t7013.htm"{92} I0470 Assembling program "t7013OE". "t7013.htm"{98} I0510 Assembling program pass 1. "t7013.htm"{98} I0510 Assembling program pass 2. "t7013.htm"{98} I0530 Assembling program pass 3 - final. "t7013.htm"{98} I0660 16bit SMALL OMF file "t7013OE.obj" created, size=94. "t7013.htm"{106} I0650 Program "t7013OE" assembled in 3 passes with errorlevel 0. "t7013.htm"{106} I0470 Assembling program "t7013". "t7013.htm"{112} I0510 Assembling program pass 1. "t7013.htm"{112} I0530 Assembling program pass 2 - final. "t7013.htm"{112} I0560 Linking OMF module ".\t7013OW.obj". "t7013.htm"{115} I0560 Linking OMF module ".\t7013OB.obj". "t7013.htm"{115} I0560 Linking OMF module ".\t7013OE.obj". "t7013.htm"{115} I0660 16bit SMALL OMF file "t7013.obj" created, size=161. "t7013.htm"{115} I0650 Program "t7013" assembled in 2 passes with errorlevel 0. "t7013.htm"{115} I0750 Source "t7013" (178 lines) assembled in 2 passes with errorlevel 0. I0860 Listing file "t7013.htm.lst" created, size=4282. I0990 EuroAssembler terminated with errorlevel 0.
Expected output file t7013. obj
0000: 80 07 00 05 74 37 30 31 33 35 88 10 00 00 00 45  ¤·°·t70135¤·°°°E
0010: 75 72 6F 41 73 73 65 6D 62 6C 65 72 2F 88 05 00  uroAssembler/¤·°
0020: 00 9D 30 73 33 96 07 00 00 04 43 4F 44 45 44 98  °¤0s3¤·°°·CODED¤
0030: 07 00 68 25 00 02 01 00 D1 90 10 00 00 01 09 57  ·°h%°··°¤¤·°°··W
0040: 72 69 74 65 2E 44 31 36 00 00 00 72 90 0F 00 00  rite.D16°°°r¤·°°
0050: 01 08 42 65 65 70 2E 44 31 36 10 00 00 F3 90 0F  ··Beep.D16·°°¤¤·
0060: 00 00 01 08 45 78 69 74 2E 44 31 36 20 00 00 C5  °°··Exit.D16¯°°¤
0070: A0 29 00 01 00 00 B4 02 8A 14 84 D2 74 05 CD 21  ¤)°·°°¤·¤·¤¤t·¤!
0080: 46 EB F5 C3 90 90 B2 07 B4 02 CD 21 C3 90 90 90  F¤¤¤¤¤¤·¤·¤!¤¤¤¤
0090: 90 90 90 90 90 90 B8 00 4C CD 21 FA 8A 02 00 00  ¤¤¤¤¤¤¤°L¤!¤¤·°°
00A0: 74                                               t

▲Back to the top▲