 00004A24: 55                           push      bp
 00004A25: 8BEC                         mov       bp,sp
 00004A27: 56                           push      si
 00004A28: 57                           push      di
 00004A29: 8B5604                       mov       dx,[bp][00004]
 00004A2C: 8BDA                         mov       bx,dx
 00004A2E: 668B4708                     mov       eax,[bx][00008]
 00004A32: A840                         test      al,040 ;"@"
 00004A34: 741F                         je        000004A55   -------- (1)
 00004A36: 8B4738                       mov       ax,[bx][00038]

 3d87 XO5: 0105
 3b47 XO5: 00A4 (IBM  :IBMCPD.COM)
 3b47 XO5: 0089 (INTEL:M32APD.COM) 

 00004A39: 3B06873E                     cmp       ax,[03E87]      
 00004A3D: 7525                         jne       000004A64   -------- (2)

 00004A3F: 8BDA                         mov       bx,dx
 00004A41: 8B473C                       mov       ax,[bx][0003C]
 00004A44: 3D8101                       cmp       ax,00181 ;""
 00004A47: 7416                         je        000004A5F   -------- (3)
 00004A49: 3D8201                       cmp       ax,00182 ;""
 00004A4C: 7411                         je        000004A5F   -------- (4)
 00004A4E: 3D8301                       cmp       ax,00183 ;""
 00004A51: 740C                         je        000004A5F   -------- (5)
 00004A53: EB0F                         jmps      000004A64   -------- (6)
 00004A55: 8BDA                         mov       bx,dx
 00004A57: 81BFD1011110                 cmp       w,[bx][001D1],01011 ;""
 00004A5D: 7505                         jne       000004A64   -------- (7)

 @@true:

 00004A5F: B80100                       mov       ax,00001 ;" "
 00004A62: EB02                         jmps      000004A66   -------- (8)

 @@false:

 00004A64: 33C0                         xor       ax,ax

 @@ret:

 00004A66: 5F                           pop       di
 00004A67: 5E                           pop       si
 00004A68: 5D                           pop       bp
 00004A69: C3                           retn
