home *** CD-ROM | disk | FTP | other *** search
/ The Equalizer BBS / equalizer-bbs-collection_2004.zip / equalizer-bbs-collection / DEMOSCENE-STUFF / TIMESRC.ZIP / L1P2.M < prev    next >
Text File  |  1994-02-18  |  1KB  |  49 lines
  1.  
  2. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  3. ; DATA
  4. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  5. align 4
  6. p2sluggycsprtbl dd      cspr06,cspr07,cspr08,cspr07,cspr06,cspr05
  7.  
  8. p2sluggyframe   db      5
  9. p2sluggyy       db      233
  10. p2sluggyx       db      71h
  11.  
  12. p2sluggyofftbl  db      9,5,0,0,0,0
  13.  
  14. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  15. ; CODE
  16. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  17.  
  18. ;═════════════════════════════════════════════════════════════════════════════
  19. p20:
  20.         mov dx,3c5h
  21.         movzx ebx,p2sluggyframe
  22.         movzx edi,p2sluggyy
  23.         movzx esi,p2sluggyx
  24.         movzx eax,p2sluggyofftbl[ebx]
  25.         sub edi,eax
  26.         mov ecx,esi
  27.         and ecx,3
  28.         mov al,vidbittbl2[ecx]
  29.         shr esi,2
  30.         imul edi,100
  31.         lea edi,[edi+esi-29*100+6]
  32.         add edi,_vidptr
  33.         call p2sluggycsprtbl[ebx*4]
  34.  
  35.         sub bl,1
  36.         jnc short p20f0
  37.  
  38.         mov bl,5
  39.         sub p2sluggyy,13
  40.         ja short p20f0
  41.  
  42.         mov p2sluggyy,233
  43.         add p2sluggyx,6fh
  44.         push offset setnext
  45. p20f0:
  46.         mov p2sluggyframe,bl
  47.         ret
  48.  
  49.