Posts by dgn user
-
-
102,8,"rxi","rxi","",10,7,5,2,0
103,8,"ryi","ryi","",10,7,5,2,0
interface panel code rxi and ryi defined -
-
-
Code
Display More.INTER_PANEL_D 102,8,"rxi","rxi","",10,7,5,2,0 103,8,"ryi","ryi","",10,7,5,2,0 104,4,1,"BTN1","","","",11,10,0,2005,0,0 106,8,"rxideg","rxideg","",10,7,5,2,0 107,8,"ryideg","ryideg","",10,7,5,2,0 108,8,"rzideg","rzideg","",10,7,5,2,0 109,8,"roxmax","roxmax","",10,7,3,1,0 110,8,"roymax","roymax","",10,7,3,1,0 111,4,1,"BTN2","","","",11,10,0,2006,0,0 .END .INTER_PANEL_COLOR_D 182,3,224,244,28,159,252,255,251,255,0,31,2,241,52,219, .END .SIG_COMMENT .END .PROGRAM git_cord2(.&pos,.rox,.roy,.rx,.ry) FOR rox = 1 TO (.rox) POINT pos1 = SHIFT(.pos BY (rox-1)*(.rx),0,0) FOR roy = 1 TO (.roy) POINT pos1 = SHIFT(pos1 BY 0,(.ry),0) SPEED 100 LMOVE pos1 BREAK SIGNAL1 PRINT "parameter x ok... id=",rox," y ok... id=",roy END END RETURN .END .PROGRAM pg1() JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-14.586,8.7518,-19.872,-5.7845,-44.61,96.364] ; POINT posstart = HERE POINT posstart = SHIFT(posstart BY rxideg,ryideg,rzideg) JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-14.586,8.7518,-19.872,-5.7845,-44.61,96.364] ; CALL git_cord2(&posstart,roxmax,roymax,rxi,ryi) JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-6.0638,6.1202,-20.122,-0.49192,-43.921,84.922] ; TWAIT 2 JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-6.0638,6.1202,-20.122,-0.49192,-43.921,84.922] ; JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-2.3984,5.6648,-20.156,1.819,-43.927,79.958] ; TWAIT 2 JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-2.3984,5.6648,-20.156,1.8187,-43.927,79.958] ; JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[1.4649,5.612,-20.159,4.2397,-44.114,74.744] ; TWAIT 2 JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[1.4649,5.612,-20.159,4.2397,-44.114,74.744] ; JOINT SPEED9 ACCU1 TIMER0 TOOL1 WORK0 CLAMP1 (OFF,0,0,O) OX= WX= #[-14.586,8.7518,-19.872,-5.7845,-44.61,96.364] ; BREAK SIGNAL1 .END .TRANS posstart -502.795624 1996.325562 1278.338623 95.281898 154.037537 -6.139154 .END .REALS roxmax = 2 roymax = 1 rxideg = 0 ryideg = 0 rzideg = 0 .END