祖玛源代码

❶ 买有版权的热血传奇手游源代码，或本公司做代理。有的留下联系方式。

手游是没有的，不过可以考虑一下端游，我玩的是 无疣传奇 满级后任务记得清，因为有绑定金币，主线必做的，不多说了，刚刚开始没有流通金也是可以玩的，装备任务送的就可以，垃圾装备分解有材料，可以做符，增加属性的，垃圾装备可以出紫色、金色的融魂，等绑金都充足，找点好的帮会，副本逐鹿刷牌子换装备、强化石，宝石可以日常换，不花钱也可以有战力排名啊

❷ 用C#编写的祖玛游戏的源代码

Dim Num As Integer ’串球数量

Dim Games As Integer ’关数最大为10

Dim Color As Integer ’球的颜色数

Dim Bs As Integer ’发球速度

Dim GameRun As Boolean ’游戏状态

Dim Score As Integer ’成绩

2、程序初始化

Private Sub Form_Load()

’读取游戏关数，用VB的GetSetting函数从注册表中读取

Games = GetSetting(App.EXEName, App.Title, "Level", "1")

Num = Pb.Width \ Balls1(0).Width + 1

For i = 1 To Num ’加载控件

Load Balls1(i): Load Balls2(i)

Next

End Sub

3、游戏初始化，完成轨道小球的初始位置

Sub InitGame()

Randomize

Color = 3 + Games \ 3

For i = 0 To Num ’生成轨道串球

Balls1(i).Picture = Image1(Int(Rnd * Color)).Picture

If i > 0 Then Balls1(i).Left = Balls1(i - 1).Left + Balls1(0).Width

Balls1(i).Visible = False

’下轨道小球位置控制代码略

Next

Ball.Picture = Image1(Int(Rnd * Color)).Picture

Ball.Visible = True ’发球图案

End Sub

4、游戏开始

Private Sub Command1_Click()

Call InitGame

Timer1.Enabled = True

End Sub

5、轨道小球运动

Private Sub Timer1_Timer()

’注：下轨道小球运动代码略

If Balls1(0).Left > 0 And Balls2(0).Left > 0 Then

’移动速度Ms1控制，代码略

Balls1(0).Left = Balls1(0).Left - Ms1

For i = 1 To Num ’其它球随移

Balls1(i).Left = Balls1(i - 1).Left + Balls1(0).Width

Next

Else ’移到最左边

’停止游戏，并作未过关处理

End If

End Sub

6、确定发球的水平位置

Private Sub Pb_MouseMove(Button, Shift, X, Y)

’发出的小球在运动时不处理

If Timer2.Enabled = True Or Timer3.Enabled = True Then Exit Sub

’根据鼠标位置确定发出的水平位置

Ball.Left = X - Ball.Width \ 2

’超出游戏区域左边界的处理

If Ball.Left < 0 Then Ball.Left = 0

’右边界的处理，代码略

End Sub

7、发球控制

Private Sub Pb_MouseDown(Button, Shift, X, Y)

’根据鼠标位置确定发球运动方向

If Y <= Pb.Height \ 2 Then

Md = -1 ’向上

Else

Md = 1 ’向下

End If

’根据鼠标离发球位置的距离确定发出小球的运动速度

Bs = Abs(Y - Pb.Height \ 2) \ 15

If GameRun = True Then

’向上运动

If Md = -1 And Timer2.Enabled = False Then Timer2.Enabled = True

’向下运动，代码略

End If

End Sub

8、发球向上运动

Private Sub Timer2_Timer()

If Ball.Top > Line1.Y1 Then ’上升

If Ball.Top - Bs <= Line1.Y1 Then ’到顶

’暂停游戏，代码略

Ball.Top = Line1.Y1

K = -1 ’确定插入位置

For i = 0 To Num

’发球水平对称线

p = Ball.Left + Ball.Width \ 2

If … Then ’判断在哪个球，条件略

If … Then ’在左侧，条件略

K = i

Else

K = i + 1

End If

Exit For

End If

Next

If K >= 0 Then ’能碰撞

’产生音效

If Dir("pop.wav") <> "" Then sndPlaySound "pop.wav", &H0 Or &H1

’插入位置的小球依次后移

For s = Num To K + 1 Step -1

Balls1(s).Picture = Balls1(s - 1).Picture

Next

Balls1(K).Picture = Ball.Picture ’插入

’找消失的左右位置V1、V2，代码略

If V2 - V1 + 1 >= 3 Then ’有三个

’计分，代码略

’过关及结束处理，代码略

’消失的小球闪烁，代码略

’消失相连小球，代码略

’所有小球后退(V2-V1+1)个小球位置，代码略

’向前填充直到V1处图像非空

While Balls1(V1).Picture = LoadPicture("")

’填充，代码略

Wend

End If

End If

’继续游戏，代码略

Else ’向上运动

Ball.Top = Ball.Top - Bs

End If

End If

End Sub

9、发球向下运动

Private Sub Timer3_Timer()

’代码略

End Sub

❸ 祖玛英文版下载 就是最原始那个祖玛 一定英文版 [email protected] 谢谢

在网上搜英文版，很多的

❹ 祖玛关卡全开补丁，WIN7的，就是最原始的那版！豪华版的。[email protected]

去下一个4399游戏盒，那上面有，在那上面下

❺ 祖玛levels.xml原参数

可以用记事本打开levels.xml文件，在文件的中间位置应该可以找到如下代码:

<Settings id="lvl15" speed=".60" start="35" score="3500" partime="135"/>

其中id代表关卡，例如以上代码中可以看到id="lvl15"，它代表关卡1-05

speed代表球向前移动的速度

start代表关卡开始时出现在屏幕内的球的数目

❻ 传奇祖玛阁按什么原理设计的

你是玩家研究还是GM研究？
我或许可以从脚本的角度给你解释
我刚才翻看了祖玛阁的坐标设置
祖玛阁一共才9个房间，如果硬要拉原理就是九宫格了
每个房间每个门都有不同的坐标
脚本设置的是从任何一个独立的房间进另外一个地图坐标是特定的
就是说每个房间的坐标是一定的，你从1的1号门进去是2号房，但是从原路返回，2号房那个坐标设置的是3号门，所以你进去的是3号门，回不到1号门，而在3号房间的时候有一个门的坐标是进1号房间的，所以永远是无穷的，其实也很简单
如果有需要我可以把祖玛阁的地图文件发给你看看的

❼ 关于制作程序，以祖玛为例子

可以去找一些c语言实例之类的书去看下，里面描述了很多游戏等的详细制作过程，你甚至可以按照书上的提示一步步跟着做出来

❽ 求祖玛的原版游戏下载

这个就是，免安装版的Zuma Deluxe