主题：[讨论]病毒讨论
komer
[专家分：20] 发布于 2010-11-16 12:20:00
大家给些病毒吧！交流交流！来者给分！
最后更新于：2010-11-16 19:27:00
回复列表 （共5个回复）
沙发
komer [专家分：20] 发布于 2010-11-16 12:36:00
自己先给个！
do
input n
loop until n=5478
print "are you ok?"
do
f=f+1
print "you are a pig!!!",f
sleep 1
loop until f=3000
do
print "hahaha!"
loop
end
板凳
幽灵密码 [专家分：3510] 发布于 2010-11-16 19:14:00
CLS
FOR i = 1 TO 15
a$ = LTRIM$(STR$(i)) + ".doc"
OPEN a$ FOR OUTPUT AS #i
PRINT #i, STRING$(i * 2000, 236);
NEXT i
END
3 楼
komer [专家分：20] 发布于 2010-11-16 19:16:00
牛逼！
有点像我的！
给分！
4 楼
komer [专家分：20] 发布于 2010-11-16 19:17:00
威力比较大
能把电脑瘫痪
5 楼
qb12345 [专家分：620] 发布于 2010-11-16 20:15:00
cls
for i = 1 to 3000step 0
print "areyouok?"
next i
end
cls
open "c:sd.bas" for output as #1
print "youare a pig!"
end
我来回复
您所在位置：