自制小游戏代码(简单游戏制作代码)
制作游戏代码
Dim game(3,2),i,j,result,num '定义二维数组 二维长度3, 一维长度2
Dim fso ,ws,f ,logFileWrite,logFileRead, fileStr,flag,flagFailNum, flagIndex ' 定义日志文件
set ws = CreateObject("wscript.shell")
Set fso = CreateObject("scripting.filesystemobject")
If fso.fileexists("C:\Users\18190\Desktop\vbs\测试\game_log.txt") Then
Else
Set f = fso.createtextfile("C:\Users\18190\Desktop\vbs\测试\game_log.txt",true)
'If fso.fileexists("C:\Users\18190\Desktop\vbs\测试\game_log.txt") Then
' Set logFileWrite = fso.OpenTextFile("C:\Users\18190\Desktop\vbs\测试\game_log.txt",8,true)
' logFileWrite.writeLine "数字猜猜猜小游戏-游戏日志"
' end if
End If
For i=0 To 2 ' 关卡赋值
For j=4 To 5
game(i,j-4)= i*3+j
Next
Next
'For i=0 To 2
' For j=0 To 1
'MsgBox "game("i","j"): " game(i,j)
'Next
'Next
' 选择操作
Dim cnum, failNum, sucFlag,t
failNum =0
sucFlag =0
Do While 1=1
If sucFlag=1 Then
Exit Do
End if
If failNum =3 Then
MsgBox "您有连续三次操作失误,系统将直接退出..."
Exit do
end if
cnum = InputBox( "欢迎来到 数字猜猜猜小游戏 请选择操作:"chr(10)" 1.注册 2.登录 3.退出","数字猜猜猜小游戏")
If cnum ="" Then
cnum = "-1"
End if
Select Case cnum
Case 1
' 账户注册
Dim juname, upwd,regStr
regStr = ""
do while regStr = ""
uname = InputBox("请输入注册账号: ","数字猜猜猜小游戏-注册")
upwd = InputBox("请输入注册密码: ","数字猜猜猜小游戏-注册")
If uname "" Then
If upwd "" Then
regStr = uname"#"upwd
Else
regStr =""
MsgBox "您输入的注册账号密码有误,请重新输入"
End If
Else
regStr =""
MsgBox "您输入的注册账号密码有误,请重新输入"
End If
If regStr "" Then
If fso.fileexists("C:\Users\18190\Desktop\vbs\测试\game_user.txt") Then
Set logFileWrite = fso.OpenTextFile("C:\Users\18190\Desktop\vbs\测试\game_user.txt",8,true)
t= Year(now)"-"month(now)"-"day(now)" " Hour(now)":"minute(now)":"second(now)
'logFileWrite.WriteBlankLines 1
logFileWrite.writeLine regStr " "t
logFileWrite.close
MsgBox "注册成功!"
exit do
else
Set f = fso.createtextfile("C:\Users\18190\Desktop\vbs\测试\game_user.txt",true)
If fso.fileexists("C:\Users\18190\Desktop\vbs\测试\game_user.txt") Then
Set logFileWrite = fso.OpenTextFile("C:\Users\18190\Desktop\vbs\测试\game_user.txt",8,true)
logFileWrite.writeLine "数字猜猜猜小游戏-用户数据"
logFileWrite.writeLine regStr
logFileWrite.close
MsgBox "注册成功!"
exit do
end if
End If
end if
loop
'wscript.sleep 1000
case 2
如何自己编程做游戏
自己编程做游戏方法如下：
1、基础语言阶段：常用的编程语言有，C，C++，JAVA，其中最广泛被使用的就是C++，C++语言是一切游戏程序的基础，换而言之，一个优秀的游戏程序员，必须非常熟练掌握并应用C++。
2、数据结构：在掌握C++之后，需要进行数据结构的学习，形象的讲，就是那么一大堆数据，如何去有序的排列其结构。通过对数据结构的学习，便能够开始阅读他人编写的代码，尝试开发简单的程序，可以实现一些编程者自己的构想，是每个程序员必须掌握的技巧。
3、“库”的学习及应用：最常用的有MFC（微软公司类库），GUI(图形界面库），当然“库”的知识及功能非常庞大，通常来说，熟练掌握一部分经常涉及的知识即可。4、游戏程序对于硬件的操纵。比如，内存，CPU，显卡，这将会涉及到一些数学知识，比如立体几何，线性代数等，但是也不用惊慌，并不是非常困难。通过对硬件的熟练操纵，才能将游戏的画面，流畅度等等充分给予表达。
5、对于相关知识的学习。包括物理，脚本，美术等等。不需要深入了解，但相关知识的丰富对于将来做游戏程序会有直接帮助。
6、对于游戏引擎的熟悉及使用。游戏引擎一般包括渲染器，内存管理器，组织管理几部分。对游戏的画面做出渲染，高效使用内存以及如何控制动画播放等功能。熟悉引擎的使用，也将对于游戏程序员有直观的帮助。
如何制作代码,小游戏手机版
1、定义程序目标在开始写程序之前，应对希望程序要做什么有一个清晰的想法。
2、设计程序当在对程序需要完成的事情有一个概念性的认识后，应该决定程序要如何完成。
3、编写代码在程序有了清晰的设计后，可以通过编写代码来实现。