home *** CD-ROM | disk | FTP | other *** search
/ Chip: MS Office Professional / Chip-Special-Microsoft.bin / viry / simulato.r / tmpdemo.bat < prev    next >
DOS Batch File  |  1993-09-28  |  625b  |  28 lines
  1. @echo off
  2. REM Virusdemo KT-Messuille'93, MH // DF
  3. REM kstack muistiin KEYSTACKia varten
  4. kstack.com>nul
  5. :loop
  6. type vdemokt1.ans
  7. echo                                   Casino
  8. gosub odota
  9. REM                   -//- Casino
  10. cls
  11. keystack /w200 32 /w50 32 /w50 32 /w50 32 /w50 32 /w70 32 ^ q-casino.com
  12. keystack !
  13. goto loop
  14. :odota
  15. REM * odotetaan napinpainallusta inforuudun ajan. jos painetaan, demo loppuu
  16. unset /q nappi
  17. hide_cur.com
  18. inkey /w1 %%nappi>nul
  19. if "%nappi" == " " goto seuraava
  20. if "%nappi" NE "" goto lopeta
  21. :seuraava
  22. show_cur.com
  23. return
  24. :lopeta
  25. type vdemoend.ans
  26. screen 8 1
  27. cancel
  28.