2009年10月26日
y=""
While 1
t=0:n="":m=""
//对屏幕进行刷新清除
Plugin Msg.HideScrTXT() ……
查看完整文章
点击次数:4622
2009年10月26日
网页游戏的后台化鼠标操作需要取得的是相对坐标,想要一步做成还是有些难度的,各位大大提供的是前台过程录制和转换后台化的效果,当时可能是我自己用的不好,后来还是自己做了个,很简单的,班门弄斧了,希望有用的人用得到
不多说,上源代码!
//先定义变量
dim x,y,color,o,p
//自动打开一个记事本文件 ……
查看完整文章
点击次数:4204
2009年9月15日
// A1.B1.C1.D1 是为了便于设置找图的范围 可以随意修改 (A1是左坐标);(B1是上坐标);(C1是下坐标);(D1是右坐标)
A1=0
B1=0
C1=1279
D1=959 ……
查看完整文章
点击次数:3281
2009年4月28日
UserVar szms=DropList{升序:0|降序:1}=0 选择模式
a=InputBox("请输入数字")
dim sz(99)
i=0
mc="" ……
查看完整文章
点击次数:2660
2009年4月15日
找最大
dim a(7)
a(0)=957
a(1)=50200 ……
查看完整文章
点击次数:2988
2008年12月26日
今天开始的时候研究几个画图的算法。什么阿基米德螺旋线,什么方形渐开线,圆形渐开线等等。入迷之时,生戏耍之心。就想用按键来画多边形。下面是我的脚本。
对了,先说一说一点题外话。总看各位前辈高人的脚本,那是相当经典啊,有很多值得学习的地方。可是看的懂的寥寥。因为高手们总是寥寥数笔,一个纯数字&字母的脚本就跃然纸上,尽显高人风范。但是我个人认为,正是由于高人们的不屑一“注”(注释),才有很多的新手每天跪求于论坛,谋高手一语,强烈呼吁高手们发脚本的时候在整个脚本的不同类型的命令处作出注释。如此这般,高手不会被烦人的新手问题打扰,新手又可以通过注释安静的学习到有用的东西。不知小小生说得对与不对?
查看完整文章
点击次数:2604
2008年12月26日
写个脚本,希望大家给点评下,好改进,谢谢
Dim MyValue,all_num,mynum,j,out
j=0
all_num=Cint(Inputbox("请输入要取的总数:",,50))
mynum=Cint(Inputbox("请输入计算的正整数,范围 ……
查看完整文章
点击次数:2501
2008年12月26日
dim c,d '定义变量
dim str,s
for c = 1 to 9 '重复 C 从 1 到 9
for d = 1 to c '重复 D 从 1 到 C
s = d & "*" & c & ……
查看完整文章
点击次数:2471
2008年12月26日
此脚本可随机从指定数量的数字中随机选取数字并输出 输出过程中不重复直到输出所有数字为止
原理: 脚本一开始连接指定数量的数字 -->再分成数组 -->输出 -->再重新连接成字符串 -->去除用过的数字 反复循环至所有数字输出完毕
查看完整文章
点击次数:4285
|