各位大师AU3能不能做个回合制游戏啊

woyucheng · 发表于 2012-7-20 01:13:49

各位大师能不能做个回合制游戏啊如果能的话求指点

xiaowo · 发表于 2012-7-20 08:02:42

我有计划用AU3做一款游戏，目前正在知识积累中

夜猫猫 · 发表于 2012-7-22 19:21:26

期待出成品...........

甜茶少年 · 发表于 2012-7-22 20:38:06

回复 1# woyucheng

这是蛋疼星人的问题。这不是可不可以的问题，而是效率的问题。
用RPG制作大师吧。那个效率，杠杠的，自己再修改一下配置。

woyucheng · 发表于 2012-7-25 00:04:04

回复 4# 甜茶少年

谢谢0.....................

Qokelate · 发表于 2012-7-25 00:47:25

本帖最后由 Qokelate 于 2012-7-25 00:49 编辑




Local $iA = Random(1, 65535, 1)
Local $iB = Random(1, 65535, 1)

Local $iC
For $a = 1 To 65535
        $iC = Random(1, 6000, 1)
        $iB -= $iC
        MsgBox(0, '回合' & $a, 'B受到伤害 ' & $iC)
        If $iB < 1 Then
                MsgBox(0, 0, 'A 是胜利者' & @CRLF & 'B 挂 了~~~~')
                ExitLoop
        EndIf
        
        
        $iC = Random(1, 6000, 1)
        $iA -= $iC
        MsgBox(0, '回合' & $a, 'A受到伤害 ' & $iC)
        If $iA < 1 Then
                MsgBox(0, 0, 'B 是胜利者' & @CRLF & 'A 挂 了~~~~')
                ExitLoop
        EndIf
        
Next
MsgBox(0, 0, '游戏结束 谢君品尝')
Exit

小改一下游戏时间加长版



Local $iA = Random(1, 65535, 1)
Local $iB = Random(1, 65535, 1)

Local $iC
For $a = 1 To 65535
        $iC = Random(1, $iB, 1)
        $iB -= $iC
        MsgBox(0, '回合' & $a, 'B受到伤害 ' & $iC)
        If $iB < 1 Then
                MsgBox(0, 0, 'A 是胜利者' & @CRLF & 'B 挂 了~~~~')
                ExitLoop
        EndIf
        
        
        $iC = Random(1, $iA, 1)
        $iA -= $iC
        MsgBox(0, '回合' & $a, 'A受到伤害 ' & $iC)
        If $iA < 1 Then
                MsgBox(0, 0, 'B 是胜利者' & @CRLF & 'A 挂 了~~~~')
                ExitLoop
        EndIf
        
Next
MsgBox(0, 0, '游戏结束 谢君品尝')
Exit

xms77 · 发表于 2012-7-25 20:48:21

回复 1# woyucheng
好像有人做过游戏哦，看看这个:http://www.autoitx.com/forum.php ... hlight=%D3%CE%CF%B7或者这个：http://www.autoitx.com/forum.php ... hlight=%D3%CE%CF%B7

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

[系统综合] 各位大师AU3能不能做个回合制游戏啊

相关帖子