Find the alphabet's order

Let ALP(String)

Let S(String)

Let SA1(String)

Let SA2(String)

Let SA3(String)

Let SB(String)

Let SC(String)

Let i(Integer)

Let n(integer)

Let d1(integer)

Let d2(integer)

Let d3(integer)

S=APP_DrawText\INPUT\inputString_ 

ALP="ABCDEFGHIJKLMNOPQRSTUVWXYZ"

SA1=S->Extract(1,1)

SA2=S->Extract(2,1)

SA3=S->Extract(3,1)

i=1

n=0

for i while i<26

{

SB=ALP->Extract(n,1) 

if SA1==SB

{

d1=n

}

else if  SA2==SB

{

d2=n

}

else if  SA3==SB

{

d3=n

}

n=n+1

}

Auto Join from ListSource

Let S(Surface)
Let A(Surface)
Let B(Surface)

Let i(Integer)

i=1

for i while i<=`Geometrical Set.3\Integer.2`
{
S=List_ALL ->GetItem(i)
A=assemble(B,S)
B=A
}

`Geometrical Set.3\Surface.46` =B

Sorting List

Let tmplist(List)
Let newlist(List)

tmplist.Append(tmpLine\Line.1  )
tmplist.Append(tmpLine\Line.2  )
tmplist.Append(tmpLine\Line.3  )
tmplist.Append(tmpLine\Line.4  )

newlist=tmplist.Sort(">","Line","length","y=length(x)")

Sorting\Line_Getitem_1 =newlist->GetItem(1)
Sorting\Line_GetItem_2 =newlist->GetItem(2)

Retrieving Point Coordinate and Converting to Single String

Let P1(Point)
Let XL(Length)
Let YL(Length)
Let ZL(Length)

Let XR(Real)
Let YR(Real)
Let ZR(Real)

Let XS(String)
Let YS(String)
Let ZS(String)

Let XYZ(String)


P1=`Geometrical Set.2\SelPT`


XL =P1->coord(1)
YL =P1->coord(2)
ZL =P1->coord(3)
' --- ※Point >coord (rank: Integer): Length
' --- ※Returns the coordinates of a point. Returns X if 1 is specified, Y if 2 is specified, Z if 3 is specified.

XR=int(XL/1mm)
YR=int(YL/1mm)
ZR=int(ZL/1mm)

XS=ToString(XR)
YS=ToString(YR)
ZS=ToString(ZR)

XYZ=XS+", "+YS+", "+ZS
`Geometrical Set.2\ResultString` =XYZ

Knowledge Pattern without Catalog

Knowledge Pattern : Sample (Suwon 2nd Gym Project)

Let udf(UserFeature)
Let i(Integer)
Let li(Line)
Let st(String)

i=1

For i while i <= `List_SpaceFrameLine\Size`
{

li=`List_SpaceFrameLine` ->GetItem(i)
st="SpPipe_"+ToString(i)

udf= CreateOrModifyTemplate("Knowledge_Pattern_Catalog|SpaceFrame_PipeGeo",`SpaceFrame_Pipe`   ,`Relations\Knowledge Pattern_SpacePipe\UDFs`  ,i)
udf->SetAttributeObject("CenterLine", li  )
udf.Name=st
udf.Color=`Pipe_Color`
EndModifyTemplate(udf)

i=i+1
}

Using the Object Browser

 The object browser guides you when writing a script. It allows you to access the keywords, operators and  feature attributes that can be used when working with Product Knowledge Template.