Commit 20ab19c0 authored by Arina Listyarini Dwiastuti's avatar Arina Listyarini Dwiastuti
Browse files

implement SendFind & MixItem

parent 7e616e6e
......@@ -23,16 +23,6 @@ Partial Class MixItem
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(MixItem))
Me.PictureBox4 = New System.Windows.Forms.PictureBox()
Me.PictureBox3 = New System.Windows.Forms.PictureBox()
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.PictureBox8 = New System.Windows.Forms.PictureBox()
Me.PictureBox5 = New System.Windows.Forms.PictureBox()
Me.PictureBox9 = New System.Windows.Forms.PictureBox()
Me.PictureBox11 = New System.Windows.Forms.PictureBox()
Me.PictureBox12 = New System.Windows.Forms.PictureBox()
Me.PictureBox13 = New System.Windows.Forms.PictureBox()
Me.LabelHoney = New System.Windows.Forms.Label()
Me.LabelHerbs = New System.Windows.Forms.Label()
Me.LabelClay = New System.Windows.Forms.Label()
......@@ -45,118 +35,34 @@ Partial Class MixItem
Me.LabelIncense = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.PictureBox11 = New System.Windows.Forms.PictureBox()
Me.PictureBox12 = New System.Windows.Forms.PictureBox()
Me.PictureBox13 = New System.Windows.Forms.PictureBox()
Me.PictureBox5 = New System.Windows.Forms.PictureBox()
Me.PictureBox9 = New System.Windows.Forms.PictureBox()
Me.PictureBox4 = New System.Windows.Forms.PictureBox()
Me.PictureBox3 = New System.Windows.Forms.PictureBox()
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.PictureBox8 = New System.Windows.Forms.PictureBox()
Me.DropdownOffer = New System.Windows.Forms.ComboBox()
Me.OfferedPic = New System.Windows.Forms.PictureBox()
Me.DemandedPic = New System.Windows.Forms.PictureBox()
Me.DropdownDemand = New System.Windows.Forms.ComboBox()
CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.OfferedPic, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DemandedPic, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'PictureBox4
'
Me.PictureBox4.Image = CType(resources.GetObject("PictureBox4.Image"), System.Drawing.Image)
Me.PictureBox4.Location = New System.Drawing.Point(395, 37)
Me.PictureBox4.Name = "PictureBox4"
Me.PictureBox4.Size = New System.Drawing.Size(90, 93)
Me.PictureBox4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox4.TabIndex = 10
Me.PictureBox4.TabStop = False
'
'PictureBox3
'
Me.PictureBox3.Image = CType(resources.GetObject("PictureBox3.Image"), System.Drawing.Image)
Me.PictureBox3.Location = New System.Drawing.Point(274, 37)
Me.PictureBox3.Name = "PictureBox3"
Me.PictureBox3.Size = New System.Drawing.Size(90, 93)
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox3.TabIndex = 8
Me.PictureBox3.TabStop = False
'
'PictureBox2
'
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.Location = New System.Drawing.Point(157, 37)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(90, 93)
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox2.TabIndex = 6
Me.PictureBox2.TabStop = False
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(40, 37)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(90, 93)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox1.TabIndex = 4
Me.PictureBox1.TabStop = False
'
'PictureBox8
'
Me.PictureBox8.Image = CType(resources.GetObject("PictureBox8.Image"), System.Drawing.Image)
Me.PictureBox8.Location = New System.Drawing.Point(518, 37)
Me.PictureBox8.Name = "PictureBox8"
Me.PictureBox8.Size = New System.Drawing.Size(90, 93)
Me.PictureBox8.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox8.TabIndex = 5
Me.PictureBox8.TabStop = False
'
'PictureBox5
'
Me.PictureBox5.Image = CType(resources.GetObject("PictureBox5.Image"), System.Drawing.Image)
Me.PictureBox5.Location = New System.Drawing.Point(157, 185)
Me.PictureBox5.Name = "PictureBox5"
Me.PictureBox5.Size = New System.Drawing.Size(90, 93)
Me.PictureBox5.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox5.TabIndex = 13
Me.PictureBox5.TabStop = False
'
'PictureBox9
'
Me.PictureBox9.Image = CType(resources.GetObject("PictureBox9.Image"), System.Drawing.Image)
Me.PictureBox9.Location = New System.Drawing.Point(40, 185)
Me.PictureBox9.Name = "PictureBox9"
Me.PictureBox9.Size = New System.Drawing.Size(90, 93)
Me.PictureBox9.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox9.TabIndex = 12
Me.PictureBox9.TabStop = False
'
'PictureBox11
'
Me.PictureBox11.Image = CType(resources.GetObject("PictureBox11.Image"), System.Drawing.Image)
Me.PictureBox11.Location = New System.Drawing.Point(518, 185)
Me.PictureBox11.Name = "PictureBox11"
Me.PictureBox11.Size = New System.Drawing.Size(90, 93)
Me.PictureBox11.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox11.TabIndex = 14
Me.PictureBox11.TabStop = False
'
'PictureBox12
'
Me.PictureBox12.Image = CType(resources.GetObject("PictureBox12.Image"), System.Drawing.Image)
Me.PictureBox12.Location = New System.Drawing.Point(395, 185)
Me.PictureBox12.Name = "PictureBox12"
Me.PictureBox12.Size = New System.Drawing.Size(90, 93)
Me.PictureBox12.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox12.TabIndex = 16
Me.PictureBox12.TabStop = False
'
'PictureBox13
'
Me.PictureBox13.Image = CType(resources.GetObject("PictureBox13.Image"), System.Drawing.Image)
Me.PictureBox13.Location = New System.Drawing.Point(274, 185)
Me.PictureBox13.Name = "PictureBox13"
Me.PictureBox13.Size = New System.Drawing.Size(90, 93)
Me.PictureBox13.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox13.TabIndex = 15
Me.PictureBox13.TabStop = False
'
'LabelHoney
'
Me.LabelHoney.AutoSize = True
......@@ -249,7 +155,7 @@ Partial Class MixItem
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(248, 456)
Me.Button1.Location = New System.Drawing.Point(241, 470)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(156, 23)
Me.Button1.TabIndex = 27
......@@ -258,18 +164,160 @@ Partial Class MixItem
'
'Button2
'
Me.Button2.Location = New System.Drawing.Point(248, 498)
Me.Button2.Location = New System.Drawing.Point(241, 512)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(156, 23)
Me.Button2.TabIndex = 28
Me.Button2.Text = "Back"
Me.Button2.UseVisualStyleBackColor = True
'
'PictureBox11
'
Me.PictureBox11.Image = CType(resources.GetObject("PictureBox11.Image"), System.Drawing.Image)
Me.PictureBox11.Location = New System.Drawing.Point(518, 185)
Me.PictureBox11.Name = "PictureBox11"
Me.PictureBox11.Size = New System.Drawing.Size(90, 93)
Me.PictureBox11.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox11.TabIndex = 14
Me.PictureBox11.TabStop = False
'
'PictureBox12
'
Me.PictureBox12.Image = CType(resources.GetObject("PictureBox12.Image"), System.Drawing.Image)
Me.PictureBox12.Location = New System.Drawing.Point(395, 185)
Me.PictureBox12.Name = "PictureBox12"
Me.PictureBox12.Size = New System.Drawing.Size(90, 93)
Me.PictureBox12.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox12.TabIndex = 16
Me.PictureBox12.TabStop = False
'
'PictureBox13
'
Me.PictureBox13.Image = CType(resources.GetObject("PictureBox13.Image"), System.Drawing.Image)
Me.PictureBox13.Location = New System.Drawing.Point(274, 185)
Me.PictureBox13.Name = "PictureBox13"
Me.PictureBox13.Size = New System.Drawing.Size(90, 93)
Me.PictureBox13.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox13.TabIndex = 15
Me.PictureBox13.TabStop = False
'
'PictureBox5
'
Me.PictureBox5.Image = CType(resources.GetObject("PictureBox5.Image"), System.Drawing.Image)
Me.PictureBox5.Location = New System.Drawing.Point(157, 185)
Me.PictureBox5.Name = "PictureBox5"
Me.PictureBox5.Size = New System.Drawing.Size(90, 93)
Me.PictureBox5.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox5.TabIndex = 13
Me.PictureBox5.TabStop = False
'
'PictureBox9
'
Me.PictureBox9.Image = CType(resources.GetObject("PictureBox9.Image"), System.Drawing.Image)
Me.PictureBox9.Location = New System.Drawing.Point(40, 185)
Me.PictureBox9.Name = "PictureBox9"
Me.PictureBox9.Size = New System.Drawing.Size(90, 93)
Me.PictureBox9.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox9.TabIndex = 12
Me.PictureBox9.TabStop = False
'
'PictureBox4
'
Me.PictureBox4.Image = CType(resources.GetObject("PictureBox4.Image"), System.Drawing.Image)
Me.PictureBox4.Location = New System.Drawing.Point(395, 37)
Me.PictureBox4.Name = "PictureBox4"
Me.PictureBox4.Size = New System.Drawing.Size(90, 93)
Me.PictureBox4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox4.TabIndex = 10
Me.PictureBox4.TabStop = False
'
'PictureBox3
'
Me.PictureBox3.Image = CType(resources.GetObject("PictureBox3.Image"), System.Drawing.Image)
Me.PictureBox3.Location = New System.Drawing.Point(274, 37)
Me.PictureBox3.Name = "PictureBox3"
Me.PictureBox3.Size = New System.Drawing.Size(90, 93)
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox3.TabIndex = 8
Me.PictureBox3.TabStop = False
'
'PictureBox2
'
Me.PictureBox2.Image = CType(resources.GetObject("PictureBox2.Image"), System.Drawing.Image)
Me.PictureBox2.Location = New System.Drawing.Point(157, 37)
Me.PictureBox2.Name = "PictureBox2"
Me.PictureBox2.Size = New System.Drawing.Size(90, 93)
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox2.TabIndex = 6
Me.PictureBox2.TabStop = False
'
'PictureBox1
'
Me.PictureBox1.Image = CType(resources.GetObject("PictureBox1.Image"), System.Drawing.Image)
Me.PictureBox1.Location = New System.Drawing.Point(40, 37)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(90, 93)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox1.TabIndex = 4
Me.PictureBox1.TabStop = False
'
'PictureBox8
'
Me.PictureBox8.Image = CType(resources.GetObject("PictureBox8.Image"), System.Drawing.Image)
Me.PictureBox8.Location = New System.Drawing.Point(518, 37)
Me.PictureBox8.Name = "PictureBox8"
Me.PictureBox8.Size = New System.Drawing.Size(90, 93)
Me.PictureBox8.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox8.TabIndex = 5
Me.PictureBox8.TabStop = False
'
'DropdownOffer
'
Me.DropdownOffer.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.DropdownOffer.FormattingEnabled = True
Me.DropdownOffer.Items.AddRange(New Object() {"Honey", "Herbs", "Clay", "Mineral", "Potion", "Incense", "Gems", "Life Elixir", "Mana Crystal", "Philosopher Stone"})
Me.DropdownOffer.Location = New System.Drawing.Point(157, 321)
Me.DropdownOffer.Name = "DropdownOffer"
Me.DropdownOffer.Size = New System.Drawing.Size(112, 21)
Me.DropdownOffer.TabIndex = 60
'
'OfferedPic
'
Me.OfferedPic.Location = New System.Drawing.Point(168, 348)
Me.OfferedPic.Name = "OfferedPic"
Me.OfferedPic.Size = New System.Drawing.Size(90, 90)
Me.OfferedPic.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.OfferedPic.TabIndex = 59
Me.OfferedPic.TabStop = False
'
'DemandedPic
'
Me.DemandedPic.Location = New System.Drawing.Point(395, 348)
Me.DemandedPic.Name = "DemandedPic"
Me.DemandedPic.Size = New System.Drawing.Size(90, 90)
Me.DemandedPic.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.DemandedPic.TabIndex = 62
Me.DemandedPic.TabStop = False
'
'DropdownDemand
'
Me.DropdownDemand.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.DropdownDemand.FormattingEnabled = True
Me.DropdownDemand.Items.AddRange(New Object() {"Honey", "Herbs", "Clay", "Mineral", "Potion", "Incense", "Gems", "Life Elixir", "Mana Crystal", "Philosopher Stone"})
Me.DropdownDemand.Location = New System.Drawing.Point(386, 321)
Me.DropdownDemand.Name = "DropdownDemand"
Me.DropdownDemand.Size = New System.Drawing.Size(112, 21)
Me.DropdownDemand.TabIndex = 61
'
'MixItem
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(649, 561)
Me.Controls.Add(Me.DemandedPic)
Me.Controls.Add(Me.DropdownDemand)
Me.Controls.Add(Me.DropdownOffer)
Me.Controls.Add(Me.OfferedPic)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.LabelPhilosoperStone)
......@@ -294,16 +342,18 @@ Partial Class MixItem
Me.Controls.Add(Me.PictureBox8)
Me.Name = "MixItem"
Me.Text = "MixItem"
CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PictureBox13, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.OfferedPic, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DemandedPic, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
......@@ -330,4 +380,8 @@ Partial Class MixItem
Friend WithEvents LabelIncense As System.Windows.Forms.Label
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents DropdownOffer As System.Windows.Forms.ComboBox
Friend WithEvents OfferedPic As System.Windows.Forms.PictureBox
Friend WithEvents DemandedPic As System.Windows.Forms.PictureBox
Friend WithEvents DropdownDemand As System.Windows.Forms.ComboBox
End Class
This diff is collapsed.
Imports Newtonsoft.Json
Public Class MixItem
Private itemMix1 As Integer
Private itemMix2 As Integer
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Me.Close()
End Sub
Private Sub MixItem_Load(sender As Object, e As EventArgs) Handles MyBase.Load
RefreshInventory()
End Sub
Private Sub RefreshInventory()
GlobalVariables.NETWORK = New NetIO
Dim request As New InventoryJSONSend
Dim recv As String
......@@ -29,4 +34,101 @@ Public Class MixItem
LabelPhilosoperStone.Text = recvjson.inventory(9) 'Philosoper Stone
End If
End Sub
Private Sub PictureBox1_Click(sender As Object, e As EventArgs) Handles PictureBox1.Click
End Sub
Private Sub DropdownOffer_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DropdownOffer.SelectedIndexChanged
Select Case DropdownOffer.SelectedItem.ToString()
Case "Honey"
OfferedPic.Image = PictureBox1.Image
itemMix1 = 0
Case "Herbs"
OfferedPic.Image = PictureBox2.Image
itemMix1 = 1
Case "Clay"
OfferedPic.Image = PictureBox3.Image
itemMix1 = 2
Case "Mineral"
OfferedPic.Image = PictureBox4.Image
itemMix1 = 3
Case "Potion"
OfferedPic.Image = PictureBox8.Image
itemMix1 = 4
Case "Incense"
OfferedPic.Image = PictureBox9.Image
itemMix1 = 5
Case "Gems"
OfferedPic.Image = PictureBox5.Image
itemMix1 = 6
Case "Life Elixir"
OfferedPic.Image = PictureBox13.Image
itemMix1 = 7
Case "Mana Crystal"
OfferedPic.Image = PictureBox12.Image
itemMix1 = 8
Case "Philosopher Stone"
OfferedPic.Image = PictureBox11.Image
itemMix1 = 9
End Select
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
GlobalVariables.NETWORK = New NetIO
Dim request As New MixItemJSONSend
Dim recv As String
request.item1 = itemMix1
request.item2 = itemMix2
recv = NETWORK.SendRecv(request)
Dim recvjson As New MixItemJSONRecv
recvjson = JsonConvert.DeserializeObject(Of MixItemJSONRecv)(recv)
If (recvjson.status = "ok") Then
MsgBox(recv)
RefreshInventory()
ElseIf (recvjson.status = "fail") Then
MsgBox(recvjson.description)
Else
MsgBox("Unknown error occured!")
End If
End Sub
Private Sub DropdownDemand_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DropdownDemand.SelectedIndexChanged
Select Case DropdownDemand.SelectedItem.ToString()
Case "Honey"
DemandedPic.Image = PictureBox1.Image
itemMix2 = 0
Case "Herbs"
DemandedPic.Image = PictureBox2.Image
itemMix2 = 1
Case "Clay"
DemandedPic.Image = PictureBox3.Image
itemMix2 = 2
Case "Mineral"
DemandedPic.Image = PictureBox4.Image
itemMix2 = 3
Case "Potion"
DemandedPic.Image = PictureBox8.Image
itemMix2 = 4
Case "Incense"
DemandedPic.Image = PictureBox9.Image
itemMix2 = 5
Case "Gems"
DemandedPic.Image = PictureBox5.Image
itemMix2 = 6
Case "Life Elixir"
DemandedPic.Image = PictureBox13.Image
itemMix2 = 7
Case "Mana Crystal"
DemandedPic.Image = PictureBox12.Image
itemMix2 = 8
Case "Philosopher Stone"
DemandedPic.Image = PictureBox11.Image
itemMix2 = 9
End Select
End Sub
End Class
\ No newline at end of file
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.34209
' Runtime Version:4.0.30319.34014
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
......@@ -60,6 +60,46 @@ Namespace My.Resources
End Set
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property clay() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("clay", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property gems() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("gems", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property herbs() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("herbs", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property honey() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("honey", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
......@@ -69,5 +109,65 @@ Namespace My.Resources
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property incense() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("incense", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property lifeelixir() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("lifeelixir", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.