home *** CD-ROM | disk | FTP | other *** search
/ The Equalizer BBS / equalizer-bbs-collection_2004.zip / equalizer-bbs-collection / DEMOSCENE-STUFF / TIMESRC.ZIP / END.ASM < prev    next >
Assembly Source File  |  1994-02-25  |  2KB  |  111 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 kb.inc
  8. include v.inc
  9. include grfx.inc
  10.  
  11. public  _end
  12.  
  13. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  14. ; DATA
  15. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  16.  
  17. endpic          label   byte
  18. include endpic.m
  19.  
  20. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  21. ; CODE
  22. ;▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
  23.  
  24. ;░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░
  25. ; Put up ending screen
  26. ; Out:
  27. ;   EAX,EBX,ECX,EDX,ESI,EDI,EBP - ?
  28. ;░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░
  29. _end:
  30.         mov v86r_ax,10h
  31.         mov al,10h
  32.         int 33h
  33.         mov dx,3dah
  34.         in al,dx
  35.         test al,8
  36.         jz short $-3
  37.         mov dx,3c0h
  38.         xor ah,ah
  39. endl0:
  40.         mov al,ah
  41.         out dx,al
  42.         jmp short $+2
  43.         out dx,al
  44.         inc ah
  45.         cmp ah,10h
  46.         jb endl0
  47.         mov al,20h
  48.         out dx,al
  49.         call _vrt_settimer
  50.  
  51.         mov edi,offset pal00+3
  52.         lea esi,[edi+9]
  53.         mov ecx,15
  54. endl4:
  55.         movsw
  56.         movsb
  57.         add esi,9
  58.         loop endl4
  59.  
  60.         @vrt_setpalo 0,10h,_bpal
  61.  
  62.         @rlp edi,0a0000h
  63.         mov esi,offset endpic
  64.         mov dx,3ceh
  65.         @outw 0ff08h
  66.         mov dl,0c4h
  67.         @outb 2
  68.         inc edx
  69.         mov ebx,350
  70. endl5:
  71.         mov al,1
  72. endl5a:
  73.         out dx,al
  74.         mov ecx,20
  75.         rep movsd
  76.         sub edi,80
  77.         shl al,1
  78.         and al,0fh
  79.         jnz endl5a
  80.         add edi,80
  81.         dec ebx
  82.         jnz endl5
  83.  
  84.         mov _pals_ptr,offset pal00
  85.         mov _pals_index,0
  86.         mov _pals_len,10h
  87.         mov _vrt_rout,offset _pals
  88. endl1:
  89.         cmp _vrt_rout,offset _ret
  90.         jne endl1
  91.         mov _vrt_timer,0
  92. endl2:
  93.         cmp _kbtbl1[1],0
  94.         jne short endl2d
  95.         cmp _vrt_timer,300h
  96.         jb endl2
  97. endl2d:
  98.         mov _pals_ptr,offset _bpal
  99.         mov _pals_index,0
  100.         mov _pals_len,10h
  101.         mov _vrt_rout,offset _pals
  102. endl3:
  103.         cmp _vrt_rout,offset _ret
  104.         jne endl3
  105.  
  106.         ret
  107.  
  108. code32  ends
  109.         end
  110.  
  111.