使用AU3制作的炒股小工具

bmtyxt · 发表于 2010-3-22 12:23:36

有源码就好了

javarike · 发表于 2010-3-22 14:24:10

真的强人来了。。。。啊··

goodyou520 · 发表于 2010-3-22 16:47:25

学习了。谢谢

flyheart0214 · 发表于 2010-3-22 20:58:55

楼主很强啊,学习

weeks4 · 发表于 2010-3-24 07:00:58

共享一下源码就更实在了. 啊哈哈

WSZYJ · 发表于 2010-3-25 19:47:20

本帖最后由 WSZYJ 于 2010-4-5 12:20 编辑

只要功夫深铁杵磨成针。

WSZYJ · 发表于 2010-3-25 19:49:08

这是一段多股预警识别代码送大家参考。

If ($xj-$scj)>0  And $scj>0 Then  IniWrite("Option.ini","基本设置","下单",$AA)
If ($xj-$scj)>0  And $scj>0 Then ControlSetText ( "价格预警" , "","Static21","第1股上穿")
If ($xj2-$scj2)>0 And $scj2>0 Then  IniWrite("Option.ini","基本设置","下单",$AA2)
If ($xj2-$scj2)>0 And $scj2>0 Then ControlSetText ( "价格预警" , "","Static21","第2股上穿")
If ($xj3-$scj3)>0 And $scj3>0 Then  IniWrite("Option.ini","基本设置","下单",$AA3)
If ($xj3-$scj3)>0 And $scj3>0 Then ControlSetText ( "价格预警" , "","Static21","第3股上穿")
If ($xj4-$scj4)>0 And $scj4>0 Then  IniWrite("Option.ini","基本设置","下单",$AA4)
If ($xj4-$scj4)>0 And $scj4>0 Then ControlSetText ( "价格预警" , "","Static21","第4股上穿")
If ($xj5-$scj5)>0 And $scj5>0 Then  IniWrite("Option.ini","基本设置","下单",$AA5)
If ($xj5-$scj5)>0 And $scj5>0 Then ControlSetText ( "价格预警" , "","Static21","第5股上穿")
If ($xj6-$scj6)>0 And $scj6>0 Then  IniWrite("Option.ini","基本设置","下单",$AA6)
If ($xj6-$scj6)>0 And $scj6>0 Then ControlSetText ( "价格预警" , "","Static21","第6股上穿")
If ($xj7-$scj7)>0 And $scj7>0 Then  IniWrite("Option.ini","基本设置","下单",$AA7)
If ($xj7-$scj7)>0 And $scj7>0 Then ControlSetText ( "价格预警" , "","Static21","第7股上穿")
If ($xj8-$scj8)>0 And $scj8>0 Then  IniWrite("Option.ini","基本设置","下单",$AA8)
If ($xj8-$scj8)>0 And $scj8>0 Then ControlSetText ( "价格预警" , "","Static21","第8股上穿")

WSZYJ · 发表于 2010-4-3 12:41:18

au3可以做可高级的事情你信吗？我信因为我做到了。

pusofalse · 发表于 2010-4-3 13:57:22

回复 38# WSZYJ

这段代码中为何要用ControlSetText设置文本呢？GUICtrlSetData不是更好吗，或者，“价格预警”这个窗口不是属于自身进程的？

还有这一系列的判断，为何不用数组和循环来简化呢？

如果我有一个名为“价格预警”的窗口，并且其中也有Static21控件，并且我的程序在你的程序运行之后才运行，那岂不是把我的窗口中的内容给改了？

连续多个“基本设置”、“下单”、“第n股上市”，让我写的话我手都酸了，还要在中文与英文输入法之间来回切换，为何不用变量代替呢？

xj1、scj2，AA1、AA2，这样的变量名称，过段时间估计连作者都忘记了什么意思。

还有If ($xj?-$scj?)>0 And $scj?>0，这其中的双重判断，为何要把scj?>0写在($xj?-$scj?)>0之后呢？虽然只有运算符号的计算，效率是相当快的。

WSZYJ · 发表于 2010-4-3 15:41:42

感谢版主的指导，这段代码是早期作品，因为有人想看看代码，您提示的初学者未必会用，我在初期就不会用需要有一个过程。再次谢谢！

viplight · 发表于 2010-4-3 22:15:20

LZ太强悍,, 佩服你~~ 我要努力学习

sango · 发表于 2010-4-4 18:40:06

LZ厉害，学习了。
版主不愧为版主，佩服。

ak_8632 · 发表于 2010-4-4 19:38:12

真的是好东西。楼Z够勤奋的。。。

dabaiyun · 发表于 2010-4-6 12:50:47

顶起.........

heiyewudi · 发表于 2010-4-7 15:51:41

强悍啊。~我要是能做就好了~

		自动登录	找回密码
密码			加入

[原创] 使用AU3制作的炒股小工具

本帖子中包含更多资源