home *** CD-ROM | disk | FTP | other *** search
/ The Equalizer BBS / equalizer-bbs-collection_2004.zip / equalizer-bbs-collection / DEMOSCENE-STUFF / TIMESRC.ZIP / L1.ASM < prev    next >
Assembly Source File  |  1994-02-26  |  2KB  |  68 lines
  1.         .386p
  2. code32  segment para public use32
  3.         assume cs:code32, ds:code32
  4.  
  5. include pmode.inc
  6. include vrt.inc
  7. include gnbg.inc
  8. include sc.inc
  9. include grfx.inc
  10. include v.inc
  11.  
  12. public  _l1start
  13.  
  14. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  15. ; DATA
  16. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  17. align 4
  18. routtbl         dd      p00,p10,p20,p30,p40,p60,p70,p80,p50,p90
  19.                 dd      p00,p20,p30,p40,p60,p50,p10,p80,p70,p90
  20.                 dd      p30,p40,p50,p60,p00,p80,p10,p20,p90,p70
  21. ROUTTBLLEN=($-routtbl)/4
  22. routtblindex    db      0
  23.  
  24. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  25. ; CODE
  26. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  27.  
  28. include l1p0.m
  29. include l1p1.m
  30. include l1p2.m
  31. include l1p3.m
  32. include l1p4.m
  33. include l1p5.m
  34. include l1p6.m
  35. include l1p7.m
  36. include l1p8.m
  37. include l1p9.m
  38.  
  39. ;─────────────────────────────────────────────────────────────────────────────
  40. setnext:
  41.         movzx eax,routtblindex
  42.         inc eax
  43.         cmp al,ROUTTBLLEN
  44.         jb short setnextf0
  45.         xor eax,eax
  46. setnextf0:
  47.         mov ebx,routtbl[eax*4]
  48.         cmp _l1stop,0
  49.         je short setnextf1
  50.         mov _l1stop,0
  51.         mov _l1on,0
  52.         mov ebx,offset _l1start
  53. setnextf1:
  54.         mov _l1rout,ebx
  55.         mov routtblindex,al
  56.         ret
  57.  
  58. ;═════════════════════════════════════════════════════════════════════════════
  59. _l1start:
  60.         cmp _l1on,0
  61.         je _ret
  62.         mov _l1rout,offset p00
  63.         ret
  64.  
  65. code32  ends
  66.         end
  67.  
  68.