| Index | Manual | Download | Source | Macros | Embedded word Case ins.
Sitemap | Links | Forum | Tests | Projects

# Test t8350: OMF object module for 16bit DOS

Tested procedures
  PfomfCompile

Source & expected listing t8350.htm.lst
  `| | EUROASM AUTOSEGMENT=ON,CPU=086,DUMPWIDTH=24,PRIV=ENABLED |7438333530 |%test %SET t8350 ; OMF.D16 |00000000: | | |%test PROGRAM FORMAT=OMF,WIDTH=16,MODEL=SMALL | |;; |[CODE] ::::Section changed. |0000: |Write.D16:: PROC ; Display ASCIIZ string pointed to by DS:SI using DOS. |0000:B402 | MOV AH,02h ; DOS service Teletype output. |0002:8A14 |.1:MOV DL,[SI] ; Load a character from string to DL, increment SI. |0004:80FA00 | CMP DL,0 ; Test if zero-terminator reached. |0007:7405 | JE .9: ; Exit the procedure if AL=0. |0009:CD21 | INT 21h ; Otherwise display the character DL and advance screen cursor. |000B:46 | INC SI ; Let DS:SI point to the next character. |000C:EBF4 | JMP .1: ; Repeat with following characters. |000E:C3 |.9:RET ; AX,BX,SI are clobbered. |000F: | ENDP Write.D16:: | |;; |000F: |Beep.D16:: PROC ; Display message "Beeping.." and play a sound using BIOS. |000F:BE[0000] | MOV SI,=B"Beeping..." ; Define a literal string. Assume DS=PARA# [RODATA}. |0012:E8EBFF | CALL Write.D16:: ; Display the notification "Beeping...". |0015:BE[0000] | MOV SI,=W(0x0007) ; Define ASCIIZ string with BEL character in [RODATA]. |0018:E8E5FF | CALL Write.D16:: ; Play the beep sound. |001B:C3 | RET ; AX,BX,SI are clobbered. |001C: | ENDP Beep.D16:: | |;; |001C: |Exit.D16:: PROC ; Display message "End", terminate the program. |001C:BE[0000] | MOV SI,.M: ; String "End" will be defined in segment [BSS] at DS:SI. |001F:C704456E | MOVW [SI+0],"En" ; Dynamically initialize the notification string. |0023:C744026420 | MOVW [SI+2],"d " ; Assume DS=PARA# [BSS]. |0028:C744040A0D | MOVW [SI+4],0x0D0A ; CR+LF. |002D:C6440600 | MOVB [SI+6],0 ; Zero-terminate the notification. |0031:E8CCFF | CALL Write.D16:: ; Display notification "End". |0034:B44C | MOV AH,4Ch ; DOS function EXIT. |0036:CD21 | INT 21h ; Terminate program and return to DOS. |[BSS] ::::Section changed. |0000:.............. |.M:DB 7*BYTE ; Reserve space for ASCIIZ string "End" in [BSS] segment. |[CODE] ::::Section changed. |0038: | ENDP Exit.D16:: |[@LT2] ====ListLiterals in section [@LT2]. |0000:0700 =W(0x0007) |[@LT1] ====ListLiterals in section [@LT1]. |0000:42656570696E672E~=B"Beeping..." | | ENDPROGRAM %test | **** ListMap "t8350.obj",model=SMALL,groups=2,segments=3,entry=,stack= | [CGROUP],FA=000000ADh,RVA=00000000h,size=00000038h=56,group [CODE] | [CODE],FA=000000ADh,RVA=00000000h,size=00000038h=56,width=16,align=0010h,purpose=CODE | [DGROUP],FA=00000000h,RVA=00000000h,size=0000000Dh=13,group [RODATA] [BSS] | [RODATA],FA=000000FEh,RVA=00000000h,size=0000000Dh=13,width=16,align=0010h,purpose=RODATA+LITERAL | [BSS],FA=00000000h,RVA=00000000h,size=00000007h=7,width=16,align=0010h,purpose=BSS | **** ListGlobals "t8350.obj",Global=0,Public=3,Extern=0,eXport=0,Import=0 | Beep.D16,[CGROUP]:0000000Fh,scope='P' | Exit.D16,[CGROUP]:0000001Ch,scope='P' | Write.D16,[CGROUP]:00000000h,scope='P'`

Expected messages t8350.out
  `I0180 Assembling source file "t8350.htm". I0270 Assembling source "t8350". I0310 Assembling source pass 1. I0330 Assembling source pass 2 - final. I0470 Assembling program "t8350". "t8350.htm"{51} I0510 Assembling program pass 1. "t8350.htm"{51} I0510 Assembling program pass 2. "t8350.htm"{51} I0530 Assembling program pass 3 - final. "t8350.htm"{51} I0660 16bit SMALL OMF file "t8350.obj" created, size=279. "t8350.htm"{90} I0650 Program "t8350" assembled in 3 passes with errorlevel 0. "t8350.htm"{90} I0750 Source "t8350" (141 lines) assembled in 2 passes with errorlevel 0. I0860 Listing file "t8350.htm.lst" created, size=3856. I0990 EuroAssembler terminated with errorlevel 0.`

Expected output file t8350. obj

      0000: 80 07 00 05 74 38 33 35 30 30 88 10 00 00 00 45  ¤·°·t83500¤·°°°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 20 00 00 06 43 47 52 4F 55 50  °¤0s3¤¯°°·CGROUP
      0030: 04 43 4F 44 45 06 44 47 52 4F 55 50 06 52 4F 44  ·CODE·DGROUP·ROD
      0040: 41 54 41 03 42 53 53 D2 98 07 00 68 38 00 03 01  ATA·BSS¤¤·°h8°··
      0050: 00 BD 98 07 00 68 0D 00 05 01 00 E6 98 07 00 68  °¤¤·°h·°··°¤¤·°h
      0060: 07 00 06 01 00 EB 9A 04 00 02 FF 01 60 9A 06 00  ·°··°¤¤·°·¤·`¤·°
      0070: 04 FF 02 FF 03 59 90 10 00 00 01 09 57 72 69 74  ·¤·¤·Y¤·°°··Writ
      0080: 65 2E 44 31 36 00 00 00 72 90 0F 00 00 01 08 42  e.D16°°°r¤·°°··B
      0090: 65 65 70 2E 44 31 36 0F 00 00 F4 90 0F 00 00 01  eep.D16·°°¤¤·°°·
      00A0: 08 45 78 69 74 2E 44 31 36 1C 00 00 C9 A0 3C 00  ·Exit.D16·°°¤¤<°
      00B0: 01 00 00 B4 02 8A 14 80 FA 00 74 05 CD 21 46 EB  ·°°¤·¤·¤¤°t·¤!F¤
      00C0: F4 C3 BE 00 00 E8 EB FF BE 00 00 E8 E5 FF C3 BE  ¤¤¤°°¤¤¤¤°°¤¤¤¤¤
      00D0: 00 00 C7 04 45 6E C7 44 02 64 20 C7 44 04 0A 0D  °°¤·En¤D·d¯¤D·¬·
      00E0: C6 44 06 00 E8 CC FF B4 4C CD 21 85 9C 0F 00 C4  ¤D·°¤¤¤¤L¤!¤¤·°¤
      00F0: 10 50 02 02 00 C4 16 54 02 C4 1D 54 03 C5 A0 11  ·P··°¤·T·¤·T·¤¤·
      0100: 00 02 00 00 07 00 42 65 65 70 69 6E 67 2E 2E 2E  °·°°·°Beeping...
      0110: 00 02 8A 02 00 00 74                             °·¤·°°t

▲Back to the top▲