16/fcsp2src/sp2wdis.asm

   1 .8086
   2 code            SEGMENT PARA PUBLIC USE16 'CODE'
   3                 ASSUME CS:code, DS:DGROUP, SS:DGROUP
   4         add             byte ptr [bx+si],al
   5         add             byte ptr [bx+si],al
   6         add             byte ptr [bx+si],al
   7         add             byte ptr [bx+si],al
   8         add             byte ptr [bx+si],al
   9         add             byte ptr [bx+si],al
  10         add             byte ptr [bx+si],al
  11         add             byte ptr [bx+si],al
  12         add             byte ptr [bx+si],al
  13         add             byte ptr [bx+si],al
  14         add             byte ptr [bx+si],al
  15         add             byte ptr [bx+si],al
  16         add             byte ptr [bx+si],al
  17         add             byte ptr [bx+si],al
  18         add             byte ptr [bx+si],al
  19         add             byte ptr [bx+si],al
  20         add             byte ptr [bx+si],al
  21         add             byte ptr [bx+si],al
  22         add             byte ptr [bx+si],al
  23         add             byte ptr [bx+si],al
  24         add             byte ptr [bx+si],al
  25         add             byte ptr [bx+si],al
  26         add             byte ptr [bx+si],al
  27         add             byte ptr [bx+si],al
  28         add             byte ptr [bx+si],al
  29         add             byte ptr [bx+si],al
  30         add             byte ptr [bx+si],al
  31         add             byte ptr [bx+si],al
  32         add             byte ptr [bx+si],al
  33         add             byte ptr [bx+si],al
  34         add             byte ptr [bx+si],al
  35         add             byte ptr [bx+si],al
  36         add             byte ptr [bx+si],al
  37         add             byte ptr [bx+si],al
  38         add             byte ptr [bx+si],al
  39         add             byte ptr [bx+si],al
  40         add             byte ptr [bx+si],al
  41         add             byte ptr [bx+si],al
  42         add             byte ptr [bx+si],al
  43         add             byte ptr [bx+si],al
  44         add             byte ptr [bx+si],al
  45         add             byte ptr [bx+si],al
  46         add             byte ptr [bx+si],al
  47         add             byte ptr [bx+si],al
  48         add             byte ptr [bx+si],al
  49         add             byte ptr [bx+si],al
  50         add             byte ptr [bx+si],al
  51         add             byte ptr [bx+si],al
  52         add             byte ptr [bx+si],al
  53         add             byte ptr [bx+si],al
  54         add             byte ptr [bx+si],al
  55         add             byte ptr [bx+si],al
  56         add             byte ptr [bx+si],al
  57         add             byte ptr [bx+si],al
  58         add             byte ptr [bx+si],al
  59         add             byte ptr [bx+si],al
  60         add             byte ptr [bx+si],al
  61         add             byte ptr [bx+si],al
  62         add             byte ptr [bx+si],al
  63         add             byte ptr [bx+si],al
  64         add             byte ptr [bx+si],al
  65         add             byte ptr [bx+si],al
  66         add             byte ptr [bx+si],al
  67         add             byte ptr [bx+si],al
  68         add             byte ptr [bx+si],al
  69         add             byte ptr [bx+si],al
  70         add             byte ptr [bx+si],al
  71         add             byte ptr [bx+si],al
  72         add             byte ptr [bx+si],al
  73         add             byte ptr [bx+si],al
  74         add             byte ptr [bx+si],al
  75         add             byte ptr [bx+si],al
  76         add             byte ptr [bx+si],al
  77         add             byte ptr [bx+si],al
  78         add             byte ptr [bx+si],al
  79         add             byte ptr [bx+si],al
  80         add             byte ptr [bx+si],al
  81         add             byte ptr [bx+si],al
  82         add             byte ptr [bx+si],al
  83         add             byte ptr [bx+si],al
  84         add             byte ptr [bx+si],al
  85         add             byte ptr [bx+si],al
  86         add             byte ptr [bx+si],al
  87         add             byte ptr [bx+si],al
  88         add             byte ptr [bx+si],al
  89         add             byte ptr [bx+si],al
  90         add             byte ptr [bx+si],al
  91         add             byte ptr [bx+si],al
  92         add             byte ptr [bx+si],al
  93         add             byte ptr [bx+si],al
  94         add             byte ptr [bx+si],al
  95         add             byte ptr [bx+si],al
  96         add             byte ptr [bx+si],al
  97         add             byte ptr [bx+si],al
  98         add             byte ptr [bx+si],al
  99         add             byte ptr [bx+si],al
 100         add             byte ptr [bx+si],al
 101         add             byte ptr [bx+si],al
 102         add             byte ptr [bx+si],al
 103         add             byte ptr [bx+si],al
 104         add             byte ptr [bx+si],al
 105         add             byte ptr [bx+si],al
 106         add             byte ptr [bx+si],al
 107         add             byte ptr [bx+si],al
 108         add             byte ptr [bx+si],al
 109         add             byte ptr [bx+si],al
 110         add             byte ptr [bx+si],al
 111         add             byte ptr [bx+si],al
 112         add             byte ptr [bx+si],al
 113         add             byte ptr [bx+si],al
 114         add             byte ptr [bx+si],al
 115         add             byte ptr [bx+si],al
 116         add             byte ptr [bx+si],al
 117         add             byte ptr [bx+si],al
 118         add             byte ptr [bx+si],al
 119         add             byte ptr [bx+si],al
 120         add             byte ptr [bx+si],al
 121         add             byte ptr [bx+si],al
 122         add             byte ptr [bx+si],al
 123         add             byte ptr [bx+si],al
 124         add             byte ptr [bx+si],al
 125         add             byte ptr [bx+si],al
 126         add             byte ptr [bx+si],al
 127         add             byte ptr [bx+si],al
 128         add             byte ptr [bx+si],al
 129         add             byte ptr [bx+si],al
 130         add             byte ptr [bx+si],al
 131         add             byte ptr [bx+si],al
 132         cld
 133         cld
 134         jmp             near ptr main
 135 L$1:
 136         call            near ptr L$2
 137         add             ah,3
 138 L$2:
 139         lodsb
 140 a_outaw:
 141         push            ax
 142         push            cx
 143         xchg            al,ah
 144         mov             dx,388H
 145         out             dx,al
 146         mov             cx,7
 147         call            near ptr L$3
 148         mov             dx,389H
 149         mov             al,ah
 150         out             dx,al
 151         mov             cx,1eH
 152         call            near ptr L$3
 153         pop             cx
 154         pop             ax
 155         ret
 156 L$3:
 157         in              al,dx
 158         loop            L$3
 159         ret
 160 a_loadinstrument:
 161         mov             ah,byte ptr L$59[bx]
 162         mov             cx,4
 163 L$4:
 164         call            near ptr L$1
 165         add             ah,1dH
 166         loop            L$4
 167         add             ah,40H
 168         call            near ptr L$1
 169         mov             ah,bl
 170         add             ah,0c0H
 171         jmp             L$2
 172 a_playnote:
 173         push            bx
 174         xchg            ah,bl
 175         add             ah,0a0H
 176         call            near ptr a_outaw
 177         mov             al,bl
 178         add             ah,10H
 179         pop             bx
 180         jmp             a_outaw
 181 a_init:
 182         mov             ax,120H
 183         call            near ptr a_outaw
 184         mov             ax,800H
 185         call            near ptr a_outaw
 186         mov             ah,0bdH
 187         call            near ptr a_outaw
 188         mov             bp,9
 189         xor             bx,bx
 190         mov             di,offset L$66
 191 L$5:
 192         mov             si,word ptr [di]
 193         add             di,2
 194         call            near ptr a_loadinstrument
 195         xor             ax,ax
 196         call            near ptr a_playnote
 197         inc             bx
 198         dec             bp
 199         jne             L$5
 200         ret
 201 a_dorow:
 202         sub             byte ptr L$108,1
 203         jae             L$10
 204         mov             byte ptr L$108,8
 205         mov             cx,8
 206         mov             di,offset L$72
 207         xor             bx,bx
 208 L$6:
 209         sub             byte ptr L$109[bx],1
 210         jns             L$9
 211         mov             si,word ptr [di]
 212         xor             ax,ax
 213         call            near ptr a_playnote
 214 L$7:
 215         lodsb
 216         or              al,al
 217         je              L$11
 218         jns             L$8
 219         sub             al,81H
 220         mov             byte ptr L$110[bx],al
 221         lodsb
 222 L$8:
 223         mov             dl,al
 224         and             ax,0fH
 225         mov             bp,ax
 226         add             bp,bp
 227         mov             ax,word ptr ds:L$60[bp]
 228         shr             dl,2
 229         and             dl,0fcH
 230         add             ah,dl
 231         call            near ptr a_playnote
 232         mov             al,byte ptr L$110[bx]
 233         mov             byte ptr L$109[bx],al
 234         mov             word ptr [di],si
 235 L$9:
 236         add             di,4
 237         inc             bx
 238         loop            L$6
 239 L$10:
 240         ret
 241 L$11:
 242         mov             si,word ptr 2[di]
 243         jmp             L$7
 244 L$12:
 245         add             ax,word ptr [bx]
 246         mov             word ptr [bx],ax
 247 L$13:
 248         add             ax,4000H
 249 L$14:
 250         mov             bx,ax
 251         mov             cx,bx
 252         and             cx,3ffH
 253         neg             cx
 254         add             cx,3ffH
 255         shr             bx,0aH
 256         mov             ah,byte ptr L$57[bx]
 257         xor             al,al
 258         imul            cx
 259         push            ax
 260         push            dx
 261         mov             ah,byte ptr L$58[bx]
 262         xor             al,al
 263         neg             cx
 264         add             cx,3ffH
 265         imul            cx
 266         pop             bx
 267         pop             cx
 268         add             ax,cx
 269         adc             dx,bx
 270         shrd            ax,dx,0bH
 271         ret
 272 rand:
 273         mov             eax,41fbf0e7H
 274         mul             dword ptr L$115
 275         add             eax,17b99H
 276         mov             dword ptr L$115,eax
 277         shr             eax,0fH
 278         and             ax,1fffH
 279         sub             ax,1000H
 280         add             bx,2
 281         mov             word ptr [bx],ax
 282         ret
 283 inittimer:
 284         mov             eax,dword ptr fs:[20H]
 285         mov             dword ptr L$114,eax
 286         mov             ax,cs
 287         shl             eax,10H
 288         mov             ax,offset intti8
 289         mov             dx,4268H
 290         jmp             L$16
 291 L$15:
 292         mov             eax,dword ptr L$114
 293         xor             dx,dx
 294 L$16:
 295         cli
 296         mov             dword ptr fs:[20H],eax
 297         mov             al,36H
 298         out             43H,al
 299         mov             al,dl
 300         out             40H,al
 301         mov             al,dh
 302         out             40H,al
 303         sti
 304         ret
 305 intti8:
 306         push            ax
 307         mov             al,20H
 308         out             20H,al
 309         inc             word ptr cs:L$113
 310         pop             ax
 311         iret
 312 setpal:
 313         mov             dx,3c8H
 314         xor             al,al
 315         out             dx,al
 316         inc             dx
 317         mov             cx,8
 318 L$17:
 319         xor             bh,bh
 320         mov             bl,byte ptr [si]
 321         shr             bl,2
 322         call            near ptr L$18
 323         mov             bl,byte ptr [si]
 324         shl             bx,2
 325         call            near ptr L$18
 326         inc             si
 327         loop            L$17
 328         ret
 329 L$18:
 330         and             bx,1eH
 331         mov             ax,word ptr L$61[bx]
 332         out             dx,al
 333         mov             al,ah
 334         out             dx,al
 335         mov             al,byte ptr L$62[bx]
 336         out             dx,al
 337         ret
 338 clearcopy:
 339         xor             edx,edx
 340         mov             si,offset L$93
 341         mov             bx,4
 342         mov             cx,0c8H
 343         mov             di,0fffcH
 344 L$19:
 345         mov             bp,5
 346 L$20:
 347         mov             eax,dword ptr [si]
 348         add             di,bx
 349         mov             dword ptr [si],edx
 350         add             si,bx
 351         mov             dword ptr es:[di],eax
 352         mov             eax,dword ptr [si]
 353         add             di,bx
 354         mov             dword ptr [si],edx
 355         add             si,bx
 356         mov             dword ptr es:[di],eax
 357         dec             bp
 358         jne             L$20
 359         add             si,bx
 360         dec             cx
 361         jne             L$19
 362         ret
 363 pset1:
 364         mov             al,byte ptr L$88[si]
 365         or              byte ptr [di],al
 366         ret
 367 pset2:
 368         mov             ax,word ptr L$91[si]
 369         or              word ptr [di],ax
 370         or              word ptr 2cH[di],ax
 371         cmp             bp,206cH
 372         jl              L$21
 373         mov             ax,word ptr L$90[si]
 374         or              word ptr -2cH[di],ax
 375         or              word ptr 58H[di],ax
 376         mov             ax,word ptr L$89[si]
 377         or              word ptr -58H[di],ax
 378         or              word ptr 84H[di],ax
 379         ret
 380 L$21:
 381         or              word ptr -2cH[di],ax
 382         or              word ptr 58H[di],ax
 383         mov             ax,word ptr L$90[si]
 384         or              word ptr -58H[di],ax
 385         or              word ptr 84H[di],ax
 386         ret
 387 letter3d:
 388         sub             bx,41H
 389         jb              L$25
 390         shl             bx,3
 391         mov             di,word ptr L$111
 392         mov             cx,8
 393 L$22:
 394         push            cx
 395         push            si
 396         mov             cx,8
 397 L$23:
 398         cmp             byte ptr L$94[bx],0
 399         je              L$24
 400         mov             word ptr L$96[di],si
 401         mov             word ptr L$97[di],bp
 402         push            si
 403         add             si,word ptr L$106
 404         sar             si,6
 405         and             si,3fH
 406         mov             al,byte ptr L$57[si]
 407         cbw
 408         pop             si
 409         shl             ax,2
 410         mov             word ptr L$98[di],ax
 411         mov             word ptr L$99[di],offset pset2
 412         add             di,8
 413         and             di,7ffH
 414 L$24:
 415         inc             bx
 416         add             si,80H
 417         loop            L$23
 418         pop             si
 419         add             bx,138H
 420         add             bp,80H
 421         pop             cx
 422         loop            L$22
 423         mov             word ptr L$111,di
 424 L$25:
 425         ret
 426 set3drot:
 427         push            ax
 428         call            near ptr L$14
 429         mov             word ptr 4[di],ax
 430         neg             ax
 431         mov             word ptr 2[di],ax
 432         pop             ax
 433         call            near ptr L$13
 434         mov             word ptr [di],ax
 435         mov             word ptr 6[di],ax
 436         ret
 437 rotate2x2i:
 438         push            bx
 439         mov             ax,di
 440         imul            word ptr [si]
 441         mov             cx,ax
 442         mov             bx,dx
 443         mov             ax,bp
 444         imul            word ptr 2[si]
 445         add             cx,ax
 446         adc             bx,dx
 447         shrd            cx,bx,0eH
 448         pop             bx
 449         add             si,4
 450         ret
 451 doit:
 452         mov             dx,3daH
 453 L$26:
 454         in              al,dx
 455         test            al,8
 456         jne             L$26
 457 L$27:
 458         in              al,dx
 459         test            al,8
 460         je              L$27
 461         mov             si,word ptr L$65
 462         push            si
 463         call            near ptr setpal
 464         pop             si
 465         add             si,9
 466         cmp             si,offset L$64
 467         jbe             L$28
 468         mov             si,offset L$63
 469 L$28:
 470         mov             word ptr L$65,si
 471         mov             al,2
 472         mov             ah,byte ptr 8[si]
 473         mov             dx,3c4H
 474         out             dx,ax
 475         call            near ptr clearcopy
 476         xor             cx,cx
 477         mov             byte ptr L$112,0
 478         xchg            word ptr L$113,cx
 479         jcxz            L$30
 480 L$29:
 481         push            cx
 482         add             byte ptr L$112,5aH
 483         call            near ptr doit70
 484         pop             cx
 485         loop            L$29
 486 L$30:
 487         mov             cx,1bcH
 488         mov             bx,offset L$96
 489 L$31:
 490         push            cx
 491         push            bx
 492         mov             bp,word ptr 2[bx]
 493         mov             di,word ptr 4[bx]
 494         cmp             word ptr 6[bx],offset pset2
 495         jne             L$32
 496         mov             cx,word ptr [bx]
 497         mov             si,word ptr L$107
 498         add             si,cx
 499         sar             si,7
 500         and             si,3fH
 501         mov             al,byte ptr L$57[si]
 502         cbw
 503         shl             ax,2
 504         add             bp,ax
 505         sub             cx,word ptr L$112
 506         mov             word ptr [bx],cx
 507         cmp             cx,0f0c4H
 508         jl              L$33
 509         cmp             cx,0f3cH
 510         jg              L$33
 511 L$32:
 512         mov             si,offset L$100
 513         call            near ptr rotate2x2i
 514         push            cx
 515         call            near ptr rotate2x2i
 516         pop             di
 517         mov             bp,word ptr [bx]
 518         mov             si,offset L$101
 519         push            cx
 520         call            near ptr rotate2x2i
 521         push            cx
 522         call            near ptr rotate2x2i
 523         pop             bp
 524         pop             di
 525         add             bp,word ptr L$102
 526         cmp             bp,400H
 527         jl              L$33
 528         mov             ax,100H
 529         imul            di
 530         idiv            bp
 531         add             ax,64H
 532         mov             di,ax
 533         mov             ax,133H
 534         imul            cx
 535         idiv            bp
 536         add             ax,0a0H
 537         mov             si,ax
 538         mov             ax,word ptr 6[bx]
 539         cmp             si,13fH
 540         ja              L$33
 541         cmp             di,0c7H
 542         ja              L$33
 543         add             di,di
 544         mov             di,word ptr L$86[di]
 545         add             si,si
 546         add             di,word ptr L$87[si]
 547         call            ax
 548 L$33:
 549         pop             bx
 550         pop             cx
 551         add             bx,8
 552         dec             cx
 553         jne             L$31
 554         ret
 555 doit70:
 556         add             byte ptr L$106,46H
 557         add             byte ptr L$107,0b1H
 558         add             word ptr L$53,0bb8H
 559         mov             bx,offset L$105
 560         mov             ax,4dH
 561         call            near ptr L$12
 562         sar             ax,5
 563         mov             word ptr L$103,ax
 564         mov             bx,offset L$56
 565         mov             ax,172H
 566         call            near ptr L$12
 567         sar             ax,3
 568         add             ax,22b8H
 569         mov             word ptr L$102,ax
 570         mov             bx,offset L$104
 571         mov             ax,word ptr L$103
 572         call            near ptr L$12
 573         imul            word ptr L$54
 574         shrd            ax,dx,8
 575         mov             di,offset L$100
 576         call            near ptr set3drot
 577         mov             bx,offset L$55
 578         mov             ax,0c8H
 579         call            near ptr L$12
 580         sar             ax,1
 581         mov             di,offset L$101
 582         call            near ptr set3drot
 583         sub             word ptr L$52,5aH
 584         jae             L$36
 585         mov             word ptr L$52,3ffH
 586         mov             si,word ptr L$51
 587         mov             bl,byte ptr [si]
 588         and             bx,0ffH
 589         je              L$35
 590         inc             si
 591         mov             word ptr L$51,si
 592         cmp             bl,20H
 593         jge             L$34
 594         shl             bx,9
 595         mov             word ptr L$52,bx
 596         jmp             L$36
 597 L$34:
 598         mov             bp,0
 599         mov             si,1004H
 600         call            near ptr letter3d
 601         jmp             L$36
 602 L$35:
 603         mov             si,offset L$84
 604         mov             word ptr L$51,si
 605 L$36:
 606         jmp             near ptr a_dorow
 607 main:
 608         push            cs
 609         push            cs
 610         pop             ds
 611         pop             es
 612         mov             cx,2627H
 613         mov             di,offset L$86
 614         xor             ax,ax
 615         rep stosw
 616         mov             dx,0a000H
 617         mov             es,dx
 618         push            sp
 619         pop             dx
 620         cmp             dx,sp
 621         je              L$38
 622 L$37:
 623         jmp             near ptr L$47
 624 L$38:
 625         mov             bx,offset L$86
 626         sgdt            fword ptr [bx]
 627         cmp             byte ptr 5[bx],0
 628         js              L$37
 629         mov             fs,ax
 630         mov             ax,1a00H
 631         int             10H
 632         cmp             al,1aH
 633         jne             L$47
 634         cmp             bl,7
 635         jb              L$47
 636         mov             ax,13H
 637         int             10H
 638         mov             cx,1aH
 639         mov             bx,10H
 640         mov             ax,0e41H
 641 L$39:
 642         int             10H
 643         inc             al
 644         loop            L$39
 645         mov             cx,500H
 646         mov             bx,offset L$94
 647         xor             di,di
 648 L$40:
 649         mov             ax,word ptr es:[di]
 650         mov             word ptr [bx+di],ax
 651         add             di,2
 652         loop            L$40
 653         mov             ax,0dH
 654         int             10H
 655         mov             si,0fffeH
 656         mov             di,offset L$92
 657         mov             bl,80H
 658         xor             bp,bp
 659         jmp             L$42
 660 L$41:
 661         mov             word ptr L$86[si],di
 662         mov             byte ptr L$88[si],bl
 663         mov             word ptr L$91[si],cx
 664         shr             cl,1
 665         rcr             ch,1
 666         mov             word ptr L$90[si],dx
 667         shr             dl,1
 668         rcr             dh,1
 669         mov             word ptr L$89[si],ax
 670         shr             al,1
 671         rcr             ah,1
 672         mov             word ptr L$87[si],bp
 673         ror             bl,1
 674         jae             L$43
 675         inc             bp
 676 L$42:
 677         mov             cx,0feH
 678         mov             dx,7cH
 679         mov             ax,38H
 680 L$43:
 681         add             di,2cH
 682         add             si,2
 683         cmp             si,280H
 684         jle             L$41
 685         mov             dx,3daH
 686         in              al,dx
 687         mov             dl,0c0H
 688         xor             ax,ax
 689         mov             cx,10H
 690 L$44:
 691         out             dx,al
 692         out             dx,al
 693         inc             al
 694         loop            L$44
 695         mov             al,20H
 696         out             dx,al
 697         mov             cx,1bcH
 698         mov             bx,offset L$95
 699 L$45:
 700         push            cx
 701         call            near ptr rand
 702         call            near ptr rand
 703         call            near ptr rand
 704         sar             ax,2
 705         mov             word ptr [bx],ax
 706         add             bx,2
 707         mov             word ptr [bx],offset pset1
 708         pop             cx
 709         loop            L$45
 710         call            near ptr a_init
 711         call            near ptr inittimer
 712 L$46:
 713         call            near ptr doit
 714         mov             ah,1
 715         int             16H
 716         je              L$46
 717         mov             ah,0
 718         int             16H
 719         call            near ptr L$15
 720         call            near ptr a_init
 721 L$47:
 722         mov             ax,3
 723         int             10H
 724         mov             si,offset L$85
 725         push            0b800H
 726         pop             es
 727         xor             di,di
 728         mov             ah,0eH
 729 L$48:
 730         lodsb
 731         cmp             al,1fH
 732         jae             L$49
 733         mov             ah,al
 734         jmp             L$48
 735 L$49:
 736         je              L$50
 737         stosw
 738         jmp             L$48
 739 L$50:
 740         mov             ax,4c00H
 741         int             21H
 742 L$51:
 743     DW  offset L$84
 744 L$52:
 745     DB  1, 0
 746 L$53:
 747     DB  0, 0
 748 L$54:
 749     DB  40H, 0
 750 L$55:
 751     DB  0e0H, 0b1H
 752 L$56:
 753     DB  80H, 3eH
 754 L$57:
 755     DB  0
 756 L$58:
 757     DB  0cH, 18H, 24H, 30H, 3bH, 46H, 50H, 59H
 758     DB  62H, 69H, 70H, 75H, 79H, 7cH, 7eH, 7fH
 759     DB  7eH, 7cH, 79H, 75H, 70H, 69H, 62H, 59H
 760     DB  50H, 46H, 3bH, 30H, 24H, 18H, 0cH, 0
 761     DB  0f4H, 0e8H, 0dcH, 0d0H, 0c5H, 0baH, 0b0H, 0a7H
 762     DB  9eH, 97H, 90H, 8bH, 87H, 84H, 82H, 81H
 763     DB  82H, 84H, 87H, 8bH, 90H, 97H, 9eH, 0a7H
 764     DB  0b0H, 0baH, 0c5H, 0d0H, 0dcH, 0e8H, 0f4H, 0
 765     DB  3, 6, 9, 0cH, 0fH, 12H, 15H, 18H
 766     DB  1bH, 1eH, 21H, 24H, 27H, 2aH, 2dH, 30H
 767     DB  33H, 36H, 39H, 3bH, 3eH, 41H, 43H, 46H
 768 L$59:
 769     DB  20H, 21H, 22H, 28H, 29H, 2aH, 30H, 31H
 770     DB  32H
 771 L$60:
 772     DB  6bH, 21H, 81H, 21H, 98H, 21H, 0b0H, 21H
 773     DB  0caH, 21H, 0e5H, 21H, 2, 22H, 20H, 22H
 774     DB  41H, 22H, 63H, 22H, 87H, 22H, 64H, 23H
 775 L$61:
 776     DB  0, 0
 777 L$62:
 778     DB  0, 0, 0, 0fH, 23H, 0, 10H, 1eH
 779     DB  30H, 0, 20H, 2dH, 37H, 0, 3cH, 3dH
 780     DB  3eH
 781 L$63:
 782     DB  4, 34H, 24H, 34H, 14H, 34H, 24H, 34H
 783     DB  1, 3, 23H, 13H, 23H, 44H, 44H, 44H
 784     DB  44H, 8, 2, 12H, 44H, 44H, 33H, 33H
 785     DB  44H, 44H, 4
 786 L$64:
 787     DB  1, 44H, 33H, 44H, 22H, 44H, 33H, 44H
 788     DB  2
 789 L$65:
 790     DW  offset L$63
 791 L$66:
 792     DW  offset L$71
 793     DW  offset L$68
 794     DW  offset L$70
 795     DW  offset L$69
 796     DW  offset L$69
 797     DW  offset L$67
 798     DW  offset L$67
 799     DW  offset L$70
 800 L$67:
 801     DB  41H, 0c2H, 6, 0, 23H, 0f2H, 0f0H, 0f0H
 802     DB  1, 0, 4
 803 L$68:
 804     DB  91H, 40H, 87H, 80H, 0f3H, 6fH, 23H, 3
 805     DB  1, 1, 2
 806 L$69:
 807     DB  0e1H, 21H, 11H, 80H, 11H, 13H, 22H, 22H
 808     DB  0, 0, 0cH
 809 L$70:
 810     DB  61H, 21H, 1bH, 0, 62H, 84H, 56H, 55H
 811     DB  0, 0, 0eH
 812 L$71:
 813     DB  91H, 40H, 87H, 88H, 0f3H, 6fH, 23H, 3
 814     DB  1, 1, 2
 815 L$72:
 816     DW  offset L$73
 817     DW  offset L$74
 818     DW  offset L$75
 819     DW  offset L$76
 820     DW  offset L$77
 821     DW  offset L$78
 822     DW  offset L$79
 823     DW  offset L$79
 824     DW  offset L$80
 825     DW  offset L$80
 826     DW  offset L$81
 827     DW  offset L$81
 828     DW  offset L$82
 829     DW  offset L$82
 830     DW  offset L$83
 831     DW  offset L$83
 832 L$73:
 833     DB  81H
 834 L$74:
 835     DB  57H, 50H, 50H, 55H, 57H, 50H, 55H, 57H
 836     DB  50H, 55H, 57H, 50H, 55H, 57H, 50H, 55H
 837     DB  0
 838 L$75:
 839     DB  81H
 840 L$76:
 841     DB  50H, 55H, 57H, 50H, 55H, 57H, 50H, 55H
 842     DB  57H, 50H, 55H, 57H, 50H, 55H, 57H, 50H
 843     DB  0
 844 L$77:
 845     DB  0c0H, 50H, 84H, 30H, 20H, 30H, 20H, 2aH
 846     DB  1aH, 2aH, 1aH, 30H, 20H, 30H, 20H, 2aH
 847     DB  1aH, 2aH, 1aH
 848 L$78:
 849     DB  30H, 20H, 30H, 20H, 2aH, 1aH, 2aH, 1aH
 850     DB  25H, 15H, 25H, 15H, 28H, 18H, 2aH, 1aH
 851     DB  0
 852 L$79:
 853     DB  0a0H, 50H, 40H, 0c0H, 40H, 88H, 40H, 40H
 854     DB  3aH, 42H, 90H, 45H, 88H, 40H, 42H, 40H
 855     DB  47H, 90H, 4aH, 88H, 45H, 98H, 40H, 0
 856 L$80:
 857     DB  0a0H, 50H, 30H, 0c0H, 47H, 88H, 47H, 43H
 858     DB  42H, 45H, 47H, 45H, 48H, 47H, 47H, 50H
 859     DB  52H, 84H, 50H, 4aH, 88H, 50H, 98H, 45H
 860     DB  0
 861 L$81:
 862     DB  0c0H, 20H, 0a0H, 10H, 10H, 90H, 10H, 2aH
 863     DB  25H, 88H, 28H, 2aH, 90H, 10H, 2aH, 25H
 864     DB  88H, 28H, 2aH, 0
 865 L$82:
 866     DB  0c0H, 20H, 0a0H, 20H, 20H, 90H, 20H, 1aH
 867     DB  15H, 88H, 18H, 1aH, 90H, 20H, 1aH, 15H
 868     DB  88H, 18H, 1aH, 0
 869 L$83:
 870     DB  0c0H, 0cH, 0feH, 50H, 90H, 0cH, 81H, 4aH
 871     DB  50H, 84H, 52H, 55H, 86H, 4aH, 81H, 50H
 872     DB  4aH, 86H, 50H, 82H, 55H, 98H, 45H, 0
 873     DB  0fcH
 874 L$84:
 875     DB  1fH, 19H, 43H, 41H, 4cH, 4cH, 20H, 53H
 876     DB  54H, 41H, 52H, 50H, 4fH, 52H, 54H, 9
 877     DB  46H, 55H, 54H, 55H, 52H, 45H, 20H, 43H
 878     DB  52H, 45H, 57H, 20H, 57H, 4fH, 52H, 4cH
 879     DB  44H, 20H, 48H, 51H, 9, 43H, 44H, 4eH
 880     DB  9, 47H, 52H, 41H, 56H, 49H, 53H, 20H
 881     DB  45H, 55H, 52H, 4fH, 9, 41H, 4eH, 44H
 882     DB  20H, 4dH, 4fH, 52H, 45H, 0
 883 L$85:
 884     DB  0fH, 53H, 74H, 61H, 72H, 50H, 6fH, 72H
 885     DB  74H, 3, 20H, 0c4H, 0c4H, 20H, 0bH, 56H
 886     DB  33H, 32H, 62H, 69H, 73H, 20H, 2bH, 33H
 887     DB  35H, 38H, 2dH, 30H, 2dH, 38H, 30H, 34H
 888     DB  34H, 36H, 32H, 36H, 20H, 2bH, 33H, 35H
 889     DB  38H, 2dH, 30H, 2dH, 38H, 30H, 34H, 31H
 890     DB  31H, 33H, 33H, 3, 20H, 0c4H, 0c4H, 20H
 891     DB  0fH, 46H, 43H, 2dH, 57H, 48H, 51H, 1fH
 892     DB  0fcH
 893 L$86:
 894     DB  04FH DUP(0,0,0,0,0,0,0,0)
 895     DB  0, 0, 0, 0, 0, 0, 0, 0
 896 L$87:
 897     DB  04FH DUP(0,0,0,0,0,0,0,0)
 898     DB  0, 0, 0, 0, 0, 0, 0, 0
 899 L$88:
 900     DB  04FH DUP(0,0,0,0,0,0,0,0)
 901     DB  0, 0, 0, 0, 0, 0, 0, 0
 902 L$89:
 903     DB  04FH DUP(0,0,0,0,0,0,0,0)
 904     DB  0, 0, 0, 0, 0, 0, 0, 0
 905 L$90:
 906     DB  04FH DUP(0,0,0,0,0,0,0,0)
 907     DB  0, 0, 0, 0, 0, 0, 0, 0
 908 L$91:
 909     DB  0, 0, 0, 0, 0, 0, 0, 0
 910     DB  0, 0, 0, 0, 0, 0, 0, 0
 911     DB  0, 0, 0, 0, 0, 0, 0, 0
 912     DB  0, 0, 0, 0, 0, 0, 0, 0
 913     DB  0, 0, 0, 0, 0, 0, 0, 0
 914     DB  0, 0, 0, 0, 0, 0, 0, 0
 915     DB  0, 0, 0, 0, 0, 0, 0, 0
 916     DB  0, 0, 0, 0, 0, 0, 0, 0
 917     DB  0, 0, 0, 0, 0, 0, 0, 0
 918     DB  0, 0, 0, 0, 0, 0, 0, 0
 919     DB  0, 0, 0, 0, 0, 0, 0, 0
 920     DB  0, 0, 0, 0, 0, 0, 0, 0
 921     DB  0, 0, 0, 0, 0, 0, 0, 0
 922     DB  0, 0, 0, 0, 0, 0, 0, 0
 923     DB  0, 0, 0, 0, 0, 0, 0, 0
 924     DB  0, 0, 0, 0, 0, 0, 0, 0
 925     DB  0, 0, 0, 0, 0, 0, 0, 0
 926     DB  0, 0, 0, 0, 0, 0, 0, 0
 927     DB  0, 0, 0, 0, 0, 0, 0, 0
 928     DB  0, 0, 0, 0, 0, 0, 0, 0
 929     DB  0, 0, 0, 0, 0, 0, 0, 0
 930     DB  0, 0, 0, 0, 0, 0, 0, 0
 931     DB  0, 0, 0, 0, 0, 0, 0, 0
 932     DB  0, 0, 0, 0, 0, 0, 0, 0
 933     DB  0, 0, 0, 0, 0, 0, 0, 0
 934     DB  0, 0, 0, 0, 0, 0, 0, 0
 935     DB  0, 0, 0, 0, 0, 0, 0, 0
 936     DB  0, 0, 0, 0, 0, 0, 0, 0
 937     DB  0, 0, 0, 0, 0, 0, 0, 0
 938     DB  0, 0, 0, 0, 0, 0, 0, 0
 939     DB  0, 0, 0, 0, 0, 0, 0, 0
 940     DB  0, 0, 0, 0, 0, 0, 0, 0
 941     DB  0, 0, 0, 0, 0, 0, 0, 0
 942     DB  0, 0, 0, 0, 0, 0, 0, 0
 943     DB  0, 0, 0, 0, 0, 0, 0, 0
 944     DB  0, 0, 0, 0, 0, 0, 0, 0
 945     DB  0, 0, 0, 0, 0, 0, 0, 0
 946     DB  0, 0, 0, 0, 0, 0, 0, 0
 947     DB  0, 0, 0, 0, 0, 0, 0, 0
 948     DB  0, 0, 0, 0, 0, 0, 0, 0
 949     DB  0, 0, 0, 0, 0, 0, 0, 0
 950     DB  0, 0, 0, 0, 0, 0, 0, 0
 951     DB  0, 0, 0, 0, 0, 0, 0, 0
 952     DB  0, 0, 0, 0, 0, 0, 0, 0
 953     DB  0, 0, 0, 0, 0, 0, 0, 0
 954     DB  0, 0, 0, 0, 0, 0, 0, 0
 955     DB  0, 0, 0, 0, 0, 0, 0, 0
 956     DB  0, 0, 0, 0, 0, 0, 0, 0
 957     DB  0, 0, 0, 0, 0, 0, 0, 0
 958     DB  0, 0, 0, 0, 0, 0, 0, 0
 959     DB  0, 0, 0, 0, 0, 0, 0, 0
 960     DB  0, 0, 0, 0, 0, 0, 0, 0
 961     DB  0, 0, 0, 0, 0, 0, 0, 0
 962     DB  0, 0, 0, 0, 0, 0, 0, 0
 963     DB  0, 0, 0, 0, 0, 0, 0, 0
 964     DB  0, 0, 0, 0, 0, 0, 0, 0
 965     DB  0, 0, 0, 0, 0, 0, 0, 0
 966     DB  0, 0, 0, 0, 0, 0, 0, 0
 967     DB  0, 0, 0, 0, 0, 0, 0, 0
 968     DB  0, 0, 0, 0, 0, 0, 0, 0
 969     DB  0, 0, 0, 0, 0, 0, 0, 0
 970     DB  0, 0, 0, 0, 0, 0, 0, 0
 971     DB  0, 0, 0, 0, 0, 0, 0, 0
 972     DB  0, 0, 0, 0, 0, 0, 0, 0
 973     DB  0, 0, 0, 0, 0, 0, 0, 0
 974     DB  0, 0, 0, 0, 0, 0, 0, 0
 975     DB  0, 0, 0, 0, 0, 0, 0, 0
 976     DB  0, 0, 0, 0, 0, 0, 0, 0
 977     DB  0, 0, 0, 0, 0, 0, 0, 0
 978     DB  0, 0, 0, 0, 0, 0, 0, 0
 979     DB  0, 0, 0, 0, 0, 0, 0, 0
 980     DB  0, 0, 0, 0, 0, 0, 0, 0
 981     DB  0, 0, 0, 0, 0, 0, 0, 0
 982     DB  0, 0, 0, 0, 0, 0, 0, 0
 983     DB  0, 0, 0, 0, 0, 0, 0, 0
 984     DB  0, 0, 0, 0, 0, 0, 0, 0
 985     DB  0, 0, 0, 0, 0, 0, 0, 0
 986     DB  0, 0, 0, 0, 0, 0, 0, 0
 987     DB  0, 0, 0, 0, 0, 0, 0, 0
 988     DB  0, 0, 0, 0, 0, 0, 0, 0
 989     DB  0fcH, 0, 0, 0, 0, 0, 0, 0
 990     DB  025H DUP(0,0,0,0,0,0,0,0)
 991     DB  0, 0, 0, 0, 0
 992 L$92:
 993     DB  05H DUP(0,0,0,0,0,0,0,0)
 994     DB  0, 0, 0, 0
 995 L$93:
 996     DB  0477H DUP(0,0,0,0,0,0,0,0)
 997     DB  0, 0, 0, 0, 0, 0, 0, 0
 998 L$94:
 999     DB  013FH DUP(0,0,0,0,0,0,0,0)
1000     DB  0, 0, 0, 0, 0, 0
1001 L$95:
1002     DB  0, 0
1003 L$96:
1004     DB  0, 0
1005 L$97:
1006     DB  0, 0
1007 L$98:
1008     DB  0, 0
1009 L$99:
1010     DB  01BBH DUP(0,0,0,0,0,0,0,0)
1011     DB  0, 0
1012 L$100:
1013     DB  0, 0, 0, 0, 0, 0, 0, 0
1014 L$101:
1015     DB  0, 0, 0, 0, 0, 0, 0, 0
1016 L$102:
1017     DB  0, 0
1018 L$103:
1019     DB  0, 0
1020 L$104:
1021     DB  0, 0
1022 L$105:
1023     DB  0, 0
1024 L$106:
1025     DB  0, 0
1026 L$107:
1027     DB  0, 0
1028 L$108:
1029     DB  0, 0
1030 L$109:
1031     DB  0, 0, 0, 0, 0, 0, 0, 0
1032     DB  0
1033 L$110:
1034     DB  0, 0, 0, 0, 0, 0, 0, 0
1035     DB  0
1036 L$111:
1037     DB  0, 0
1038 L$112:
1039     DB  0, 0
1040 L$113:
1041     DB  0, 0
1042 L$114:
1043     DB  0, 0, 0, 0
1044 L$115:
1045     DB  0, 0, 0, 0, 0, 0, 0, 0
1046     DB  0, 0, 0, 0, 0, 0, 0, 0
1047     DB  0, 0, 0, 0
1048 code            ENDS
1049 DGROUP  segment
1050 DGROUP  ENDS
1051                 END