① 求VB小游戏，简单一点，越简单越好
数字排序小游戏
Option Explicit
Dim Label2X As Integer '记录标签控件数组中要移动的标签控件左上角X的位置
Dim Label2Y As Integer '记录标签控件数组中要移动的标签控件左上角Y的位置
'让标签数组中的每个标签控件上显示的数字是随机的，无重复的
Private Sub Init()
Randomize
Dim a(7) As Integer
Dim i As Integer, k As Integer
Label1.Caption = ""
For i = 0 To 7
a(i) = i
Next
For i = 0 To 7
k = Int(Rnd * 8)
Do While a(k) = -1 'a(k)=-1表示该数组元素对应的数字已经被使用过了
k = Int(Rnd * 8) '重新生成k的值，直到a(k)的值不等于-1
Loop
Label2(i).Caption = Trim(Str(a(k)))
a(k) = -1 'a(k)的值已经使用了，不能再用，重新赋值为-1与其他的元素值相区别
Next i
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Integer
Dim z As Integer
Init
Picture1.Enabled = True
'让空白标签Label1出现的位置随机
Randomize
'记录下空白标签Label1的位置
x = Label1.Left
y = Label1.Top
z = Int(Rnd * 8)
'将空白标签Label1和标签控件数组任一控件交换位置
Label1.Move Label2(z).Left, Label2(z).Top
Label2(z).Move x, y
Command1.Enabled = False
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Dim i As Integer
Picture1.Enabled = False
'在标签中显示游戏说明信息
Label3.Caption = "如左图所示，将数字按0-7顺" & vbCrLf & vbCrLf & "序依次排列，即取得胜利。"
'在标签中显示排列规则后的数字顺序
Label1.Caption = 0
For i = 0 To 6
Label2(i).Caption = i + 1
Next
End Sub
Private Sub Label1_DragDrop(Source As Control, x As Single, y As Single)
Dim Label1X As Integer '记录空白控件Label1左上角X的位置
Dim Label1Y As Integer '记录空白控件Label1左上角Y的位置
Dim flag(3) As Boolean
'获取空白控件Label1的位置
Label1X = Label1.Left
Label1Y = Label1.Top
'要移动的控件位于空白控件Label1的正左侧
flag(0) = (Label2X = Label1X - Source.Width) And (Label2Y = Label1Y)
'要移动的控件位于空白控件Label1的正右侧
flag(1) = (Label2X = Label1X + Source.Width) And (Label2Y = Label1Y)
'要移动的控件位于空白控件Label1的正上方
flag(2) = (Label2X = Label1X) And (Label2Y = Label1Y - Source.Height)
'要移动的控件位于空白控件Label1的正下方
flag(3) = (Label2X = Label1X) And (Label2Y = Label1Y + Source.Height)
If flag(0) Or flag(1) Or flag(2) Or flag(3) Then
Label1.Move Label2X, Label2Y
Source.Move Label1X, Label1Y
End If
Win
End Sub
Private Sub Label2_MouseDown(Index As Integer, Button As Integer, Shift As Integer, x As Single, y As Single)
If Button = vbLeftButton Then '如果按下鼠标左键
'记录下要拖动控件的位置
Label2X = Label2(Index).Left
Label2Y = Label2(Index).Top
Label2(Index).Drag 1 '启动拖动操作
End If
End Sub
Private Sub Label2_MouseUp(Index As Integer, Button As Integer, Shift As Integer, x As Single, y As Single)
Label2(Index).Drag 2 '结束拖动操作
End Sub
Private Sub Win()
Dim winner As Integer
Dim i As Integer
Dim answer As Integer
'对于给定的标签控件数组中的任一标签控件，可以落在符合要求(对应位置应显示对应数字）
'的八个位置中的任一位置
'利用循环语句对标签控件数组中的每个标签控件进行检查，如果其落在某一符号要求的位置，
'则变量winner的值加1，如果所有标签控件都落在符号要求的位置，则变量winner的值应为8
For i = 0 To 7
If Label2(i).Left = 0 And Label2(i).Top = 0 And _
Label2(i).Caption = 0 Then
winner = winner + 1
ElseIf Label2(i).Left = Label2(i).Width And Label2(i).Top = 0 And _
Label2(i).Caption = 1 Then
winner = winner + 1
ElseIf Label2(i).Left = 2 * Label2(i).Width And Label2(i).Top = 0 And _
Label2(i).Caption = 2 Then
winner = winner + 1
ElseIf Label2(i).Left = 0 And Label2(i).Top = Label2(i).Height And _
Label2(i).Caption = 3 Then
winner = winner + 1
ElseIf Label2(i).Left = Label2(i).Width And Label2(i).Top = Label2(i).Height And _
Label2(i).Caption = 4 Then
winner = winner + 1
ElseIf Label2(i).Left = 2 * Label2(i).Width And Label2(i).Top = Label2(i).Height And _
Label2(i).Caption = 5 Then
winner = winner + 1
ElseIf Label2(i).Left = 0 And Label2(i).Top = 2 * Label2(i).Height And _
Label2(i).Caption = 6 Then
winner = winner + 1
ElseIf Label2(i).Left = Label2(i).Width And Label2(i).Top = 2 * Label2(i).Height And _
Label2(i).Caption = 7 Then
winner = winner + 1
End If
Next i
If winner = 8 Then
MsgBox " 恭喜您，胜利了！", 0 + 64 + 0, "提示"
Picture1.Enabled = False
answer = MsgBox("还继续吗？", 4 + 32 + 0, "提示")
If answer = vbYes Then
Command1.Enabled = True
Else
End
End If
End If
End Sub
弹球游戏
Dim x_step As Integer
Dim y_step As Integer
Private Sub command1_Click()
If Timer1.Enabled = True Then
Timer1.Enabled = False
Else
Timer1.Enabled = True
End If
If command1.Caption = "暂停" Then
command1.Caption = "继续"
Else
command1.Caption = "暂停"
End If
End Sub
Private Sub Form_Load()
x_step = 200
y_step = 200
End Sub
Private Sub Picture1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 37 Then
If Line1.X1 < 0 Then
Line1.X1 = 0: Line1.X2 = 2000
Else
Line1.X1 = Line1.X1 - 100: Line1.X2 = Line1.X2 - 100
End If
End If
If KeyCode = 39 Then
If Line1.X1 > Picture1.Width Then
Line1.X1 = Picture1.Width - 2000: line2.X2 = Picture.Width
Else
Line1.X1 = Line1.X1 + 100: Line1.X2 = Line1.X2 + 100
End If
End If
End Sub
Private Sub Timer1_Timer()
If Shape1.Top < 0 Then
Shape1.Top = 0: y_step = -y_step
End If
If Shape1.Left < 0 Then
Shape1.Left = 0
x_step = -x_step
End If
If Shape1.Left > Picture1.Width - Shape1.Width Then
Shape1.Left = Picture1.Width - Shape1.Width
x_step = -x_step
End If
If Shape1.Left >= Line1.X1 And Shape1.Left <= Line1.X2 And Shape1.Top >= Line1.Y1 - Shape1.Height Then
Shape1.Top = Line1.Y1 - Shape1.Height
y_step = -y_step * 1.01
x_step = x_step * 1.01
Label2.Caption = Label2.Caption + 1
End If
Shape1.Top = Shape1.Top + y_step
Shape1.Left = Shape1.Left + x_step
If Shape1.Top >= Picture1.Height - Shape1.Height Then
MsgBox "游戏结束"
command1.Caption = "开始"
Timer1.Enabled = False
Shape1.Top = 1000
Label2.Caption = 0
End If
End Sub
打字游戏
Dim score As Integer
Dim speed As Integer
Dim typetime As Integer
Private Sub init()
Randomize
lblletter1.Caption = Chr(Int(Rnd * 42) + 48)
lblletter1.Left = Int(Rnd * 2800) + 1
lblletter1.Top = 0
End Sub
Private Sub init1()
Randomize
lblletter2.Caption = Chr(Int(Rnd * 25) + 97)
lblletter2.Left = Int(Rnd * 2800) + 1
lblletter2.Top = 0
End Sub
Private Sub Command1_Click()
score = Int(lblscore.Text)
init
init1
Timer1 = True
Timer2 = True
HScroll1.Enabled = False
Command1.Enabled = False
Command2.Enabled = False
HScroll1.Enabled = False
If lbltime.Text <= 0 Then
Timer1 = False
Timer2 = False
lblletter1.Caption = ""
lblletter2.Caption = ""
End If
End Sub
Private Sub Command2_Click()
typetime = InputBox("请输入打字时间。", "时间设置")
If typetime <= 0 Then
lbltime.Text = 60
End If
lbltime.Text = typetime
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) = lblletter1.Caption Then
score = score + 1
lblscore.Text = score
init
End If
If Chr(KeyAscii) = lblletter2.Caption Then
score = score + 1
lblscore.Text = score
init1
End If
End Sub
Private Sub Form_Load()
Timer1.Enabled = False
Timer2.Enabled = False
lblletter1.AutoSize = True
lblletter2.AutoSize = True
lblletter1.Caption = ""
lblletter2.Caption = ""
lblscore.Text = 0
lblspeed.Caption = 100
lbltime.Text = 60
HScroll1.Max = 200
HScroll1.Min = 20
HScroll1.SmallChange = 5
HScroll1.LargeChange = 20
HScroll1.Value = 100
End Sub
Private Sub HScroll1_Change()
lblspeed.Caption = HScroll1.Value
End Sub
Private Sub Timer1_Timer()
lblletter1.Top = lblletter1.Top + lblspeed.Caption
If lblletter1.Top >= 4335 Then
Call init
End If
lblletter2.Top = lblletter2.Top + lblspeed.Caption
If lblletter2.Top >= 4335 Then
Call init1
End If
End Sub
Private Sub Timer2_Timer()
If lbltime.Text > 0 Then
lbltime.Text = lbltime.Text - 1
Else: Select Case score / (typetime / 60)
Case Is <= 40
MsgBox ("不要放弃再试一次！")
Case 40 To 80
MsgBox ("太棒了，继续努力！")
Case 80 To 120
MsgBox ("坚持下去，你将成为一个打字高手！")
Case Is > 120
MsgBox ("祝贺你！你已经是一个打字高手！")
End Select
Timer1 = False
Timer2 = False
HScroll1.Enabled = True
Command1.Enabled = True
Command2.Enabled = True
HScroll1.Enabled = True
init
init1
End If
End Sub
点灯游戏
Private Sub Form_Load()
Form1.Scale (0, 12)-(12, 0)
For i = 1 To 11
Line (1, i)-(11, i)
Line (i, 1)-(i, 11)
Next i
End Sub
Sub fill_color(X, Y)
If Point(X, Y) = vbWhite Then
Line (Int(X), Int(Y))-(Int(X + 1), Int(Y + 1)), vbBlack, BF
Else
Line (Int(X), Int(Y))-(Int(X + 1), Int(Y + 1)), vbWhite, BF
End If
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If X >= 1 And X <= 11 And Y >= 1 And Y <= 11 Then
Call fill_color(X, Y)
If X >= 1 And X <= 11 And Y + 1 >= 1 And Y + 1 <= 11 Then
Call fill_color(X, Y + 1)
End If
If X >= 1 And X <= 11 And Y - 1 >= 1 And Y - 1 <= 11 Then
Call fill_color(X, Y - 1)
End If
If X + 1 >= 1 And X + 1 <= 11 And Y >= 1 And Y <= 11 Then
Call fill_color(X + 1, Y)
End If
If X - 1 >= 1 And X - 1 <= 11 And Y >= 1 And Y <= 11 Then
Call fill_color(X - 1, Y)
End If
End If
Call Form_Load
End Sub
猜数字
Dim number As Integer
Private Sub Command1_Click()
Dim guess As Integer, diff As Integer
guess = Val(Text1.Text)
If guess = -1 Then
MsgBox ("要猜的数是" & number)
Text1.Text = ""
Text1.SetFocus
Exit Sub
End If
diff = Abs(number - guess)
Select Case diff
Case 0
MsgBox ("恭喜你猜对了！")
Case 2, Is < 2
MsgBox ("接近了，再努力！")
Case 10, Is < 12
MsgBox ("有些远，再努力！")
Case Else
MsgBox ("太远了，继续努力！")
End Select
Select Case diff
Case Is <> 0
Text1.Text = ""
Text1.SetFocus
End Select
End Sub
Private Sub Form_Load()
MsgBox ("计算机产生了一个1~100之间的整数，" & Chr(10) & "请您猜出这个数是多少。" & Chr(10) & "如果输入-1，则停止猜数，并输出要猜的数。")
number = Int(100 * Rnd) + 1
End Sub
Private Sub Label1_Click()
End Sub
猜笑脸
Private Sub Command1_Click(Index As Integer)
Dim a As Integer, i As Integer
Randomize
a = Int(Rnd * 4)
Command1(a).Enabled = False
Command1(a).DisabledPicture = LoadPicture("267.gif")
If a = Index Then
Label1.Caption = "你猜对啦，真棒！"
Else
Label1.Caption = "你猜错啦，我在这哩！"
End If
For i = 0 To 3
Command1(i).Enabled = False
Next i
End Sub
Private Sub Command2_Click()
Dim i As Integer
For i = 0 To 3
Command1(i).Enabled = True
Command1(i).DisabledPicture = LoadPicture("")
Next i
Label1.Caption = "猜猜我在哪儿？"
End Sub
Private Sub Command3_Click()
End
End Sub
② 谁会用Visual Basic写一个猜拳的小游戏阿 最好能用case的那种写法！！
新建一个三个Option标签的Option数组
代码如下
Private win As Integer, lost As Integer
Private Sub Form_Load()
Option1(0).Caption = "石头"
Option1(1).Caption = "剪刀"
Option1(2).Caption = "布"
End Sub
Private Sub Option1_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
Randomize
a = Int(Rnd * 3) + 1
If a = 1 Then
Select Case Index
Case 0: MsgBox "都是石头平手"
Case 1: MsgBox "你输了,他丫出的是石头": lost = lost + 1
Case 2: MsgBox "你胜了,那倒霉娃出的是石头": win = win + 1
End Select
ElseIf a = 2 Then
Select Case Index
Case 0: MsgBox "你胜了,那贷是剪刀": win = win + 1
Case 1: MsgBox "对方也出剪刀！平手噢"
Case 2: MsgBox "你输鸟哦！对方出的是剪刀喔！不好意思啦！": lost = lost + 1
End Select
Else
Select Case Index
Case 0: MsgBox "你输鸟哦！对方出的是布喔！不好意思啦！": lost = lost + 1
Case 1: MsgBox "你胜了.对手的裹脚手给你夺命剪刀手剪破了": win = win + 1
Case 2: MsgBox "都是布平手！"
End Select
End If
Static num As Long
num = num + 1
Label1.Caption = "你己出击了" & num & "次.离最终的10机会还有还有" & 10 - num & "次"
If num = 10 Then MsgBox "你己出击了十次" & vbCrLf & "胜了 " & win & " 次" & vbCrLf & "败了 " & _
lost & " 次" & vbCrLf & "平手 " & 10 - lost - win & " 次", vbOKOnly, "猜拳小游戏": num = 0: win = 0: lost = 0
Option1(0).Value = 0
Option1(1).Value = 0
Option1(2).Value = 0
End Sub
③ 载入镜像安装游戏失败
是模拟人生3吧...
你之前删除的时候不是用卸载工具删除的而是直接删除游戏文件夹了吧
你进控制面板---添加/删除程序
然后在里面找你之前的游戏，点卸载他会说找不到或已经卸载了询问你是否删除注册表 确定就行了
然后再安装
还不行直接进注册表手动删除
开始里面点运行 输入"regeidt"打开注册表把下面的三个都删了
HKEY_CURRENT_USER\SOFTWARE\Electronic Arts\Sims\The Sims 3\
HKEY_LOCAL_MACHINE\SOFTWARE\Electronic Arts\Sims\The Sims 3\
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{C05D8CDB-417D-4335-A38C-A0659EDFD6B8}
④ 4399小游戏斗地主
老婆不让我玩，挺感谢的，
给楼主献上多年经验下喜爱的网站，我玩很多年了
绝舅汾非设
⑤ 请求推荐一款手游
你妈妈玩的游戏?
1 shaowalker
GLU的经典作品
2 java重制版的 雪山兄弟
3 古惑狼。。
4 索尼克。。
⑥ 手游4335网络交易平台会不会是骗人的
我最近玩轩辕传奇手游，记得从15级开始每日完成2大环炼宝任务，它是你获取银票和经验的主要来源之一，也是每日必做的任务；任务在轩辕城炼宝区域找到NPC冷少泉处领取任务，根据任务提示去到相应的地宫鼠标右键放至背包内的宝鼎，在宝鼎周围（切记必须在宝鼎周围，超出宝鼎范围的话击杀怪物是不计数的，当然，系统会在超出范围时提示你的）击杀怪物炼化宝鼎，宝鼎数凑满即可打开宝鼎拾取奖励以及返回交付任务；（若对炼宝任务还不太了解可以参考攻略“炼宝任务”，它会更全面具体的为你掩饰炼宝体验环节）
⑦ 有没有能在电脑上模拟安卓平板的软件 （为了玩游戏的）
http://www.xiazaiba.com/html/4335.html
http://www.pc6.com/softview/SoftView_64923.html（里面有详细使用方法）
这两个都可以用，只是有时会卡，第二个长时间不动会有弹出页，在下载完安装包后用选择打开方式打开就行了。
⑧ nds游戏攻略
^游戏: 一开始就是让人耸动的OP 整个就是好听阿^^ 然后进入游戏因为第一次玩先选择那个NO DATA 进去之后就是未来篇剧情进入未来篇之后都会有相关对话呢~
不过由於剧情跟漫画有出入 请不要对以下太认真先遇到索特跟两台莫斯卡中途索特好像有些质疑后来传说的十年寺出现了对话之后就进入战斗 (看到战斗画面我整个囧了) 怪怪的地方是... 他一开始两台莫斯卡站在那边对话后尽然变成两位黑魔咒在那边或许中途内容有关系吧- -
这不是重点我只能说十年寺实在太强了人家阿纲打一下17~19 你一打就170- - 更怪的地方是阿纲来到这里并没有X手套彭哥列戒指版但是在战斗模式中竟然有我想或许TAKARA TOMY是为了节省成本吧-.-
打完这场之后阿纲就升了一等-.- 之后就是玩家行动了往下找到出口后十年寺出来解说S光圈(注)的用途这也是让我扯了20分钟的地方= =
接下来继续往下此时是三人同行然后会遇到十年武整个就是帅呀~(不过也是战斗场景崩坏最严重的其中之一) 再来又会遇到拉尔此时狱寺也出现了然后十年山就会带你进去基地了(旁边有宝箱 记得去开) 进入基地以后会先到应接室进行未来篇的剧情以后(里包恩:紧紧的抱著我吧~~我在这里唷XD)
接下来进入司令室跟将尼二对话后左边那位家族成员是相关解说右边那位是干麻的不知道旁边也有宝箱 记得去开接下来就是去B11F(记得 电梯要去右边的)的左边(竞技场)找将尼二选第二个
接下来再去右边(狱寺训练室)找将尼二一样选第二个回到B5F司令室跟将尼二对话完毕后对话完之后应该就是睡觉了
接下来是大食堂剧情过后去找拉尔(训练室 B8F) 是说山本都还没出现拉尔教啥阿-.-
接下来出去外面(入口的楼梯 选有"森"字的那个) 出去之前可以去竞技场买水(右边那位白色衣服的 明明就是你们的首领还收钱= =)
此时人物可以跟索特调换往下走 是神社再往下走就是并盛市右边不能走 请走左边~~
过去一张地图后 上面是学校(进不去) 之后蓝波跟一平 会遇到大葱头他们就变回十年前了= =...
结果没有战斗 无聊接下来回来基地的司令室跟里包恩对话好像发生事情了要去废工场选择B1F之后 往前走 进去出来基地后 再度往上走会看到野猿太猿(自动对话 对话应该是未来篇剧情) 对话完后跟野猿打(十年山打一下就爆了= =) 此时山本终於出现了= =
继续未来篇剧情= = 对话完毕 请往右边走(也只有这条路可以走= =) 单行道....0.0 之后进入废工厂接下来往前 会遇到京子对话完毕后太猿出现了开战~~~~(此时我看到山本真是心酸 好丑= =) 程度跟野猿强太多了!
打的有点久= = 经验值挺高的(XD) 接下来又是自创剧情 红魔咒出现!!
剧情显示 山本跟狱寺 被秒杀了!!(遭殴= =) 接下来自动回到司令室 然后第二次睡觉= =
起来后 再度出现剧情 有看漫画都知道 云豆的信号XD (未来篇剧情继续) 出来找传说的电光大叔 γ吧~
去神社出现了!!传说的γ~~ 剧情: 大家被惨电= = 就在这个紧要关头十年雀出现啦!!
战斗了~~大家尽量发挥它吧~ 此时刺猬那招好像还不能用 话说用第一招打几下就挂了= =|||(EXP好高喔XD) 又是自创剧情红魔咒的大魔头-比利甘特斯阿然后草壁也跑出来了 之后他们又回到基地了(云雀那边)(看不懂日文之糟糕= =) 很好 又要回到应接室-.-(此时才知道 B5F左边是云雀他们待的地方)
到达应接室后 又是长串对话~~慢慢的按A吧接下来又是睡觉了= =
起床后除了对话还是对话记得存档喔XD 好了 去B8F楼又是未来篇对话= =
然后请去工作室接下来又是寝室对话= = (对话时 里包恩用广播系统找守护者去训练耶XD)
接下来又是很熟的对话 同父异母的姐妹训练(XD) 接下来 要打5只毒蝎去打吧~我把所有的毒蝎 都放在那里!!(晕) (用赤炎之矢可以秒杀 可是耗魔很高 记得买CP水) 打完会获得"瓜"- -(但是因为不能戴戒指= =属性不够= =||||)
接下来是山本这边由於对手是里包恩 你的胜算根本是0.00000000000000000000000001%- - 山本输后(结果山本变成这个游戏里面最没用的角色><没有技能可以买耶= =) 出现的就是未来篇剧情努力按吧!!!!!!!!!!
接下来是阿纲这边传说的云雀让对方缺氧训练法出现了~~ 相信大家都很熟悉!点剧情吧!
继承彭哥列的业障吧!阿纲!! 然后然后然后!!!!!!!!!!!!! I代出现了>///< 很好= = 正式拿到 X手套-彭哥列戒指版= =
此时X BURNER好像拿到了= =
然后 下面有两个人分别是拉尔跟雀选雀 反正我选他之后打的很爽= =
一开始先跟他放X BURNER出去= = 53- - 41- - 他还没挂一w一然后用三次的二段攻击打我= = 很好= =没魔了= = 血剩下一点点= = 补血 没想到还是被秒杀= = 不过秒杀是正常的 回忆~~~~过去~~~痛苦的相思 忘不了~(别闹啦~) 被秒杀后 进入库洛姆那边(终於出现了 我的库洛姆~) 然后又是长篇对话= =
变态还是个变态样= = 这里的剧情都跟未来篇差不多= = 就不多加解释了= = 当然包括有形幻觉之类的然后就是理所当然的战斗了XD 打死那个变态吧!!
(一回合就够了= =) 接下来又是原创剧情面具男跟大葱头的对话之后就是阿纲一行人在黑曜前面对话完之后 请往前走进入黑曜乐园吧(记得在楼梯口存档~比较方便= =) 进去之后又是长篇大论= =
对话完回到司令室对话完后 到并中楼顶(话说一代的垃圾桶还在耶XD) 会看到那只粉红熊娃娃没错 这边是自创剧情 而且是延续前作唷! 十年莉佐娜~~~~~>///< 是说这里的毒蝎很难打更不用说是小女孩团队了= =
所以建议 练等练好再来= = 至於练等法...请查(注2) 很努力的在找跟一代同样的升等怪= =
然后会进入跟莉佐娜的对话按完吧~ 回到基地后 按到一半 会有个"喂!!!!"的声音想必大家都猜到了吧?
那就是S啦!!!!! 可是他连出场的机会都没有= =||||(才怪) 跑去司令室 有剧情(同未来篇) 帅帅的王子跟S都会出现唷XD(就是那个大萤幕剧情啦XD包括最后的打架= =)
接下来 走并盛市那条路左边走到后面会遇到机器狗 开打! (狗打一下就很痛...要小心) EXP 998!!!而且还有4XXX的$~~~
接下来大葱头 比欧出现了 (连补血的机会都没 各位请保重) 想办法补血吧!!!!(在战斗中补 好累) 所以同样不好打(要打满久的 可是没比狗难打) EXP 2050 钱 1500 在这个时候 了平跑出来了!!!!
接下来请进应接室 拉尔跟R都在那边等你们 OK 又是久违的睡觉~~ 起床之后 走向司令室发动剧情一串话后就可以跟R对话了选第一个就会发生剧情(请注意 发生剧情后 就不能回来VONGOLA 要跟R对话之前请谨慎思考!) (如果没有错 就是侵入米尔菲欧雷日本分部)
先到B1F 往前走会到起床之后 走向司令室发动剧情一串话后就可以跟R对话了选第一个就会发生剧情(请注意 发生剧情后 就不能回来VONGOLA 要跟R对话之前请谨慎思考!)
就是侵入米尔菲欧雷日本分部首先进去是A1区 往前走就对了此时只有你跟拉尔行动 (剧情有说: 章鱼头跟草坪头行动山佐索三人一组纲拉一组)
进去之后会遇到那个电猪大叔此时只有你跟拉尔行动 (剧情有说: 章鱼头跟草坪头行动山佐索三人一组纲拉一组) 接下来A2区看到门 发现过不去这时 去最右边 找到ㄧ个红红的东西踩下去!不要客气!!
按完后 走左边 往上走 又是一个按钮照踩不误!!(XD) 回去门那边 看起来还是不行此时往左边看= =
那边就有一个嘛一口一!!!? 门开了!! 进去吧! 别再迟疑了!少年少女们(误) 进去后是A3区走楼下的路 楼上只是个幌子= =
看到门之后 左边有个S光圈补血+存档吧进去A4区后往前走有个很熟悉的人出现了... 电猪大叔!!!安娘喂!!! 一长串的对话之后 开打= = 用X BURNER狂轰他吧XDDDDDD 是说不好打= =(昏倒 那后面的敌人怎办阿= =)
他都把我的小拉尔打死了>< 是说顺利的赢了= = 接下来继续前进~ B1区进去之后 S光圈记得用把所有看的到的士兵打完吧~~ 之后进去遇到津嘉又是苦战罗!!
拉尔VS津嘉一号~~ (很难打!!我重破了好几次 请注意!! 要打赢要运气成分很高! 建议在门前练等)
努力练到19等 终於打赢他(运气成分真的很高!!) 爆炸之后 出现警戒声 结束后 请注意 往前走 左边有台机器在那前面按A 门就开了 放心地进去吧 接下来就是大家期待的斯帕纳>W< 阿纲遇到了四只莫斯卡去打吧一W一(一只而已 而且跟拉尔合作) 打起来...很轻松= =两回合就够了= = EXP 804 钱却只有67- -
接下来第二只(就是不让你补血) 跟第一只的素质应该是一样的接下来是第三只= =|||(无限循环中~~) 是说真的会没魔战斗中狂补= = 第四只来了= = 四只都不强是很好啦可是在这关钱损最快= = (难怪有一个宝箱塞CPMAX)
FG多使用喔XD 至少那不需要塞CP 接下来往右边走记得存档 进去吧接下来就遇到斯帕那两人VS斯帕那...(竟然不是莫斯卡王 斯帕那在漫画没有战力耶= =) 是说在这里打也打不痛不过可以说是打不死蟑螂状态= =
打得好累= =(很拖) 打到不爽 用了CA= = 把FG用光了= = 好不容易打赢了(经验值很高呢 3144 钱2000) 继续往前走= =
走到最后 终於待机换到山本这边山本几乎没有战力...故事会如何发展呢... 发现前面都是红外线 对话过一次之后先去最右边开宝箱 再回来 穿过去= =(可以)
先存档后出现的是爱莉丝当我发现要跟他打的时候 我昏倒了= = 因为不可能赢(哭) 所以 所以请在刚开始的图练等= = 不要那麼快去找死= =
使用戒指(注3)会很好练 用匣子(注4)赢的机率会更高当然 使用戒指 很轻松的赢了接下来 先跟前面的机器说话 再来去开门然后就是一堆的BS 打倒他们吧打完之后 过去是野太猿兄弟打吧 有一点持久战的感觉水可能会喝一点 加油~(如果有戴戒指 很轻松 损血很少)
打完之后 由於高经验 大家一起升等吧XD 接下来就是F1区了 往右边继续走 遇到怪 尽量打 因为都是高经验XD 发现过不去 此时 请从那个凸出来那块 从左往右推过去 成功PASS= =
继续走 F2区 走下面 开宝箱 C卡回去上面左边(记得存档) 出现了! 幻骑士 此时会遇到云雀打爆那个阿幻- - (注意 幻骑士速度很快)
没有疑问的爬梯子吧(在梯子前面按A) 接下来走比较近的那个路 会跟阿纲会合(比较远的那个是什麼有没有人能帮忙?
接下来就换最后一组了这里是一条大迷宫阿先选择左边那一条 到达G3 来直接往左边 去G2(岚之戒指老实说+血+不多 遇到敌人小心点 带了6只 血却只有2XX) 接下来走那个旁边有S光圈的 存档往左下角 可以找到瓜经过一番对话之后进去门里面
准备打白沙纳吧要存档喔XD 放心 十分弱 只是血有点多 (打我只损1滴血= =) 经验4335呢~(大哥又升等了>W<)
继续走右边的门 记得上面的机器要破坏到了G3地带直直走 进去是H1 这里又是BS 全打完吧 不用说 都很弱 放心打接下来往下走 看见两个洞走右边的(左边是空房 有没有宝箱 应该没) 看到存档的东西了吧~
那就是可爱的电光大叔来了^^ 继续走吧到达H5之后 γ出现了狱寺+了平 VS γ(速度快 注意) 有难度呢~
只要被麻痹 就是被电假的= =(我重破一次) 总之就是千万不要被麻痹更不要让其中一人死掉 否则你全场没有打他的机会(从满血被打到死 够狗血了吧 )
多用了平的我流 可以轻松赢他如果了平27等 他一场可以不用CP水用两次我流打赢很强的γ之后会跟帝弗特(戴面具变态)对话(没有战斗)
当然 往前走 不要怀疑XD 看到"门"走就对了后来就跟阿纲们集合这下子大家都会合了呢!(是说雀又飞到哪不知道了 真是个孤僻鬼= = 在游戏也是这样><) 看到存档之后 就知道不妙了吧 打吧= =
打之前 要记得把大空戒指给阿纲 否则很容易输 (盔甲幻骑士...极限的超过动画组了...好丑- -) (他甚至变成了地域戒指吞噬状态= = 没救了一口一||| 还是好丑...) 戴上戒指之后又很轻松的赢了= = 5034EXP 不错唷XD(是说打了五分钟 好久)
接下来 进去吧入江正一 在那边等著你!! 结果出现RS的甘特斯 比欧 帝弗特也在此时 了平却变回以前样了(刚来就26等= =) 接下来 基地好像发生事情了再来 帝弗特露出真面目了 +10阿鲁比特(LV26)!! 同伴耶!! 接下来就出来基地了 回去吧到达基地后 发现被占领了只好去找其他入口竟然不在并盛街道= =
更往上走 结果到了棺材才解答(是说这路途遇敌率好高 无言) 先进去 把所有的东西摸索清楚之后去并中(水带好一点的) 跑到三楼时发现他竟然已经变回十年前的样子了接下来会跟半机兽-云螳螂 决斗好好的打吧 (有点强 请注意) 只要他不放大绝招 赢的机率都很高 EXP只有1357= =真是悲哀= =|||
接下来会遇到瓦利亚二人组跑到并中前 引发剧情之后 真正的帝弗特出现了慢慢打吧(又是打不死蟑螂一枚) EXP 7524 代价不错= =
剧情继续 由於它是剑士好像非常看好山本结束后自动回去 一串对话后 去神社 自动发生剧情之后成功回到云雀这去云雀他的房间吧接下来是去并中三楼之后跟前面的一个人对话对话完之后
跟著那个人走消防栓竟然是医疗室!!(比R的秘密基地还要HIGH) 跑出去之后 发现大空半机兽(好大只...) 接下来回去那个棺材入口的基地= =
跟R对话之后得知 黑曜 神社 并中 森这四个地方有半机兽去吧@_@ (去之前带死气药跟HPMAX带多点) 森的是雷鹰 去打吧一口一 (攻击力超高啦 速度又超快 又会麻痹 更会即死攻击 跟云螳螂简直没得比= =) 跟他打的时候被麻痹率很高 请注意要不然真的会打的很累= = (被电假的)
到达神社 遇到半机兽-雨螃蟹我觉得这只比雷鹰好打多了至少 他不会即死攻击会终结FG而已 攻击力也不痛反正雨之戒轻松回收来到黑曜 会遇到半机兽-雾蜘蛛不管你要用炸的用砍的用轰的用击的 干爆他就对了= = (注意 他打一下有点痛)
如果该带的都有带 打起来不会太累 之后会到医疗室 库洛姆就可以行动了(由於没有进攻基地 雾之戒就别给他戴了= =只有15等...)
最后去并中吧 回收晴之戒既然是晴 当然会在顶楼罗打倒半机兽-太阳能板晴之象吧就算在打架还是很大只= = 攻击力高 要注意血不多 轻松打~~
回去基地会进行对话完毕后 回到并盛市最左边注意看上面有个白色建筑 有个特别明显的门进去就是梅洛涅基地当然就是往回走论了= =
先走阿纲那条路有个云之门 结果是星二雷石- - 走更回去= =
有个雷之门里面有三星大空石跟二星雨石机器可以对话 可是干麻的不知道= =|||
阿纲这条路没啥用的样子= = 只好走山本线-.-(楼梯那个) 晴 雾之门好像也有那个机器 我还是对话了= =
走狱寺线 雨之门也有机器= = 这个机器好像很重要一口一|||
结论:这任务好漫长= =尤其是中途遇到低经验对手就是烦是说怎麼没有岚之门一W一= = 之后进去入江研究室发现前面开了一个大门= = 进去大门后进左边门有颗四星大空石走右边的发现绿葱头比欧对话完之后 跟半机兽-岚狮开打攻击力很高哦...要注意打完之后
岚之彭哥列戒指就入手了接下来就去并中基地(医疗室) 去吧打倒半机兽-大空恐龙(超大只...3D的真实性在这边呈现了= =) 不强... 之后走后门 进去B11F(原来这个门这样用) 比欧再度出现他竟然跟岚狮融合.. 总之开打... 单打就两百多...很好= =|||
有一点点的难打不过赢了是赢了= = 他竟然再进化不让你补血... 很辛苦的一战.. 因为他大绝招很强... 很努力得到胜利之后去B5F 会遇到帝弗特他跟雨蟹融合打起来有一点吃力(大绝招很强) 打完之后补血补好 去找比利吧! 前往司令室 进去之后说B1F有反应那就去吧到了之后 出现了半机比利!!(这时候我才知道那是他哥= =) 他跟所有的7大半机兽融合... (这里的剧情很有钢炼的味道) 开打吧!(攻击速度快 要小心) 打完之后他竟然变成大怪物!!(合成失败体?) 连场景都怪怪的= =(根本就是仿钢炼= =)
攻击力很痛 打起来很HIGH 此时背景音乐是前所未有可以欣赏下(不是很好听是真的= =) 攻击力不高 要多点CP就是最后就是兄弟的离别画面(?) 比利是用最后的一点的力气说话最后笑了一下.. 绝望的笑声... 他也对弟弟做最后的声明..(还讨论到爸爸耶= =) 我现在才发现比利的声优好棒>< 好有感情@@ 哥哥!!!!!!!!(谁来把他拖走= =)
这里都在说明命运的一切了命运的兄弟阿... 最后...比利还是死了...(飙泪!!) 之后...回到厨房的画面大家好像还是很和乐= =||| 只有索特.. 突然!!比利出现了(停泪) 好像是用很强的医术= =||| 索特终於露出笑脸当然 大家的训练还是要继续XD 地狱般的日子不会结束的XD 之后就是ED 如果没错 全破了= =(完全没有+1069的踪迹= =) 接下来的番外篇任务 请各位自行寻找罗~ --------------------------------------------------------------------------------
注: S光圈的用途是站到后 会自行补充HP跟CP 在光圈按A(NDS的A) 就会出现对话内容请按第二个进行存档接下来第一个是继续第二个是离开
注2: 其实在黑曜升等不难可是要消费掉大量的体力而且迷你莫斯卡的遇见率实在不高= = 打小兵的话 一次EXP大概在2XX到3XX 不难练 可是很容易翘辫子= =|||
注3: 戒指是要去B11F 去毒蝎训练室跟前面的电脑讲话 之后选择第二个能选的 去右下角的房间里面有12个宝箱 3分钟内要开10个注意~中途还是会战斗 战斗的时候时间照算 请把握时间之后到达B9F工作室去上面有一台机器跟他对话之后 可以合成戒指注意~一种戒指同等级的只能制炼五个
注4: 匣子是要去B11F 去毒蝎训练室跟前面的电脑讲话 之后选择第一个能选的 去右下角的房间之后会到训练室 往下走跟拉尔对话打倒之后可以随机获得匣子注意~匣子有机会重复!!("应该"都是动物匣
⑨ 怎样把自己玩的游戏录下来
在这里。 复制下来，粘贴上，别点连接。 http://bbs.17173.com/topics/4335/200902/06/2301277,1.html?time=1246613965#tip21511402