Vb制作围棋

阿尔宙斯谢谢 2021-04-13 09:54:27

我卡住了，还请大佬们多多指教

...全文

410 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

脆皮大雪糕 2021-04-16

打赏
举报

回复

你这个问题卡在没人知道你卡哪了

制作很漂亮的VB围棋游戏,vb游戏源码哟

可实现两人对弈，但不能人机对弈！！！！！！！！！！！

Private Sub Timer1_Timer() Dim ms As Boolean Dim Info, temp As String Dim p, p1, p2, i As Integer Dim Ch ' Begin of Time Show Process If ModemState LOGIN And SocketState CONNECTED Then 'it is not a multiusers game Exit Sub Else If (S_R = 1) And (TURN = BLACKP) Then Black_Time = Black_Time + Time - Start_Time TimeB.Caption = CDate(Black_Time / 200) Else If (S_R = 1) And (TURN = WHITEP) Then White_Time = White_Time + Time - Start_Time TimeW.Caption = CDate(White_Time / 200) Else If (S_R = 0) And (TURN = WHITEP) Then Black_Time = Black_Time + Time - Start_Time TimeB.Caption = CDate(Black_Time / 200) Else If (S_R = 0) And (TURN = BLACKP) Then White_Time = White_Time + Time - Start_Time TimeW.Caption = CDate(White_Time / 200) End If End If End If End If End If 'End If ' End of Time Show Process

内容索引:VB源码,游戏编程,围棋　　第二次编写的VB围棋游戏程序，增加[帮助]项、增加.cmn文件格式的支持、增加棋格平坦/弹起/凹陷样式、增加劫争的判断等。本程序由ben1222编写制作。　　主菜单说明：　　|-棋局　　| |-重新开始:开始一局新的棋　　| |------ 　　| |-保存棋局:将现在的棋局保存,支持.txt,.cmn文件　　| |-载入棋局:读取棋局文件,支持.txt,.cmn文件　　| |------ 　　| |-退出:退出游戏　　|-悔棋:悔一子　　|-棋盘样式:棋盘样式,可以更换　　| |-棋盘灰色　　| |-棋盘木:每

围棋打谱应用软件设计制作(C语言).txt

743

社区成员

26,912

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章