start.hal

loadusr -Wn gladevcp gladevcp -c gladevcp -u handler.py wd.glade

loadrt threads name1=fast period1=50000 fp1=0 name2=slow period2=1000000

loadrt stepgen step_type=0,0 ctrl_type=v,v

addf stepgen.make-pulses fast
addf stepgen.update-freq slow
addf stepgen.capture-position slow

setp stepgen.0.position-scale 100

loadrt hal_parport cfg="0x378 out"
addf parport.0.read fast
addf parport.0.write fast

loadrt spooler
addf spooler.0 slow

loadrt conv_s32_float
addf conv-s32-float.0 slow

setp gladevcp.hal_hbox1 1
setp gladevcp.hal_hbox2 1

net p-scale stepgen.0.velocity-cmd <= spooler.0.vel-out

net run-stepgen stepgen.0.enable <= gladevcp.start_button

setp spooler.0.min-limit 0
setp spooler.0.max-limit 1000
net spool-vel spooler.0.vel-in gladevcp.hal_spinbutton1-f
net spool-count spooler.0.step-counts conv-s32-float.0.in <= stepgen.0.counts

net position-bar gladevcp.hal_hbar1 <= conv-s32-float.0.out

net guide-step parport.0.pin-02-out <= stepgen.0.step
net guide-dir parport.0.pin-03-out <= stepgen.0.dir

start