人物？らしき3Dモデル・その3-3。
頭と胴体に手と足をつけたパターン。
足を双方動かした場合は本当は高さを低くすべきですが、横着して、変えてません。
逆四角錐の底面を大きくしてます。
// 模擬的な人物モデル(03b)
//　　頭（球）＋胴体（四角錐）＋腕（直方体）＋足（直方体）

#VAR
　col = 3　　　　;*線色
　tall = 170 　　;*身長
　head = 30　　　;*頭の大きさ
　body_x1 = 40　　;*体　上Ｘ
　body_y1 = 20　　;*体　上Ｙ
　body_x2 = 30　　;*体　下Ｘ
　body_y2 = 15　　;*体　下Ｙ
　body_z　　　　　;*体Ｚ
　arm_sp =　0　　;*腕　離す間隔
　arm_sz = 10　　;*腕　太さ
　arm_l　= 60　　;*腕　長さ
　arm_a11 = 0　　;*腕(+)角度1
　arm_a12 = 0　　;*腕(+)角度2
　arm_a21 = 0　　;*腕(-)角度1
　arm_a22 = 0　　;*腕(-)角度2
　leg_spx = 6　　;*足　離す横間隔
　leg_spz = 2　　;*足　離す縦間隔
　leg_sz = 12　　;*足　太さ
　leg_l　= 75　　;*足　長さ
　leg_a11 = 0　　;*足(+)角度1
　leg_a12 = 0　　;*足(+)角度2
　leg_a21 = 0　　;*足(-)角度1
　leg_a22 = 0　　;*足(-)角度2
　i
　w1
　w2
　w3
　w4
　w5
#DRAW
　CAL　body_z = tall - head - leg_spz - leg_l
　
　PEN　col
　// 頭
　CAL　w1 = 0
　CAL　w2 = 0
　CAL　w3 = leg_l + leg_spz + body_z + head/2
　MATRIXO　w1,w2,w3
　CAL　w1 = head/2
　SPHERE　i,SetArcSep,w1,0

　// 胴体
　CAL　w1 = 0
　CAL　w2 = 0
　CAL　w3 = leg_l + leg_spz
　MATRIXO　w1,w2,w3
　CUBIC4　i,body_x2,body_y2, body_z, body_x1,body_y1, 0,0, 1,1,0

　// 腕(X+)
　CAL　w1 = body_x1/2 + arm_sp + arm_sz/2
　CAL　w2 = 0
　CAL　w3 = leg_l + leg_spz + body_z - arm_sz/2
　CAL　w4 = arm_a12/180*PI
　CAL　w5 = PI + arm_a11/180*PI
　MATRIXA　w1,w2,w3,0,w4,w5
　CUBE　i,arm_sz,arm_sz,arm_l, 1,1,0

　// 腕(X-)
　CAL　w1 =-body_x1/2 - arm_sp - arm_sz/2
　CAL　w2 = 0
　CAL　w3 = leg_l + leg_spz + body_z - arm_sz/2
　CAL　w4 =-arm_a22/180*PI
　CAL　w5 = PI + arm_a21/180*PI
　MATRIXA　w1,w2,w3,0,w4,w5
　CUBE　i,arm_sz,arm_sz,arm_l, 1,1,0

　// 足(X+)
　CAL　w1 = leg_sz/2 + leg_spx/2
　CAL　w2 = 0
　CAL　w3 = leg_l
　CAL　w4 = leg_a12/180*PI
　CAL　w5 = PI + leg_a11/180*PI
　MATRIXA　w1,w2,w3,0,w4,w5
　CUBE　i,leg_sz,leg_sz,leg_l, 1,1,0

　// 足(X-)
　CAL　w1 =-leg_sz/2 - leg_spx/2
　CAL　w2 = 0
　CAL　w3 = leg_l
　CAL　w4 =-leg_a22/180*PI
　CAL　w5 = PI + leg_a21/180*PI
　MATRIXA　w1,w2,w3,0,w4,w5
　CUBE　i,leg_sz,leg_sz,leg_l, 1,1,0

20101103k