Marionette-Electel

posted on 29 Jun 2009 13:39 by lavalin in ECO

Electel

ธาตุ : ลม
STR : +11
DEX : +3
INT : -8
VIT : +20
AGI : -13
MAG : -7
HP : +20
MP : -
SP : +6
Recovery skill : HP
Weight/Capacity : 3/4
Skill :
Short Circuit โจมตีด้วยเวทมนต์ธาตุลมรอบตัว ( ระยะ 5x5 รอบตัว ธาตุลม )
MP 20 M.ATK
วิธ๊ได้ :
1.1 หาวัตถุดิบที่ใช้ Body of Buriki อะไรก็ได้สักชิ้นไปคุย Junk Shop's Worker (จะได้รับ Gear of Buriki )
1.2 ทำ Body of Buriki
1.3 หา Heart Ruby แล้วคุยกับ Junk Shop's Worker เพื่อเปลี่ยนเป็น Heart Bowl
1.4 นำ Heart Bowl ไปคุยกับ Black Priest ที่ Black Church หรือ White Priest ที่ White Church เพื่อทำเป็น Heart of Buriki
1.5 แล้วหลอม Body of Buriki กับ Heart of Buriki ที่ Junk Shop ไม่ก็ Marionette Master
2. ดรอปจาก BlikKingRX1 (มี Machine knowledge)
ไอเทมอื่นๆ
Body of Buriki หลอมจาก 1 Motor,1 Electel Model, 1 Pocket Com ที่ Junk Shop's Worker
Motor หลอมจาก 1 Dry Cell , 1 Magnet , 1 Coil ที่ Junk Shop's Worker
Electel Model หลอมจาก 1 Gear of Buriki , 1 Board of Buriki , 1 Part of Buriki ที่ Junk Shop's Worker
Pocket Computer หลอมจาก 1 CPU , 1 Memory , 1 Calculator ที่ Junk Shop's Worker
Dry Cell , Coil , Board of Buriki , Part of Buriki , CPU , Memory , Calculator ดรอปจาก BlikKingRX1
Magnet ได้จาก Rock กับ Container 4
Gear of Buriki ได้รับจาก Junk Shop's Worker

 

 

Credit : abyssal( http://board.onenet.co.th/viewtopic.php?t=5262 )

Comment

Comment:

Tweet

Public Class Form1
Dim a(3), b(3), c(4) As PictureBox
Dim d(3), g(3) As Integer
Dim j As Integer = 1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
a(1) = PictureBox1
a(2) = PictureBox2
a(3) = PictureBox3
b(1) = PictureBox4
b(2) = PictureBox5
b(3) = PictureBox6
c(1) = PictureBox7
c(2) = PictureBox8
c(3) = PictureBox9
c(4) = PictureBox10
Randomize()
End Sub


Private Sub btnstart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnstart.Click
Dim i, k As Integer
For i = 1 To 3
k = Int(Rnd() * 4)
d(i) = k
a(i).Image = c(k + 1).Image
Next
End Sub

Private Sub btnspin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnspin.Click
Dim i, k As Integer
If j < 10 Then
For i = 1 To 3
k = Int(Rnd() * 4)
g(i) = k
b(i).Image = c(k + 1).Image
Next
If d(1) = g(1) And d(2) = g(2) And d(3) = g(3) Then
MessageBox.Show("You are WIN!!!!", "WIN")
End
Else
MessageBox.Show("Try again")
End If
j = j + 1
Else
MessageBox.Show("You are LOSE!!!", "LOSE")
End
End If
End Sub
End Class

#1 By VBspinpic (202.44.8.100) on 2009-06-29 15:51