by bigdeal » Sat Dec 02, 2006 12:00 am
            
            
                    
                by bigdeal
Sat Dec 02, 2006 12:00 am
            
            
            Hi,
I was playing with my bot and this is my first attempt to do a sidekick.
What do u think of this (activate with remocon press 5)
' action_05
'== template  ====================================
DIM A AS BYTE
PTP SETON	 				
PTP ALLON				
'== motor diretion setting ======================
DIR G6A,1,0,0,1,0,0		
DIR G6B,1,1,1,1,1,1		
DIR G6C,0,0,0,0,0,0		
DIR G6D,0,1,1,0,1,0		
'== motor start position read ===================
GETMOTORSET G6A,1,1,1,1,1,0
GETMOTORSET G6B,1,1,1,0,0,0
GETMOTORSET G6C,1,1,1,0,0,0
GETMOTORSET G6D,1,1,1,1,1,0
	SPEED 5
'== motor power on  =============================
	MOTOR G24	
	GOSUB standard_pose
'================================================
MAIN:    	
		
A = REMOCON(1)	
	IF A <> 5 THEN GOTO main
	GOSUB template
	GOSUB standard_pose
	GOTO MAIN
'================================================
template:
	SPEED 3
MOVE G24,  88,  76, 145,  93, 117,  , 100,  45,  80,  ,  ,  , 100,  30,  80,  ,  ,  , 114,  76, 145,  93,  82,  
WAIT
SPEED 10
MOVE G24,  88, 165,  29, 122, 118,  ,  ,  45,  80,  ,  ,  , 100,  30,  80,  ,  ,  , 114, 165,  39, 112,  82,  
WAIT
MOVE G24,  88, 165,  29, 122, 118,  , 171,  13,  43,  ,  ,  , 101,  82,  80,  ,  ,  , 114, 165,  39, 112, 135,  
WAIT
SPEED 15
MOVE G24,  88,  60, 154,  90, 168,  , 171,  13,  43,  ,  ,  , 101,  82,  80,  ,  ,  , 114, 165,  39, 112, 135,  
WAIT
MOVE G24,  88, 165,  29, 122, 118,  , 171,  13,  43,  ,  ,  , 101,  82,  80,  ,  ,  , 114, 165,  39, 112, 135,  
WAIT
SPEED 10
MOVE G24,  88, 165,  29, 122, 118,  , 171,  34,  74,  ,  ,  , 102,  22,  80,  ,  ,  , 114, 165,  39, 112,  81,  
WAIT
SPEED 10
MOVE G24,  88, 165,  29, 122, 118,  , 107,  53,  74,  ,  ,  , 102,  22,  80,  ,  ,  , 114, 165,  39, 112,  81,  
WAIT
SPEED 3
MOVE G24,  99, 165,  29, 122, 105,  , 109,  36,  74,  ,  ,  , 102,  22,  80,  ,  ,  , 102, 165,  39, 112,  91,  
WAIT
SPEED 10
MOVE G24, 100,  76, 145,  93, 100,  , 100,  30,  80,  ,  ,  , 100,  30,  80,  ,  ,  , 100,  76, 145,  93, 100,  
	RETURN
'================================================
standard_pose:
	MOVE G6A,100,  76, 145,  93, 100, 100 
	MOVE G6D,100,  76, 145,  93, 100, 100  
	MOVE G6B,100,  30,  80, 100, 100, 100
	MOVE G6C,100,  30,  80, 100, 100, 100
	WAIT
	
	RETURN
'================================================
greetings,
bigdeal
            Hi,
I was playing with my bot and this is my first attempt to do a sidekick.
What do u think of this (activate with remocon press 5)
' action_05
'== template  ====================================
DIM A AS BYTE
PTP SETON	 				
PTP ALLON				
'== motor diretion setting ======================
DIR G6A,1,0,0,1,0,0		
DIR G6B,1,1,1,1,1,1		
DIR G6C,0,0,0,0,0,0		
DIR G6D,0,1,1,0,1,0		
'== motor start position read ===================
GETMOTORSET G6A,1,1,1,1,1,0
GETMOTORSET G6B,1,1,1,0,0,0
GETMOTORSET G6C,1,1,1,0,0,0
GETMOTORSET G6D,1,1,1,1,1,0
	SPEED 5
'== motor power on  =============================
	MOTOR G24	
	GOSUB standard_pose
'================================================
MAIN:    	
		
A = REMOCON(1)	
	IF A <> 5 THEN GOTO main
	GOSUB template
	GOSUB standard_pose
	GOTO MAIN
'================================================
template:
	SPEED 3
MOVE G24,  88,  76, 145,  93, 117,  , 100,  45,  80,  ,  ,  , 100,  30,  80,  ,  ,  , 114,  76, 145,  93,  82,  
WAIT
SPEED 10
MOVE G24,  88, 165,  29, 122, 118,  ,  ,  45,  80,  ,  ,  , 100,  30,  80,  ,  ,  , 114, 165,  39, 112,  82,  
WAIT
MOVE G24,  88, 165,  29, 122, 118,  , 171,  13,  43,  ,  ,  , 101,  82,  80,  ,  ,  , 114, 165,  39, 112, 135,  
WAIT
SPEED 15
MOVE G24,  88,  60, 154,  90, 168,  , 171,  13,  43,  ,  ,  , 101,  82,  80,  ,  ,  , 114, 165,  39, 112, 135,  
WAIT
MOVE G24,  88, 165,  29, 122, 118,  , 171,  13,  43,  ,  ,  , 101,  82,  80,  ,  ,  , 114, 165,  39, 112, 135,  
WAIT
SPEED 10
MOVE G24,  88, 165,  29, 122, 118,  , 171,  34,  74,  ,  ,  , 102,  22,  80,  ,  ,  , 114, 165,  39, 112,  81,  
WAIT
SPEED 10
MOVE G24,  88, 165,  29, 122, 118,  , 107,  53,  74,  ,  ,  , 102,  22,  80,  ,  ,  , 114, 165,  39, 112,  81,  
WAIT
SPEED 3
MOVE G24,  99, 165,  29, 122, 105,  , 109,  36,  74,  ,  ,  , 102,  22,  80,  ,  ,  , 102, 165,  39, 112,  91,  
WAIT
SPEED 10
MOVE G24, 100,  76, 145,  93, 100,  , 100,  30,  80,  ,  ,  , 100,  30,  80,  ,  ,  , 100,  76, 145,  93, 100,  
	RETURN
'================================================
standard_pose:
	MOVE G6A,100,  76, 145,  93, 100, 100 
	MOVE G6D,100,  76, 145,  93, 100, 100  
	MOVE G6B,100,  30,  80, 100, 100, 100
	MOVE G6C,100,  30,  80, 100, 100, 100
	WAIT
	
	RETURN
'================================================
greetings,
bigdeal
            greetings,
bigdeal