|
LABEL 1
BracketNumber=751
SelCri[1]='PLANPROFILE'
SelCri[2]='PLANPROFILE'
SelText[1] = 3
SelText[2] = 4
exit
|
In this case SelText uses the standard text number 3 and 4 from the brackethint0.cmd file.
|
|
LABEL 2
Quest[1]= 1
Quest[2]= 2
Quest[3]= 3
Varstr2='yes'
exit
|
In this case the Question text is taken from the standard text file bracketquest0.cmd.
|
|
LABEL 3
if (abs(abs(angle)90)<=3): Stand90=TRUE
else Stand90=FALSE
if HP[1] > HP[2] : HP[1] = HP[2]
if HP[1] = 80: stand='07' ; exit
if HP[1] = 100 | HP[1] = 120: stand='08' ; exit
if HP[1] = 140: stand='09' ; exit
if HP[1] = 160: stand='10' ; exit
if HP[1] = 180 | HP[1] = 200: stand='11' ; exit
if HP[1] = 220 | HP[1] = 240: stand='12' ; exit
if HP[1] = 260: stand='13' ; exit
if HP[1] = 280 | HP[1] = 300: stand='45' ; exit
if HP[1] = 320 | HP[1] = 340 | HP[1] = 370: stand='46' ; exit
if HP[1] = 400 | HP[1] = 430: stand='47' ; exit
exit
|
If the angle is between the 87 and 93 degrees the bracket will be standard.
|
|
LABEL 4
if stand='07': PosNr=stand, Ans[1]=120, Ans[2]=120, Ans[3]=7; exit
if stand='08': PosNr=stand, Ans[1]=180, Ans[2]=180, Ans[3]=8; exit
if stand='09': PosNr=stand, Ans[1]=200, Ans[2]=200, Ans[3]=8; exit
if stand='10': PosNr=stand, Ans[1]=240, Ans[2]=240, Ans[3]=9; exit
if stand='11': PosNr=stand, Ans[1]=280, Ans[2]=280, Ans[3]=9; exit
if stand='12': PosNr=stand, Ans[1]=320, Ans[2]=320, Ans[3]=10; exit
if stand='13': PosNr=stand, Ans[1]=360, Ans[2]=360, Ans[3]=11; exit
if stand='45': PosNr=stand, Ans[1]=400, Ans[2]=400, Ans[3]=11; exit
if stand='46': PosNr=stand, Ans[1]=500, Ans[2]=500, Ans[3]=13; exit
if stand='47': PosNr=stand, Ans[1]=600, Ans[2]=600, Ans[3]=14; exit
exit
|
The stand variable, defined by Label 3, is used to define the default answers.
|
|
LABEL 5
Br_panel='YA'
if Stand90=FALSE: stand='free'
if stand = 'free' then
{
Sdummy=^BracketNumber ;
Stand90=FALSE
Ans[1]=Ans[1]4*abs(Ans[3])20.0
Ans[2]=Ans[2]4*abs(Ans[3])20.0
}
else
{
Sdummy=^BracketNumber'a'
}
VarStr='TYPE ^Sdummy R1 '<Ans[1]>' R2 '<Ans[2]>' D '<Ans[3]>
if stand='45' | stand='46' | stand='47' : VarStr2='FB 90 FE1 1 FE2 1 F1R2 45 F2R2 45'
if stand='free' : VarStr2='FB 90 FE1 1 FE2 1 F1R2 45 F2R2 45 FC 475'
if (abs(Ans[3])*4 > HP[1] & stand='free'& HP[1]<>0) then
{
notify t=ERR;'The thickness of the bracket is to big !!'
}
else
{
Ready='ready'
}
exit
|
The bracket gets the panel code YA.
If the angle is between the 87 and 93 degrees the type number will be 751a, otherwise 751.
A flange will be added to the free bracket if the length is bigger than 475mm.
|
|
LABEL 6
if stand = 'free' : Ans[1]=Ans[1]+4*abs(Ans[3])+20.0; Ans[2]=Ans[2]+4*abs(Ans[3])+20.0
exit
|
The two answers will be adjusted so they are the same as at creation time.
|
|
LABEL 7
Quest[1]= 1
Quest[2]= 2
Quest[3]= 3
VarStr='Text B R1 115 R2 115 D 10'
exit
|
|
|
LABEL 8
if stand='free' : SymbolType=1
exit
|
The default dimension partnumber with thickness indication is not mentioned, only the dimension is specified for the free bracket.
|
|
LABEL 9
if PosNr='07': Descript='Standard bracket B ^Posnr ' ; exit
exit
|
The PosNr variable is used to make the description variable.
|
Show/hide the type macro