Users > Strutter > Macros

// start of actool paint mixing macro

// might give some hints about coding menus

Form inventory, check inventory

  ed1=CheckBox:CJ:True
  ed2=CheckBox:CR:True
  ed3=CheckBox:CL:True
  ed4=CheckBox:DT:False
  ed5=CheckBox:TS:False
  ed6=CheckBox:EL:False
  ed7=CheckBox:RS:True
  ed8=CheckBox:LE:True
  ed9=CheckBox:SP:True
  ed10=CheckBox:IR:True
  ed11=CheckBox:CO:True
  ed12=CheckBox:SU:True
  ed13=CheckBox:PO:True
  ed14=CheckBox:LI:False
  ed15=CheckBox:SA:True

end

FormLoad inventory, c:\inventory.frm

if ShowForm inventory

  SendText 13, inventory updated
  else
  Sendtext 13, no go

end

FormSave inventory, c:\inventory.frm

constructs

nlist=list

rlist=list

blist=list

glist=list

end

listadd nlist, CJ

listadd nlist, CR

listadd nlist, CL

listadd nlist, DT

listadd nlist, TS

listadd nlist, EL

listadd nlist, RS

listadd nlist, LE

listadd nlist, SP

listadd nlist, IR

listadd nlist, CO

listadd nlist, SU

listadd nlist, PO

listadd nlist, LI

listadd nlist, SA

listadd rlist, 128

listadd rlist, 224

listadd rlist, 128

listadd rlist, 112

listadd rlist, 48

listadd rlist, 128

listadd rlist, 144

listadd rlist, 80

listadd rlist, 16

listadd rlist, 96

listadd rlist, 64

listadd glist, 64

listadd glist, 112

listadd glist, 96

listadd glist, 64

listadd glist, 96

listadd glist, 240

listadd glist, 16

listadd glist, 80

listadd glist, 16

listadd glist, 48

listadd glist, 192

listadd blist, 144

listadd blist, 32

listadd blist, 32

listadd blist, 64

listadd blist, 48

listadd blist, 224

listadd blist, 24

listadd blist, 96

listadd blist, 32

listadd blist, 32

listadd blist, 192