2006-01-25 05:00 PM
2006-01-26 05:00 PM
!!!!!!!!!!!!!!!!!!!!!!Draw 2D symbol
HOTSPOT2 0, 0
HOTSPOT2 0, 5.5"
HOTSPOT2 0, 11"
PEN pencolor
LINE2 1", 0, 1", 11"
LINE2 -1", 0, -1", 11"
CIRCLE2 0, 5.5", 4"
PEN 2
LINE2 4", 0, -4", 0
!!!!!!!!!!!!!!!!!!!!!!!Text ID
txt_sz = txt_sz*0.3528
Define Style txt "Arial", txt_sz, 5, 0
Request("ID_of_Main", "", mkr_ID)
Style txt
txt_adj=.5*STW(mkr_ID)/1000*A_
Pen txt_pen
!!!!!!!!!!!!!!!!!!!!account for mirrored object
IF V~ = 1 THEN
mir_adj = 180
ELSE
mir_adj = 0
ENDIF
!!!!!!!!!!!!!!!!!!!control text rotation
IF W~ <= 224 THEN rot_adj=180+mir_adj
IF W~ > 224 THEN rot_adj=0+mir_adj
IF W~ < 30 THEN rot_adj=0+mir_adj
!!!!!!!!!!!!!!!!!!!set default location
ADD2 0, 12"+txt_adj
rot2 90+rot_adj
HOTSPOT2 txtA, 0, 4, txtB, 1+128
HOTSPOT2 txtA, -1, 5, txtB, 3
HOTSPOT2 txtA, txtB, 6, txtB, 2
HOTSPOT2 0, txtB, 7, txtA, 1+128
HOTSPOT2 -1, txtB, 8, txtA, 3
HOTSPOT2 txtA, txtB, 9, txtA, 2
!for use only if hotspot is disabled
!txtA=0
!txtB=0
Text2 txtA, txtB, mkr_id