按键精灵里自带的网游％补红蓝脚本

问题描述：

我对C语言C＋＋VB等等一点都不通 但是我下了个VB软件 把里面的脚本复制在VB里面 启动的时候说什么编译错误 缺少什么if.Else.Elseif等等
我把带#号的前3句删了 在启动还说编译错误 说什么缺少表达式 请帮忙解决一下
#这是按键精灵生成的脚本源文件
#在理解各条命令的基础上，您可以修改这个文件的内容
#您修改的结果将会在普通视图上有所反映

VBS dim hong,lan,hongT,lanT
//F3红，F4蓝
//在游戏中利用按键抓点抓色工具找到x1,x2,y,color所对应的值并替换。
UserVar hong=70 血量<hong%时，自动吃红。
UserVar lan=30 蓝量<lan%时，自动吃蓝。
UserVar hongT=256 补血延时时间（毫秒）
UserVar lanT=256 补蓝延时时间（毫秒）
Rem 开始
//循环开始标记
Delay 32
//循环小延时，防止出现CPU使用率过高，脚本卡
Rem 补红
IfColor hong/100*(x2-x1)+x1 y color 2
//x2=血条在屏幕最右端坐标，x1=血条在屏幕最左端坐标，
//y=x1,x2在血条中的同一纵坐标，color=血条的空血颜色值。
KeyPress 114 1
//按下补血快捷键
Delay hongT
//补血延时
EndIf
Rem 补蓝
IfColor lan/100*(x2-x1)+x1 y color 2
//x2=蓝条在屏幕最右端坐标，x1=蓝条在屏幕最左端坐标，
//y=x1,x2在蓝条中的同一纵坐标，color=蓝条的空蓝颜色值。
KeyPress 115 1
//按下补蓝快捷键
Delay lanT
//补蓝延时
EndIf
Goto 开始
//跳转到循环开始

问题解答：

这是按键精灵自己定义的脚本格式，并不是vb...所以不能用vb编译！！

可怜的人