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

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

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

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?mod=viewthread&tid=24807&highlight=%D3%CE%CF%B7或者这个：http://www.autoitx.com/forum.php?mod=viewthread&tid=32565&highlight=%D3%CE%CF%B7
页: [1]
查看完整版本: 各位大师AU3能不能做个回合制游戏啊