求个AI编写的教程 - RO 1.5交流区（原RO交流区） - 浆糊论坛-RO小站 - Powered by Discuz!

浆糊论坛-RO小站 » RO 1.5交流区（原RO交流区） » 求个AI编写的教程

123 4 下一页

返回列表发帖

Rank: 1

UID: 296159
帖子: 685
精华: 1
威望: 10
阅读权限: 100
性别: 女
来自: Sakray
注册时间: 2005-6-28

16^# 跳转到 »

发表于 2005-11-27 22:17 | 只看该作者

本人汇编不及格...掩面逃离t.t
function OnMOVE_CMD (x,y)

TraceAI ("OnMOVE_CMD"

if ( x == MyDestX and y == MyDestY and MOTION_MOVE == GetV(V_MOTION,MyID)) then
return
end

local curX, curY = GetV (V_POSITION,MyID)
if (math.abs(x-curX)+math.abs(y-curY) > 15) then
　　　　　　　　　　List.pushleft (ResCmdList,{MOVE_CMD,x,y})
　　　　　　　　　　x = math.floor((x+curX)/2)
　　　　　　　　　　y = math.floor((y+curY)/2)
end

Move (MyID,x,y)

MyState = MOVE_CMD_ST
MyDestX = x
MyDestY = y
MyEnemy = 0
MySkill = 0

end

其中的一个函数

Rank: 1

UID: 12807
帖子: 5006
精华: 0
威望: 82
阅读权限: 100
注册时间: 2003-10-28

17^#

发表于 2005-11-27 22:18 | 只看该作者

らёгαρん,2005-11-27, 22:16:16
[QUOTE]alone007,2005-11-27, 22:13:04
没有啊。也许是因为我没更新过测试服务器吧。

又一个消息闭塞的人出现了....... [/QUOTE]
有一个TEST服帐号但几乎不上的人飘过。。。。。

http://photo.yupoo.com/alone97/948505868789/medium/

UID: 10726
帖子: 4338
精华: 10
威望: 133
阅读权限: 101
注册时间: 1970-1-1

迷之会员

18^#

发表于 2005-11-27 22:26 | 只看该作者

这个不是汇编，倒像是VB

海利翁任务是尼罗任务..

基尔哈尔学院任务是卡册任务..

抓贼任务是速水任务..

The Sign任务是暗水任务..

Rank: 1

UID: 296159
帖子: 685
精华: 1
威望: 10
阅读权限: 100
性别: 女
来自: Sakray
注册时间: 2005-6-28

19^#

发表于 2005-11-27 22:28 | 只看该作者

sensj,2005-11-27, 22:26:52
这个不是汇编，倒像是VB

不要打击我了

　

UID: 311161
帖子: 15661
精华: 15
威望: 215
阅读权限: 101
来自: 武汉
注册时间: 2005-9-3

论坛元老

20^#

发表于 2005-11-27 22:29 | 只看该作者

虽然看不太懂。。但是应该不难套吧。。。

Rank: 1

UID: 296159
帖子: 685
精华: 1
威望: 10
阅读权限: 100
性别: 女
来自: Sakray
注册时间: 2005-6-28

21^#

发表于 2005-11-27 22:32 | 只看该作者

但是如果要自己增加生命体的"智慧"呢...
这个函数又该怎么写- -
套的话也怕套错...毕竟是生命对吧

UID: 311161
帖子: 15661
精华: 15
威望: 215
阅读权限: 101
来自: 武汉
注册时间: 2005-9-3

论坛元老

22^#

发表于 2005-11-27 22:35 | 只看该作者

就当养的是海棠她家一只猫。。。生命？想怎么玩怎么玩。。。是吧。。

Rank: 1

UID: 296159
帖子: 685
精华: 1
威望: 10
阅读权限: 100
性别: 女
来自: Sakray
注册时间: 2005-6-28

23^#

发表于 2005-11-27 22:39 | 只看该作者

漠视生命是要付出代价的~哼哼!!

Rank: 1

UID: 310195
帖子: 244
精华: 0
威望: 0
阅读权限: 100
注册时间: 2005-8-28

24^#

发表于 2005-11-27 22:44 | 只看该作者

不急不急，估计会有高人弄针对这个的那个什么外的反义词的什么的……

就素那浮云

Rank: 1

UID: 232845
帖子: 7052
精华: 0
威望: 0
阅读权限: 100
性别: 男
来自: bbs.17173
注册时间: 2004-10-18

25^#

发表于 2005-11-27 23:15 | 只看该作者

那些命令的中文翻译我已经看到了，不过还是叫给我看的人发比较好。
.........XD

只要明白应该怎么写大概就OK了。。

再盛大的宴席，也终有他落幕的一刻。

UID: 265441
帖子: 4883
精华: 14
威望: 235
阅读权限: 100
性别: 男
来自: Tolaria
注册时间: 2005-2-10

VIP

26^#

发表于 2005-11-27 23:31 | 只看该作者

没错简直就是VB....

梵·高的耳朵

Rank: 1

UID: 322459
帖子: 45
精华: 0
威望: 0
阅读权限: 100
注册时间: 2005-11-20

27^#

发表于 2005-11-28 02:02 | 只看该作者

夜桜,2005-11-27, 22:28:02
不要打击我了　

是象VB……汇编是SO烦琐的……

梵·高的耳朵

Rank: 1

UID: 322459
帖子: 45
精华: 0
威望: 0
阅读权限: 100
注册时间: 2005-11-20

28^#

发表于 2005-11-28 02:04 | 只看该作者

夜桜,2005-11-27, 22:17:26
本人汇编不及格...掩面逃离t.t
function OnMOVE_CMD (x,y)

TraceAI ("OnMOVE_CMD"

if ( x == MyDestX and y == MyDestY and MOTION_MOVE == GetV(V_MOTION,MyID)) then
return
end

local curX, curY = GetV (V_POSITION,MyID)
if (math.abs(x-curX)+math.abs(y-curY) > 15) then
　　　　　　　　　　List.pushleft (ResCmdList,{MOVE_CMD,x,y})
　　　　　　　　　　x = math.floor((x+curX)/2)
　　　　　　　　　　y = math.floor((y+curY)/2)
end

Move (MyID,x,y)

MyState = MOVE_CMD_ST
MyDestX = x
MyDestY = y
MyEnemy = 0
MySkill = 0

end

其中的一个函数

……绝对就是VB，寒~难道RO和PAL2一样是VB编饿……

Rank: 1

UID: 172768
帖子: 1047
精华: 0
威望: 0
阅读权限: 100
性别: 女
来自: 无法无天の猫国
注册时间: 2004-5-27

29^#

发表于 2005-11-28 02:20 | 只看该作者

海棠家的猫也会吃人，就叫海棠写了

http://weibo.com/sakuraleah

Rank: 1

UID: 12074
帖子: 2280
精华: 0
威望: 0
阅读权限: 100
注册时间: 2003-10-10

30^#

发表于 2005-11-28 13:52 | 只看该作者

不太可能直接让玩家编写类似的vb函数吧，这太危险了，拿到服务器端解析的时候，如果写出非法代码或恶意代码很可能造成不可预料的后果。

123 4 下一页