主题:[原创]在98机上的开机保护程序
在c:\Autoexec.bat
中输入
@echo off
C:\VFP\VFP\VFP98\YIND.EXE 这里就是你编译的程序路径
SCREEN 12
LOCATE 5, 30
PRINT "@@@@@@@@@@@@@@@@@@@@@@@"
FOR i = 1 TO 4
LOCATE , 30 - i
PRINT "@"
NEXT i
LOCATE 7, 31
PRINT "0 0 <<<<<<<<<<<<<<<<<<<<"
LOCATE 10, 25
PRINT "~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
LOCATE 5
FOR i = 1 TO 5
LOCATE , 53
PRINT "@"
NEXT i
LOCATE 10, 53
PRINT "~"
LOCATE 8, 32
PRINT "_"
LINE (25, 222)-(580, 288), 4, B
FOR i = 1 TO 520
LINE (40 + i, 240)-(40 + i, 270), 1, BF
IF i MOD 7 = 0 THEN
LINE (40 + i, 240)-(40 + i, 270), 0
END IF
tt = TIMER
FOR j = 1 TO 11000
NEXT j
IF i MOD 14 = 0 THEN
LOCATE 20, 60
PRINT "loading"; "........"
ELSE
LOCATE 20, 60
PRINT "loading"; " "
LOCATE 20, 60
PRINT "loading"; "...."
END IF
NEXT i
LOCATE 24, 4
PRINT " ______"
LOCATE , 4
PRINT "PASSWORD: | |"
LOCATE , 4
PRINT " ~~~~~~"
LOCATE 28, 55
PRINT " copying right igdxds"
DO
FOR i = 1 TO 6
m$ = m$ + INPUT$(1)
LOCATE 25, 14 + i
PRINT "*";
NEXT i
tt = TIMER
DO
ttt = TIMER
LOOP UNTIL ttt - tt > .1
IF m$ = "igdxds" THEN
END
ELSE
PLAY "d8c8 g8e4"
m$ = ""
LOCATE 25, 15
PRINT " "
END IF
LOOP
中输入
@echo off
C:\VFP\VFP\VFP98\YIND.EXE 这里就是你编译的程序路径
SCREEN 12
LOCATE 5, 30
PRINT "@@@@@@@@@@@@@@@@@@@@@@@"
FOR i = 1 TO 4
LOCATE , 30 - i
PRINT "@"
NEXT i
LOCATE 7, 31
PRINT "0 0 <<<<<<<<<<<<<<<<<<<<"
LOCATE 10, 25
PRINT "~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
LOCATE 5
FOR i = 1 TO 5
LOCATE , 53
PRINT "@"
NEXT i
LOCATE 10, 53
PRINT "~"
LOCATE 8, 32
PRINT "_"
LINE (25, 222)-(580, 288), 4, B
FOR i = 1 TO 520
LINE (40 + i, 240)-(40 + i, 270), 1, BF
IF i MOD 7 = 0 THEN
LINE (40 + i, 240)-(40 + i, 270), 0
END IF
tt = TIMER
FOR j = 1 TO 11000
NEXT j
IF i MOD 14 = 0 THEN
LOCATE 20, 60
PRINT "loading"; "........"
ELSE
LOCATE 20, 60
PRINT "loading"; " "
LOCATE 20, 60
PRINT "loading"; "...."
END IF
NEXT i
LOCATE 24, 4
PRINT " ______"
LOCATE , 4
PRINT "PASSWORD: | |"
LOCATE , 4
PRINT " ~~~~~~"
LOCATE 28, 55
PRINT " copying right igdxds"
DO
FOR i = 1 TO 6
m$ = m$ + INPUT$(1)
LOCATE 25, 14 + i
PRINT "*";
NEXT i
tt = TIMER
DO
ttt = TIMER
LOOP UNTIL ttt - tt > .1
IF m$ = "igdxds" THEN
END
ELSE
PLAY "d8c8 g8e4"
m$ = ""
LOCATE 25, 15
PRINT " "
END IF
LOOP