;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;    I'm not responsible (with what you do with this)   ;;
;;     The Beekins will kill me for this. It's okay.     ;;
;;             Blinkenlights v0.0.0.0.0.1-m              ;;
;;               Free for everyone to use.               ;;
;;                     Love, Kawinma.                    ;;
;;                       Frontend                        ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Main dialog

dialog furc.ctrl {
  title "Blinkenlights Control"
  size -1 -1 173 168
  option dbu
  text "Blinkenlights 0.0.0.0.0.1m by Kawinma", 1, 0 160 173 8, center
  tab "Main", 2, 0 1 172 155
  button "7", 3, 119 25 14 12, tab 2
  button "1", 4, 119 46 14 12, tab 2
  box "Movement", 5, 115 14 54 48, tab 2
  button "9", 6, 152 25 14 12, tab 2
  button "3", 7, 152 46 14 12, tab 2
  button "Connect", 13, 1 143 37 12, tab 2
  button "Disconnect", 14, 39 143 37 12, tab 2
  button "Cycle", 15, 76 143 37 12, tab 2
  tab "Debug", 8
  list 9, 5 18 150 135, tab 8 size
  button "Enable", 10, 212 19 35 12, tab 8
  button "Clear", 11, 212 139 35 12, tab 8
  button "Disable", 12, 212 31 35 12, tab 8
}


;; Dialog controls

on 1:dialog:furc.ctrl:sclick:11:{
  did -r furc.ctrl 9
}

on 1:dialog:furc.ctrl:sclick:13:{
  furc.sopen
}

on 1:dialog:furc.ctrl:sclick:14:{
  sockclose a
}

on 1:dialog:furc.ctrl:sclick:15:{
  sockclose a
  furc.sopen
}

;; Movement

on 1:dialog:furc.ctrl:sclick:3:{
  furccmd move 7
}

on 1:dialog:furc.ctrl:sclick:4:{
  furccmd move 1
}

on 1:dialog:furc.ctrl:sclick:6:{
  furccmd move 9
}

on 1:dialog:furc.ctrl:sclick:7:{
  furccmd move 3
}