kake26/kratom
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

save point

Browse source
This commit is contained in:
kake26 2024-09-20 13:13:39 -05:00
parent 7f1e46a368
commit 9792d5092b
Signed by: kake26
GPG key ID: E8AFC43591876B4D
9 changed files with 92 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

24
kratomfrm1.pbf
View file

@ -9,25 +9,27 @@
Global krt1
Global Container_0, ListView_0, Text_0, Text_1, String_0, Button_0, Button_1, Button_2, String_1, Text_2
Global Container_0, ListView_0, Text_0, Text_1, String_0, Button_0, Button_1, Button_2, String_1, Text_2, Text_3, String_2
Declare burn(EventType)
Declare dellist(EventType)
Declare btn0click(EventType)
Procedure Openkrt1(x = 0, y = 0, width = 920, height = 600)
krt1 = OpenWindow(#PB_Any, x, y, width, height, "Kratom Picker GUI", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)
krt1 = OpenWindow(#PB_Any, x, y, width, height, "Kratom Picker GUI", #PB_Window_SystemMenu | #PB_Window_Invisible)
HideWindow(krt1, 1)
Container_0 = ContainerGadget(#PB_Any, 10, 10, 900, 580)
ListView_0 = ListViewGadget(#PB_Any, 0, 60, 300, 470)
Text_0 = TextGadget(#PB_Any, 70, 20, 130, 30, "Kratom Stock")
Text_1 = TextGadget(#PB_Any, 310, 20, 170, 30, "Kratom to add")
String_0 = StringGadget(#PB_Any, 460, 10, 150, 40, "")
Button_0 = ButtonGadget(#PB_Any, 680, 60, 130, 40, "Add")
Button_1 = ButtonGadget(#PB_Any, 310, 60, 130, 40, "Burn!")
Button_2 = ButtonGadget(#PB_Any, 310, 490, 130, 40, "Delete")
String_1 = StringGadget(#PB_Any, 680, 10, 150, 40, "")
Text_2 = TextGadget(#PB_Any, 620, 20, 50, 30, "Type")
ListView_0 = ListViewGadget(#PB_Any, 0, 60, 410, 470)
Text_0 = TextGadget(#PB_Any, 70, 20, 130, 30, "Kratom Stock", #PB_Text_Center)
Text_1 = TextGadget(#PB_Any, 500, 70, 170, 30, "Kratom Name", #PB_Text_Center)
String_0 = StringGadget(#PB_Any, 700, 60, 150, 40, "")
Button_0 = ButtonGadget(#PB_Any, 710, 230, 130, 40, "Add")
Button_1 = ButtonGadget(#PB_Any, 710, 430, 130, 40, "Burn!")
Button_2 = ButtonGadget(#PB_Any, 710, 490, 130, 40, "Delete")
String_1 = StringGadget(#PB_Any, 700, 110, 150, 40, "")
Text_2 = TextGadget(#PB_Any, 590, 120, 50, 30, "Type", #PB_Text_Center)
Text_3 = TextGadget(#PB_Any, 490, 170, 200, 30, "Chance Multiplier")
String_2 = StringGadget(#PB_Any, 700, 160, 150, 40, "1")
CloseGadgetList()
EndProcedure