mirror of
https://github.com/TheUltimateHacker/shiftos-next.git
synced 2025-01-22 09:02:00 -05:00
1fcbee8dab
I've added some new Shiftorium upgrades, as well as some save engine fixes. If you add to the engine, and try to load, say a Boolean value from a line containing a blank String value, it'll detect that and tell you it'll rewrite that line. It preserves what it has already loaded. I've also added some new terminal commands, and some Shiftorium bugfixes.
205 lines
8.7 KiB
VB.net
205 lines
8.7 KiB
VB.net
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
Partial Class shiftorium_cmd
|
|
Inherits System.Windows.Forms.Form
|
|
|
|
'Form overrides dispose to clean up the component list.
|
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
Try
|
|
If disposing AndAlso components IsNot Nothing Then
|
|
components.Dispose()
|
|
End If
|
|
Finally
|
|
MyBase.Dispose(disposing)
|
|
End Try
|
|
End Sub
|
|
|
|
'Required by the Windows Form Designer
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
'NOTE: The following procedure is required by the Windows Form Designer
|
|
'It can be modified using the Windows Form Designer.
|
|
'Do not modify it using the code editor.
|
|
<System.Diagnostics.DebuggerStepThrough()> _
|
|
Private Sub InitializeComponent()
|
|
Me.pnltop = New System.Windows.Forms.Panel()
|
|
Me.Label1 = New System.Windows.Forms.Label()
|
|
Me.pnlbottom = New System.Windows.Forms.Panel()
|
|
Me.lbcodepoints = New System.Windows.Forms.Label()
|
|
Me.lbcontrols = New System.Windows.Forms.Label()
|
|
Me.pnldetails = New System.Windows.Forms.Panel()
|
|
Me.lbitems = New System.Windows.Forms.ListBox()
|
|
Me.lbitemname = New System.Windows.Forms.Label()
|
|
Me.lbdescription = New System.Windows.Forms.Label()
|
|
Me.pnlbuy = New System.Windows.Forms.Panel()
|
|
Me.lbprice = New System.Windows.Forms.Label()
|
|
Me.btnbuy = New System.Windows.Forms.Button()
|
|
Me.pnltop.SuspendLayout()
|
|
Me.pnlbottom.SuspendLayout()
|
|
Me.pnldetails.SuspendLayout()
|
|
Me.pnlbuy.SuspendLayout()
|
|
Me.SuspendLayout()
|
|
'
|
|
'pnltop
|
|
'
|
|
Me.pnltop.Controls.Add(Me.Label1)
|
|
Me.pnltop.Dock = System.Windows.Forms.DockStyle.Top
|
|
Me.pnltop.Location = New System.Drawing.Point(0, 0)
|
|
Me.pnltop.Name = "pnltop"
|
|
Me.pnltop.Size = New System.Drawing.Size(1007, 30)
|
|
Me.pnltop.TabIndex = 0
|
|
'
|
|
'Label1
|
|
'
|
|
Me.Label1.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.Label1.Location = New System.Drawing.Point(0, 0)
|
|
Me.Label1.Name = "Label1"
|
|
Me.Label1.Size = New System.Drawing.Size(1007, 30)
|
|
Me.Label1.TabIndex = 0
|
|
Me.Label1.Text = "SHIFTORIUM"
|
|
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
|
'
|
|
'pnlbottom
|
|
'
|
|
Me.pnlbottom.Controls.Add(Me.lbcodepoints)
|
|
Me.pnlbottom.Controls.Add(Me.lbcontrols)
|
|
Me.pnlbottom.Dock = System.Windows.Forms.DockStyle.Bottom
|
|
Me.pnlbottom.Location = New System.Drawing.Point(0, 570)
|
|
Me.pnlbottom.Name = "pnlbottom"
|
|
Me.pnlbottom.Size = New System.Drawing.Size(1007, 22)
|
|
Me.pnlbottom.TabIndex = 1
|
|
'
|
|
'lbcodepoints
|
|
'
|
|
Me.lbcodepoints.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.lbcodepoints.Location = New System.Drawing.Point(815, 0)
|
|
Me.lbcodepoints.Name = "lbcodepoints"
|
|
Me.lbcodepoints.Size = New System.Drawing.Size(192, 22)
|
|
Me.lbcodepoints.TabIndex = 1
|
|
Me.lbcodepoints.Text = "Codepoints: {0}"
|
|
Me.lbcodepoints.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
|
'
|
|
'lbcontrols
|
|
'
|
|
Me.lbcontrols.Dock = System.Windows.Forms.DockStyle.Left
|
|
Me.lbcontrols.Location = New System.Drawing.Point(0, 0)
|
|
Me.lbcontrols.Name = "lbcontrols"
|
|
Me.lbcontrols.Size = New System.Drawing.Size(815, 22)
|
|
Me.lbcontrols.TabIndex = 0
|
|
Me.lbcontrols.Text = "Controls: UP/DOWN - Choose item, ENTER - View details, SPACE: Download"
|
|
Me.lbcontrols.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
|
'
|
|
'pnldetails
|
|
'
|
|
Me.pnldetails.Controls.Add(Me.pnlbuy)
|
|
Me.pnldetails.Controls.Add(Me.lbdescription)
|
|
Me.pnldetails.Controls.Add(Me.lbitemname)
|
|
Me.pnldetails.Dock = System.Windows.Forms.DockStyle.Top
|
|
Me.pnldetails.Location = New System.Drawing.Point(0, 30)
|
|
Me.pnldetails.Name = "pnldetails"
|
|
Me.pnldetails.Size = New System.Drawing.Size(1007, 205)
|
|
Me.pnldetails.TabIndex = 2
|
|
'
|
|
'lbitems
|
|
'
|
|
Me.lbitems.BackColor = System.Drawing.Color.Black
|
|
Me.lbitems.BorderStyle = System.Windows.Forms.BorderStyle.None
|
|
Me.lbitems.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.lbitems.ForeColor = System.Drawing.Color.White
|
|
Me.lbitems.FormattingEnabled = True
|
|
Me.lbitems.ItemHeight = 14
|
|
Me.lbitems.Location = New System.Drawing.Point(0, 235)
|
|
Me.lbitems.Name = "lbitems"
|
|
Me.lbitems.Size = New System.Drawing.Size(1007, 335)
|
|
Me.lbitems.TabIndex = 3
|
|
'
|
|
'lbitemname
|
|
'
|
|
Me.lbitemname.Dock = System.Windows.Forms.DockStyle.Top
|
|
Me.lbitemname.Location = New System.Drawing.Point(0, 0)
|
|
Me.lbitemname.Name = "lbitemname"
|
|
Me.lbitemname.Size = New System.Drawing.Size(1007, 28)
|
|
Me.lbitemname.TabIndex = 0
|
|
Me.lbitemname.Text = "Welcome to the Shiftorium!"
|
|
Me.lbitemname.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
|
'
|
|
'lbdescription
|
|
'
|
|
Me.lbdescription.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.lbdescription.Location = New System.Drawing.Point(0, 28)
|
|
Me.lbdescription.Name = "lbdescription"
|
|
Me.lbdescription.Size = New System.Drawing.Size(1007, 177)
|
|
Me.lbdescription.TabIndex = 1
|
|
Me.lbdescription.Text = "The Shiftorium lets you upgrade different aspects of ShiftOS using Codepoints. Yo" & _
|
|
"u can download anything from color support, terminal commands, programs, and eve" & _
|
|
"n desktop environments."
|
|
Me.lbdescription.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
|
'
|
|
'pnlbuy
|
|
'
|
|
Me.pnlbuy.Controls.Add(Me.btnbuy)
|
|
Me.pnlbuy.Controls.Add(Me.lbprice)
|
|
Me.pnlbuy.Dock = System.Windows.Forms.DockStyle.Bottom
|
|
Me.pnlbuy.Location = New System.Drawing.Point(0, 176)
|
|
Me.pnlbuy.Name = "pnlbuy"
|
|
Me.pnlbuy.Size = New System.Drawing.Size(1007, 29)
|
|
Me.pnlbuy.TabIndex = 2
|
|
'
|
|
'lbprice
|
|
'
|
|
Me.lbprice.Dock = System.Windows.Forms.DockStyle.Left
|
|
Me.lbprice.Location = New System.Drawing.Point(0, 0)
|
|
Me.lbprice.Name = "lbprice"
|
|
Me.lbprice.Size = New System.Drawing.Size(815, 29)
|
|
Me.lbprice.TabIndex = 0
|
|
Me.lbprice.Text = "This item costs {0} Codepoints."
|
|
Me.lbprice.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
|
'
|
|
'btnbuy
|
|
'
|
|
Me.btnbuy.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.btnbuy.FlatAppearance.BorderSize = 0
|
|
Me.btnbuy.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
|
Me.btnbuy.Location = New System.Drawing.Point(815, 0)
|
|
Me.btnbuy.Name = "btnbuy"
|
|
Me.btnbuy.Size = New System.Drawing.Size(192, 29)
|
|
Me.btnbuy.TabIndex = 1
|
|
Me.btnbuy.Text = "Press SPACE to buy"
|
|
Me.btnbuy.UseVisualStyleBackColor = True
|
|
'
|
|
'shiftorium_cmd
|
|
'
|
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 14.0!)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
|
Me.BackColor = System.Drawing.Color.Black
|
|
Me.ClientSize = New System.Drawing.Size(1007, 592)
|
|
Me.Controls.Add(Me.lbitems)
|
|
Me.Controls.Add(Me.pnldetails)
|
|
Me.Controls.Add(Me.pnlbottom)
|
|
Me.Controls.Add(Me.pnltop)
|
|
Me.Font = New System.Drawing.Font("Courier New", 8.25!)
|
|
Me.ForeColor = System.Drawing.Color.White
|
|
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
|
Me.Name = "shiftorium_cmd"
|
|
Me.Text = "shiftorium_cmd"
|
|
Me.WindowState = System.Windows.Forms.FormWindowState.Maximized
|
|
Me.pnltop.ResumeLayout(False)
|
|
Me.pnlbottom.ResumeLayout(False)
|
|
Me.pnldetails.ResumeLayout(False)
|
|
Me.pnlbuy.ResumeLayout(False)
|
|
Me.ResumeLayout(False)
|
|
|
|
End Sub
|
|
Friend WithEvents pnltop As System.Windows.Forms.Panel
|
|
Friend WithEvents Label1 As System.Windows.Forms.Label
|
|
Friend WithEvents pnlbottom As System.Windows.Forms.Panel
|
|
Friend WithEvents lbcodepoints As System.Windows.Forms.Label
|
|
Friend WithEvents lbcontrols As System.Windows.Forms.Label
|
|
Friend WithEvents pnldetails As System.Windows.Forms.Panel
|
|
Friend WithEvents lbitems As System.Windows.Forms.ListBox
|
|
Friend WithEvents pnlbuy As System.Windows.Forms.Panel
|
|
Friend WithEvents btnbuy As System.Windows.Forms.Button
|
|
Friend WithEvents lbprice As System.Windows.Forms.Label
|
|
Friend WithEvents lbdescription As System.Windows.Forms.Label
|
|
Friend WithEvents lbitemname As System.Windows.Forms.Label
|
|
End Class
|