/$ Microbot Controller controls
include "Ccontrols.c"
int B=0, S=0, E=0, LW=0, RW=0, G=0, baud=2400, status=0;
string serialstr="8N1C";
Chandle  h1, baseleft, baseright, h4, shoulderup, shoulderdown, h7, elbowup, elbowdown, h10, pitchup, pitchdown, h13, rollleft, rollright, h46, gripperopen, gripperclose, gripperclose2, h69, setpoint, run, stepsize, clear, reset, quit, hspeed, speed, upload, download, read, setserial, mrun;
initcontrols(){
h1=Clabel(4,38,30,0,2,0);
baseleft=Cbutton(43,38,33,12,1,4);
baseright=Cbutton(81,38,33,12,1,4);
h4=Clabel(4,55,30,0,2,0);
shoulderup=Cbutton(43,55,33,12,1,4);
shoulderdown=Cbutton(81,55,33,12,1,4);
h7=Clabel(4,71,30,0,2,0);
elbowup=Cbutton(43,72,33,12,1,4);
elbowdown=Cbutton(81,72,33,12,1,4);
h10=Clabel(4,89,30,0,2,0);
pitchup=Cbutton(43,89,33,12,1,4);
pitchdown=Cbutton(81,89,33,12,1,4);
h13=Clabel(4,105,30,0,2,0);
rollleft=Cbutton(43,106,33,12,1,4);
rollright=Cbutton(81,106,33,12,1,4);
h46=Clabel(4,122,30,0,2,0);
gripperopen=Cbutton(43,123,33,12,1,4);
gripperclose=Cbutton(81,123,33,12,1,4);
gripperclose2=Cbutton(119,123,33,12,1,4);
h69=Clabel(0,20,26,0,2,0);
setpoint=Cbutton(2,146,43,12,1,4);
run=Cbutton(49,146,33,12,1,4);
stepsize=Cedit(41,19,22,2,2,2);
clear=Cbutton(87,146,33,12,1,4);
reset=Cbutton(124,146,33,12,1,4);
quit=Cbutton(126,17,33,12,1,4);
hspeed=Clabel(65,20,30,0,2,0);
speed=Cedit(94,19,26,2,2,2);
setserial=Cbutton(126,38,33,12,1,4);
upload=Cbutton(126,55,33,12,1,4);
download=Cbutton(126,72,33,12,1,4);
read=Cbutton(126,89,33,12,1,4);
mrun=Cbutton(126,106,33,12,1,4);
}
initcontents(){
Csetcontent(h1,"Base");
Csetcontent(baseleft,"<-Left");
Csetcontent(baseright,"Right->");
Csetcontent(h4,"Shoulder");
Csetcontent(shoulderup,"Up");
Csetcontent(shoulderdown,"Down");
Csetcontent(h7,"Elbow");
Csetcontent(elbowup,"Up");
Csetcontent(elbowdown,"Down");
Csetcontent(h10,"Pitch");
Csetcontent(pitchup,"Up");
Csetcontent(pitchdown,"Down");
Csetcontent(h13,"Roll");
Csetcontent(rollleft,"<-Left");
Csetcontent(rollright,"Right->");
Csetcontent(h46,"Gripper");
Csetcontent(gripperopen,"<- ->");
Csetcontent(gripperclose,"-> <-");
Csetcontent(gripperclose2,"Close");
Csetcontent(h69,"Step Size:");
Csetcontent(setpoint,"Set Point");
Csetcontent(run,"Run");
Csetcontent(stepsize,"50");
Csettopic(stepsize,"Enter Step Size:");
Csetcontent(clear,"Clear");
Csetcontent(reset, "Reset");
Csetcontent(quit,"Quit");
Csetcontent(hspeed,"Speed:");
Csetcontent(speed,"88500");
Csettopic(speed,"Enter speed setting:");
Csetcontent(setserial,"Serial...");
Csetcontent(upload,"Upload");
Csetcontent(download,"Downld");
Csetcontent(read,"Read");
Csetcontent(mrun,"M-Run");
}
inititems(){
}
drawcontrols(){
Cdraw(h69);
Cdraw(stepsize);
Cdraw(hspeed);
Cdraw(speed);
Cdraw(quit);
Cdraw(h1);
Cdraw(baseleft);
Cdraw(baseright);
Cdraw(setserial);
Cdraw(h4);
Cdraw(shoulderup);
Cdraw(shoulderdown);
Cdraw(upload);
Cdraw(h7);
Cdraw(elbowup);
Cdraw(elbowdown);
Cdraw(h10);
Cdraw(download);
Cdraw(pitchup);
Cdraw(pitchdown);
Cdraw(read);
Cdraw(h13);
Cdraw(rollleft);
Cdraw(rollright);
Cdraw(mrun);
Cdraw(h46);
Cdraw(gripperopen);
Cdraw(gripperclose);
Cdraw(gripperclose2);
Cdraw(setpoint);
Cdraw(run);
Cdraw(clear);
Cdraw(reset);
line(1, 122, 14, 122, 120);
line(1, 122, 120, 160, 120);
line(1, 0, 140, 160, 140);
}
