按键精灵搞笑脚本源码

脚本附件：A.mp3, B.mp3, C.mp3

运行环境：分辨率：1440x900 色深：32位 操作系统：Microsoft Windows XP 按键精灵版本：8.00.6874

@w589321 2010/9/17

hment "c:\","*.mp3"  
Delay 3000  
  
Dim X  
X=inputbox("1+2=?   A:1 B:2 C:3","那个，对  就是你了！","这个，额 应该懂吧？！！")  
If X=1 Then  
MessageBox "失败~~"  
Call Plugin.Media.Play("C:\C.mp3")  
    Delay 8000  
Call Plugin.Media.Stop()  
ElseIf X=2  
MessageBox "无语~~"  
Call Plugin.Media.Play("C:\B.mp3")  
    Delay 5000  
Call Plugin.Media.Stop()  
Else  
MessageBox "哇噻！！好~~厉害啊"  
Call Plugin.Media.Play("C:\A.mp3")  
    Delay 5000  
Call Plugin.Media.Stop()  
End If  
Delay 2000  
EndScript