implement SendFind & MixItem

src/client/PoiClient/PoiClient/MixItem.Designer.vb

@@ -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

src/client/PoiClient/PoiClient/MixItem.vb

 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

src/client/PoiClient/PoiClient/My Project/Resources.Designer.vb

 '------------------------------------------------------------------------------
 ' <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.