home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s270 / 1.ddi / PCKDD51B.EXE / DEMO.LST < prev    next >
Encoding:
File List  |  1991-01-15  |  2.1 KB  |  44 lines
  1.                        1    $debug
  2.                        2    $nopaging
  3.                        3    
  4.   0090                 4    outbit          BIT     90h
  5.                        5    
  6. 0064                   6                    DSEG AT 64h
  7. 0064                   7    tempcount:      DS      1       
  8.                        8    
  9. ----                   9                    CSEG
  10. 0000 020030           10                    LJMP    start
  11.                       11    
  12. 0030                  12                    CSEG AT 30h
  13. 0030 900000           13    start:          MOV     DPTR,#0 
  14. 0033 C290             14    outerloop:      CLR     outbit
  15. 0035 75640A           15                    MOV     tempcount,#10
  16. 0038 120050           16    innerloop:      CALL    wastetime
  17. 003B B290             17                    CPL     outbit
  18. 003D E4               18                    CLR     A
  19. 003E 309001           19                    JNB     outbit,skipover
  20. 0041 F4               20                    CPL     A
  21. 0042 D564F3           21    skipover:       DJNZ    tempcount,innerloop
  22. 0045 A3               22                    INC     DPTR
  23. 0046 120050           23                    CALL    wastetime
  24. 0049 120050           24                    CALL    wastetime
  25. 004C 80E5             25                    JMP     outerloop
  26. 004E 80E0             26    endofprogram:   JMP     start 
  27.                       27    ;
  28.                       28    ;
  29. 0050 78FF             29    wastetime:      MOV     R0,#0FFh
  30. 0052 D8FE             30                    DJNZ    R0,$
  31. 0054 22               31                    RET
  32.                       32    
  33.                       33                    END
  34.  
  35. VERSION 1.2e ASSEMBLY COMPLETE, 0 ERRORS FOUND
  36. ENDOFPROGRAM . . . . . . . . . .  C ADDR  004EH  NOT USED  
  37. INNERLOOP. . . . . . . . . . . .  C ADDR  0038H  
  38. OUTBIT . . . . . . . . . . . . .  B ADDR  0090H  
  39. OUTERLOOP. . . . . . . . . . . .  C ADDR  0033H  
  40. SKIPOVER . . . . . . . . . . . .  C ADDR  0042H  
  41. START. . . . . . . . . . . . . .  C ADDR  0030H  
  42. TEMPCOUNT. . . . . . . . . . . .  D ADDR  0064H  
  43. WASTETIME. . . . . . . . . . . .  C ADDR  0050H  
  44.