GLCFe�zMAIN��FLDR��$@ Ditec_macrosFLDR��8x_macrosFILEd8>GSYMGSAC�  �  c�v8Operators_Swing_Ditec.gsmWW MYSGCASGDAEH��ݓI��SD�c�|=\�@a�rH/J����=�SCNAP�SRCM�CSD3���@CSD2��z/@CSD1o�!@CSRPg:@CSIUz:@CSLV�:M@TXTC�>CSMF�>@CSMB?@DRAP?�PLDG�P�SCNAWW�:�8��26J�>��&� �d��q�L�� �-�,�>0��B��F�L�(��>�Е�P@���ǚ;L����a@�p/Kc�9S��z1���B�h�w��5%SRCMWWCSD3WW�� !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- if lod3d=detlevel_3d_50 then gs_resol=6 if not(gs_shadow) then shadow off resol gs_resol:pen viewpen:sect_fill filltype,fillpenbg,fillpenfg,contpen:opangle[1]=opang1_3d:opangle[2]=opang2_3d gosub "materialDefs" if itypeoperator=type_dab205&iendmat then matboxend=ind(material,"_black") else matboxend=matoperatorbox endif if itypeoperator=type_dab105 then if bdoubleswing then if isubtypeoperator=type_dab105_doormounted then gosub "DAB105_2_doormounted" else add -silldepth*bbeam,0,0.015*bbeam*(isubtypeoperator#type_dab105_2_push):blogoposother=1 gosub "DAB105-box" if isubtypeoperator=type_dab105_2_pull then gosub "DAB105_2_pull" endif if isubtypeoperator=type_dab105_2_push then gosub "DAB105_2_push" endif if isubtypeoperator=type_dab105_2_pull_push then gosub "DAB105_2_pull_push" endif del 1 endif else if isubtypeoperator=type_dab105_doormounted then gosub "DAB105_1_doormounted" else add -silldepth*bbeam,-xposrot+dposbox,0.010 gosub "DAB105-box" if isubtypeoperator=type_dab105_pull then gosub "DAB105_1_pull" endif if isubtypeoperator=type_dab105_push|isubtypeoperator=type_dab105_spec_push then gosub "DAB105_1_push" endif if isubtypeoperator=type_dab105_slidetrack then gosub "DAB105_1_slidetrack" endif del 1 endif endif endif if itypeoperator=type_dab205 then if bdoubleswing then if isubtypeoperator=type_dab205_doormounted then gosub "DAB205_2_doormounted" else add -silldepth*bbeam,0,0.015:blogoposother=1 gosub "DAB205-box" if isubtypeoperator=type_dab205_2_pull then gosub "DAB205_2_pull" endif if isubtypeoperator=type_dab205_2_push then gosub "DAB205_2_push" endif if isubtypeoperator=type_dab205_2_pas then gosub "DAB205_2_pas" endif if isubtypeoperator=type_dab205_2_sliding_push then opangle[1]=-opangle[1]:opangle[2]=-opangle[2] gosub "DAB205_2_sliding_push" endif if isubtypeoperator=type_dab205_2_push_pull then gosub "DAB205_2_push_pull" endif del 1 endif else if isubtypeoperator=type_dab205_doormounted then gosub "DAB205_1_doormounted" else add -silldepth*bbeam,-xposrot+dposbox,0.015 gosub "DAB205-box" if isubtypeoperator=type_dab205_pull then gosub "DAB205_1_pull" endif if isubtypeoperator=type_dab205_push then gosub "DAB205_1_push" endif if isubtypeoperator=type_dab205_pas then gosub "DAB205_1_pas" endif if isubtypeoperator=type_dab205_sliding_push then opangle[1]=-opangle[1] gosub "DAB205_1_sliding_push" endif del 1 endif endif endif if lod3d1) else bmir=(i>1)@bmirropdir endif imir=1 -2*bmir:imirz=-1:add -(silldepth+yposrot),-xposrot -(a -2*xposrot)*(i=2),armendposz[i]:railangles=opangle[1]*(i=1)+opangle[2]*(i=2)+180:rotz (railangles -90)*imir:addy (yposrot -dframesash)*imir add railposx1[i]*imirz,-2*(yposrot -dframesash)*imir,0:muly -irailmirror[i]*imir:roty 90:rotz 90:mulz imirz gosub 14000+irailtypes[i] del 5:del 2:del 1 endif next i endif end "DAB105_2_doormounted": cx0=0.060:add -yposrot -silldepth,-xposrot,-0.010:rotz opangle[1]:add yposrot -dframesash,-cx0,-0.06+0.05*bbeam:mulz -1 gosub "DAB105-box" idx=1 gosub "calc_DAB105_doorMounted" add cy0,-(cx -cx0),-0.003:opang=opangle[1] gosub "DAB105_push" del 1:del 4:add -yposrot -silldepth,-a+xposrot,-0.010:muly -1:rotz opangle[2]:add yposrot -dframesash,-cx0,-0.06+0.05*bbeam:mulz -1:blogomir=1 gosub "DAB105-box" alfa=opangle[2] gosub "calcAngle_2dm" ang1=180 -beta0 -beta1:ang2=180 -beta2:add cy0,-(cx -cx0),-0.003:opang=opangle[2] gosub "DAB105_push" del 1:del 5 return "DAB105_2_pull": idx=1 gosub "calc_DAB105_pull" if not(biserror) then add cy0,-cx -xposrot,-0.003:rotz -angl gosub "DAB105-arm1" armendposz[1]=-0.06 -diffzarm:del 1:del 1 endif addy -a:muly -1:alfa=opangle[2] gosub "calcAngle_1" if not(biserror) then add cy0,-cx -xposrot,-0.003:rotz -angl gosub "DAB105-arm1" armendposz[2]=-0.06 -diffzarm:del 1:del 1 endif del 2 return "DAB105_2_push": idx=1 gosub "calc_DAB105_push" add cy0,-cx -xposrot,-0.003:opang=opangle[1] gosub "DAB105_push" del 1:addy -a:muly -1:alfa=opangle[2] gosub "calcAngle_2" ang1=180 -beta0 -beta1:ang2=180 -beta2:add cy0,-cx -xposrot,-0.003:opang=opangle[2] gosub "DAB105_push" del 1:del 2 return "DAB105_2_pull_push": idx=1 gosub "calc_DAB105_pull" if not(biserror) then add cy0,-cx -xposrot,-0.003:rotz -angl gosub "DAB105-arm1" armendposz[1]=-0.060 -diffzarm:del 1:del 1 endif idx=2 gosub "calc_DAB105_push" addy -a:muly -1:add cy0,-cx -xposrot,-0.003:opang=-opangle[2] gosub "DAB105_push" del 3 return "DAB105_1_doormounted": cx0=0.060:add -yposrot -silldepth,-xposrot,-0.005 -0.015*(ioperatorside=side_out):rotz opangle[1]:add yposrot -dframesash,-cx0,-0.06+bbeam*0.05:mulz -1 gosub "DAB105-box" idx=1 gosub "calc_DAB105_doorMounted" add cy0,-(cx -cx0),-0.003:opang=opangle[1] gosub "DAB105_push" del 1:del 4 return "DAB105_1_pull": idx=1 gosub "calc_DAB105_pull" if not(biserror) then add cy0,-(cx+dposbox),-0.003:rotz -angl gosub "DAB105-arm1" armendposz[1]=-0.05 -diffzarm:del 1:del 1 endif return "DAB105_1_push": idx=1 gosub "calc_DAB105_push" add cy0,-(cx+dposbox),-0.003:opang=opangle[1] gosub "DAB105_push" del 1 return "DAB105_1_slidetrack": idx=1 gosub "calc_DAB105_slidetrack" if not(biserror) then add 0.063,-wbox+0.188+0.206+2*thkboxend,0:muly -1:rotz -bet gosub "ST-V/H" add 0.165,0,-0.039:rotz gam -90 gosub "ST-V/H_2" del 2:del 1:add -dy,-dx,0:rotz -angl gosub "ST-V/H_L" addx kl1:rotz 180 -kang:addz -0.074 gosub "setLengthArm2" del 3:armendposz[1]=-0.071:del 2:del 2 endif return "DAB105_push": rotz -ang1 gosub "DAB105-arm2a" add armlength1,0,-0.032 -diffzarm*not(bbeam):rotz -ang2 gosub "setLengthArm2" gosub "DAB105-arm2b" add armlength2,0,-0.0115:rotz ang1+ang2 -180 -opang gosub "DAB105_U_join" del 2:del 2:del 1 return "DAB205_2_doormounted": cx0=0.060:add -yposrot -silldepth,-xposrot,-0.010*bbeam:rotz opangle[1]:add yposrot -dframesash,-cx0,-0.06+0.05*bbeam:mulz -1 gosub "DAB205-box" idx=1 gosub "calc_DAB205_doorMounted" add cy0,-(cx -cx0),0:opang=opangle[1] gosub "DAB205_push" del 1:del 4:add -yposrot -silldepth,-a+xposrot,-0.010*bbeam:muly -1:rotz opangle[2]:add yposrot -dframesash,-cx0,-0.06+0.05*bbeam:mulz -1:blogomir=1 gosub "DAB205-box" alfa=opangle[2] gosub "calcAngle_2dm" ang1=180 -beta0 -beta1:ang2=180 -beta2:add cy0,-(cx -cx0),0:opang=opangle[2] gosub "DAB205_push" del 1:del 5 return "DAB205_2_sliding_push": "DAB205_2_pull": idx=1 gosub "calc_DAB205_pull" if not(biserror) then add cy0,-cx -xposrot,0:rotz -angl gosub "DAB205-arm1" armendposz[1]=-0.025 -diffzarm:del 1:del 1 endif addy -a:muly -1:alfa=opangle[2] gosub "calcAngle_1" if not(biserror) then add cy0,-cx -xposrot,0:rotz -angl gosub "DAB205-arm1" armendposz[2]=-0.025 -diffzarm:del 1:del 1 endif del 2 return "DAB205_2_push": idx=1 gosub "calc_DAB205_push" add cy0,-cx -xposrot,0:opang=opangle[1] gosub "DAB205_push" del 1:addy -a:muly -1:alfa=opangle[2] gosub "calcAngle_2" ang1=180 -beta0 -beta1:ang2=180 -beta2:add cy0,-cx -xposrot,0:opang=opangle[2] gosub "DAB205_push" del 1:del 2 return "DAB205_2_push_pull": idx=1 gosub "calc_DAB205_pull" if not(biserror) then add cy0,-cx -xposrot,0:rotz -angl gosub "DAB205-arm1" armendposz[1]=-0.025 -diffzarm:del 1:del 1 endif idx=2 gosub "calc_DAB205_push" addy -a:muly -1:add cy0,-cx -xposrot,0:opang=-opangle[2] gosub "DAB205_push" del 3 return "DAB205_1_doormounted": cx0=0.060:add -yposrot -silldepth,-xposrot,-0.010*bbeam:rotz opangle[1]:add yposrot -dframesash,-cx0,-0.06+bbeam*0.05:mulz -1 gosub "DAB205-box" idx=1 gosub "calc_DAB205_doorMounted" add cy0,-(cx -cx0),0:opang=opangle[1] gosub "DAB205_push" del 1:del 4 return "DAB205_1_sliding_push": "DAB205_1_pull": idx=1 gosub "calc_DAB205_pull" if not(biserror) then add cy0,-(cx+dposbox),0:rotz -angl gosub "DAB205-arm1" armendposz[1]=-0.025 -diffzarm:del 1:del 1 endif return "DAB205_1_push": idx=1 gosub "calc_DAB205_push" add cy0,-(cx+dposbox),0:opang=opangle[1] gosub "DAB205_push" del 1 return "DAB205_push": rotz -ang1 gosub "DAB205-arm2a" add armlength1,0,-0.032 -diffzarm:rotz -ang2 gosub "setLengthArm2" gosub "DAB205-arm2b" add armlength2,0,-0.0115:rotz ang1+ang2 -180 -opang gosub "DAB205_U_join" del 2:del 2:del 1 return "DAB205_1_pas": idx=1 gosub "calc_DAB205_pas" add cy0,-(cx+dposbox),0:opang=opangle[1] gosub "DAB205_pas" del 1:armendposz[1]=-0.05 -diffzarm return "DAB205_2_pas": idx=1 gosub "calc_DAB205_pas" add cy0,-(cx+xposrot),0:opang=opangle[1] gosub "DAB205_pas" del 1:idx=2 gosub "calc_DAB205_pas" addy -a:muly -1:add cy0,-(cx+xposrot),0:opang=opangle[2] gosub "DAB205_pas" del 3:armendposz[1]=-0.05 -diffzarm:armendposz[2]=-0.05 -diffzarm return "DAB205_pas": rotz 72.167:rotz -angl:muly -1 gosub "DAB205-arm2" del 3 return "DAB105-box": if bnobox then return material matoperatorbox:rotx 90 if bdoormounted then muly -1 mulz 1-2*blogomir if not(blogoleftside) then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)+logolength*blogomir if blogoposother then lpx=wbox -lpx+logolength endif else if blogomirror then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)-logolength*(1-2*blogomir) if blogorightside then lpx=(wbox -thkboxend -logoposx)*(1-2*blogomir)-logolength*(1-2*blogomir) else lpx=(wbox -thkboxend -logoposx)*(1-2*blogomir)+logolength*blogomir if blogorightside then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)-logolength*blogomir endif endif add boxdepth,logoposy*not(bdoormounted)-(boxheight-logoposy)*bdoormounted,lpx gosub "Ditec_logo" del 2+bdoormounted if lod3d=detlevel_3d_10 then addz thkboxend:prism_ 59,wbox-2*thkboxend,0.0155,0.004,79,0.0145,0.004,900,0,90,4079,0.0145,0.005,79,0.0135,0.005,15,0.0135,0.004,15,0.0115,0.004,15,0.0115,0.005,15,0.006,0.005,79,0.006,0.006,900,0,-90,4079,0.005,0.006,79,0.005,0.104,79,0.006,0.104,900, 0,-90,4079,0.006,0.105,79,0.0115,0.105,15,0.0115,0.106,15,0.0135,0.106,15,0.0135,0.105,15,0.0145,0.105,79,0.0145,0.106,900,0,90,4079,0.0155,0.106,79,0.0135,0.106,900,0,90,4079,0.0135,0.108,79,0.00561987,0.108,79,0.00561987,0.1075,900,0,71.79,4079, 0.00514491,0.107656,79,0.0041,0.108,900,0,-143.58,4079,0.00305509,0.107656,79,0.00258013,0.1075,900,0,71.79,4079,0.00258013,0.108,79,0.002,0.108,79,0.002,0.106,900,0,90,4079,0,0.106,79,0,0.004,79,0.002,0.004,900,0,90,4079,0.002,0.002,79, 0.00258013,0.002,79,0.00258013,0.0025,900,0,71.79,4079,0.00305509,0.00234375,79,0.0041,0.002,900,0,-143.58,4079,0.00514491,0.00234375,79,0.00561987,0.0025,900,0,71.79,4079,0.00561987,0.002,79,0.0135,0.002,79,0.0135,0.004,900,0,90,4079,0.0155,0.004,-1 prism_ 81,wbox-2*thkboxend,0.002,0.108,15,0.0155,0.108,79,0.0165,0.108,900,0,180,4079,0.0175,0.108,79,0.0325,0.108,15,0.0325,0.107008,79,0.0335,0.1045,900,0,119.517,4079,0.0318102,0.102394,79,0.0319667,0.102589,900,0,65.9067,4079,0.0320808,0.102367,79, 0.0316167,0.103271,900,0,69.4105,4079,0.0326267,0.103388,79,0.0323783,0.103359,900,0,38.9158,4079,0.0325536,0.103537,79,0.0335,0.1045,900,0,-270.976,4079,0.0344464,0.103537,79,0.0346217,0.103359,900,0,38.9158,4079,0.0343733,0.103388,79, 0.0353833,0.103271,900,0,69.4105,4079,0.0349192,0.102367,79,0.0350333,0.102589,900,0,65.9067,4079,0.0351898,0.102394,79,0.0335,0.1045,900,0,119.517,4079,0.0345,0.107008,79,0.0345,0.108,15,0.077,0.108,79,0.077,-0.07625,900,0,-15.6848,4079, 0.126811,0.101139,79,0.126,0.0982509,900,0,-74.3152,4079,0.129,0.0982509,79,0.129,0.025,79,0.114584,0.0254535,900,0,-38.6255,4079,0.125563,0.0161003,79,0.102453,0.0356836,900,0,-24.6881,4079,0.115271,0.00823775,79,0.0874668,0.0669154,900, 0,-26.6485,4079,0.086,0.002,79,0.0175,0.002,79,0.0165,0.002,900,0,180,4079,0.0155,0.002,79,0.002,0.002,15,0.002,0,15,0.086,0,79,0.086,0.072799,900,0,25.9184,4079,0.11782,0.00732233,79,0.103811,0.0340921,900,0,24.2378,4079,0.127575,0.0154329,79, 0.115927,0.025,900,0,39.399,4079,0.131,0.025,79,0.131,0.0982509,79,0.126,0.0982509,900,0,74.3152,4079,0.127352,0.103065,79,0.077,-0.07625,900,0,15.6848,4079,0.077,0.11,79,0.0425,0.11,15,0.0425,0.1092,15,0.0405,0.1092,15,0.0405,0.11,15,0.002,0.11,15, 0.002,0.108,-1:del 1:material matboxend for i=0 to 1 addz i*wbox:mulz -2*i+1:addx 0.060:roty 172.5:cutplane:del 2:prism_ 20,thkboxend,0,0.112,15,0,-0.002,15,0.086,-0.002,79,0.086,0.072799,900,0,25.941,4079,0.11872,0.00553638,79,0.103811,0.0340921,900,0,24.2526,4079,0.129134,0.0141807,79, 0.115927,0.025,900,0,39.3241,4079,0.133,0.025,79,0.133,0.0982509,79,0.126,0.0982509,900,0,74.3152,4079,0.127892,0.10499,79,0.077,-0.07625,900,0,15.6848,4079,0.077,0.112,79,0,0.112,-1:cutend:del 2 next i if bdoubleswing then material matboxend for i=-1 to 1 step 2 addz a/2+i*(a/2-wboxorig):mulz i:prism_ 20,0.01,0,0.112,15,0,-0.002,15,0.086,-0.002,79,0.086,0.072799,900,0,25.941,4079,0.11872,0.00553638,79,0.103811,0.0340921,900,0,24.2526,4079,0.129134,0.0141807,79,0.115927,0.025,900,0,39.3241,4079,0.133,0.025,79, 0.133,0.0982509,79,0.126,0.0982509,900,0,74.3152,4079,0.127892,0.10499,79,0.077,-0.07625,900,0,15.6848,4079,0.077,0.112,79,0,0.112,-1:del 2 next i endif endif if lod3d=detlevel_3d_50 then addz thkboxend:prism_ 21,wbox-2*thkboxend,0.002,0.108,15,0.002,0.11,15,0.077,0.11,79,0.077,-0.07625,900,0,-16.8539,4079,0.131,0.102,79,0.131,0.0155741,79,0.086,0.072799,900,0,-38.1805,4079,0.086,0,79,0.002,0,15,0.002,0.00199975,15,0.086,0.00200062,79, 0.086002,0.0727962,900,0,37.4001,4079,0.129,0.016554,79,0.129,0.10051,79,0.077,-0.07625,900,0,16.3931,4079,0.077,0.108,79,0.002,0.108,-1:prism_ 9,wbox-2*thkboxend,0.0155,0.105,15,0.0155,0.108,15,0,0.108,15,0,0.002,15,0.0155,0.002,15,0.0155,0.005,15, 0.005,0.005,15,0.005,0.105,15,0.0155,0.105,-1:del 1:material matboxend for i=0 to 1 addz i*wbox:mulz -2*i+1:prism_ 11,thkboxend,0,0.112,15,0,-0.002,15,0.086,-0.002,79,0.086,0.072799,900,0,38.9285,4079,0.133,0.0146106,79,0.133,0.103478,79,0.077,-0.07625,900,0,17.3061,4079,0.077,0.112,79,0,0.112,-1:del 2 next i if bdoubleswing then for i=-1 to 1 step 2 addz a/2+i*(a/2-wboxorig):mulz i:prism_ 11,0.01,0,0.112,15,0,-0.002,15,0.086,-0.002,79,0.086,0.072799,900,0,38.9285,4079,0.133,0.0146106,79,0.133,0.103478,79,0.077,-0.07625,900,0,17.3061,4079,0.077,0.112,79,0,0.112,-1:del 2 next i endif endif if lod3d=detlevel_3d_100 then cprism_ matboxend,matboxend,matoperatorbox,5,wbox,0,0,15,0,0.110,15,0.131,0.110,15,0.131,0,15,0,0,-1 endif if not(bismacro) then unid=unid+1:hotspot 0,0,0,unid:unid=unid+1:hotspot boxdepth,0,0,unid:unid=unid+1:hotspot boxdepth,boxheight,0,unid:unid=unid+1:hotspot 0,boxheight,0,unid:unid=unid+1:hotspot 0,0,wbox,unid:unid=unid+1:hotspot boxdepth,0,wbox,unid unid=unid+1:hotspot boxdepth,boxheight,wbox,unid:unid=unid+1:hotspot 0,boxheight,wbox,unid else unid=unid+8 endif del 1 return "DAB105-arm1": goto "PS-arm1" "DAB105-arm2a": goto "PS-arm2a" "DAB105-arm2b": goto "PS-arm2b" "DAB205-arm2a": material matoperatorarm if lod3d=detlevel_3d_10|lod3d=detlevel_3d_50 then addz -(0.0165+diffzarm):cylind 0.0165+diffzarm,0.011:addz -0.007:cylind 0.007,0.035/2 if lod3d=detlevel_3d_10 then addz -0.008:mulz -1:cylind 0.0035,0.016:addz 0.0035:cone 0.0015,0.016,0.009,90,90:del 1:del 2 endif del 1:del 1 if not(bismacro) then addz -0.025 gosub "setDiffZarm" del 1 endif addz -0.0315 -diffzarm:addz -0.00:prism_ 7,0.008,0,0.0175,79,armlength1,0.0175,79,armlength1,-0.0175,1079,0,-0.0175,79,0,0,979,-0.0175,0,3079,0,0.0175,3079:mulz -1:cone 0.005,0.017,0.012,90,90:del 1:del 1:del 1 endif return "DAB205-arm2b": goto "PS-arm2b" "DAB105_U_join": goto "PS_U_join" "ST-V/H_L": material matoperatorarm if lod3d=detlevel_3d_10 then addz -0.016:cylind 0.016,0.015:addz -0.006:cylind 0.006,0.010:addz -0.025:cylind 0.025,0.020:mulz -1:cone 0.007,0.017,0.010,90,90:del 1:addz 0.002:prism_ 15,0.009,0.160632,0.02,79,0,0.02,79,0,0,900,0,180,4079,0,-0.02,79,0.173218,-0.02,79, 0.173218,0.02,900,0,80,4079,0.21261,0.0130541,79,0.216642,0.0359193,13,0.17725,0.0428653,13,0.175404,0.0323953,79,0.160632,0.035,900,0,-80,4079,0.160632,0.02,-1:add 0.17725,0.0428653,0:rotz 80:rotx 90:prism_ 5,0.040,0.050035,-0.014,15,0,0.009,10,0,0,15, 0.050035,-0.026,10,0.050035,-0.014,-1:del 3:addz -0.026:prism_ 5,0.012,0.225331,0.0851942,13,0.244426,0.193489,15,0.205033,0.200435,15,0.185938,0.0921402,13,0.225331,0.0851942,-1:del 1:add 0.190,0,-0.026:rotz 80:add kl2,0,-0.006:prism_ 5,0.006, 0,0.015,79,-0.250,0.015,15,-0.250,-0.015,15,0,-0.015,79,0,0.015,1079:add -0.170,0,0.018 gosub "screw_14/6" del 1:add -0.220,0,0.018 gosub "screw_14/6" del 1:addz 0.006 gosub "screw_18/6" del 1:addz -0.006 gosub "screw_18/6" addz -0.022:addz -0.006 gosub "screw_14/6" del 1:material "_black":cylind 0.022,0.011:del 1:del 1:del 1:del 3:del 1:del 1:del 1 endif if lod3d=detlevel_3d_50 then addz -0.022:cylind 0.022,0.015:addz -0.027:rotz 30:cylind 0.027,0.020:del 1:addz 0.004:prism_ 15,0.009,0.160632,0.02,79,0,0.02,79,0,0,900,0,180,4079,0,-0.02,79,0.173218,-0.02,79,0.173218,0.02,900,0,80,4079,0.21261,0.0130541,79,0.216642,0.0359193,13, 0.17725,0.0428653,13,0.175404,0.0323953,79,0.160632,0.035,900,0,-80,4079,0.160632,0.02,-1:add 0.17725,0.0428653,0:rotz 80:rotx 90:prism_ 5,0.040,0.050035,-0.014,15,0,0.009,10,0,0,15,0.050035,-0.026,10,0.050035,-0.014,-1:del 3:addz -0.026:prism_ 5,0.012, 0.225331,0.0851942,13,0.244426,0.193489,15,0.205033,0.200435,15,0.185938,0.0921402,13,0.225331,0.0851942,-1:del 1:add 0.190,0,-0.026:rotz 80:add 0.350,0,-0.006:prism_ 5,0.006,0,0.015,79,-0.250,0.015,15,-0.250,-0.015,15,0,-0.015,79,0,0.015,1079 addz -0.006 gosub "screw_18/6" addz -0.022:material "_black":cylind 0.022,0.011:del 1:del 1:del 3:del 1:del 1:del 1 endif return "ST-V/H": material matoperatorarm if lod3d=detlevel_3d_10|lod3d=detlevel_3d_50 then addz -0.012:cylind 0.012,0.010:addz -0.004:cylind 0.004,0.009:addz -0.030 for i=0 to 1 addz i*0.030:mulz -2*i+1:prism_ 21,0.004,0.017,0.0175,11,-0.023,0.0175,75,-0.023,0.0145,900,0,90,4075,-0.026,0.0145,75,-0.026,-0.0145,75,-0.023,-0.0145,900,0,90,4075,-0.023,-0.0175,75,0.017,-0.0175,15,0.156211,-0.0076538,79,0.156634,-0.0136388,900, 0,-35.569,4079,0.159772,-0.00852428,79,0.165,0,900,0,243.047,4079,0.159772,0.00852428,79,0.156634,0.0136388,900,0,-35.569,4079,0.156211,0.0076538,79,0.017,0.0175,-1:del 2 next i addz 0.004:prism_ 11,0.022,0.017,0.0175,10,-0.023,0.0175,74,-0.023,0.0145,900,0,90,4074,-0.026,0.0145,74,-0.026,-0.0145,74,-0.023,-0.0145,900,0,90,4074,-0.023,-0.0175,74,0.017,-0.0175,15,0.017,0.0175,-1:del 1:del 1:del 1:del 1 endif return "ST-V/H_2": material matoperatorarm if lod3d=detlevel_3d_10|lod3d=detlevel_3d_50 then for i=0 to 1 add 0,-0.220*i,0.006*i:muly -2*i+1:cylind 0.016,0.016:mulz -1:cone 0.003,0.011,0.007,90,90:del 1:addz 0.016:cone 0.003,0.011,0.007,90,90:del 1:addz 0.008:rotx 90:cylind 0.025,0.007:addz 0.025:cylind 0.005,0.003:addz 0.005 gosub "screw_14/6" del 1:del 1:del 2:del 2 next i add 0,-0.036,0.008:tube 2,4,63,0,0,901,0.004,360,4001,0,0.148,0.006,0,0,0,0,0,0,-0.148,0.006,0,0,-0.148*2,0,0:del 1 endif return "PS-box": if bnobox then return material matoperatorbox:rotx 90 if bdoormounted then muly -1 mulz 1-2*blogomir if not(blogoleftside) then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)+logolength*blogomir if blogoposother then lpx=wbox -lpx+logolength endif else if blogomirror then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)+logolength*blogomir else lpx=(wbox -thkboxend -logoposx)*(1-2*blogomir)+logolength*blogomir endif endif add boxdepth,logoposy*not(bdoormounted)-(boxheight-logoposy)*bdoormounted,lpx gosub "Ditec_logo" del 2+bdoormounted if lod3d=detlevel_3d_10 then addz thkboxend:prism_ 59,wbox-2*thkboxend,0.0155,0.004,79,0.0145,0.004,900,0,90,4079,0.0145,0.005,79,0.0135,0.005,15,0.0135,0.004,15,0.0115,0.004,15,0.0115,0.005,15,0.006,0.005,79,0.006,0.006,900,0,-90,4079,0.005,0.006,79,0.005,0.104,79,0.006,0.104,900, 0,-90,4079,0.006,0.105,79,0.0115,0.105,15,0.0115,0.106,15,0.0135,0.106,15,0.0135,0.105,15,0.0145,0.105,79,0.0145,0.106,900,0,90,4079,0.0155,0.106,79,0.0135,0.106,900,0,90,4079,0.0135,0.108,79,0.00561987,0.108,79,0.00561987,0.1075,900,0,71.79,4079, 0.00514491,0.107656,79,0.0041,0.108,900,0,-143.58,4079,0.00305509,0.107656,79,0.00258013,0.1075,900,0,71.79,4079,0.00258013,0.108,79,0.002,0.108,79,0.002,0.106,900,0,90,4079,0,0.106,79,0,0.004,79,0.002,0.004,900,0,90,4079,0.002,0.002,79, 0.00258013,0.002,79,0.00258013,0.0025,900,0,71.79,4079,0.00305509,0.00234375,79,0.0041,0.002,900,0,-143.58,4079,0.00514491,0.00234375,79,0.00561987,0.0025,900,0,71.79,4079,0.00561987,0.002,79,0.0135,0.002,79,0.0135,0.004,900,0,90,4079,0.0155,0.004,-1 prism_ 77+4,wbox-2*thkboxend,0.002,0.108,15,0.0155,0.108,79,0.0165,0.108,900,0,180,4079,0.0175,0.108,79,0.0325,0.108,15,0.0325,0.107008,79,0.0335,0.1045,900,0,119.517,4079,0.0318102,0.102394,79,0.0319667,0.102589,900,0,65.9067,4079, 0.0320808,0.102367,79,0.0316167,0.103271,900,0,69.4105,4079,0.0326267,0.103388,79,0.0323783,0.103359,900,0,38.9158,4079,0.0325536,0.103537,79,0.0335,0.1045,900,0,-270.976,4079,0.0344464,0.103537,79,0.0346217,0.103359,900,0,38.9158,4079, 0.0343733,0.103388,79,0.0353833,0.103271,900,0,69.4105,4079,0.0349192,0.102367,79,0.0350333,0.102589,900,0,65.9067,4079,0.0351898,0.102394,79,0.0335,0.1045,900,0,119.517,4079,0.0345,0.107008,79,0.0345,0.108,15,0.056,0.108,79,0.056,-0.07625,900, 0,-15.6848,4079,0.105811,0.101139,79,0.105,0.0982509,900,0,-74.3152,4079,0.108,0.0982509,79,0.108,0.025,79,0.0935839,0.0254535,900,0,-38.6255,4079,0.104563,0.0161003,79,0.0814533,0.0356836,900,0,-24.6881,4079,0.0942714,0.00823775,79, 0.0664668,0.0669154,900,0,-26.6485,4079,0.065,0.002,79,0.0175,0.002,79,0.0165,0.002,900,0,180,4079,0.0155,0.002,79,0.002,0.002,15,0.002,0,15,0.065,0,79,0.065,0.072799,900,0,25.9184,4079,0.0968198,0.00732233,79,0.0828113,0.0340921,900,0,24.2378,4079, 0.106575,0.0154329,79,0.094927,0.025,900,0,39.399,4079,0.11,0.025,79,0.11,0.0982509,79,0.105,0.0982509,900,0,74.3152,4079,0.106352,0.103065,79,0.056,-0.07625,900,0,15.6848,4079,0.056,0.11,79,0.0425,0.11,15,0.0425,0.1092,15,0.0405,0.1092,15, 0.0405,0.11,15,0.002,0.11,15,0.002,0.108,-1:del 1:material matboxend for i=0 to 1 addz i*wbox:mulz -2*i+1:addx 0.060:roty 172.5:cutplane:del 2:prism_ 20,thkboxend,0,0.112,15,0,-0.002,15,0.065,-0.002,79,0.065,0.072799,900,0,25.941,4079,0.0977205,0.00553638,79,0.0828113,0.0340921,900,0,24.2526,4079,0.108134,0.0141807,79, 0.094927,0.025,900,0,39.3241,4079,0.112,0.025,79,0.112,0.0982509,79,0.105,0.0982509,900,0,74.3152,4079,0.106892,0.10499,79,0.056,-0.07625,900,0,15.6848,4079,0.056,0.112,79,0,0.112,-1:cutend:del 2 next i endif if lod3d=detlevel_3d_50 then addz thkboxend:prism_ 9,wbox-2*thkboxend,0.0155,0.105,15,0.0155,0.108,15,0,0.108,15,0,0.002,15,0.0155,0.002,15,0.0155,0.005,15,0.005,0.005,15,0.005,0.105,15,0.0155,0.105,-1:prism_ 21,wbox-2*thkboxend,0.002,0.108,15,0.002,0.11,15,0.056,0.11,79, 0.056,-0.07625,900,0,-16.8539,4079,0.11,0.102,79,0.11,0.0155741,79,0.065,0.072799,900,0,-38.1805,4079,0.065,0,79,0.002,0,15,0.002,0.00200062,15,0.065,0.00200062,79,0.065002,0.0727962,900,0,37.4001,4079,0.108,0.016554,79,0.108,0.10051,79, 0.056,-0.07625,900,0,16.3931,4079,0.056,0.108,79,0.002,0.108,-1:del 1:material matboxend for i=0 to 1 addz i*wbox:mulz -2*i+1:prism_ 11,thkboxend,0,0.112,15,0,-0.002,15,0.065,-0.002,79,0.065,0.072799,900,0,38.9285,4079,0.112,0.0146106,79,0.112,0.103478,79,0.056,-0.07625,900,0,17.3061,4079,0.056,0.112,79,0,0.112,-1:del 2 next i endif if lod3d=detlevel_3d_100 then cprism_ matboxend,matboxend,matoperatorbox,5,wbox,0,0,15,0,0.110,15,0.110,0.110,15,0.110,0,15,0,0,-1 endif if not(bismacro) then unid=unid+1:hotspot 0,0,0,unid:unid=unid+1:hotspot 0.110,0,0,unid:unid=unid+1:hotspot 0.110,0.110,0,unid:unid=unid+1:hotspot 0,0.110,0,unid:unid=unid+1:hotspot 0,0,wbox,unid:unid=unid+1:hotspot 0.110,0,wbox,unid:unid=unid+1:hotspot 0.110,0.110,wbox,unid unid=unid+1:hotspot 0,0.110,wbox,unid else unid=unid+8 endif del 1 return "PS-arm1": material matoperatorarm if lod3d=detlevel_3d_10 then cylind 0.003,0.011 if not(bismacro) then addz -0.038 gosub "setDiffZarm" del 1 endif addz -0.038 -diffzarm:cylind 0.038+diffzarm,0.019:mulz -1:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm,13,0.013,0,0.004,1,0.3595,-0.0125029,79,0.375275,-0.0121452,79,0.375,0,900,0,177.402,4079,0.375275,0.0121452,79, 0.3595,0.0125029,79,0.02,0.0202701,79,0.000469612,0.0207129,79,0,0,900,0,182.598,4079,0.000469612,-0.0207129,79,0.02,-0.0202701,79,0.3595,-0.0125029,-1:del 1:add 0.375,0,-0.013:addz -0.004:cylind 0.004,0.0065:addz -0.012:cylind 0.012,0.004:addz -0.022 material "_black":cylind 0.022,0.009:del 1:del 1:del 1:del 1:del 1 endif if lod3d=detlevel_3d_50 then material matoperatorarm if not(bismacro) then addz -0.038 gosub "setDiffZarm" del 1 endif addz -0.038 -diffzarm:cylind 0.041+diffzarm,0.019:mulz -1:prism_ 13,0.013,0.3595,-0.0125029,79,0.375275,-0.0121452,79,0.375,0,900,0,177.402,4079,0.375275,0.0121452,79,0.3595,0.0125029,79,0.02,0.0202701,79,0.000469612,0.0207129,79,0,0,900,0,182.598,4079, 0.000469612,-0.0207129,79,0.02,-0.0202701,79,0.3595,-0.0125029,-1:del 1:add 0.375,0,-0.013:addz -0.016:cylind 0.016,0.004:addz -0.022:material "_black":cylind 0.022,0.009:del 1:del 1:del 1:del 1 endif return "PS-arm2a": material matoperatorarm if lod3d=detlevel_3d_10|lod3d=detlevel_3d_50 then cylind 0.003,0.012 if not(bismacro) then addz -0.025 gosub "setDiffZarm" del 1 endif addz -0.025 -diffzarm*not(bbeam):cylind 0.025+diffzarm*not(bbeam),0.018:addz -0.014:prism_ 8,0.014,0,0.021,79,armlength1,0.016,79,armlength1,0,979,armlength1,-0.016,3079,0,-0.021,79,0,0,979,-0.021,0,3079,0,0.021,3079:mulz -1:cone 0.005,0.017,0.012,90,90 del 1:del 1:del 1 endif return "PS-arm2b": material matoperatorarm if lod3d=detlevel_3d_10 then addz -0.002:cylind 0.002,0.0075:addz -0.0075:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm,2,0.0075,0,0.0025,1,0,0,979,0.0145,360,4079:addz -0.004:mulz -1:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm, 2,0.0075,0,0.0025,1,0,0,979,0.0145,360,4079:addz 0.0075:cone 0.003,0.0075,0.006,90,90:del 1:del 2:addz -0.004:prism_ 5,0.004,0,0.0175,79,0.020,0.0175,15,0.020,-0.0175,15,0,-0.0175,79,0,0.0175,1079:addx 0.020:rotz 90:rotx 90:prism_ 15,0.200, -0.0175,-0.0055,15,-0.0175,-0.0035,15,-0.0095,0.007,15,-0.0055,0.007,15,-0.0055,0.004,15,-0.0100,0.004,15,-0.0100,0,15,0.0100,0,15,0.0100,0.004,15,0.0055,0.004,15,0.0055,0.007,15,0.0095,0.007,15,0.0175,-0.0035,15,0.0175,-0.0055,15,-0.0175,-0.0055,-1 del 3:prism_ 9,0.004,0.020,0.0100,15,0.220,0.0100,15,0.220,0.0175,15,armlength2,0.0175,79,armlength2,-0.0175,1079,0.220,-0.0175,15,0.220,-0.0100,15,0.020,-0.0100,15,0.020,0.0100,-1:addz 0.004 for i=0 to 3 addx 0.040+0.018*i^2:cylind 0.006,0.006:del 1 next i del 1:del 1:addx armlength2:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm,2,0.0075,0,0.0025,1,0,0,979,0.0145,360,4079:addz 0.0075:cylind 0.003,0.0075:del 1:addz -0.004:mulz -1 hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm,2,0.0075,0,0.0025,1,0,0,979,0.0145,360,4079:addz 0.0075:cylind 0.003,0.0075:del 1:del 2:del 1:del 1:del 1 endif if lod3d=detlevel_3d_50 then addz -0.002:addz -0.0075:cylind 0.0075,0.0145:addz -0.004:mulz -1:cylind 0.0075,0.0145:del 2:addz -0.004:prism_ 5,0.004,0,0.0175,79,0.020,0.0175,15,0.020,-0.0175,15,0,-0.0175,79,0,0.0175,1079:addx 0.020:rotz 90:rotx 90:prism_ 7,0.200,-0.0175,-0.0055,15, -0.0175,-0.0035,15,-0.0095,0.007,15,0.0095,0.007,15,0.0175,-0.0035,15,0.0175,-0.0055,15,-0.0175,-0.0055,-1:del 3:prism_ 6,0.004,0.220,0.0100,15,0.220,0.0175,15,armlength2,0.0175,79,armlength2,-0.0175,1079,0.220,-0.0175,15,0.220,-0.0100,-1:del 1 addx armlength2:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm,2,0.0075,0,0.0025,1,0,0,979,0.0145,360,4079:addz 0.0075:cylind 0.003,0.0075:del 1:addz -0.004:mulz -1:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm, 2,0.0075,0,0.0025,1,0,0,979,0.0145,360,4079:addz 0.0075:cylind 0.003,0.0075:del 1:del 2:del 1:del 1:del 1 endif return "PS_U_join": material matoperatorarm if lod3d=detlevel_3d_10|lod3d=detlevel_3d_50 then for j=-1 to 1 step 2 mulz j:addz 0.0125:prism_ 11,0.002,0.025,0.032,14,0.023,0.032,13,0.019,0.032,15,-0.00584648,0.0126148,79,0.00399559,0,900,0,104.077,4079,-0.00584648,-0.0126148,79,0.019,-0.032,15,0.023,-0.032,12,0.025,-0.032,14,0.025,0.032,-1:del 2 next j addz -0.0125:prism_ 5,0.025,0.025,0.032,10,0.023,0.032,15,0.023,-0.032,10,0.025,-0.032,10,0.025,0.032,-1:del 1 endif return "IKSA-box": if bnobox then return material matoperatorbox:rotx 90 if bdoormounted then muly -1 mulz 1-2*blogomir if not(blogoleftside) then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)+logolength*blogomir if blogoposother then lpx=wbox -lpx+logolength endif else if blogomirror then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)+logolength*blogomir else lpx=(wbox -thkboxend -logoposx)*(1-2*blogomir)+logolength*blogomir endif endif add boxdepth,logoposy*not(bdoormounted)-(boxheight-logoposy)*bdoormounted,lpx gosub "Ditec_logo" del 2+bdoormounted:addz thkboxend if lod3d=detlevel_3d_10 then prism_ 30,wbox-2*thkboxend,0.152,0.0015,15,0.152,0.152,15,0.149,0.152,15,0.147,0.148,15,0.144,0.148,15,0.143464,0.15,15,0.140536,0.15,15,0.14,0.148,15,0.137,0.148,79,0.147,0.148,979,0,90,4079,0.147,0.138,79,0.147,0.128,15,0.148,0.127,15,0.148,0.04,15, 0.147,0.039,15,0.147,0.0065,79,0.1455,0.0065,979,0,-90,4079,0.1455,0.005,79,0.1296,0.005,15,0.1296,0.003,15,0.1246,0.003,15,0.1246,0.002,15,0.1036,0.002,15,0.1036,0,15,0.1505,0,79,0.1505,0.0015,979,0,90,4079,0.152,0.0015,-1:prism_ 57,wbox-2*thkboxend, 0,0.0012,79,0.0012,0.0012,979,0,90,4079,0.0012,0,79,0.0481,0,15,0.0481,0.002,15,0.0271,0.002,15,0.0271,0.003,15,0.0221,0.003,15,0.0221,0.005,15,0.0072,0.005,79,0.0072,0.0062,979,0,-90,4079,0.006,0.0062,79,0.006,0.024,15,0.005,0.025,15,0.005,0.037,15, 0.006,0.038,15,0.006,0.05,15,0.005,0.051,15,0.005,0.101,15,0.006,0.102,15,0.006,0.114,15,0.005,0.115,15,0.005,0.127,15,0.006,0.128,15,0.006,0.146,79,0.008,0.146,979,0,-90,4079,0.008,0.148,79,0.009,0.148,79,0.009,0.146,979,0,-90,4079,0.011,0.146,79, 0.011,0.143,79,0.012,0.143,979,0,90,4079,0.012,0.142,79,0.015,0.142,79,0.015,0.143,979,0,90,4079,0.016,0.143,79,0.016,0.147,79,0.017,0.147,979,0,-90,4079,0.017,0.148,79,0.14,0.148,15,0.140536,0.15,15,0.143464,0.15,15,0.144,0.148,15,0.147,0.148,15, 0.147,0.152,15,0.0012,0.152,79,0.0012,0.1508,979,0,90,4079,0,0.1508,79,0,0.0012,-1:prism_ 5,wbox-2*thkboxend,0.03085,0.0095195,15,0.12085,0.0095195,15,0.12085,0.0050195,15,0.03085,0.0050195,15,0.03085,0.0095195,-1:material matboxend for i=0 to 1 addz -thkboxend+i*(wbox -thkboxend):prism_ 14,thkboxend,0.0012,0.152,79,0.0012,0.1508,900,0,90,4079,0,0.1508,79,0,0.0012,79,0.0012,0.0012,900,0,90,4079,0.0012,0,79,0.1505,0,79,0.1505,0.0015,900,0,90,4079,0.152,0.0015,79,0.152,0.152,15,0.0012,0.152,-1 del 1 next i endif if lod3d=detlevel_3d_50 then prism_ 7,wbox-2*thkboxend,0.152,0.152,15,0.147,0.152,15,0.147,0.005,15,0.1036,0.005,15,0.1036,0,15,0.152,0,15,0.152,0.152,-1:prism_ 9,wbox-2*thkboxend,0.147,0.152,15,0.147,0.148,15,0.006,0.148,15,0.006,0.005,15,0.0481,0.005,15,0.0481,0,15,0,0,15, 0,0.152,15,0.147,0.152,-1:prism_ 5,wbox-2*thkboxend,0.03085,0.0095195,15,0.12085,0.0095195,15,0.12085,0.0050195,15,0.03085,0.0050195,15,0.03085,0.0095195,-1:material matboxend for i=0 to 1 addz -thkboxend+i*(wbox -thkboxend):prism_ 5,thkboxend,0,0,15,0,0.152,15,0.152,0.152,15,0.152,0,15,0,0,-1:del 1 next i endif del 1 if lod3d=detlevel_3d_100 then cprism_ matboxend,matboxend,matoperatorbox,5,wbox,0,0,15,0,0.152,15,0.152,0.152,15,0.152,0,15,0,0,-1 endif if not(bismacro) then unid=unid+1:hotspot 0,0,0,unid:unid=unid+1:hotspot 0.152,0,0,unid:unid=unid+1:hotspot 0.152,0.152,0,unid:unid=unid+1:hotspot 0,0.152,0,unid:unid=unid+1:hotspot 0,0,wbox,unid:unid=unid+1:hotspot 0.152,0,wbox,unid:unid=unid+1:hotspot 0.152,0.152,wbox,unid unid=unid+1:hotspot 0,0.152,wbox,unid else unid=unid+8 endif del 1 return "IKSA_arm1": material matoperatorarm if lod3d=detlevel_3d_10 then cylind 0.0065+diffzarm,0.013:addz -0.0246:cylind 0.0045,0.0175:del 1:rotx 90:addz -0.021:prism_ 26,0.042,-0.0318721,-0.005,79,-0.0318721,-0.0150034,79,-0.0268721,-0.0150034,900,0,90,4079,-0.0268721,-0.0200034,79,0.0672525,-0.0200034,15, 0.0820579,-0.0504458,79,0.0901515,-0.0465095,900,0,64.0643,4079,0.0901515,-0.0555095,79,0.091,-0.0555095,8,0.091,-0.0494709,13,0.0900897,-0.0494707,13,0.0733435,-0.0150631,79,0.0652511,-0.0190017,900,0,64.0477,4079,0.0652511,-0.0100017,79, 0.0318721,-0.0100017,15,0.0318721,-0.005,79,0.0268721,-0.005,900,0,90,4079,0.0268721,0,79,-0.0268721,0,79,-0.0268721,-0.005,900,0,90,4079,-0.0318721,-0.005,-1:del 2:add 0.091,0,-0.0555:prism_ 7,0.006,0,-0.021,13,0.175128,-0.014,79,0.175128,0,900, 0,180,4079,0.175128,0.014,79,0,0.021,8,0,-0.021,-1:addx 0.175:mulz -1:cone 0.0044,0.0105,0.0077,90,90:del 2:del 1 endif if lod3d=detlevel_3d_50 then rotx 90:addz -0.021:prism_ 11,0.042,-0.0318721,diffzarm,15,-0.0318721,-0.0200034,15,0.0672525,-0.0200034,79,0.0845207,-0.0555095,79,0.091,-0.0555095,8,0.091,-0.0494709,13,0.0900897,-0.0494707,79,0.0708801,-0.0100017,15,0.0318721,-0.0100017,15, 0.0318721,diffzarm,15,-0.0318721,diffzarm,-1:del 2:add 0.091,0,-0.0555:prism_ 7,0.006,0,-0.021,13,0.175128,-0.014,79,0.175128,0,900,0,180,4079,0.175128,0.014,79,0,0.021,8,0,-0.021,-1:del 1 endif return "IKSA_arm1a": material matoperatorarm if lod3d=detlevel_3d_10 then addz -0.007:cylind 0.014,0.012:addz -0.008 gosub "screw_20/8" del 1:del 1:roty 90:cylind 0.040,0.005:addz 0.040 gosub "screw_20/8" addz 0.008:cylind 0.224,0.008:addz 0.224 gosub "screw_20/8" addz 0.008:cylind 0.040,0.005:addz 0.040:roty -90:addz -0.007:cylind 0.014,0.012:mulz -1:cone 0.003,0.009,0.011,90,90:addz 0.003+0.002 gosub "screw_20/8" del 1:del 1:addz 0.014:cone 0.003,0.009,0.011,90,90:addz 0.003+0.002 gosub "screw_20/8" del 1:del 1:del 3:del 1:del 1:del 1:del 1:del 1 endif if lod3d=detlevel_3d_50 then addz -0.015:cylind 0.026,0.012:del 1:roty 90:cylind 0.320,0.008:addz 0.320:roty -90:addz -0.020:cylind 0.008,0.012:addz 0.010:cylind 0.020,0.012:addz 0.022:cylind 0.008,0.012:del 1:del 1:del 2:del 1:del 1 endif return "IKSA_arm2": material matoperatorarm if lod3d=detlevel_3d_10 then cylind 0.0065,0.013:addz -0.010:hprism_ matoperatorarm,matoperatorarm,matoperatorarm,matoperatorarm,7,0.010,0,0.002,1,-0.0158948,0.019812,12,-0.039624,0.019812,14,-0.039624,-0.019812,14,-0.0158948,-0.019812,78,0,0,900,0,257.479,4079, -0.0158948,0.019812,-1:addz -0.010:prism_ 13,0.010,0.00202351,0.0253193,75,0,0,900,0,43.3088,4075,-0.0158948,0.019812,75,-0.039624,0.019812,11,-0.039624,-0.019812,11,-0.0158948,-0.019812,75,0,0,900,0,43.3088,4079,0.00202351,-0.0253193,79, 0.05,-0.0222869,8,0.05,0.0222869,13,0.00202351,0.0253193,-1:addx 0.050:rotx 90:addz -0.0222869:prism_ 21,2*0.0222869,0.0245963,-0.024,79,0.035,-0.024,8,0.035,-0.014,13,0.0342871,-0.014,79,0.0342871,-0.011,900,0,-49.1516,4079,0.0320178,-0.0129628,79, 0.0130603,0.00896218,79,0.010791,0.007,900,0,49.1516,4079,0.010791,0.01,79,0,0.01,8,0,0,13,0.00110015,0,79,0.00110015,-0.003,900,0,-49.1516,4079,0.00336948,-0.00103782,79,0.0223269,-0.0229628,79,0.0245963,-0.021,900,0,49.1516,4079,0.0245963,-0.024,-1 del 3:add 0.050+0.035,0,-0.024:prism_ 12,0.010,0,-0.0222869,13,0.0362762,-0.0197783,79,0.0354,-0.00710858,900,0,86.6864,4079,0.0480992,-0.00696624,79,0.0448879,0.279542,79,0.0321887,0.2794,900,0,178.716,4079,0.0194895,0.279542,79,0.0165883,0.0207008,15, 0,0.0222869,8,0,-0.0222869,-1:add 0.0321887,0.2794,-0.008:cone 0.008,0.008,0.011,90,90:material "_black":addz -0.0035:cone 0.0035,0.015,0.0065,90,90:addz -0.020:cylind 0.020,0.015:addz -0.0045:cone 0.0045,0.0045,0.015,90,90:del 1:del 1:del 1:del 1:del 1 del 1:del 1 endif if lod3d=detlevel_3d_50 then addz -0.010:prism_ 7,0.010,-0.0158948,0.019812,12,-0.039624,0.019812,14,-0.039624,-0.019812,14,-0.0158948,-0.019812,78,0,0,900,0,257.479,4079,-0.0158948,0.019812,-1:addz -0.010:prism_ 13,0.010,0.00202351,0.0253193,75,0,0,900,0,43.3088,4075, -0.0158948,0.019812,75,-0.039624,0.019812,11,-0.039624,-0.019812,11,-0.0158948,-0.019812,75,0,0,900,0,43.3088,4079,0.00202351,-0.0253193,79,0.05,-0.0222869,8,0.05,0.0222869,13,0.00202351,0.0253193,-1:addx 0.050:rotx 90:addz -0.0222869 prism_ 9,2*0.0222869,0.0329151,-0.0140006,15,0.012163,0.01,15,0,0.01,8,0,0,13,0.00247212,0,15,0.0232243,-0.0240006,15,0.035,-0.0240006,8,0.035,-0.0140006,13,0.0329151,-0.0140006,-1:del 3:add 0.050+0.035,0,-0.024:prism_ 12,0.010,0,-0.0222869,13, 0.0362762,-0.0197783,79,0.0354,-0.00710858,900,0,86.6864,4079,0.0480992,-0.00696624,79,0.0448879,0.279542,79,0.0321887,0.2794,900,0,178.716,4079,0.0194895,0.279542,79,0.0165883,0.0207008,15,0,0.0222869,8,0,-0.0222869,-1:add 0.0321887,0.2794,-0.008 cone 0.008,0.008,0.011,90,90:material "_black":addz -0.028:cylind 0.028,0.015:del 1:del 1:del 1:del 1:del 1 endif return "IKSA_U_join": material matoperatorarm if lod3d=detlevel_3d_10|lod3d=detlevel_3d_50 then for j=-1 to 1 step 2 mulz j:addz 0.010:prism_ 11,0.002,0.018,0.032,14,0.016,0.032,13,0.01,0.032,15,-0.0122381,0.00658505,79,-0.00471232,0,900,0,82.3719,4079,-0.0122381,-0.00658505,79,0.01,-0.032,15,0.016,-0.032,12,0.018,-0.032,14,0.018,0.032,-1:del 2 next j addz -0.010:prism_ 5,0.020,0.018,0.032,10,0.016,0.032,15,0.016,-0.032,10,0.018,-0.032,10,0.018,0.032,-1:del 1 endif return "screw_14/6": scrw=0.014/sqr (3):resol 6:prism_ 7,0.006,scrw,0,15,scrw/2,0.007,15,-scrw/2,0.007,15,-scrw,0,15,-scrw/2,-0.007,15,scrw/2,-0.007,15,scrw,0,-1:resol gs_resol return "screw_18/6": scrw=0.018/sqr (3):resol 6:prism_ 7,0.006,scrw,0,15,scrw/2,0.009,15,-scrw/2,0.009,15,-scrw,0,15,-scrw/2,-0.009,15,scrw/2,-0.009,15,scrw,0,-1:resol gs_resol return "screw_20/8": scrw=0.020/sqr (3):resol 6:prism_ 7,0.008,scrw,0,15,scrw/2,0.010,15,-scrw/2,0.010,15,-scrw,0,15,-scrw/2,-0.010,15,scrw/2,-0.010,15,scrw,0,-1:resol gs_resol return "DAB205-box": if bnobox then return material matoperatorbox:rotx 90 if bdoormounted then muly -1 mulz 1-2*blogomir if not(blogoleftside) then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)+logolength*blogomir if blogoposother then lpx=wbox -lpx+logolength endif else if blogomirror then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)-logolength*(1-2*blogomir) if blogorightside then lpx=(wbox -thkboxend -logoposx)*(1-2*blogomir)-logolength*(1-2*blogomir) else lpx=(wbox -thkboxend -logoposx)*(1-2*blogomir)+logolength*blogomir if blogorightside then lpx=(logoposx+thkboxend+logolength)*(1-2*blogomir)-logolength*blogomir endif endif add boxdepth,logoposy*not(bdoormounted)-(boxheight-logoposy)*bdoormounted,lpx gosub "Ditec_logo" del 2+bdoormounted if lod3d=detlevel_3d_10 then addz thkboxend:prism_ 165,wbox-2*thkboxend,0.0261836,0.1076,15,0.117252,0.1076,15,0.117311,0.10759,15,0.117367,0.10756,15,0.11741,0.107514,15,0.117435,0.107456,15,0.117439,0.107393,15,0.117422,0.107332,15,0.117386,0.10728,15,0.117335,0.107242,79, 0.11844,0.105,900,0,104.293,4079,0.11654,0.103375,79,0.117015,0.103782,900,0,180,4079,0.11749,0.104188,79,0.11844,0.105,900,0,-261.058,4079,0.11939,0.104188,79,0.119865,0.103782,900,0,180,4079,0.12034,0.103375,79,0.11844,0.105,900,0,104.293,4079, 0.119545,0.107242,79,0.119496,0.107278,15,0.119459,0.107329,15,0.119441,0.10739,15,0.119445,0.107453,15,0.119469,0.107511,15,0.119511,0.107559,15,0.119566,0.107589,15,0.119629,0.1076,15,0.12544,0.1076,79,0.12544,0.105,900,0,-90,4079,0.12804,0.105,79, 0.12804,0.0148689,79,0.12704,0.0148688,900,0,-31.8306,4079,0.12789,0.0143415,79,0.17071,-0.01224,900,0,11.3544,4079,0.123494,0.00539084,79,0.119185,0.007,900,0,-63.9399,4079,0.119633,0.00242183,79,0.119618,0.00242101,15,0.119559,0.00243019,15, 0.119508,0.00245813,15,0.119468,0.00250167,15,0.119445,0.00255591,15,0.119441,0.00261473,15,0.119457,0.00267149,15,0.119491,0.00271981,15,0.119538,0.00275423,79,0.11844,0.00499999,900,0,104.465,4079,0.12034,0.00662457,79,0.119865,0.00621843,900, 0,180,4079,0.11939,0.00581229,79,0.11844,0.005,900,0,-261.058,4079,0.11749,0.00581229,79,0.117015,0.00621843,900,0,180,4079,0.11654,0.00662457,79,0.11844,0.005,900,0,104.293,4079,0.117335,0.00275754,79,0.117384,0.00272247,15,0.117421,0.00267104,15, 0.117439,0.0026103,15,0.117435,0.0025471,15,0.117411,0.00248857,15,0.117369,0.0024413,15,0.117314,0.00241062,15,0.117252,0.0024,15,0.0261836,0.0024,79,0.0261836,0.000399993,900,0,25.8419,4079,0.0253118,0.0022,79,0.02444,0.004,900,0,-25.8419,4079, 0.02444,0.002,79,0.00113999,0.002,79,0.00113999,0.00150001,900,0,90,4079,0.00064,0.0015,79,0.000639992,0.000499997,79,0.00114,0.000500002,900,0,90,4079,0.00114,-9.77407e-010,79,0.0477,0,79,0.0477,0.000249997,900,0,90,4079,0.04795,0.000249999,79, 0.04795,0.000560001,79,0.0482,0.000559993,900,0,-90,4079,0.0482,0.000809999,79,0.0502,0.000809997,79,0.0502,0.000559999,900,0,-90,4079,0.05045,0.000559999,79,0.05045,0.000250001,79,0.0507,0.000249993,900,0,90,4079,0.0507,-9.77408e-010,79,0.119185,0,79, 0.119185,0.00699999,900,0,69.5238,4079,0.125743,0.00455127,79,0.17071,-0.01224,900,0,-11.809,4079,0.130131,0.0133984,79,0.12844,0.0144667,900,0,32.2852,4079,0.13044,0.0144667,79,0.13044,0.105,79,0.12544,0.105,900,0,90,4079,0.12544,0.11,79, 0.0507,0.11,79,0.0507,0.10975,900,0,90,4079,0.05045,0.10975,79,0.05045,0.10944,79,0.0502,0.10944,900,0,-90,4079,0.0502,0.10919,79,0.0482,0.10919,79,0.0482,0.10944,900,0,-90,4079,0.04795,0.10944,79,0.04795,0.10975,79,0.0477,0.10975,900,0,90,4079, 0.0477,0.11,79,0.00113999,0.11,79,0.00113999,0.1095,900,0,90,4079,0.00064,0.1095,79,0.000639992,0.1085,79,0.00114,0.1085,900,0,90,4079,0.00114,0.108,79,0.0109153,0.108,79,0.0109153,0.10775,900,0,-78.463,4079,0.0111602,0.1078,79,0.01214,0.108,900, 0,156.926,4079,0.0131198,0.1078,79,0.0133647,0.10775,900,0,-78.463,4079,0.0133647,0.108,79,0.02444,0.108,79,0.02444,0.106,900,0,-25.8419,4079,0.0253118,0.1078,79,0.0261836,0.1096,900,0,25.8419,4079,0.0261836,0.1076,-1:prism_ 163,wbox-2*thkboxend, 0.00999999,0.01091,15,0.00999999,0.00821,79,0.00974999,0.00820999,900,0,-90,4079,0.00975,0.00796,79,0.00533001,0.00796,79,0.00533,0.00821,900,0,-90,4079,0.00508,0.00821,79,0.00507999,0.02681,79,0.00533,0.02681,900,0,-90,4079,0.00533,0.02706,79, 0.00983399,0.02706,79,0.00983399,0.02681,900,0,-90,4079,0.010084,0.02681,79,0.010084,0.02411,79,0.011084,0.02411,900,0,90,4079,0.011084,0.02311,79,0.01184,0.02311,79,0.01184,0.02336,900,0,90,4079,0.01209,0.02336,79,0.01209,0.027524,79, 0.01009,0.027524,900,0,90,4079,0.01009,0.029524,79,0.00533001,0.029524,79,0.00533,0.029774,900,0,-90,4079,0.00508,0.029774,79,0.00507999,0.080226,79,0.00533,0.080226,900,0,-90,4079,0.00533,0.080476,79,0.01009,0.080476,79,0.01009,0.082476,900,0,90,4079, 0.01209,0.082476,79,0.01209,0.08664,79,0.01184,0.08664,900,0,90,4079,0.01184,0.08689,79,0.011084,0.08689,79,0.011084,0.08589,900,0,90,4079,0.010084,0.08589,79,0.010084,0.08319,79,0.009834,0.08319,900,0,-90,4079,0.009834,0.08294,79,0.00533001,0.08294,79, 0.00533,0.08319,900,0,-90,4079,0.00508,0.08319,79,0.00507999,0.10179,79,0.00533,0.10179,900,0,-90,4079,0.00533,0.10204,79,0.00975,0.10204,79,0.00975,0.10179,900,0,-90,4079,0.01,0.10179,79,0.00999999,0.09909,79,0.011,0.09909,900,0,90,4079, 0.011,0.09809,79,0.01184,0.09809,79,0.01184,0.09834,900,0,90,4079,0.01209,0.09834,79,0.01209,0.103,79,0.01409,0.103,900,0,-90,4079,0.01409,0.105,79,0.01832,0.105,79,0.01832,0.10525,900,0,90,4079,0.01857,0.10525,79,0.01857,0.10575,79,0.01882,0.10575,900, 0,-90,4079,0.01882,0.106,79,0.02032,0.106,79,0.02032,0.10575,900,0,-90,4079,0.02057,0.10575,79,0.02057,0.10525,79,0.02082,0.10525,900,0,90,4079,0.02082,0.105,79,0.02153,0.105,79,0.02153,0.106,900,0,90,4079,0.02253,0.106,79,0.02053,0.106,900,0,90,4079, 0.02053,0.108,79,0.0139638,0.108,79,0.0139638,0.107,900,0,61.2643,4079,0.013087,0.107481,79,0.01214,0.108,900,0,-140.43,4079,0.0110793,0.107797,79,0.0108337,0.10775,900,0,79.1657,4079,0.0108337,0.108,79,0.000999997,0.108,79,0.000999997,0.107,900, 0,90,4079,0,0.107,79,-5.35115e-009,0.003,79,0.000999997,0.003,900,0,90,4079,0.001,0.002,79,0.0108337,0.002,79,0.0108337,0.00225,900,0,79.1657,4079,0.0110793,0.00220301,79,0.01214,0.002,900,0,-140.43,4079,0.013087,0.00251923,79,0.0139638,0.003,900, 0,61.2643,4079,0.0139638,0.002,79,0.02053,0.002,79,0.02053,0.00399999,900,0,90,4079,0.02253,0.004,79,0.02153,0.004,900,0,90,4079,0.02153,0.005,79,0.02082,0.005,79,0.02082,0.00475001,900,0,90,4079,0.02057,0.00475,79,0.02057,0.00425,79, 0.02032,0.00425,900,0,-90,4079,0.02032,0.004,79,0.01882,0.004,79,0.01882,0.00425001,900,0,-90,4079,0.01857,0.00425,79,0.01857,0.00475,79,0.01832,0.00475,900,0,90,4079,0.01832,0.005,79,0.01409,0.005,79,0.01409,0.007,900,0,-90,4079,0.01209,0.007,79, 0.01209,0.01166,79,0.01184,0.01166,900,0,90,4079,0.01184,0.01191,79,0.011,0.01191,79,0.011,0.01091,900,0,90,4079,0.00999999,0.01091,-1:del 1:material matboxend for i=0 to 1 addz i*wbox:mulz -2*i+1:prism_ 17,thkboxend,0,0.11,15,0.12544,0.11,79,0.12544,0.105,900,0,-90,4079,0.13044,0.105,79,0.13044,0.0144667,79,0.12844,0.0144668,900,0,-32.2807,4079,0.130131,0.0133984,79,0.17071,-0.01224,900,0,11.809,4079, 0.125743,0.00455127,79,0.119185,0.007,900,0,-69.5237,4079,0.119185,0,79,0,0,15,0,0.11,-1:del 2 next i if bdoubleswing then material matboxend for i=-1 to 1 step 2 addz a/2+i*(a/2-wboxorig):mul 1+eps,1+eps,i:prism_ 17,thkboxend,0,0.11,15,0.12544,0.11,79,0.12544,0.105,900,0,-90,4079,0.13044,0.105,79,0.13044,0.0144667,79,0.12844,0.0144668,900,0,-32.2807,4079,0.130131,0.0133984,79,0.17071,-0.01224,900,0,11.809,4079, 0.125743,0.00455127,79,0.119185,0.007,900,0,-69.5237,4079,0.119185,0,79,0,0,15,0,0.11,-1:del 2 next i endif endif if lod3d=detlevel_3d_50 then addz thkboxend:prism_ 15,wbox-2*thkboxend,0,0.11,15,0.13044,0.11,15,0.13044,0.0140219,15,0.123485,0,15,0,0,15,0,0.002,15,0.02444,0.002,15,0.0261836,0.0024,15,0.122026,0.0024,15,0.12804,0.0146477,15,0.12804,0.1076,15,0.0261836,0.1076,15,0.02444,0.108,15, 0,0.108,15,0,0.11,-1:prism_ 13,wbox-2*thkboxend,0.02253,0.105,15,0.01209,0.105,15,0.01209,0.080476,15,0.00507999,0.080476,15,0.00507999,0.029524,15,0.01209,0.029524,15,0.01209,0.005,15,0.02253,0.005,15,0.02253,0.002,15,0,0.002,15,0,0.108,15, 0.02253,0.108,15,0.02253,0.105,-1:del 1:material matboxend for i=0 to 1 addz i*wbox:mulz -2*i+1:prism_ 6,thkboxend,0,0.11,15,0.13044,0.11,15,0.13044,0.0140219,15,0.123485,0,15,0,0,15,0,0.11,-1:del 2 next i if bdoubleswing then material matboxend for i=-1 to 1 step 2 addz a/2+i*(a/2-wboxorig):mul 1+eps,1+eps,i:prism_ 6,thkboxend,0,0.11,15,0.13044,0.11,15,0.13044,0.0140219,15,0.123485,0,15,0,0,15,0,0.11,-1:del 2 next i endif endif if lod3d=detlevel_3d_100 then cprism_ matboxend,matboxend,matoperatorbox,5,wbox,0,0,15,0,0.110,15,0.130,0.110,15,0.130,0,15,0,0,-1 endif if not(bismacro) then unid=unid+1:hotspot 0,0,0,unid:unid=unid+1:hotspot boxdepth,0,0,unid:unid=unid+1:hotspot boxdepth,boxheight,0,unid:unid=unid+1:hotspot 0,boxheight,0,unid:unid=unid+1:hotspot 0,0,wbox,unid:unid=unid+1:hotspot boxdepth,0,wbox,unid unid=unid+1:hotspot boxdepth,boxheight,wbox,unid:unid=unid+1:hotspot 0,boxheight,wbox,unid else unid=unid+8 endif del 1 return "DAB205-arm1": material matoperatorarm if lod3d=detlevel_3d_10 then addz -(0.0165+diffzarm):cylind 0.0165+diffzarm,0.011:addz -0.007:cylind 0.007,0.035/2:addz -0.008:mulz -1:cylind 0.0035,0.016:addz 0.0035:cone 0.0015,0.016,0.009,90,90:del 1:del 2:del 1:del 1 if not(bismacro) then addz -0.0365 gosub "setDiffZarm" del 1 endif addz -0.0315 -diffzarm:prism_ 9,0.008,0,-0.0175,79,armlength1 -0.044,-0.0175,79,armlength1,-0.012,79,armlength1,0,979,armlength1,0.012,1079,armlength1 -0.044,0.0175,79,0,0.0175,79,0,-0.0175,1079,0,-0.0175,-1:addx armlength1:mulz -1:cylind 0.012,0.006 addz 0.012:cylind 0.012,0.012:del 1:del 2:del 1 endif if lod3d=detlevel_3d_50 then addz -(0.0165+diffzarm):cylind 0.0165+diffzarm,0.011:addz -0.007:cylind 0.007,0.035/2:del 1:del 1 if not(bismacro) then addz -0.0365 gosub "setDiffZarm" del 1 endif addz -0.0315 -diffzarm:prism_ 9,0.008,0,-0.0175,79,armlength1 -0.044,-0.0175,79,armlength1,-0.012,79,armlength1,0,979,armlength1,0.012,3079,armlength1 -0.044,0.0175,79,0,0.0175,79,0,-0.0175,1079,0,-0.0175,-1:addx armlength1:mulz -1:cylind 0.024,0.006 del 2:del 1 endif return "DAB205-arm2": material matoperatorarm if lod3d=detlevel_3d_10 then addz -(0.0165+diffzarm):cylind 0.0165+diffzarm,0.011:addz -0.007:cylind 0.007,0.035/2:addz -0.008:mulz -1:cylind 0.0035,0.016:addz 0.0035:cone 0.0015,0.016,0.009,90,90:del 1:del 2:del 1:del 1 if not(bismacro) then addz -0.0365 gosub "setDiffZarm" del 1 endif addz -0.0315 -diffzarm:prism_ 6,0.008,0,-0.0175,79,0.099,-0.0175,8,0.099,0.0175,13,0,0.0175,79,0,-0.0175,1079,0,-0.0175,-1:add 0.100,0.0175,0:rotx 90:prism_ 18,0.035,0.0115931117924,-0.01005293480471,79,0.009844813679327,-0.0002451086588248,79, 0,-0.002,979,0,79.89287606067,4079,0,0.008,79,-0.001,0.008,8,-0.001,0,13,0,0,79,0,-0.002777488960621,979,0,-79.89287606067,4079,0.00273438613137,-0.002290069827901,79,0.005,-0.015,12,0.005,-0.023,14,0.0175,-0.023,8,0.0175,-0.015,13,0.0175,-0.009,979, 0,-79.89287606067,4079,0.0115931117924,-0.01005293480471,-1:del 2:add 0.1225,0,-0.023:prism_ 9,0.008,-0.005,-0.0175,13,0.0075,-0.0175,79,0.0175,-0.0075,1079,0.011,0.381,79,0.0,0.381,979,-0.011,0.381,1079,-0.0175,0.0175,12,-0.005,0.0175,8, -0.005,-0.0175,-1:addy 0.381:mulz -1:cylind 0.012,0.006:addz 0.012:cylind 0.026,0.012:del 1:del 2:del 1:del 1 endif if lod3d=detlevel_3d_50 then addz -(0.0165+diffzarm):cylind 0.0165+diffzarm,0.011:addz -0.007:cylind 0.007,0.035/2:del 1:del 1 if not(bismacro) then addz -0.0365 gosub "setDiffZarm" del 1 endif addz -0.0315 -diffzarm:prism_ 8,0.008,0,-0.0175,79,0.105,-0.0175,12,0.113,-0.0175,14,0.113,0.0175,14,0.105,0.0175,13,0,0.0175,79,0,-0.0175,1079,0,-0.0175,-1:add 0.105,-0.0175,-0.015:prism_ 5,0.015,0,0,10,0.008,0,11,0.008,0.035,11,0,0.035,14,0,0,-1:del 1 add 0.1225,0,-0.023:prism_ 10,0.008,-0.0175,-0.0175,11,-0.0095,-0.0175,13,0.0075,-0.0175,79,0.0175,-0.0075,1079,0.011,0.381,79,0.0,0.381,979,-0.011,0.381,3079,-0.0175,0.0175,12,-0.0175,0.0175,9,-0.0175,-0.0175,-1:addy 0.381:mulz -1:cylind 0.038,0.006 del 2:del 1:del 1 endif return "DAB205_U_join": goto "DAB105_U_join" return "materialDefs": dim tmp_lwa_coplain_color[3]:tmp_lwa_coplain_color[1]=0.3568627536297:tmp_lwa_coplain_color[2]=0.3568627536297:tmp_lwa_coplain_color[3]=0.3568627536297:define material "_black" 20,0.0392157,0.0392157,0.0392157,0.7,0.8,0.1,0,11,0, 0.921569,0.921569,0.921569,0,0,0,0,0,-1,0 additional_data lwa_color="LWA_COPLAIN",lwa_coplain_color=tmp_lwa_coplain_color,lwa_transparency="LWA_TRNONE",lwa_displacement="LWA_DPNONE",lwa_texturespace="LWA_TSNONE",lwa_pipeline="LWA_PLNONE", lwa_reflectance="LWA_RFMATTE",lwa_rfmatte_ambient=0.1000000014901,lwa_rfmatte_diffuse=1 return "setLengthArm2": if bismacro|not(beditpositions) then return unid=unid+1:hotspot 0,0,0,unid,armlength2,1+128:unid=unid+1:hotspot -0.1,0,0,unid,armlength2,3:unid=unid+1:hotspot armlength2,0,0,unid,armlength2,2 return "setDiffZarm": if bismacro then return unid=unid+1:hotspot 0,0,0,unid,diffzarm,1+128:unid=unid+1:hotspot 0,0,0.1,unid,diffzarm,3:unid=unid+1:hotspot 0,0,-diffzarm,unid,diffzarm,2 return 14001: alfa=90-55:roty -alfa+180:cutplane:del 1:addz oplength:roty alfa:cutplane:del 2:endl=0.022 gosub 15011 gosub 15001 addz oplength -endl gosub 15011 del 1:cutend:cutend return 15001: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen:addz endl if lod3d=detlevel_3d_10 then prism_ 124,oplength-2*endl,0.0259336,-0.0436468,79,-0.0358276,-0.0225,900,0,37.802,4079,0.0259336,-0.0013532,79,0.02404,-0.0020016,900,0,71.1647,4079,0.0240377,-2.96681e-009,79,0.0209502,0,15,0.0209502,-0.004,15,0.0218541,-0.004,79, 0.0218541,-0.00500462,900,0,-72.9843,4079,0.0228147,-0.00471064,79,-0.0358278,-0.0225,900,0,-25.2209,4079,0.0248047,-0.0313946,79,0.0238152,-0.03125,900,0,-81.4861,4079,0.0238186,-0.03225,79,0.00500004,-0.03225,79,0.00500004,-0.0312536,900, 0,-90.2051,4079,0.0040036,-0.03125,79,0.00400003,-0.005,79,0.00500182,-0.00500178,900,0,-90.2051,4079,0.00500718,-0.00400001,79,0.00995008,-0.004,15,0.00995008,0,15,0.00180002,0,79,0.00180002,-0.000296438,900,0,90.6875,4079,0.0015036,-0.0003,79, 0.00150001,-0.0007,79,0.000701808,-0.000701787,900,0,-90.2576,4079,0.000700006,-0.00149999,79,0.000300003,-0.0015,79,0.000303614,-0.00179999,900,0,89.3124,4079,3.60274e-006,-0.0018,79,0,-0.0149,79,0.000601801,-0.0148982,900,0,90.345,4079, 0.000607215,-0.0155,79,0.000900008,-0.0155,79,0.000903597,-0.0161,900,0,-90.3433,4079,0.0015036,-0.0161,79,0.00150001,-0.0289,79,0.000901808,-0.0289018,900,0,-90.3439,4079,0.000900001,-0.0295,79,0.000600005,-0.0295,79,0.000603608,-0.0301,900, 0,89.6564,4079,3.60274e-006,-0.0301,79,0,-0.0432,79,0.000301801,-0.0431982,900,0,90.6899,4079,0.000307215,-0.0435,79,0.000700006,-0.0435,79,0.000703599,-0.0443,900,0,-90.2576,4079,0.0015036,-0.0443,79,0.00150001,-0.0447,79,0.00180181,-0.0446982,900, 0,89.3149,4079,0.00180002,-0.045,79,0.0240377,-0.045,79,0.02404,-0.0429984,900,0,71.1639,4079,0.0259336,-0.0436468,-1,0.0228148,-0.0402893,79,-0.0358276,-0.0225,900,0,4.66523,4079,0.0240673,-0.0354608,79,0.0230906,-0.0352494,900,0,102.449,4079, 0.0230864,-0.03425,79,0.0193025,-0.03425,79,0.019306,-0.03525,900,0,59.9014,4079,0.0184391,-0.0347515,79,0.0181478,-0.03525,79,0.0172826,-0.0347515,900,0,-60.0989,4079,0.0172818,-0.03575,79,0.0121685,-0.03575,79,0.012172,-0.03475,900,0,-59.8996,4079, 0.0113051,-0.0352485,79,0.0110138,-0.03475,79,0.0101486,-0.0352485,900,0,60.1008,4079,0.0101477,-0.03425,79,0.00500004,-0.03425,79,0.00500362,-0.03525,900,0,89.7949,4079,0.0040036,-0.03525,79,0.00400003,-0.04,79,0.00500182,-0.0399982,900,0,90.2051,4079, 0.00500718,-0.041,79,0.00937273,-0.041,79,0.00937625,-0.042,900,0,-60.1009,4079,0.0102414,-0.0414985,79,0.0105274,-0.042,79,0.0113943,-0.0414985,900,0,59.8988,4079,0.0113935,-0.0425,79,0.0195068,-0.0425,79,0.0195102,-0.0415,900,0,60.0984,4079, 0.0203754,-0.0420015,79,0.0206615,-0.0415,79,0.0215284,-0.0420015,900,0,-59.9019,4079,0.0215275,-0.041,79,0.0218541,-0.041,79,0.0218541,-0.0399953,900,0,72.9844,4079,0.0228148,-0.0402893,-1 endif if lod3d=detlevel_3d_50 then prism_ 18,oplength-2*endl,0,-0.045,15,0.0295,-0.045,15,0.0295,0,15,0.0209502,0,15,0.0209502,-0.004,15,0.0254678,-0.004,15,0.0254678,-0.03225,15,0.00400003,-0.03225,15,0.00400003,-0.004,15,0.00995008,-0.004,15,0.00995008,0,15,0,0,15,0,-0.045,-1, 0.00400003,-0.041,15,0.00400003,-0.03425,15,0.0254678,-0.03425,15,0.0254678,-0.041,15,0.00400003,-0.041,-1 endif del 1 return 15011: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen if lod3d=detlevel_3d_10 then prism_ 51,endl,0.0259322,-0.0436468,79,-0.035829,-0.0225,900,0,37.802,4079,0.0259322,-0.0013532,79,0.0240386,-0.0020016,900,0,71.1647,4079,0.0240363,-2.96681e-009,79,0.00179862,1.38778e-017,79,0.00179863,-0.000296438,900,0,90.6875,4079, 0.00150221,-0.0003,79,0.00149862,-0.0007,79,0.000700416,-0.000701787,900,0,-90.2576,4079,0.000698615,-0.00149999,79,0.000298611,-0.0015,79,0.000302222,-0.00179999,900,0,89.3124,4079,2.21139e-006,-0.0018,79,-1.39134e-006,-0.0149,79, 0.00060041,-0.0148982,900,0,90.345,4079,0.000605824,-0.0155,79,0.000898616,-0.0155,79,0.000902206,-0.0161,900,0,-90.3433,4079,0.00150221,-0.0161,79,0.00149862,-0.0289,79,0.000900416,-0.0289018,900,0,-90.3439,4079,0.00089861,-0.0295,79, 0.000598614,-0.0295,79,0.000602217,-0.0301,900,0,89.6564,4079,2.21139e-006,-0.0301,79,-1.39134e-006,-0.0432,79,0.00030041,-0.0431982,900,0,90.6899,4079,0.000305824,-0.0435,79,0.000698615,-0.0435,79,0.000702207,-0.0443,900,0,-90.2576,4079, 0.00150221,-0.0443,79,0.00149862,-0.0447,79,0.00180042,-0.0446982,900,0,89.3149,4079,0.00179862,-0.045,79,0.0240363,-0.045,79,0.0240386,-0.0429984,900,0,71.1639,4079,0.0259322,-0.0436468,-1 endif if lod3d=detlevel_3d_50 then prism_ 5,endl,0,-0.045,15,0.0295,-0.045,15,0.0295,0,15,0,0,15,0,-0.045,-1 endif return 14002: 15002: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen if lod3d=detlevel_3d_10 then prism_ 8,oplength,0.0001,0,15,0.00563065,0,15,0.00563065,-0.03444,15,0.0276107,-0.03444,15,0.0336907,-0.03584,15,0.0336907,-0.03936,15,0.0001,-0.03936,15,0.0001,0,-1:prism_ 7,oplength,0.0336907,0.0001,15,0.0296507,0.0001,15,0.0296507,-0.03096,15, 0.00713065,-0.03096,15,0.00713065,-0.03444,15,0.0336907,-0.03444,15,0.0336907,0.0001,-1 endif if lod3d=detlevel_3d_50 then prism_ 9,oplength,0.0336907,0.0001,15,0.0336907,-0.03936,15,0.0001,-0.03936,15,0.0001,0,15,0.00563065,0,15,0.00563065,-0.03096,15,0.0296507,-0.03096,15,0.0296507,0.0001,15,0.0336907,0.0001,-1 endif return 14003: 15003: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen if lod3d=detlevel_3d_10 then prism_ 16,oplength,-1.9126e-005,0,15,-1.9126e-005,-0.035,15,0.0399809,-0.035,15,0.0399809,0,15,0.0384809,0,79,0.0384809,-0.0025,900,0,90,4079,0.0359809,-0.0025,79,0.0359809,-0.031,15,0.00398087,-0.031,15,0.00398087,-0.0025,79,0.00148087,-0.0025,900, 0,90,4079,0.00148087,0,79,-1.9126e-005,0,15,-1.9126e-005,0,-1 endif if lod3d=detlevel_3d_50 then prism_ 10,oplength,-1.9126e-005,0,15,-1.9126e-005,-0.035,15,0.0399809,-0.035,15,0.0399809,0,15,0.0359809,0,15,0.0359809,-0.031,15,0.00398087,-0.031,15,0.00398087,0,15,-1.9126e-005,0,15,-1.9126e-005,0,-1 endif return 14004: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen if lod3d=detlevel_3d_10 then prism_ 17,oplength,0.03,-0.001,79,0.029,-0.000999996,900,0,90,4079,0.029,0,79,0.000999995,4.02332e-010,79,0.000999998,-0.000999997,900,0,90,4079,0,-0.001,79,-5.30983e-009,-0.019,79,0.000999993,-0.019,900,0,90,4079,0.00099999,-0.02,79,0.029,-0.02,79, 0.029,-0.019,900,0,90,4079,0.03,-0.019,79,0.03,-0.001,-1 endif if lod3d=detlevel_3d_50 then prism_ 5,oplength,0.03,0,15,0,0,15,0,-0.02,15,0.03,-0.02,15,0.03,0,-1 endif return 14005: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen if lod3d=detlevel_3d_10 then prism_ 17,oplength,0.0425,-0.0403,15,0.0425,-0.0032,79,0.0393,-0.0032,900,0,90,4079,0.0393,2.22045e-016,79,0.0032,2.22045e-016,79,0.0032,-0.0032,900,0,90,4079,-2.60769e-011,-0.0032,79,-2.60769e-011,-0.0403,79,0.0032,-0.0403,900,0,90,4079, 0.0032,-0.0435,79,0.0393,-0.0435,79,0.0393,-0.0403,900,0,90,4079,0.0425,-0.0403,-1 endif if lod3d=detlevel_3d_50 then prism_ 5,oplength,0.0425,-0.0435,15,-2.60769e-011,-0.0435,15,-2.60769e-011,2.22045e-016,15,0.0425,2.22045e-016,15,0.0425,-0.0435,-1 endif return 14006: material matoperatorarm:sect_fill filltype,fillpenbg,fillpenfg,contpen if lod3d=detlevel_3d_10 then addz 0.005:prism_ 20,oplength -2*0.005,0.001,0,79,0.001,-0.001,979,0,90,4079,0,-0.019,79,0.001,-0.019,979,0,90,4079,0.029,-0.02,79,0.029,-0.019,979,0,90,4079,0.03,-0.001,79,0.029,-0.001,979,0,90,4079,0.023,0,15,0.023,-0.001,15,0.029,-0.001,15, 0.029,-0.019,15,0.001,-0.019,15,0.001,-0.001,15,0.007,-0.001,15,0.007,0,15:del 1:addz oplength/2 for jk=1 to 2 addz oplength/2 -0.005:prism_ 12,0.005,0.001,0,79,0.001,-0.001,979,0,90,4079,0,-0.019,79,0.001,-0.019,979,0,90,4079,0.029,-0.02,79,0.029,-0.019,979,0,90,4079,0.03,-0.001,79,0.029,-0.001,979,0,90,4079:del 1:mulz -1 next jk del 3 endif if lod3d=detlevel_3d_50 then prism_ 5,oplength,0.03,0,15,0,0,15,0,-0.02,15,0.03,-0.02,15,0.03,0,-1 endif return "Ditec_logo": addx eps:roty 90:rotx -90:ntrans=3:logosizew=0.05:logosizeh=logosizew*(158/318) if symb_mirrored then mulx -1:addx -logosize:ntrans=ntrans+2 endif rotx 90:add 0,-logosizeh/2,eps:ntrans=ntrans+2:picture 1,logosizew,logosizeh,1:del ntrans return CSD2WWz/ !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- if ishowoperator=op_none then end fill filltype:pen contpen:line_type lthiddencontur:drawindex 10:opangle[1]=opang1_2d:opangle[2]=opang2_2d if lod2d=detlevel_2d_10&ishowoperator=op_full then project2{3} 2,270,3+32+512,8,parameters lod3d=lod2d,opang1_3d=opang1_2d,opang2_3d=opang2_2d,bnobox=1:pen fillpenfg:project2{3} 2,270,3+32+512,4,fillpenbg,0,0,0,parameters lod3d=lod2d,opang1_3d=opang1_2d,opang2_3d=opang2_2d,bnobox=1:pen contpen endif if itypeoperator=type_dab105 then if bdoubleswing then if isubtypeoperator=type_dab105_doormounted then gosub "DAB105_2_doormounted" else add2 -silldepth*bbeam,0 gosub "DAB105-box" if ishowoperator=op_full then if isubtypeoperator=type_dab105_2_pull then gosub "DAB105_2_pull" endif if isubtypeoperator=type_dab105_2_push then gosub "DAB105_2_push" endif if isubtypeoperator=type_dab105_2_pull_push then gosub "DAB105_2_pull_push" endif endif del 1 endif else if isubtypeoperator=type_dab105_doormounted then gosub "DAB105_1_doormounted" else add2 -silldepth*bbeam,-xposrot+dposbox gosub "DAB105-box" if ishowoperator=op_full then if isubtypeoperator=type_dab105_pull then gosub "DAB105_1_pull" endif if isubtypeoperator=type_dab105_push|isubtypeoperator=type_dab105_spec_push then gosub "DAB105_1_push" endif if isubtypeoperator=type_dab105_slidetrack then gosub "DAB105_1_slidetrack" endif endif del 1 endif endif endif if itypeoperator=type_dab205 then if bdoubleswing then if isubtypeoperator=type_dab205_doormounted then gosub "DAB205_2_doormounted" else add2 -silldepth*bbeam,0:blogoposother=1 gosub "DAB205-box" if isubtypeoperator=type_dab205_2_pull then gosub "DAB205_2_pull" endif if isubtypeoperator=type_dab205_2_push then gosub "DAB205_2_push" endif if isubtypeoperator=type_dab205_2_pas then gosub "DAB205_2_pas" endif if isubtypeoperator=type_dab205_2_sliding_push then opangle[1]=-opangle[1]:opangle[2]=-opangle[2] gosub "DAB205_2_sliding_push" endif if isubtypeoperator=type_dab205_2_push_pull then gosub "DAB205_2_push_pull" endif del 1 endif else if isubtypeoperator=type_dab205_doormounted then gosub "DAB205_1_doormounted" else add2 -silldepth*bbeam,-xposrot+dposbox gosub "DAB205-box" if isubtypeoperator=type_dab205_pull then gosub "DAB205_1_pull" endif if isubtypeoperator=type_dab205_push then gosub "DAB205_1_push" endif if isubtypeoperator=type_dab205_pas then gosub "DAB205_1_pas" endif if isubtypeoperator=type_dab205_sliding_push then opangle[1]=-opangle[1] gosub "DAB205_1_sliding_push" endif del 1 endif endif endif if lod2d1)@bmirropdir:imir=1 -2*bmir:fill filltype:pen contpen:line_type lthiddencontur:add2 -(silldepth+yposrot),-xposrot -(a -2*xposrot)*(i=2):railangles=opangle[1]*(i=1)+opangle[2]*(i=2):rot2 (railangles -90)*imir add2 0,(yposrot -dframesash)*imir:mul2 -2*bmirropdir+1,irailmirror[i]*imir:add2 railposx1[i],0 gosub 14000+irailtypes[i] del 2:del 2:del 1 endif next i endif end "DAB105_2_doormounted": cx0=0.060:add2 -yposrot -silldepth,-xposrot:rot2 opangle[1]:add2 yposrot -dframesash,-cx0 gosub "DAB105-box" if ishowoperator=op_full then idx=1 gosub "calc_DAB105_doorMounted" add2 cy0,-(cx -cx0):opang=opangle[1] gosub "DAB105_push" del 1 endif del 3:idx=2:add2 -yposrot -silldepth,-a+xposrot:mul2 1,-1:rot2 opangle[2]:add2 yposrot -dframesash,-cx0 gosub "DAB105-box" if ishowoperator=op_full then alfa=opangle[2] gosub "calcAngle_2dm" ang1=180 -beta0 -beta1:ang2=180 -beta2:add2 cy0,-(cx -cx0):opang=opangle[2] gosub "DAB105_push" del 1 endif del 4 return "DAB105_2_pull": idx=1 gosub "calc_DAB105_pull" if not(biserror) then add2 cy0,-cx -xposrot:rot2 -angl gosub "DAB105-arm1" del 2 endif add2 0,-a:mul2 1,-1:alfa=opangle[2] gosub "calcAngle_1" if not(biserror) then add2 cy0,-cx -xposrot:rot2 -angl gosub "DAB105-arm1" del 2 endif del 2 return "DAB105_2_push": idx=1 gosub "calc_DAB105_push" add2 cy0,-cx -xposrot:opang=opangle[1] gosub "DAB105_push" del 1:add2 0,-a:mul2 1,-1:alfa=opangle[2] gosub "calcAngle_2" ang1=180 -beta0 -beta1:ang2=180 -beta2:add2 cy0,-cx -xposrot:opang=opangle[2] gosub "DAB105_push" del 1:del 2 return "DAB105_2_pull_push": idx=1 gosub "calc_DAB105_pull" if not(biserror) then add2 cy0,-cx -xposrot:rot2 -angl gosub "DAB105-arm1" del 2 endif idx=2 gosub "calc_DAB105_push" add2 0,-a:mul2 1,-1:add2 cy0,-cx -xposrot:opang=-opangle[2] gosub "DAB105_push" del 3 return "DAB105_1_doormounted": cx0=0.060:add2 -yposrot -silldepth,-xposrot:rot2 opangle[1]:add2 yposrot -dframesash,-cx0 gosub "DAB105-box" if ishowoperator=op_full then idx=1 gosub "calc_DAB105_doorMounted" add2 cy0,-(cx -cx0):opang=opangle[1] gosub "DAB105_push" del 1 endif del 3 return "DAB105_1_pull": idx=1 gosub "calc_DAB105_pull" if not(biserror) then add2 cy0,-(cx+dposbox):rot2 -angl gosub "DAB105-arm1" del 2 endif return "DAB105_1_push": idx=1 gosub "calc_DAB105_push" add2 cy0,-(cx+dposbox):opang=opangle[1] gosub "DAB105_push" del 1 return "DAB105_1_slidetrack": idx=1 gosub "calc_DAB105_slidetrack" if not(biserror) then add2 0.063,-wbox+0.188+0.206+2*thkboxend:mul2 1,-1:rot2 -bet gosub "ST-V/H" add2 0.165,0:rot2 gam -90 gosub "ST-V/H_2" del 2:del 1:add2 -dy,-dx:rot2 -angl:add2 kl1,0:rot2 180 -kang gosub "setLengthArm2" del 2 gosub "ST-V/H_L" del 2:del 2 endif return "DAB105_push": rot2 -ang1 gosub "DAB105-arm2a" add2 armlength1,0:rot2 -ang2 gosub "setLengthArm2" gosub "DAB105-arm2b" del 2:del 1 return "DAB205_2_doormounted": cx0=0.060:add2 -yposrot -silldepth,-xposrot:rot2 opangle[1]:add2 yposrot -dframesash,-cx0 gosub "DAB205-box" idx=1 gosub "calc_DAB205_doorMounted" add2 cy0,-(cx -cx0):opang=opangle[1] gosub "DAB205_push" del 1:del 3:add2 -yposrot -silldepth,-a+xposrot:mul2 1,-1:rot2 opangle[2]:add2 yposrot -dframesash,-cx0:blogomir=1 gosub "DAB205-box" alfa=opangle[2] gosub "calcAngle_2dm" ang1=180 -beta0 -beta1:ang2=180 -beta2:add2 cy0,-(cx -cx0):opang=opangle[2] gosub "DAB205_push" del 1:del 4 return "DAB205_2_sliding_push": "DAB205_2_pull": idx=1 gosub "calc_DAB205_pull" if not(biserror) then add2 cy0,-cx -xposrot:rot2 -angl gosub "DAB205-arm1" armendposz[1]=-0.06 -diffzarm:del 1:del 1 endif add2 0,-a:mul2 1,-1:alfa=opangle[2] gosub "calcAngle_1" if not(biserror) then add2 cy0,-cx -xposrot:rot2 -angl gosub "DAB205-arm1" armendposz[2]=-0.06 -diffzarm:del 1:del 1 endif del 2 return "DAB205_2_push": idx=1 gosub "calc_DAB205_push" add2 cy0,-cx -xposrot:opang=opangle[1] gosub "DAB205_push" del 1:add2 0,-a:mul2 1,-1:alfa=opangle[2] gosub "calcAngle_2" ang1=180 -beta0 -beta1:ang2=180 -beta2:add2 cy0,-cx -xposrot:opang=opangle[2] gosub "DAB205_push" del 1:del 2 return "DAB205_2_push_pull": idx=1 gosub "calc_DAB205_pull" if not(biserror) then add2 cy0,-cx -xposrot:rot2 -angl gosub "DAB205-arm1" armendposz[1]=-0.060 -diffzarm:del 1:del 1 endif idx=2 gosub "calc_DAB205_push" add2 0,-a:mul2 1,-1:add2 cy0,-cx -xposrot:opang=-opangle[2] gosub "DAB205_push" del 3 return "DAB205_1_doormounted": cx0=0.060:add2 -yposrot -silldepth,-xposrot:rot2 opangle[1]:add2 yposrot -dframesash,-cx0 gosub "DAB205-box" idx=1 gosub "calc_DAB205_doorMounted" add2 cy0,-(cx -cx0):opang=opangle[1] gosub "DAB205_push" del 1:del 3 return "DAB205_1_sliding_push": "DAB205_1_pull": idx=1 gosub "calc_DAB205_pull" if not(biserror) then add2 cy0,-(cx+dposbox):rot2 -angl gosub "DAB205-arm1" armendposz[1]=-0.05 -diffzarm:del 1:del 1 endif return "DAB205_1_push": idx=1 gosub "calc_DAB205_push" add2 cy0,-(cx+dposbox):opang=opangle[1] gosub "DAB205_push" del 1 return "DAB205_push": rot2 -ang1 gosub "DAB205-arm2a" add2 armlength1,0:rot2 -ang2 gosub "setLengthArm2" gosub "DAB205-arm2b" del 2:del 1 return "DAB205_1_pas": idx=1 gosub "calc_DAB205_pas" add2 cy0,-(cx+dposbox):opang=opangle[1] gosub "DAB205_pas" del 1 return "DAB205_2_pas": idx=1 gosub "calc_DAB205_pas" add2 cy0,-(cx+xposrot):opang=opangle[1] gosub "DAB205_pas" del 1:idx=2 gosub "calc_DAB205_pas" add2 0,-a:mul2 1,-1:add2 cy0,-(cx+xposrot):opang=opangle[2] gosub "DAB205_pas" del 3 return "DAB205_pas": rot2 72.167:rot2 -angl:mul2 1,-1 gosub "DAB205-arm2" armendposz[idx]=-0.052:del 3 return "DAB105-box": poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,0,-wbox,1,0.130,-wbox,1,0.130,0,1,0,0,-1 if not(bbeam)|not(bismacro) then unid=unid+1:hotspot2 0.130,0,unid:unid=unid+1:hotspot2 0.130,-wbox,unid else unid=unid+2 endif if not(bismacro) then unid=unid+1:hotspot2 0,0,unid:unid=unid+1:hotspot2 0,-wbox,unid else unid=unid+2 endif return "DAB105-arm1": goto "PS-arm1" "DAB105-arm2a": goto "PS-arm2a" "DAB105-arm2b": goto "PS-arm2b" "ST-V/H_L": if lod2d=detlevel_2d_50 then line2 0,0,0.190,0:add2 0.190,0:rot2 80:line2 0,0,armlength2,0:del 2 endif return "ST-V/H": if lod2d=detlevel_2d_50 then line2 0,0,0.165,0 endif return "ST-V/H_2": if lod2d=detlevel_2d_50 then line2 0,0,0,-0.220 endif return "PS-box": poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,0,-wbox,1,0.110,-wbox,1,0.110,0,1,0,0,-1 if not(bbeam)|not(bismacro) then unid=unid+1:hotspot2 0.110,0,unid:unid=unid+1:hotspot2 0.110,-wbox,unid else unid=unid+2 endif if not(bismacro) then unid=unid+1:hotspot2 0,0,unid:unid=unid+1:hotspot2 0,-wbox,unid else unid=unid+2 endif return "PS-arm1": if lod2d=detlevel_2d_50 then line2 0,0,armlength1,0 endif return "PS-arm2a": if lod2d=detlevel_2d_50 then line2 0,0,armlength1,0 endif return "PS-arm2b": if lod2d=detlevel_2d_50 then line2 0,0,armlength2,0 endif return "IKSA-box": poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,0,-wbox,1,0.152,-wbox,1,0.152,0,1,0,0,-1 if not(bbeam)|not(bismacro) then unid=unid+1:hotspot2 0.152,0,unid:unid=unid+1:hotspot2 0.152,-wbox,unid else unid=unid+2 endif if not(bismacro) then unid=unid+1:hotspot2 0,0,unid:unid=unid+1:hotspot2 0,-wbox,unid else unid=unid+2 endif return "IKSA_arm1": if lod2d=detlevel_2d_50 then line2 0,0,armlength1,0 endif return "IKSA_arm1a": if lod2d=detlevel_2d_50 then line2 0,0,armlength2,0 endif return "IKSA_arm2": if lod2d=detlevel_2d_50 then line2 0,0,0.117,0:line2 0.117,0,0.117,0.280 endif return "DAB205-box": poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,0,-wbox,1,0.152,-wbox,1,0.152,0,1,0,0,-1 if not(bbeam)|not(bismacro) then unid=unid+1:hotspot2 0.152,0,unid:unid=unid+1:hotspot2 0.152,-wbox,unid else unid=unid+2 endif if not(bismacro) then unid=unid+1:hotspot2 0,0,unid:unid=unid+1:hotspot2 0,-wbox,unid else unid=unid+2 endif return "DAB205-arm1": goto "PS-arm1" "DAB205-arm2a": goto "PS-arm2a" "DAB205-arm2b": goto "PS-arm2b" "DAB205-arm2": if lod2d=detlevel_2d_50 then line2 0,0,0.1225,0:line2 0.1225,0,0.1225,0.381 endif return "SW300-box": poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,0,-wbox,1,boxdepth,-wbox,1,boxdepth,0,1,0,0,-1 if not(bbeam)|not(bismacro) then unid=unid+1:hotspot2 boxdepth,0,unid:unid=unid+1:hotspot2 boxdepth,-wbox,unid else unid=unid+2 endif if not(bismacro) then unid=unid+1:hotspot2 0,0,unid:unid=unid+1:hotspot2 0,-wbox,unid else unid=unid+2 endif return "SW300-arm1": if lod2d=detlevel_2d_50 then line2 0,0,armlength1,0 endif return "SW300-arm_DA": if lod2d=detlevel_2d_50 then rot2 81.2599907:line2 0,0,0.1657,0:add2 0.1657,0:rot2 -90 -15:line2 0,0,0.4035072352,0:del 3 endif return "setLengthArm2": if bismacro|not(beditpositions) then return unid=unid+1:hotspot2 0,0,unid,armlength2,1+128:unid=unid+1:hotspot2 -0.1,0,unid,armlength2,3:unid=unid+1:hotspot2 armlength2,0,unid,armlength2,2 return 14001: dd=raildepths[1]:poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,oplength,0,1,oplength-tan(35)*dd,dd,1,tan(35)*dd,dd,1,0,0,-1 return 14002: poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,oplength,0,1,oplength,raildepths[2],1,0,raildepths[2],1,0,0,-1 return 14003: poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,oplength,0,1,oplength,raildepths[3],1,0,raildepths[3],1,0,0,-1 return 14004: poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,oplength,0,1,oplength,raildepths[4],1,0,raildepths[4],1,0,0,-1 return 14005: poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,oplength,0,1,oplength,raildepths[5],1,0,raildepths[5],1,0,0,-1 return 14006: poly2_b 5,3,fillpenfg,fillpenbg,0,0,1,oplength,0,1,oplength,raildepths[6],1,0,raildepths[6],1,0,0,-1 return CSD1WW�! !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- if glob_script_type=7|glob_script_type=8 then goto "masterEnd" eps=0.0001:ditec_frame=1:ditec_slim=2:ditec_swing=3:ditec_revolving=4:ditec_bds=5:ditec_pocket=6:ditec_blast=7:detlevel_2d_scale=-1:detlevel_2d_off=0:detlevel_2d_10=10:detlevel_2d_50=50:detlevel_2d_100=100:detlevel_3d_scale=-1:detlevel_3d_off=0 detlevel_3d_10=10:detlevel_3d_50=50:detlevel_3d_100=100:rebate_none=0:rebate_all=1:rebate_out=2:rebate_in=3:side_out=1:side_in=2:type_none=0:type_dab105=1:type_dab205=2:type_none=0:type_dab105_pull=111:type_dab105_push=112:type_dab105_spec_push=114 type_dab105_slidetrack=115:type_dab105_doormounted=116:type_dab105_2_pull=121:type_dab105_2_push=122:type_dab105_2_pull_push=123:type_dab205_pull=211:type_dab205_push=212:type_dab205_pas=213:type_dab205_sliding_push=214:type_dab205_doormounted=215 type_dab205_2_pull=221:type_dab205_2_push=222:type_dab205_2_pas=223:type_dab205_2_sliding_push=224:type_dab205_2_push_pull=226:op_none=0:op_box_only=1:op_full=2:mounted_wall=1:mounted_frame=2:mounted_sash=3:op_sliding_bi=1:op_sliding_left=2 op_sliding_right=3 dim raildepths[]:raildepths[1]=0.0295:raildepths[2]=0.0337:raildepths[3]=0.040:raildepths[4]=0.030:raildepths[5]=0.043:raildepths[6]=0.030 dim armendposz[2]:armendposz[1]=0:armendposz[2]=0:blogomir=0:logolength=0.05:logoposx=0.025:logoposy=0.038:bdoormounted=0:blogoposother=0:blogoleftside=0:blogorightside=0:nerror=0:bshortarm=0:wboxorig=0.720:wbox=wboxorig:thkboxend=0:angl=0:dyufix=0:dkr=0 dposbox=0.028 if bismacro then diffzarm=0 dim opangle[2]:opangle[1]=0:opangle[2]=0 if itypeoperator=type_dab105 then thkboxend=0.013:boxdepth=0.131:boxheight=0.111:blogoleftside=1:blogorightside=1 if isubtypeoperator=type_dab105_doormounted then bdoormounted=1 if isubtypeoperator=type_dab105_2_pull|isubtypeoperator=type_dab105_2_push|isubtypeoperator=type_dab105_2_pull_push then wbox=a:blogoleftside=1:blogorightside=1 endif endif if itypeoperator=type_dab205 then thkboxend=0.005:boxdepth=0.131:boxheight=0.111:blogoleftside=1:blogorightside=1:boptionfulllength=not(bismacro)*boptionfulllength if isubtypeoperator=type_dab205_doormounted then bdoormounted=1:boptionfulllength=0 endif if isubtypeoperator=type_dab205_2_pull|isubtypeoperator=type_dab205_2_push|isubtypeoperator=type_dab205_2_pas|isubtypeoperator=type_dab205_2_sliding_push|isubtypeoperator=type_dab205_2_push_pull|boptionfulllength then wbox=a:dposbox=xposrot:blogoleftside=1:blogorightside=1 endif endif goto "masterEnd": "calc_DAB105_doorMounted": cx=0.240:cy0=0.039:fixx=cx+0.058:dyufix=0.025:armlength1=0.325:diffzarm=0.00 if bismacro then armlength2=0.334:diffzarm=0.00 endif alfa=opangle[idx] gosub "calcAngle_2dm" ang1=180 -beta0 -beta1:ang2=180 -beta2 return "calc_DAB105_pull": cx=0.210:cy0=0.03775:dyufix=0.0155:armlength1=0.375 if bismacro then if isubtypeoperator=type_dab105_pull then diffzarm=-0.010*bbeam endif if isubtypeoperator=type_dab105_2_pull then diffzarm=-0.022 endif if isubtypeoperator=type_dab105_2_pull_push then diffzarm=-0.025*bbeam endif endif alfa=opangle[idx] gosub "calcAngle_1" return "calc_DAB105_push": cx=0.210:cy0=0.06305:armlength1=0.250:dyufix=0.025 if bismacro then if isubtypeoperator=type_dab105_push|isubtypeoperator=type_dab105_spec_push then armlength2=0.290 -0.0105:diffzarm=0.040 endif if isubtypeoperator=type_dab105_2_push|isubtypeoperator=type_dab105_2_pull_push then armlength2=0.290 -0.0105:diffzarm=0.030+0.020*bbeam endif endif alfa=opangle[idx]*(1-2*(idx=2)):fixx=0.275 gosub "calcAngle_2" ang1=180 -beta0 -beta1:ang2=180 -beta2 return "calc_DAB105_slidetrack": biserror=0:cx=0.125:cy0=0.0336:k1=0.165:k2=0.220:kang=100:kl1=0.190 if bismacro then armlength2=0.350 endif kl2=armlength2:alfa=opangle[idx] gosub "calcAngle_3" dx=0.143:dy=0.030:xl1=kl1*sin (angl):yl1=kl1*cos (angl):tx=xl1+dx:ty=yl1 -dy:tt=sqr (tx^2+ty^2):kos=(k1^2+k2^2 -tt^2)/( 2*k1*k2) if abs (kos)<=1 then gam=acs (kos):angt=asn (ty/tt) else nerror=nerror+1:biserror=1 endif kos=(k1^2+tt^2 -k2^2)/( 2*k1*tt) if abs (kos)<=1 then bet0=acs (kos):bet=90 -angt -bet0 else nerror=nerror+1:biserror=1 endif return "calc_DAB205_doorMounted": cx=0.210:cy0=0.065:fixx=cx+0.060:dyufix=0.025:armlength1=0.325 if bismacro then armlength2=0.334:diffzarm=0.00 endif alfa=opangle[idx] gosub "calcAngle_2dm" ang1=180 -beta0 -beta1:ang2=180 -beta2 return "calc_DAB205_sliding_push": "calc_DAB205_pull": cx=0.210:cy0=0.067:dyufix=0.0155:armlength1=0.400 if bismacro then diffzarm=-0.005 if isubtypeoperator=type_dab205_sliding_push then diffzarm=0.004 endif if isubtypeoperator=type_dab205_2_sliding_push then diffzarm=0.016 endif diffzarm=diffzarm+0.040*not(bbeam) endif alfa=opangle[idx] gosub "calcAngle_1" return "calc_DAB205_pas": cx=0.071:cy0=0.067:armlength1=0.1225:dyufix=0.020:armlength2=0.381 if bismacro then diffzarm=-0.013:diffzarm=diffzarm+0.035*not(bbeam) endif alfa=opangle[idx]:dkr=sqr (armlength1^2+armlength2^2)-armlength1 gosub "calcAngle_1" return "calc_DAB205_push": cx=0.210:cy0=0.067:armlength1=0.250:dyufix=0.025 if bismacro then armlength2=0.318 if isubtypeoperator=type_dab205_push then diffzarm=0.003 endif if isubtypeoperator=type_dab205_2_push|isubtypeoperator=type_dab205_2_push_pull then diffzarm=0.020 endif diffzarm=diffzarm+0.040*not(bbeam) endif alfa=opangle[idx]*(1 -2*(idx=2)):fixx=0.2705 gosub "calcAngle_2" ang1=180 -beta0 -beta1:ang2=180 -beta2 return "calcAngle_1": biserror=0:cy=yposrot+cy0+silldepth*not(bbeam):dd=yposrot+dyufix -dframesash:kr=(armlength1+dkr) if abs (90 -abs (alfa))>eps then d=cx*tan (alfa)+dd/cos (alfa)-cy:aa=1+(tan (alfa))^2:bb=2*tan (alfa)*d:cc=d^2 -kr^2:det=bb^2 -4*aa*cc if det>=0 then xx=(-bb+sqr (det))/2/aa:yy=-tan (alfa)*xx -d:angl=90+atn (yy/xx)+180*(xx<-eps) else nerror=nerror+1:biserror=1 endif else xx=-cx -dd*sgn (alfa):angl=asn (xx/kr)*sgn (alfa)+180*(sgn (alfa)=-1) endif return "calcAngle_2": biserror=0:cy=yposrot+cy0+silldepth*not(bbeam):dd=yposrot+dyufix -dframesash:xfix=fixx*cos (alfa)+dd*sin (alfa):yfix=fixx*sin (alfa)-dd*cos (alfa):k0=sqr ((xfix -cx)^2+(yfix+cy)^2):kos=(xfix -cx)/k0 if abs (kos)<=1 then beta0=asn (kos) else nerror=nerror+1:biserror=1 endif kos=(armlength1^2+k0^2 -armlength2^2)/(2*armlength1*k0) if abs (kos)<=1 then beta1=acs (kos) else nerror=nerror+1:biserror=1 endif kos=(armlength1^2+armlength2^2 -k0^2)/(2*armlength1*armlength2) if abs (kos)<=1 then beta2=acs (kos) else nerror=nerror+1:biserror=1 endif return "calcAngle_2dm": biserror=0:cy=yposrot+cy0 -dframesash:dd=yposrot+0.025:xfix=fixx*cos (alfa)+dd*sin (alfa):yfix=fixx*sin (alfa)-dd*cos (alfa):k0=sqr ((xfix -cx)^2+(yfix+cy)^2):kos=(xfix -cx)/k0 if abs (kos)<=1 then beta0=asn (kos) else nerror=nerror+1:biserror=1 endif kos=(armlength1^2+k0^2 -armlength2^2)/(2*armlength1*k0) if abs (kos)<=1 then beta1=acs (kos) else nerror=nerror+1:biserror=1 endif kos=(armlength1^2+armlength2^2 -k0^2)/(2*armlength1*armlength2) if abs (kos)<=1 then beta2=acs (kos) else nerror=nerror+1:biserror=1 endif return "calcAngle_3": biserror=0:cy=yposrot+cy0+silldepth*not(bbeam):dd=yposrot+0.020 -dframesash:kr=sqr (kl1^2+kl2^2 -2*kl1*kl2*cos (kang)):dang=acs ((kl1^2+kr^2 -kl2^2)/(2*kl1*kr)) if abs (90 -abs (alfa))>eps then d=cx*tan (alfa)+dd/cos (alfa)-cy:aa=1+(tan (alfa))^2:bb=2*tan (alfa)*d:cc=d^2 -kr^2:det=bb^2 -4*aa*cc if det>=0 then xx=(-bb+sqr (det))/2/aa:yy=-tan (alfa)*xx -d:angl=90+atn (yy/xx)+180*(xx<-eps):angl=-angl+dang else nerror=nerror+1:biserror=1 endif else xx=cx+dd:angl=dang+asn (xx/kr) endif return "calcAngle_1bds": biserror=0:fx=a/2+bdsx:fy=bdsy:dx=fx -cx+dyufix*sin (alfa):dy=fy+cy0 -dyufix*cos (alfa) if abs (90 -abs (alfa))>eps then mm=tan (alfa):b0=dy -dx*mm:aa=1+mm^2:bb=2*mm*b0:cc=b0^2 -armlength1^2:det=bb^2 -4*aa*cc if det>=0 then xx=(-bb+sqr (det))/2/aa:yy=mm*xx+b0:angl=90+atn (yy/xx)+180*(xx<-eps) else nerror=nerror+1:biserror=1 endif else yy=sqr (armlength1^2 -dx^2):angl=180 -atn (dx/yy) endif return "calcAngle_2bds": biserror=0:fx=a/2+bdsx:fy=bdsy:dx=fx -cx+dyufix*sin (alfa):dy=fy+cy0 -dyufix*cos (alfa) if abs (dx)>eps then d=(dx^2+dy^2 -armlength2^2+armlength1^2)/2/dy:aa=1+(dx/dy)^2:bb=-2*d*dx/dy:cc=d^2 -armlength1^2:det=bb^2 -4*aa*cc if det>eps then xx=(-bb+sqr (det))/2/aa:yy=sqr (armlength1^2 -xx^2) if sqr ((dx -xx)^2+(dy+yy)^2)-armlength2>eps then yy=-yy endif else nerror=nerror+1:biserror=1 endif else xx=(armlength2^2 -armlength1^2 -dx^2)/2/dx:yy=0 endif dxy=sqr (xx^2+yy^2) if abs (yy)>eps then beta1=acs (xx/dxy)*sgn (yy) else beta1=180*sgn (xx) endif dxy=sqr ((dx -xx)^2+(dy+yy)^2) if abs (dy+yy)>eps then beta2=acs ((dx -xx)/dxy) else beta2=180*sgn (dx -xx) endif return "masterEnd": CSRPWWCSIUWWCSLVWWM !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- opangle[1]=opang1_2d:opangle[2]=opang2_2d if isubtypeoperator then gosub isubtypeoperator endif end nerror 111: idx=1 gosub "calc_DAB105_pull" return 112: 114: idx=1 gosub "calc_DAB105_push" return 115: idx=1 gosub "calc_DAB105_slidetrack" return 116: idx=1 gosub "calc_DAB105_doorMounted" return 121: idx=1 gosub "calc_DAB105_pull" return 122: idx=1 gosub "calc_DAB105_push" return 123: idx=1 gosub "calc_DAB105_pull" idx=2 gosub "calc_DAB105_push" return 211: idx=1 gosub "calc_DAB205_pull" return 212: idx=1 gosub "calc_DAB205_push" return 213: idx=1 gosub "calc_DAB205_pas" return 214: idx=1 gosub "calc_DAB205_sliding_push" return 215: idx=1 gosub "calc_DAB205_doorMounted" return 221: idx=1 gosub "calc_DAB205_pull" return 222: idx=1 gosub "calc_DAB205_push" return 223: idx=1 gosub "calc_DAB205_pas" return 224: idx=1 gosub "calc_DAB205_sliding_push" return 226: idx=1 gosub "calc_DAB205_push" idx=2 gosub "calc_DAB205_pull" return TXTCWWCSMFWWCSMBWWDRAPWW�WW��@��(@�������?A��?B��?ZZYZX �AC_show2DHotspotsIn3D��?ac_bottomlevel�ac_toplevel bIsMacro bEditPositionsiFamilyCode bLogoMirrorproduct bDoubleSwingiOperatorSideiTypeOperatoroiSubtypeOperatoriOpeningModeiRebate�?wBoxxPosRotyPosRotopAng1_2DopAng1_3DopAng2_2DopAng2_3D bBeamdFrameSashsillDepthiShowOperator bNoBox��������?armLength1ffffff�?armLength2{�G�z�?diffZarmiMountedbdsOpPoint bMirrOpDir0 bAccessories0P bOptionFullLength��������?leaf1Width�materials� NmatOperatorBox� matOperatorArm�iEndMat�representation�ltContur�ltHiddenContur� lod2D� lod3D� gs_resol� gs_shadow� viewPen� contPen� fillType� fillPenFg� fillPenBg�rails�iRailTypes�railPosX1�railPosX2�railPosY�iRailMirror�list�iSlidingType� listMatName�unID� ףp= �? ףp= �?ffffff�?ffffff�?PLDGWW�image/png�PNG  IHDR>����XsRGB���gAMA�� �aPLTE !!!,,,222888@@@BBBEEEMMMRRRYYYZZZccceeefffggghhhkkkooouuuxxx������������������������������������������������E"E�tRNS���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������S�% pHYs���o�dtEXtSoftwarepaint.net 4.0.6��c�IDATx^�c�(�1�kի��ֻz����m�y���0�1Q4kn��c$���0_Y �����%)�K�-������7<�nߢƃ�v��O��x8� �����/<�nߟ�����3�������*��W+z������7���&�=��O���[��;�`�w���͆�c�w��׏Ho�m��LJ͆��ڎ����{Z���C���g[ ��?�u0����X���i��M�E���w�sD�<8z�:II��D9nPU*��q�?`��U����R>��%��oL ���40��۶�*D#����5J�7o|t�J��\�n�6�E"P �� �IL1�� �z\ p�è|�b��H�ap�,D��WA�)+Ul����q��k�-���H�6�ڤ��v =�(�������|gt�������Z.���h��?���+p���R���%�7�FB��ne��w<�������E'*#�K�(�ЛR�ʲ���[}��w)���Z��J4L������Q~b���1|�/P�G+�p<#U5Oʮ�+ ����>>Ƶ���;4�� 9#�����S�ؤ���,|/��TDOT�hYE�{�u�z���yN·9BO*�K�j������>F&��q!������w|o�#��B'%pP��� �x*�����6z&�������M��D\�ʼnVc����#g�A@�,� H*%�R}�[���xFǓ��f���Q��o4�=o�eo�ެg^�;姨|�dޥ4�=��5��LI�P������焝H ���s�� ��Jӽ%�:�#)���p�h��J3+�iů|4��x��/��tŻ�m)e$8#ҕ�-:��>��a[eJ��'9��I&AWӁ���&������KhD�L�v��/�h$�n�������}fq�D|�{<�H�dN|4ԇ��~�-i��d�l|���&1@@R�Xڄ(B���|3�od:���#U�z��W8)A����z�̄i�H�]^N��:zu���J��;���� >Z}�j��*>t;톴F��B��t ����֣��h��"h�܅b-���� ��>�|m��)��ˉ�fGO��}��8*��W >3�s ]��]O�4|ҍ�^� �.D'a.���s�rѝ��ԟv���H�)Yl����W�i����A�Q��쿂��C�Į������4�"�W��_Z��ǧ�Ilg��V�֮���ʼ�����Ɍ��Y��,\����th�VC�N��Q]ߧ��O#k���ֆ#��r��Rѩ8�k⛑,(Uc<�D@E����#�kA�U%�Y/����j�H�Ow)|%��?�[;X\m��2FG�E��� (腼WC7��H# TM���󶙜zV�|�� 9v�٬*Y�����^y� ��^���*{�n�T����8G)����r����|�/V[�Pi\w)H��uԗb'u����/I_�2�$e|I�����%)�KRƗ��/I_�2�$e|I�����%)�KRƗ��/I>4������������Û��/I_�2�$e|I�����%)�KRƗ��/I_�2�$e|I�����%)�KRƗ��/I_�2�$5�{_���R)�O}ė�� v;�aDڐ3M�����4�6��[�Fos�1'�mWW.Z&�y����6<˯�������;�o�>�e�7��q�i,.�����;yV^��U;��N�̎u�����v��Lm���\�0,74��;3Mj�F*�6�Y��R�E�w��ъ���}Ir0�Qh�N�������#W�"��G@��N(�D�� �1�:��l�k���s� �;5�l� v'F�9�U �GR���$�g�})(� 8haݖJ�d�Z�<����T჋AH����t10�Z��-R�j�+x`�RҶLnn�T!��F�EI���y����J{W|{2.\��1�b^�Tz�����G���N>h���1ç�F��"���>� B!�$%�>� -�ꑝ�ΰQaqE�aM�+-��ݢ]4L�=Z*`ƀ<���0�>�`Y��^��8�om�?n�|�����6@�xdҔ�ϸ����#L�@Ϙ�S��]N�O�s�ܝ>��>��VSw>&�r|�0�E���� GM��§›t(|���n���3�׎ �v���� k>�S!>�f1ޚ��#Ǭ �e]}y)�N�)����—(x&��AJ�?�,}�/�jſ�_����C��;�� �O��<�����"��1� tW|�Rb��1��t���"�;̀~��;�r��:�"`���{Q���vCJ\g�����'RǮrE|Ѿ���#>Y6�<� l�R�G>��0�Ú�M���ӧeb$~}���� $>���Ȍ�0�:�~��I�VÇ_}�?c1�1U��+;̪��W�&�n�N�>���s�0��ټ�� ݾpl�� ����펯���N���� ��)�/��->~��!�+��"���H ���3��R� �7~���j�kj�������0Z�'���G䃂��A������w�g:.�|����ٻ6:=ץ������m��P����n���}Ù-%���U:��`&+<#�(Y��G�`��uD|� ��i�gn�����τ��g��o�����z����I]�n� �}�����$yr7�>;��sF�|v�O��� ?#w8�r��s�A����r��� 1y�����'�hH���H��� 6���aa)�*%��a����H��|_s䝃Ϥ�\�F Vq�U��P8�1-qp�%�f -�Z�.�ܰ��ڧKU�a���3�U�‡%��e�u ��qtW��!��K����'|_1��]&륦���&|x����la`R��г�L/H����4��]džcv��w��ӕ*��/�JQ�[�"V����r�EI�up�3����'��ͬ�h�K�����R��VM�Aeb�Z�Csϴ�� �|���7n�� GY�z���|oԀ/��2�$e|I�����%)�KRƗ��/I_�����.��3��IEND�B`�FILE i88GSYMGSAC�  �  �p2OperatorUnit_Ditec.gsmWW&MYSDCASGDAEH�`~��O�G��t���R�j��g3 oO�� � ACSD2�@CSD3��@CSD1v41@CSIU�e�>@CSLV��n@DRAP�PLDG��PLDG��QPLDG��PLDG���PLDG���PLDGY��PLDG��PLDG���PLDG�� PLDG��� PLDG��� PLDG5�m PLDG��e PLDG��PLDG���PLDG=��PLDG���PLDGs��PLDG��PLDG���PLDG���PLDG:��PLDG���PLDG}��PLDG,��PLDG�oSCNA=�SRCM��CSRP�@TXTC�CSMF�@CSMB�@CSD2WW !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- unid=0 if idetlevel2d=detlevel_2d_scale then lod2d=detlevel_2d_100 if glob_scale<75 then lod2d=detlevel_2d_50 if glob_scale<25 then lod2d=detlevel_2d_10 endif if idetlevel2d=detlevel_2d_10 then lod2d=detlevel_2d_10 if idetlevel2d=detlevel_2d_50 then lod2d=detlevel_2d_50 if idetlevel2d=detlevel_2d_100 then lod2d=detlevel_2d_100 ismoving=(int (glob_context/10)=2):add2 0,-totaloffset:unid=unid+1:hotspot2 0,0,unid,doorwidth,1+256:unid=unid+1:hotspot2 1,0,unid,doorwidth,3:unid=unid+1:hotspot2 -doorwidth,0,unid,doorwidth,2:del 1 if beditpositions then line_type 1:pen symbolpen:add2 0,-totaloffset if ismoving|bshowleafcontur then add2 0,silldepth:mul2 -1,1:rect2 0,0,wdoorframe,thkdoorframe:rect2 doorwidth,0,doorwidth -wdoorframe,thkdoorframe:del 2:line2 0,0,sillsize,0:line2 0,0,0,sillsize:line2 -doorwidth,0,-doorwidth-sillsize,0:line2 -doorwidth,0,-doorwidth,sillsize hotline2 0,0,sillsize,0:hotline2 0,0,0,sillsize:hotline2 -doorwidth,0,-doorwidth-sillsize,0:hotline2 -doorwidth,0,-doorwidth,sillsize endif if glob_context#5 then unid=unid+1:hotspot2 0,0,unid,silldepth,1+128:unid=unid+1:hotspot2 0,-0.1,unid,silldepth,3:unid=unid+1:hotspot2 0,silldepth,unid,silldepth,2:add2 -doorwidth,0:unid=unid+1:hotspot2 0,0,unid,silldepth,1+128:unid=unid+1:hotspot2 0,-0.1,unid,silldepth,3 unid=unid+1:hotspot2 0,silldepth,unid,silldepth,2:del 1:unid=unid+1:hotspot2 0,silldepth,unid,thkdoorframe,1+128:unid=unid+1:hotspot2 0,silldepth-1,unid,thkdoorframe,3:unid=unid+1:hotspot2 0,silldepth+thkdoorframe,unid,thkdoorframe,2:add2 -doorwidth,0 unid=unid+1:hotspot2 0,silldepth,unid,thkdoorframe,1+128:unid=unid+1:hotspot2 0,silldepth-1,unid,thkdoorframe,3:unid=unid+1:hotspot2 0,silldepth+thkdoorframe,unid,thkdoorframe,2:del 1 endif add2 0,silldepth if ismoving|bshowleafcontur then add2 -xposrot,yposrot+totaloffset:circle2 0,0,0.01:line2 0,0.02,0,-0.02:line2 -0.02,0,0.02,0:del 1 if bdoubleswing then add2 -doorwidth+xposrot,yposrot+totaloffset:mul2 -1,1:circle2 0,0,0.01:line2 0,0.02,0,-0.02:line2 -0.02,0,0.02,0:del 2 endif endif if glob_context#5 then add2 0,totaloffset:unid=unid+1:hotspot2 -xposrot,0,unid,yposrot,1+128:unid=unid+1:hotspot2 -xposrot,-0.1,unid,yposrot,3:unid=unid+1:hotspot2 -xposrot,yposrot,unid,yposrot,2:unid=unid+1:hotspot2 0,yposrot,unid,xposrot,1+128 unid=unid+1:hotspot2 0.1,yposrot,unid,xposrot,3:unid=unid+1:hotspot2 -xposrot,yposrot,unid,xposrot,2 if bdoubleswing then add2 -doorwidth,0:mul2 -1,1:unid=unid+1:hotspot2 -xposrot,0,unid,yposrot,1+128:unid=unid+1:hotspot2 -xposrot,-0.1,unid,yposrot,3:unid=unid+1:hotspot2 -xposrot,yposrot,unid,yposrot,2:unid=unid+1:hotspot2 0,yposrot,unid,xposrot,1+128 unid=unid+1:hotspot2 0.1,yposrot,unid,xposrot,3:unid=unid+1:hotspot2 -xposrot,yposrot,unid,xposrot,2:del 2 endif del 1 endif if glob_context#5 then if bmirropdir then if not(bcenter) then yo=dframesash -yposrot else yo=0 endif dir=-1 else if not(bcenter) then yo=-(yposrot -dframesash) else yo=0 endif dir=1 endif xo1=-wswing:xo2=-1*((doorwidth -2*wdoorframe)-wswing):add2 -xposrot,yposrot+totaloffset:unid=unid+1:hotspot2 0,0,unid,opang1_2d,6+512*bmirropdir:unid=unid+1:hotspot2 xo1,yo,unid,opang1_2d,4+128 unid=unid+1:hotspot2 xo1*cos(opang1_2d)-yo*sin(opang1_2d)*dir,yo*cos(opang1_2d)+xo1*sin(opang1_2d)*(1-2*bmirropdir),unid,opang1_2d,5:del 1 if bdoubleswing then add2 -doorwidth+xposrot,yposrot+totaloffset:mul2 -1,1:unid=unid+1:hotspot2 0,0,unid,opang2_2d,6+512*not(bmirropdir):unid=unid+1:hotspot2 xo2,yo,unid,opang2_2d,4+128 unid=unid+1:hotspot2 xo2*cos(opang2_2d)-yo*sin(opang2_2d)*dir,yo*cos(opang2_2d)+xo2*sin(opang2_2d)*(1-2*bmirropdir),unid,opang2_2d,5:del 2 endif endif add2 -xposrot,yposrot*not(bcenter)+bcenter*(totaloffset):rot2 -opang1_2d*(2*bmirropdir -1):add2 0,-yposrot if ismoving|bshowleafcontur then add2 0,dframesash -bcenter*(totaloffset):mul2 -1,1:rect2 0,0,wswing,thkdoorframe:hotline2 0,0,wswing,0:del 2 endif if glob_context#5 then unid=unid+1:hotspot2 0,0,unid,dframesash,1+128:unid=unid+1:hotspot2 0,-0.1,unid,dframesash,3:unid=unid+1:hotspot2 0,dframesash,unid,dframesash,2 endif del 3 if bdoubleswing then add2 -doorwidth+xposrot,yposrot*not(bcenter)+bcenter*(totaloffset):mul2 -1,1:rot2 -opang2_2d*(2*bmirropdir -1):add2 0,-yposrot if ismoving|bshowleafcontur then add2 0,dframesash -bcenter*(totaloffset):mul2 -1,1:rect2 0,0,(doorwidth -2*wdoorframe)-wswing,thkdoorframe:hotline2 0,0,(doorwidth -2*wdoorframe)-wswing,0:del 2 endif if glob_context#5 then unid=unid+1:hotspot2 0,0,unid,dframesash,1+128:unid=unid+1:hotspot2 0,-0.1,unid,dframesash,3:unid=unid+1:hotspot2 0,dframesash,unid,dframesash,2 endif del 4 endif del 1:del 1 endif rot2 -90 call "Operators_Swing_Ditec" parameters all bismacro=0,a=doorwidth,bdoubleswing=bdoubleswing,ioperatorside=ioperatorside,itypeoperator=itypeoperator,isubtypeoperator=isubtypeoperator,bbeam=bbeam,silldepth=silldepth,bmirropdir=bmirropdir, blogomirror=blogomirror,iendmat=iendmat,boptionfulllength=boptionfulllength,irailtypes=irailtypes,railposx1=railposx1,railposx2=railposx2,irailmirror=irailmirror,lod2d=lod2d,lthiddencontur=operatorline,gs_resol=gs_resol,gs_shadow=gs_shadow, viewpen=viewpen,contpen=contpens[fill_2d],filltype=filltypes[fill_2d],fillpenfg=fillpenfgs[fill_2d],fillpenbg=fillpenbgs[fill_2d],unid=20000:del 1 CSD3WW� !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- if not(gs_shadow) then shadow off resol gs_resol:unid=0:bsectionelevation=(glob_context=4|glob_context=24|glob_context=44) if not(bsectionelevation) then if idetlevel3d=detlevel_3d_10 then lod3d=detlevel_3d_10 if idetlevel3d=detlevel_3d_50 then lod3d=detlevel_3d_50 if idetlevel3d=detlevel_3d_100 then lod3d=detlevel_3d_100 else if idetlevelse=detlevel_3d_scale then lod3d=detlevel_3d_100 if glob_scale<75 then lod3d=detlevel_3d_50 if glob_scale<25 then lod3d=detlevel_3d_10 endif if idetlevelse=detlevel_3d_10 then lod3d=detlevel_3d_10 if idetlevelse=detlevel_3d_50 then lod3d=detlevel_3d_50 if idetlevelse=detlevel_3d_100 then lod3d=detlevel_3d_100 endif if lod3d=0 then end ismoving=(int (glob_context/10)=2):matoperatorbox=matcust if imattype=mattype_ral then call "Ralcolor_Ditec" parameters ifunction=3,iralcolor=iralcolor,iralsurface=iralsurface,returned_parameters midx,ralr,ralg,ralb,m1,m2,m3,m4,surfname:ralname="Profile RAL"+str(iralcolor,1,0)+" "+surfname+" [Ditec]":define material ralname 20, ralr/255,ralg/255,ralb/255,m1,m2,m3,0,m4,0,ralr/255,ralg/255,ralb/255,0,0,0,0,0,0,0:matoperatorbox=ind(material,ralname) else if imattype=mattype_alu then matname="Operator Box [Ditec]":define material matname 20,0.654902,0.654902,0.654902,0.72,0.88,0.09,0,100,0,1,1,1,0.235294,0.235294,0.235294,0,0,0,0:matoperatorbox=ind(material,matname) endif endif matname="Operator Arm [Ditec]":define material matname 20,0.654902,0.654902,0.654902,0.72,0.88,0.09,0,100,0,1,1,1,0.235294,0.235294,0.235294,0,0,0,0:matoperatorarm=ind(material,matname):unid=100:addy -totaloffset unid=unid+1:hotspot 0,0,0,unid,doorwidth,1+256:unid=unid+1:hotspot 1,0,0,unid,doorwidth,3:unid=unid+1:hotspot -doorwidth,0,0,unid,doorwidth,2:unid=unid+1:hotspot 0,0,doorheight,unid,doorwidth,1+256:unid=unid+1:hotspot 1,0,doorheight,unid,doorwidth,3 unid=unid+1:hotspot -doorwidth,0,doorheight,unid,doorwidth,2:unid=unid+1:hotspot 0,0,0,unid,doorheight,1+128:unid=unid+1:hotspot 0,0,-1,unid,doorheight,3:unid=unid+1:hotspot 0,0,doorheight,unid,doorheight,2 unid=unid+1:hotspot -doorwidth,0,0,unid,doorheight,1+128:unid=unid+1:hotspot -doorwidth,0,-1,unid,doorheight,3:unid=unid+1:hotspot -doorwidth,0,doorheight,unid,doorheight,2:del 1 if glob_context#5&beditpositions then model wire:pen symbolpen:addy -totaloffset:addz doorheight:mulx -1 if ismoving|bshowleafcontur then lin_ 0,0,0,-sillsize,0,0:lin_ doorwidth,0,0,doorwidth+sillsize,0,0:addz -doorheight:lin_ 0,0,0,-sillsize,0,0:lin_ doorwidth,0,0,doorwidth+sillsize,0,0:lin_ 0,0,0,0,0,sillsize:lin_ doorwidth,0,0,doorwidth,0,0:lin_ 0,0,0,0,max (sillsize,silldepth),0 lin_ doorwidth,0,0,doorwidth,max (sillsize,silldepth),0:del 1 endif prism_ 5,0.2,0,0,11,doorwidth,0,11,doorwidth,max (sillsize,silldepth),8,0,max (sillsize,silldepth),9,0,0,-1:del 2 if ismoving|bshowleafcontur then addy silldepth:rotx 90:addz -thkdoorframe:mulx -1:prism_ 9,thkdoorframe,0,0,15,0,doorheight,15,doorwidth,doorheight,15,doorwidth,0,15,doorwidth -wdoorframe,0,15,doorwidth -wdoorframe,doorheight -hdoorframe,15,wdoorframe,doorheight -hdoorframe,15, wdoorframe,0,15,0,0,-1:del 4 endif addy silldepth if ismoving|bshowleafcontur then add -xposrot,yposrot+totaloffset,0:cylind doorheight -hdoorframe,0.01:del 1 if bdoubleswing then add -doorwidth+xposrot,yposrot+totaloffset,0:mulx -1:cylind doorheight -hdoorframe,0.01:del 2 endif endif if glob_context#5 then addy totaloffset for i=1 to 2 unid=unid+1:hotspot -xposrot,0,0,unid,yposrot,1+128:unid=unid+1:hotspot -xposrot,-0.1,0,unid,yposrot,3:unid=unid+1:hotspot -xposrot,yposrot,0,unid,yposrot,2:unid=unid+1:hotspot 0,yposrot,0,unid,xposrot,1+128 unid=unid+1:hotspot 0.1,yposrot,0,unid,xposrot,3:unid=unid+1:hotspot -xposrot,yposrot,0,unid,xposrot,2 if bdoubleswing then addx -doorwidth:mulx -1:unid=unid+1:hotspot -xposrot,0,0,unid,yposrot,1+128:unid=unid+1:hotspot -xposrot,-0.1,0,unid,yposrot,3:unid=unid+1:hotspot -xposrot,yposrot,0,unid,yposrot,2:unid=unid+1:hotspot 0,yposrot,0,unid,xposrot,1+128 unid=unid+1:hotspot 0.1,yposrot,0,unid,xposrot,3:unid=unid+1:hotspot -xposrot,yposrot,0,unid,xposrot,2:del 2 endif addz doorheight -hdoorframe next i del 3 endif pen symbolleafpen if glob_context#5 then if bmirropdir then if not(bcenter) then yo=dframesash -yposrot else yo=0 endif dir=-1 else if not(bcenter) then yo=-(yposrot -dframesash) else yo=0 endif dir=1 endif xo1=-wswing:xo2=-1*((doorwidth -2*wdoorframe)-wswing):add -xposrot,yposrot+totaloffset,doorheight/2:unid=unid+1:hotspot 0,0,-10*(2*bmirropdir-1),unid,opang1_3d,7:unid=unid+1:hotspot 0,0,0,unid,opang1_3d,6+512*bmirropdir unid=unid+1:hotspot xo1,yo,0,unid,opang1_3d,4+128:unid=unid+1:hotspot xo1*cos(opang1_3d)-yo*sin(opang1_3d)*dir,yo*cos(opang1_3d)+xo1*sin(opang1_3d)*(1-2*bmirropdir),0,unid,opang1_3d,5:del 1 if bdoubleswing then add -doorwidth+xposrot,yposrot+totaloffset,doorheight/2:mulx -1:unid=unid+1:hotspot 0,0,10*(2*bmirropdir -1),unid,opang2_3d,7:unid=unid+1:hotspot 0,0,0,unid,opang2_3d,6:unid=unid+1:hotspot xo2,yo,0,unid,opang2_3d,4+128 unid=unid+1:hotspot xo2*cos(opang2_3d)-yo*sin(opang2_3d)*dir,yo*cos(opang2_3d)+xo2*sin(opang2_3d)*(1-2*bmirropdir),0,unid,opang2_3d,5:del 2 endif endif add -xposrot,yposrot*not(bcenter)+bcenter*(totaloffset),0:rotz -opang1_3d*(2*bmirropdir -1):addy -yposrot if ismoving|bshowleafcontur then addy dframesash -bcenter*(totaloffset):rotx 90:addz -thkdoorframe:mulx -1:prism_ 5,thkdoorframe,0,0,15,0,doorheight -hdoorframe,15,wswing,doorheight -hdoorframe,15,wswing,0,15,0,0,-1:del 4 endif if glob_context#5 then for i=1 to 2 unid=unid+1:hotspot 0,0,0,unid,dframesash,1+128:unid=unid+1:hotspot 0,-0.1,0,unid,dframesash,3:unid=unid+1:hotspot 0,dframesash,0,unid,dframesash,2:addz doorheight -wdoorframe next i del 2 endif del 3 if bdoubleswing then add -doorwidth+xposrot,yposrot*not(bcenter)+bcenter*(totaloffset),0:mulx -1:rotz -opang2_3d*(2*bmirropdir -1):addy -yposrot if ismoving|bshowleafcontur then addy dframesash -bcenter*(totaloffset):rotx 90:addz -thkdoorframe:mulx -1:prism_ 5,thkdoorframe,0,0,15,0,doorheight -hdoorframe,15,(doorwidth -2*wdoorframe)-wswing,doorheight -hdoorframe,15,(doorwidth -2*wdoorframe)-wswing,0,15,0,0,-1:del 4 endif if glob_context#5 then for i=1 to 2 unid=unid+1:hotspot 0,0,0,unid,dframesash,1+128:unid=unid+1:hotspot 0,-0.1,0,unid,dframesash,3:unid=unid+1:hotspot 0,dframesash,0,unid,dframesash,2:addz doorheight -wdoorframe next i del 2 endif del 4 endif del 1:del 1:model solid endif addz doorheight -0.15*(imounted=mounted_frame):rotz -90 call "Operators_Swing_Ditec" parameters all bismacro=0,a=doorwidth,b=doorheight,bdoubleswing=bdoubleswing,ioperatorside=ioperatorside,itypeoperator=itypeoperator,isubtypeoperator=isubtypeoperator,bbeam=bbeam,silldepth=silldepth,bmirropdir=bmirropdir, blogomirror=blogomirror,iendmat=iendmat,boptionfulllength=boptionfulllength,irailtypes=irailtypes,railposx1=railposx1,railposx2=railposx2,irailmirror=irailmirror,lod3d=lod3d,matoperatorbox=matoperatorbox,matoperatorarm=matoperatorarm,gs_resol=gs_resol, gs_shadow=gs_shadow,viewpen=viewpen,contpen=contpens[fill_sect],filltype=filltypes[fill_sect],fillpenfg=fillpenfgs[fill_sect],fillpenbg=fillpenbgs[fill_sect],unid=20000:del 2 CSD1WW1 !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- eps=0.0001:mattype_alu=1:mattype_ral=2:mattype_special=3:ral_gloss=1:ral_mat=2:ral_semigloss=3:fill_2d=1:fill_sect=2:detlevel_2d_scale=-1:detlevel_2d_off=0:detlevel_2d_10=10:detlevel_2d_50=50:detlevel_2d_100=100:detlevel_3d_scale=-1:detlevel_3d_off=0 detlevel_3d_10=10:detlevel_3d_50=50:detlevel_3d_100=100:op_rail_prof=1:op_rail_rail2=2:op_rail_l=3:op_rail_200_p=4:op_rail_200_pas=5:op_rail_300=6:side_out=1:side_in=2:type_none=0:type_dab105=1:type_dab205=2:type_dab105_pull=111:type_dab105_push=112 type_dab105_spec_push=114:type_dab105_slidetrack=115:type_dab105_doormounted=116:type_dab105_2_pull=121:type_dab105_2_push=122:type_dab105_2_pull_push=123:type_dab205_pull=211:type_dab205_push=212:type_dab205_pas=213:type_dab205_sliding_push=214 type_dab205_doormounted=215:type_dab205_2_pull=221:type_dab205_2_push=222:type_dab205_2_pas=223:type_dab205_2_sliding_push=224:type_dab205_2_push_pull=226:mounted_wall=1:mounted_frame=2:mounted_sash=3:mounted_top=4:op_sliding_bi=1:op_sliding_left=2 op_sliding_right=3:endmat_black=1:endmat_silver=2:nlastversion=vardim1(nversionnumber):nlocalversion=vardim1(iversionnumber) dim iversionnumber[][2]:iversionnumber=nversionnumber:lod2d=0:lod3d=0 dim ststandard[]:strprodcode="":dialogtitle=`Ditec Swing Door Operator`:unitwidth=0:unitdepth=0:unitheight=0:minopang1=0:maxopang1=90:minopang2=0:maxopang2=90:nattr=2:maxreveal=0:bequaldoorwidth=0:bdoormounted=0:btopmounted=0:bmirropdir=0 ioperatorside=side_out:bbeam=(imounted=mounted_frame):mincenterposy=thkdoorframe:maxcenterposy=0.15:bsashoffset=1:totaloffset=0:mindoorwith=idoortype*0.85:maxdoorwidth=idoortype*1.20:bdoubleswing=(idoortype=2):boptionfulllength=0:armcode="":fireapplic="" dim avamattypes[] dim avaaccessories[30]:naccessories=30 for i=1 to naccessories avaaccessories[i]=0 next i if vardim1(baccessories)eps):blogomirror=symb_mirrored if bo_prodaturl#"" then strproductlink="http://"+bo_prodaturl else strproductlink="" endif button_ui_start=1500:button_ui_up=button_ui_start+1:button_ui_down=button_ui_start+2:button_ui_end=button_ui_start+3:button_ui_select=2000:uistartx=2:uistarty=34+16:uiendx=440 -6:uiendy=200:uilineheight=15:nuirows=int ((uiendy-uistarty)/uilineheight) nuistandardelement=vardim1(ststandard) CSIUWW�> !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- dim stdetail2d[5]:stdetail2d[1]=`Scale Sensitive`:stdetail2d[2]=`Off`:stdetail2d[3]=`1:10`:stdetail2d[4]=`1:50`:stdetail2d[5]=`1:100` dim stdetail3d[5]:stdetail3d[1]=`Scale Sensitive`:stdetail3d[2]=`Off`:stdetail3d[3]=`Detailed`:stdetail3d[4]=`Simple`:stdetail3d[5]=`Block` dim stdetailse[5]:stdetailse[1]=`Scale Sensitive`:stdetailse[2]=`Off`:stdetailse[3]=`1:10`:stdetailse[4]=`1:50`:stdetailse[5]=`1:100` dim stmattype[3]:stmattype[1]=`Anodized Aluminum`:stmattype[2]=`RAL powdercoat`:stmattype[3]=`Special` dim stoperatorside[2]:stoperatorside[1]=`Out (Reveal Side)`:stoperatorside[2]=`In (Reveal Opposite Side)` dim strebate[4]:strebate[1]=`None`:strebate[2]=`Non Rebate`:strebate[3]=`Outswing Rebate`:strebate[4]=`Inswing Rebate` dim sttooltips[4]:sttooltips[1]=`First`:sttooltips[2]=`Up`:sttooltips[3]=`Down`:sttooltips[4]=`Last` dim stdoortype[2]:stdoortype[1]=`For Single Door`:stdoortype[2]=`For Double Door` dim stoperatortype[]:stoperatortype[1]=`None`:stoperatortype[2]=`DAB105 - Low to Medium High Traffic`:stoperatortype[3]=`DAB205 - Pedestrian Operator` dim stoperatordab105[8]:stoperatordab105[1]=`DAB105+pull arm DAB805PLA`:stoperatordab105[2]=`DAB105+push arm DAB805PSA`:stoperatordab105[3]=`DAB105 SASP`:stoperatordab105[4]=`DAB105 STAS`:stoperatordab105[5]=`DAB105 DMAS-SAS` stoperatordab105[6]=`2xDAB105+pull arms DAB805PLA`:stoperatordab105[7]=`2xDAB105+push arms DAB805PSA`:stoperatordab105[8]=`DAB105 ASPAP` dim stoperatordab205[10]:stoperatordab205[1]=`DAB205+pull arm DAB805PLA2`:stoperatordab205[2]=`DAB205+push arm DAB805PSA2`:stoperatordab205[3]=`DAB205-1 PAS`:stoperatordab205[4]=`DAB205-1 S PUSH` if idoortype=1 then stoperatordab205[5]=`DAB205-1 DM` else stoperatordab205[5]=`DAB205-2 DM` endif stoperatordab205[6]=`2xDAB205+pull arms DAB805PLA2`:stoperatordab205[7]=`2xDAB205+push arms DAB805PSA2`:stoperatordab205[8]=`DAB205-2 PAS`:stoperatordab205[9]=`DAB205-2 SP`:stoperatordab205[10]=`DAB205-2 PP` dim stdescription[3]:stdescription[1]=`Description`:stdescription[2]=`Accessories`:stdescription[3]=`Cover End` dim stgeneral[14]:stgeneral[1]=`Door Type`:stgeneral[2]=`Size`:stgeneral[3]=`Operator Type`:stgeneral[4]=`Surface Type`:stgeneral[5]=`Dimensions`:stgeneral[6]=`Unit Width`:stgeneral[7]=`Unit Depth`:stgeneral[8]=`Unit Height`:stgeneral[9]=`Reveal Depth` stgeneral[10]=`Show editing lines`:stgeneral[11]=`Opening angles`:stgeneral[12]=`Editable positions`:stgeneral[13]=`Mounting`:stgeneral[14]=`Wrong Geometry` dim stcoverend[2]:stcoverend[1]=`Black`:stcoverend[2]=`Same as operator` dim stmount[4]:stmount[1]=`Mounted to the wall`:stmount[2]=`Mounted to the frame`:stmount[3]=`Mounted to the sash`:stmount[4]=`Mounted to the top` dim stappearance[14]:stappearance[1]=`Detail Level`:stappearance[2]=`2D`:stappearance[3]=`3D`:stappearance[4]=`Section Elevation`:stappearance[5]=`Resolution`:stappearance[6]=`Shadow Casting`:stappearance[7]=`3D Uncut`:stappearance[8]=`Outside` stappearance[9]=`Inside`:stappearance[10]=`2D`:stappearance[11]=`3D Cut surface`:stappearance[12]=`3D Pen`:stappearance[13]=`Symbol Pen`:stappearance[14]=`Editing line pen` dim staccessories[]:staccessories[1]=`Extension unit EXU-SI`:staccessories[2]=`Extension unit EXU-SA`:staccessories[3]=`Sync cable - Used on double doors`:staccessories[4]=`Extension unit EXS`:staccessories[5]=`Control unit CSDA-F` staccessories[6]=`Push and go`:staccessories[7]=`Presence sensor`:staccessories[10]=`Finger trap protection devices`:staccessories[11]=`Manual and automatic activation units`:staccessories[12]=`Impulse and presence detection sensors` staccessories[13]=`Programme selectors`:staccessories[15]=`Door panic stop (IK-A only)`:staccessories[16]=`Presence detection photocells`:staccessories[17]=`Extension unit EXS`:staccessories[18]=`Ditec activators`:staccessories[19]=`Backup battery EUS` staccessories[20]=`Full Length Cover`:staccessories[21]=`Modular`:staccessories[25]=`Breakaway`:staccessories[26]=`With threshold`:staccessories[27]=`Battery backup unit`:staccessories[28]=`Coordination unit`:staccessories[29]=`Fire kit` dim tabnames[5]:tabnames[1]=`Product`:tabnames[2]=`Accessories`:tabnames[3]=`Description`:tabnames[4]=`Appearance`:tabnames[5]=`Information`:uilink_bimobject="http://www.bimobject.com":uilink_firm=`http://www.ditecentrematic.com/` strbutproductdescr=`Product description`:strbutinstallinstr=`Installation instructions`:strbuttechndescr=`Technical description`:strbimobject=`All BIMobjects are real products from real manufactures confirmed and approved`:uilink_firm_youtube="" if vartype (bo_youtube)=2 then if bo_youtube#"" then uilink_firm_youtube=bo_youtube endif endif uilink_prod_descr="" if strproductlink#"" then uilink_prod_descr=strproductlink endif uilink_mont_instr="" if vartype (bo_montins)=2 then if bo_montins#"" then uilink_mont_instr=bo_montins if strsub (bo_montins,1,7)#"http://" then uilink_mont_instr="http://"+uilink_mont_instr endif endif endif uilink_techn_descr="" if vartype (bo_techcert)=2 then if bo_techcert#"" then uilink_techn_descr=bo_techcert if strsub (bo_techcert,1,7)#"http://" then uilink_techn_descr="http://"+uilink_techn_descr endif endif endif uiversiondate="":dateinteger=iversionnumber[nlastversion][1] if dateinteger>0 then strdate=str(dateinteger,1,0):styear=strsub (strdate,1,4):stmonth=strsub (strdate,5,2):stday=strsub (strdate,7,2):uiversiondate=styear+"-"+stmonth+"-"+stday endif ui_dialog dialogtitle:ui_current_page gs_ui_current_page:ui_page gs_ui_current_page:px=30:py=20:cx=px:cy=py:ui_style 0,1:ui_pict 1,0,0,53,26,1 ui_tooltip "http://www.ditecentrematic.com/":ui_infield{3} "gs_ui_current_page",60,0,190,cy+5,2,2,5,1, cx,cy,px,py,1,tabnames[1],1,3,tabnames[3],2,4,tabnames[4],3,5,tabnames[5],4:ui_button ui_prev,"<<",253,2,28,21,gs_ui_current_page -1:ui_button ui_next,">>",282,2,28,21,gs_ui_current_page+1:ui_pict 3,312,0,131,24,1 ui_tooltip "http://bimobject.com" ui_separator 0,28,444,28:youtfield=18:yinfield=19:linespace=28:ystart=40:xhalf=222:xend=443:x0=5:x1=10:xinfield=70:penw=32:xpen=35:penh=20:math=24:lineh=24:ui_page 1:xend=440:xhalf=252:xinfield=120:xinfieldsm=55:xinf=60:x10=x1:x11=120:x12=xhalf -x1 x20=xhalf+x1:x18=xhalf -xinf -x1 -30:x19=xhalf -xinf -x1:x20=xhalf+x1:x21=xend -xinfieldsm:x22=x21 -35 -xinfieldsm:x23=x20+40:x25=xend -40:x40=xhalf+x1+72:linespace=21:linespace2=22:linespace3=24:ystart=32:xd=30:y=ystart:ui_style 2,1 ui_outfield "Ditec "+stoperatortype[itypeoperator+1],x0,y,xend-2*x0,youtfield:ui_style 0,0:y=y+linespace:ui_outfield stgeneral[1],x0,y,x11-x0-2,youtfield:ui_infield{3} "iDoorType",x11,y-2,x12-x11+8,yinfield,8,"",0,0,0,0,0,0,0,stdoortype[1],1, 0,stdoortype[2],2:ui_pict 4,x22 -22,y -1,20,18,1:ui_infield "doorWidth",x22,y-2,xinfieldsm,yinfield:ui_pict 5,x21 -22,y -1,20,18,1:ui_infield "doorHeight",x21,y-2,xinfieldsm,yinfield:y=y+linespace:ui_outfield stgeneral[3],x0,y,x11-x0-2,youtfield ui_style 0,1 if itypeoperator=type_dab105 then ui_infield{3} "iSubtypeOperator",x11,y-2,xend-x11,yinfield,8,"",0,0,0,0,0,0,0,stoperatordab105[1],type_dab105_pull,0,stoperatordab105[2],type_dab105_push,0,stoperatordab105[3],type_dab105_spec_push,0,stoperatordab105[4],type_dab105_slidetrack, 0,stoperatordab105[6],type_dab105_2_pull,0,stoperatordab105[7],type_dab105_2_push,0,stoperatordab105[8],type_dab105_2_pull_push,0,stoperatordab105[5],type_dab105_doormounted else ui_infield{3} "iSubtypeOperator",x11,y-2,xend-x11,yinfield,8,"",0,0,0,0,0,0,0,stoperatordab205[1],type_dab205_pull,0,stoperatordab205[2],type_dab205_push,0,stoperatordab205[3],type_dab205_pas,0,stoperatordab205[4],type_dab205_sliding_push, 0,stoperatordab205[6],type_dab205_2_pull,0,stoperatordab205[7],type_dab205_2_push,0,stoperatordab205[8],type_dab205_2_pas,0,stoperatordab205[9],type_dab205_2_sliding_push,0,stoperatordab205[10],type_dab205_2_push_pull, 0,stoperatordab205[5],type_dab205_doormounted endif ui_style 0,0:y=y+linespace:ui_separator 0,y,444,y:px=5:py=120:y=y+6:ui_outfield stgeneral[5],x0,y,x11-x0-2,youtfield:ui_pict 6,px,py,100,33,1 if itypeoperator=type_dab105 then ui_pict 7,px,py+50,38,37,1 else ui_pict 8,px,py+50,41,37,1 endif ui_outfield str(unitwidth*1000,1,0)+"mm",px+35,py+34,70,12 ui_tooltip stgeneral[6]:ui_outfield str(unitdepth*1000,1,0)+"mm",px,py+88,70,12 ui_tooltip stgeneral[7]:ui_outfield str(unitheight*1000,1,0)+"mm",px+42,py+59,70,12 ui_tooltip stgeneral[8]:px=178 py=135:ui_pict 9,px,py,57,57,1:ui_infield "yPosRot",px -58,py+13,55,yinfield:ui_infield "dFrameSash",px+59,py+21,55,yinfield:ui_infield "xPosRot",px+10,py -20,55,yinfield:ui_infield "sillDepth",px -58,py+35,55,yinfield if biserror then ui_pict 10,px-58,py+65,12,12,1:ui_outfield stgeneral[14],px -42,py+65,170,16 endif ui_infield{3} bshowleafcontur,px -58,py+85,170,16,7,"",0,0,0,0,0,0,0,stgeneral[10],0,0,stgeneral[10],1:px=324:py=197:ui_outfield stgeneral[11],px -16,py -18,120,16:ui_pict 11,px -16,py+3,13,13,1:ui_pict 12,px -16,py+18,13,23,1 ui_infield "opAng1_2D",px,py,58,yinfield:ui_infield "opAng1_3D",px,py+20,58,yinfield if bdoubleswing then ui_infield "opAng2_2D",px+61,py,58,yinfield:ui_infield "opAng2_3D",px+61,py+20,58,yinfield endif px=324-16:py=100:ui_outfield stgeneral[13],px,py,442 -px,16:ui_infield{3} imounted,px,py+17,42,58,2,13,4,1,30,46,30,46,3," "+stmount[1],mounted_wall,2," "+stmount[2],mounted_frame,1," "+stmount[3],mounted_sash,4," "+stmount[4],mounted_top ui_outfield stmount[imounted],px+45,py+17,442 -px -45,58:y=220+21:ui_separator 0,y,444,y:y=y+7:ui_outfield stgeneral[4],x0,y,x11-x0-2,youtfield:ui_infield{3} "iMatType",x11,y-2,100,yinfield,8,"",0,0,0,0,0,0,0,stmattype[1],1,0,stmattype[2],2, 0,stmattype[3],3 if imattype=mattype_ral then x50=x11+120 call "Ralcolor_Ditec" parameters ifunction=1,iralcolor=iralcolor,imattype=1,uiposx=x11+120,uiposy=y -5,uisurfx=60,uiwidth=xend-x50,uiheight=math else if imattype=mattype_special then ui_infield "matCust",x20,y-5,xend-x20,math endif endif ui_page 2:ystart=36:xhalf=242:ui_style 0,1:ui_outfield stdescription[1],x0,ystart,xhalf-x0-2,12:ui_style 0,0:gbw=uiendx-uistartx:gbh=nuirows*uilineheight+18:ui_groupbox "",uistartx,uistarty,gbw-18,gbh:butw=15:buth=20:butx=uistartx+gbw-butw-2 ui_groupbox "",uiendx-20,uistarty,20,gbh:ui_pict_button ui_function,"",14,butx,uistarty+10,butw,buth,button_ui_start ui_tooltip sttooltips[1]:ui_pict_button ui_function,"",15,butx,uistarty+31,butw,buth,button_ui_up ui_tooltip sttooltips[2] ui_pict_button ui_function,"",16,butx,uistarty+gbh-buth-26,butw,buth,button_ui_down ui_tooltip sttooltips[3]:ui_pict_button ui_function,"",17,butx,uistarty+gbh-buth-5,butw,buth,button_ui_end ui_tooltip sttooltips[4]:x10=10:x11=uiendx -25:y=uistarty+12 for i=nuistart to min(nuistart+nuirows-1,nuistandardelement) firstchar=strsub(ststandard[i],1,1) if firstchar=" " then ui_style 0,0 else ui_style 0,1 endif ui_outfield ststandard[i],x10,y,x11-x10,12:y=y+uilineheight next i x3=440:x2=x3 -150:y=uiendy+26:ui_separator 0,y -5,x3,y -5:ui_outfield `Arm Code:`,x10-5,y,x2-x10,12:ui_outfield armcode,x2+5,y,x3-x2,12:y=y+uilineheight:ui_outfield `Fire Applicable:`,x10-5,y,x2-x10,12:ui_outfield fireapplic,x2+5,y,x3-x2,12:ui_page 3 xhalf=252:xinfield=120:xinfieldsm=60:linespace=25:ystart=38:y=ystart:x10=10:x11=x10+35:x12=x11+xpen:x15=139:x16=x15+35:x17=x16+xpen:x18=x12+xpen:x19=xhalf-x1:y=ystart:ui_style 0,1:ui_outfield stappearance[10],x0,y,x19-x0-xinfield-2,youtfield y=y+linespace -2:ui_style 0,0:ui_pict 18,x10,y,27,14,1:ui_infield{2} filltypes[fill_2d],x11,y-4,x19-x11,lineh:y=y+linespace:ui_pict 19,x10,y+2,27,14,1:ui_infield{2} icontpens[fill_2d],x11,y,penw,yinfield:ui_infield{2} contpens[fill_2d],x12,y-1,penw,penh ui_pict 20,x15,y+2,27,14,1:ui_infield{2} ifillpenbgs[fill_2d],x16,y,penw,yinfield:ui_infield{2} fillpenbgs[fill_2d],x17,y-1,penw,penh:y=y+linespace:ui_pict 21,x10,y+2,27,14,1:ui_infield{2} ifillpenfgs[fill_2d],x11,y,penw,yinfield ui_infield{2} fillpenfgs[fill_2d],x12,y-1,penw,penh:ui_pict 22,x15,y+2,24,17,1:ui_infield "operatorLine",x16,y-3,x19-x16,22:y=y+linespace:ui_separator 0,y-2,xhalf-2,y-2:y=y+6:ui_style 0,1:ui_outfield stappearance[11],x0,y,x19-x0-xinfield-2,youtfield y=y+linespace -2:ui_style 0,0:ui_pict 18,x10,y,27,14,1:ui_infield{2} filltypes[fill_sect],x11,y-4,x19-x11,lineh:y=y+linespace:ui_pict 19,x10,y+2,27,14,1:ui_infield{2} icontpens[fill_sect],x11,y,penw,yinfield ui_infield{2} contpens[fill_sect],x12,y-1,penw,penh:ui_pict 20,x15,y+2,27,14,1:ui_infield{2} ifillpenbgs[fill_sect],x16,y,penw,yinfield:ui_infield{2} fillpenbgs[fill_sect],x17,y-1,penw,penh:y=y+linespace:ui_pict 21,x10,y+2,27,14,1 ui_infield{2} ifillpenfgs[fill_sect],x11,y,penw,yinfield:ui_infield{2} fillpenfgs[fill_sect],x12,y-1,penw,penh:y=y+linespace:ui_separator 0,y-2,xhalf-2,y-2:y=y+6:ui_style 0,1:ui_outfield stappearance[7],x0,y,x19-x0-xinfield-2,youtfield:ui_style 0,0 ui_pict 23,x15,y+2,27,17,1:ui_infield "iViewPen",x16,y,penw,yinfield ui_tooltip stappearance[12]:ui_infield "viewPen",x17,y-1,penw,penh ui_tooltip stappearance[12]:ui_separator xhalf-1,35,xhalf-1,266:x20=xhalf+x1:x21=xend -xinfield:x22=xend -xinfieldsm x23=x21+35:x24=x23+xpen:y=ystart:ui_style 0,1:ui_outfield stappearance[1],x0+xhalf,y,xend-xhalf-x0,youtfield:ui_style 0,0:y=y+linespace -2:ui_outfield stappearance[2],x20,y,x21-x20-2,youtfield:ui_infield{3} "iDetLevel2D",x21,y-2,xinfield,yinfield,8,"", 0,0,0,0,0,0,0,stdetail2d[1],detlevel_2d_scale,0,stdetail2d[3],detlevel_2d_10,0,stdetail2d[4],detlevel_2d_50,0,stdetail2d[5],detlevel_2d_100,0,stdetail2d[2],detlevel_2d_off:y=y+linespace:ui_outfield stappearance[3],x20,y,x21-x20-2,youtfield ui_infield{3} "iDetLevel3D",x21,y-2,xinfield,yinfield,8,"",0,0,0,0,0,0,0,stdetail3d[1],detlevel_3d_scale,0,stdetail3d[3],detlevel_3d_10,0,stdetail3d[4],detlevel_3d_50,0,stdetail3d[5],detlevel_3d_100,0,stdetail3d[2],detlevel_3d_off:y=y+linespace ui_outfield stappearance[4],x20,y-6,x21-x20-2,youtfield+8:ui_infield{3} "iDetLevelSE",x21,y-2,xinfield,yinfield,8,"",0,0,0,0,0,0,0,stdetailse[1],detlevel_3d_scale,0,stdetailse[3],detlevel_3d_10,0,stdetailse[4],detlevel_3d_50, 0,stdetailse[5],detlevel_3d_100,0,stdetailse[2],detlevel_3d_off:y=y+linespace:ui_separator xhalf+2,y-2,444,y-2:y=y+6:ui_outfield stappearance[5],x20,y,x21-x20-2,youtfield:ui_infield{3} "gs_resol",x22,y-2,xinfieldsm,yinfield:y=y+linespace -4 ui_infield{3} "gs_shadow",x20,y-2,xend-x20,youtfield,7,"",0,0,0,0,0,0,0,stappearance[6],0,0,stappearance[6],1:y=y+linespace -4:ui_separator xhalf+2,y,444,y-4:y=y+8:ui_outfield stappearance[14],x20,y,xend-x20-2,youtfield:y=y+linespace -5 if bshowleafcontur then ui_pict 19,x21,y+2,27,14,1 else ui_pict 24,x21,y+2,27,14,1 endif ui_infield "iSymbolPen",x23,y,penw,yinfield ui_tooltip stappearance[14]:ui_infield "symbolPen",x24,y-1,penw,penh ui_tooltip stappearance[14]:y=y+linespace if bshowleafcontur then ui_pict 12,x21,y+2,13,23,1 else ui_pict 24,x21,y+2,27,14,1 endif ui_infield "iSymbolLeafPen",x23,y,penw,yinfield ui_tooltip stappearance[14]:ui_infield "symbolLeafPen",x24,y-1,penw,penh ui_tooltip stappearance[14]:y=y+linespace:ui_page 4:x1=1:x2=10:y1=35:dy1=15:dy2=15:w1=240:w2=230:x3=252:w3=191:hbut=20:dy3=25:yy=y1 ui_style 0,0:ui_outfield `Product family / group:`,x1,yy,w1,14:yy=yy+dy1 if vartype (bo_prodfam)=2 then ui_outfield bo_prodfam,x2,yy,w2,14 endif yy=yy+dy1 if vartype (bo_prodgroup)=2 then ui_outfield bo_prodgroup,x2,yy,w2,14 endif yy=yy+dy2:ui_outfield `Object Version:`,x1,yy,w1,14:yy=yy+dy1:ui_outfield uiversiondate,x2,yy,w2,14:yy=y1 if uilink_prod_descr#"" then ui_pict_button ui_link,strbutproductdescr,"",x3,yy,w3,20,0,uilink_prod_descr:yy=yy+dy3 endif if uilink_mont_instr#"" then ui_pict_button ui_link,strbutinstallinstr,"",x3,yy,w3,20,0,uilink_mont_instr:yy=yy+dy3 endif if uilink_techn_descr#"" then ui_pict_button ui_link,strbuttechndescr,"",x3,yy,w3,20,0,uilink_techn_descr:yy=yy+dy3 endif ui_separator 1,110,443,110:ui_pict_button ui_link,"",25,175,120,101,60,0,uilink_firm:ui_separator 1,187,443,187:ui_pict_button ui_link,"",26,130,200,195,42,0,uilink_bimobject:ui_style 0,2:ui_outfield strbimobject,0,245,440,12,2:ui_style 0,0 CSLVWWn !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- isfirstrun=0:n=application_query ("parameter_script","firstoccasion_in_progress",isfirstrun):values "iDetLevel2D" detlevel_2d_scale,detlevel_2d_10,detlevel_2d_50,detlevel_2d_100 values "iDetLevel3D" detlevel_3d_10,detlevel_3d_50,detlevel_3d_100,detlevel_3d_off:values "iDetLevelSE" detlevel_3d_scale,detlevel_3d_10,detlevel_3d_50,detlevel_3d_100,detlevel_3d_off:values "iDoorType" 1,2 values "doorWidth" range [mindoorwith,maxdoorwidth]:values "doorHeight" range [1.9,3.0]:values "thkDoorFrame" range (0,0.15]:values "iOperatorSide" side_out,side_in:values "iTypeOperator" type_dab105,type_dab205:lock "iOperatorSide" values "armLength2" range [minarmlength2,maxarmlength2] if bmirropdir then values "diffZarm" range [0,0.045] else values "diffZarm" range [-0.005,0.045] endif values "xPosRot" range [0.01,0.15] if bmirropdir then values "yPosRot" range [-mincenterposy,maxcenterposy] else values "yPosRot" range [-maxcenterposy,mincenterposy] endif if glob_modpar_name="iSubtypeOperator" then if bmirropdir then parameters yposrot=thkdoorframe else parameters yposrot=0 endif endif if itypeoperator=type_dab105 then if idoortype=2 then values "iSubtypeOperator" type_dab105_2_pull,type_dab105_2_push else values "iSubtypeOperator" type_dab105_pull,type_dab105_push endif endif if itypeoperator=type_dab205 then if idoortype=2 then values "iSubtypeOperator" type_dab205_2_pull,type_dab205_2_push else values "iSubtypeOperator" type_dab205_pull,type_dab205_push endif endif if bdoormounted then values "iMounted" mounted_sash:values "dFrameSash" range [0,0.01] else if btopmounted then values "iMounted" mounted_top else values "iMounted" mounted_wall,mounted_frame endif if bsashoffset then values "dFrameSash" range [-min(silldepth,thkdoorframe),thkdoorframe] else values "dFrameSash" 0 endif endif if itypeoperator=type_dab205 then values "iEndMat" endmat_black,endmat_silver endif if glob_modpar_name="iDoorType" then leaf1width=doorwidth/2:parameters leaf1width=leaf1width endif values "iMatType" avamattypes if imattype#mattype_ral then hideparameter "iRalColor":lock "iRalColor" else call "Ralcolor_Ditec" parameters ifunction=1,iralcolor=iralcolor,paramname="iRalColor" endif if imattype#mattype_special then hideparameter "matCust":lock "matCust" endif for i=1 to 255 put i next i values "viewPen" use(nsp):values "contPens" use(nsp):values "fillPenFgs" get(nsp) if glob_modpar_name="iViewPen" then iviewpen=min(max(iviewpen,1),255):viewpen=iviewpen:parameters iviewpen=iviewpen,viewpen=viewpen else viewpen=max(viewpen,1):iviewpen=viewpen:parameters iviewpen=iviewpen,viewpen=viewpen endif if glob_modpar_name="iSymbolPen" then isymbolpen=min(max(isymbolpen,1),255):symbolpen=isymbolpen:parameters isymbolpen=isymbolpen,symbolpen=symbolpen else symbolpen=max(symbolpen,1):isymbolpen=symbolpen:parameters isymbolpen=isymbolpen,symbolpen=symbolpen endif if glob_modpar_name="iSymbolLeafPen" then isymbolpen=min(max(isymbolleafpen,1),255):symbolpen=isymbolleafpen:parameters isymbolleafpen=isymbolleafpen,symbolleafpen=symbolleafpen else symbolleafpen=max(symbolleafpen,1):isymbolleafpen=symbolleafpen:parameters isymbolleafpen=isymbolleafpen,symbolleafpen=symbolleafpen endif if glob_modpar_name="iContPens" then for i=1 to nattr icontpens[i]=min(max(icontpens[i],1),255):contpens[i]=icontpens[i] next i parameters icontpens=icontpens,contpens=contpens else for i=1 to nattr contpens[i]=max(contpens[i],1):icontpens[i]=contpens[i] next i parameters icontpens=icontpens,contpens=contpens endif if glob_modpar_name="iFillPenFgs" then for i=1 to nattr ifillpenfgs[i]=min(max(ifillpenfgs[i],1),255):fillpenfgs[i]=ifillpenfgs[i] next i parameters ifillpenfgs=ifillpenfgs,fillpenfgs=fillpenfgs else for i=1 to nattr fillpenfgs[i]=max(fillpenfgs[i],1):ifillpenfgs[i]=fillpenfgs[i] next i parameters ifillpenfgs=ifillpenfgs,fillpenfgs=fillpenfgs endif if glob_modpar_name="iFillPenBgs" then for i=1 to nattr ifillpenbgs[i]=min(max(ifillpenbgs[i],-1),255):fillpenbgs[i]=ifillpenbgs[i] next i parameters ifillpenbgs=ifillpenbgs,fillpenbgs=fillpenbgs else for i=1 to nattr fillpenbgs[i]=max(fillpenbgs[i],-1):ifillpenbgs[i]=fillpenbgs[i] next i parameters ifillpenbgs=ifillpenbgs,fillpenbgs=fillpenbgs endif values "gs_resol" range [4,] if not(bshowleafcontur) then hideparameter "symbolPen","iSymbolPen","symbolLeafPen","iSymbolLeafPen":lock "symbolPen","iSymbolPen","symbolLeafPen","iSymbolLeafPen" endif values "gs_ui_current_page" 1,2,3,4 if isfirstrun then if glob_ui_button_id=button_ui_start then nuistart=1 if glob_ui_button_id=button_ui_up then nuistart=max(nuistart-1,1) if glob_ui_button_id=button_ui_down then nuistart=min(nuistart+1,nuistandardelement -(nuirows-1)) if glob_ui_button_id=button_ui_end then nuistart=nuistandardelement -(nuirows-1) nuistart=max (1,nuistart):parameters nuistart=nuistart endif values "opAng1_2D" range [minangle1,maxangle1]:values "opAng2_2D" range [minangle2,maxangle2]:values "opAng1_3D" range [minangle1,maxangle1]:values "opAng2_3D" range [minangle2,maxangle2]:nerror=0 for i=1 to 2 ang1=minangle1:ang2=minangle2 if i=2 then ang1=maxangle1:ang2=maxangle2 endif call "Operators_Swing_Ditec" parameters all bismacro=0,a=doorwidth,b=doorheight,bdoubleswing=bdoubleswing,ioperatorside=ioperatorside,itypeoperator=itypeoperator,isubtypeoperator=isubtypeoperator,bbeam=bbeam,silldepth=silldepth,bmirropdir=bmirropdir, opang1_2d=ang1,opang2_2d=ang2,irailtypes=irailtypes,railposx1=railposx1,railposx2=railposx2,irailmirror=irailmirror,returned_parameters errornum:nerror=nerror+errornum next i parameters biserror=(nerror>0) if isubtypeoperator=type_dab105_push|isubtypeoperator=type_dab105_2_push|isubtypeoperator=type_dab205_push|isubtypeoperator=type_dab205_2_pull then if glob_modpar_name="dFrameSash"|glob_modpar_name="sillDepth"|glob_modpar_name="iMounted" then parameters armlength2=min(maxarmlength2,0.28+(dframesash+silldepth)*(imounted#mounted_frame)) endif endif if maxreveal>eps then values "sillDepth" range [0,maxreveal] endif parameters a=unitwidth,b=unitdepth,zzyzx=unitheight:lock "A","B","ZZYZX":parameters iversionnumber=iversionnumber DRAPWWWW!��H�pH ףp= �?A�"��~j�?B�S㥛��?ZZYZX �AC_show2DHotspotsIn3D��?ac_bottomlevel�ac_toplevel�operatoriDoorType333333�?doorWidth@doorHeight�iOperatorSideiTypeOperatoroiSubtypeOperator�������?sillDepthdFrameSash{�G�z�?xPosRotyPosRot bAccessoriesxiMounted�{�G�z�?thkDoorFrame� bIsError�iEndMat��������?leaf1Width��op���������?armLength1�H�z�G�?armLength2�{�G�zt�diffZarm� bEditPositions� bShowLeafContur�opAng1_2D�opAng1_3D�opAng2_2D�opAng2_3D��attr�����iDetLevel2D� iDetLevel3D�����iDetLevelSE�iMatType�~iRalColor�iRalSurface� matCust� viewPen�iViewPen� symbolPen�iSymbolPen� symbolLeafPen�iSymbolLeafPen� contPens�iContPens� fillTypes� fillPenFgs�iFillPenFgs� fillPenBgs�iFillPenBgs�operatorLine�gs_resol� gs_shadow��ui�nUiStart�startIndex��gs_ui_current_page��BO_Title� BO_prodaturl� BO_youtube� BO_montins� BO_techcert� BO_prodfam� BO_prodgroup� BO_publisdat� BO_edinum��nVersionNumber�iVersionNumberA PLDGWW�image/png�PNG  IHDR5�~��sRGB���gAMA�� �a pHYs���o�dtEXtSoftwarepaint.net 4.0.6��c�IDATXG햍3�w��� !��cU���B,-֪�[]j�V�������t�ގ9��|T<��v��1*���I� ���[~9G�ܚ]����{|~��W���������vK?|J�\m�[z�ۙ���R�[�˷�bQL_���W*�Uz�v>�B¼����y�����j��zgooMJ�b�uMv[�忀��oii�������Rh#�nmaA20HIJ�vc�,��r}}b|����q���1���|~>�J�pZ�d�`bd488(�����I$���jһ�gg��΢���V'�[QV>:2z������]]���wZw>���>8@�ͽ���"u���)�0(�VGF���0聦$cT�g�}�5h^��At�164260���Bx�V��+%ܼYR\ �������� �����T����a_oפּ`�������>�:8ΊD��^)�|�s2�(_)� ��w�$��FG���aTUT��������F��Y۠>=5���������rymm��J�����,Ȧ�|� ŇA \�����t:�775u����㹻�Ҩ�;;;�A&���bb6�ҕ����~VVFZ��Y�x�r�2G��`����D?>|z(ob��� 2"b�����DT~���kw7” e~nN��+�ߪ��܂L2F��[��3������d |��43b�����b�'>M ���a��ET����23u�����4�)ӂi�������ë'Y](8��������a��3���0q� �AC}=z�3��Yi���D��N.�F�.E�Q+++j�#��C�����bqQ qD�����rH&�G���JdՃz��D�'F�D�?:lmn�/���3�T�T��?zBEԨf:&M>��+�.��E��ql�m�Z[cSM�.����R���إ�r��g�����!wn������H���u=�u������3g�}|'''��(VV1��M��ΎN8SVT���_|5�i��М��x�@(�si���qlLLzj*��n�KJ�}�] eq}}݁b�0?��L�x�E�6�?����*�c��7tuv������3>6� ���� F�@ �����OM576����A(� ����[�H�������"�!������֤���|dŢ�BP�#��r9����bŁ����:�~�U���u����=��<�IEND�B`�PLDGWWQimage/png�PNG  IHDR�X�4bPLTE�������xxx{{{����ZZZ��9R:R    ""#$(-@.@4J5M5KWA[A\B\EaEbFb FbHd HgJi MmPsQu QpTx Wy`�`� c� d�f�f�h� i�l�m�n�n�r� t� w����� �� ���� �� �������������������������������������� ���������������������������� *]�{tRNS@��f�IDATx^�օ��@����������������ΰɤ��aJ��iBBH>n��3�����<��;��r�J��B�İ( C)��$h�;D�!B�fe������%,D�XY&�:��2-q��4�e�g1u`AG,0��:��Ғ�iG�N,躽 ���*V��R[�AQcAg���N,p�����2�0:;3ґ���n�v� =�le���|g���eAģn ���������U�=+"X�x�-� ������f͞Q��j��q��{ �]O ��$�[w���Y����M�—(Tw�xsjxhb��ڐ���(u��n���X������h�CI����*nm/+�����, �e��p�����6@�A����� K�R����lX��k`�� � i_K�����IEND�B`�PLDGWW�image/png�PNG  IHDR��y���$�K��p�OZ� �|�j���oE��V8�£08�*��3Ʌa,g�c��i�w@�oe�V�l�N�]$�p$�a@��ɩ�媓��X�QF��܀-��A��XP{��BE�!.R����\ a�Zʥ�/�j�ð�1���8�qw4e�������0�W*�$�ޘ�ծ�A�w�0,����(�܏��:O�{�b��B�L����D�_&�t1V����5eG�J<�'e ���)���u3���8%�>����#L�E�b�GB�7I/T��w���o|�ֱ������>��)�ߣ� �^"���E-: r����� &I v���BH+�VƓr�r u3s���ZC�S���\I�<�5,O�� ��w�ð���m���cs܂���X�C�/B�%H�l��B} ������ X �m9��Z��Y���4��t[�eX�hz���o`�x �j�%����v?[a <3��/�E��ӵl���0 V�9P |���K�3p�/z�LSTHH�79�"��Y�(���tN�b��c�%���<‹*� �av]�ǔ�h_H��\Su�̽�Hs�;�*y~5�:L�� ^�:(�ȓ ,�k���ԉ��TK��W�N�W�a�=޳bl]��d��I%�iԵH��� � ���{7/�+b�2f�{�A}'��$wy�v�v�<�>�SƸ�&,���fo������ �/����8�3 s�q�vy{,A����p�"]h�iB�/���%a;�0�-0��,�Y�3)oP� RS�v�R��9�k�f�7QΥoa��h�N��I9_s����J���;�$<�G� s�w��:��}&'�������n�l���&g8��0�8�%0� '�Ѱ�8�74�z���+�����Z�>{�M���A��;#E{ڔC�D��ǗƟS<�'Lz�������g��_�0�ѹ\Ϲ+O��g?��瓃���ߍb����x�O��˓r��ܩS_� 5Hu_��������O��K���W*w�� ֙ȶ΄!^�_u�d8����sNxE;F9��1���)� �[ӏ��y�h��6��Ƚ9 ��H���_ɜ s�w��;���J�wy{b�?$���jh3�=� h+e���ٺRR95����FO��k�ʉ����ڜ!H��=���:�4Y ����Z,�/�~/�a�(#��T������a���l��h�����5��o�y!���P��L�Cu��&)^�t-���� ��&���"|�|�Dx���2D62�Y���2^u:诸�%� m:�ý�5�J�������<�Bx��9�ɀS=�� �{e�4����a\����~"��h�τ]Юg��h=t�2�X��~�������\}>��:�����?e�3���J���;��tm�o�=9k^�gx����y��pL����P2Ϛw[�� �v«�%��tO���K .����K��R_좨��6yoI��������g�S,���n�WR� �)��]����.}��LvA����S�� A���'eh��u*��> �e��1 1�N�� ��w�s� ��: ~�P^k��vEk�SW�j�SNQ']g��|'\?T�o�Sp���d��>���D� f@���y�Ӿ�r���5ʫکw��`�KdA ����9�����`'��2��2��y(NWr����e�d��v�� �����dGz���+���5w»�L�0�� lR�&@=��ʨ'�Ip�� ^�����_��0&+�U�X V�#��6�����r��B��R�C޼��K�+��T� ǔ0 �ƿ`d�k�08�$�94v�/��8��CF�>?A���o�&PR�U@�IEND�B`�PLDGWW�image/png�PNG  IHDR���#PLTE�������sssRRR4V�tRNS@��fEIDATx^m�� ��Z�Cƿ�W��D��d�,�Gxc�Y���\����P�f�v���= ��n3 ����IEND�B`�PLDGWW�image/png�PNG  IHDR���#PLTE�������sssRRRŴT%tRNS@��fFIDATx^��� �0@�����Q6���*���Uů����� GD@ ĵ&�I1S4��]<������&޵�<�� :��IEND�B`�PLDGWW�image/png�PNG  IHDRd!R� PLTE����:��:tRNS@��f@IDATx^�ϡ D� �1� �B�@�+tJ��;d�}9q J{��+)) J�(�7 ��@���F�3n�(�'BIEND�B`�PLDGWW�image/png�PNG  IHDR&%S�s� PLTE�������'��tRNS@��faIDATx^�ϱ �0 �Dz,�>.�"���X��Mh�������Ng�QD`�s��k����L8>��Kͤ��)�W�.�w�q�b0�Qo,k�i� �F�}���VIEND�B`�PLDGWW�image/png�PNG  IHDR)%ߢ��sRGB���gAMA�� �a pHYs���o�dtEXtSoftwarepaint.net 4.0.6��c� IDATXG�Q�0 C��)�)�ML�B?�R-�ڤC���%i{ w���ㅽ�mA��?z wj��ău]��;Om`�8g�y��gJ��N- ����S�"0�Y�A^$�H�:��U_�~�IEND�B`�PLDGWWe image/png�PNG  IHDRx.�� PLTE����������```�x#�tRNS@��f�IDATx^��Q��@ ���B�]A�u�-�_f�[�S�?�����m��T�%y{��d������eN3�pk�U��hLC��(��� K��#.ކ9ܚ�W6�Q��^|ư_���kcc�=�, �f����O"`�:�wa�X�{�WQ��W�_���XM0 �~s+���Ƃ��yj+�:1�P�ǭ��׽�f�f? �p�bab�c �����̀�'�IEND�B`�PLDGWW�image/png�PNG  IHDR ��� PLTE�UUU���l���tRNS@��f&IDATx^]�! �C�y>z����%y����<���Z0�\�[IEND�B`�PLDGWW�image/png�PNG  IHDR ��� PLTE�UUU���l���tRNS@��f&IDATx^=�! �C�y>z����%�󅱨�<� �/j)��XXIEND�B`�PLDGWW�image/png�PNG  IHDR ��� PLTE�UUU���l���tRNS@��f&IDATx^5�! �C�y>�\T@�����y��X��B�)m�j-IEND�B`�PLDGWW�image/png�PNG  IHDR ��� PLTE�UUU���l���tRNS@��f&IDATx^e�! �C�y>z����%��o�Cm��Y<�0y��IEND�B`�PLDGWW�image/png�PNG  IHDR��>PLTE�A�tRNS@��f2IDATx^m�1 C�j@C�0�����b�����KL[��Jm��y��� S��y�.-IEND�B`�PLDGWW�image/png�PNG  IHDR���� PLTE����ʒÙtRNS@��f?IDATx^uƱ�0 �P��Г�"�x��|�Q�c����vػ�f� �Ȁ#�� h)�nN>�u �"|�IEND�B`�PLDGWW�image/png�PNG  IHDR���� PLTE����ʒÙtRNS@��fCIDATx^eɡ �@��;���A@ ���$S%���X�Y�~���.M�}��X7W lGzTX�`���5^_�����IEND�B`�PLDGWW�image/png�PNG  IHDR���� PLTE����ʒÙtRNS@��fBIDATx^uʱ �0ы�p ��� ���+����I֑=ׯ��l���]����s�&�?vz�e?zN^r� ���%�IEND�B`�PLDGWW�image/png�PNG  IHDR��>PLTE�A�tRNS@��fIDATx^�����)7i��  ޵���IEND�B`�PLDGWW�image/png�PNG  IHDRQ!?� PLTE����ʒÙtRNS@��fEIDATx^m˱ �0 D�o�$��xFb_r�"�y����������!5��f�r��%Op�)��s����{^�oPIEND�B`�PLDGWW�image/png�PNG  IHDR��>PLTE�����1��tRNS@��f=IDATx^]�1� E���IAf�H@&�s8;)�A��Y �7e��E��z��0E{�>���Pgմ ;IEND�B`�PLDGWW�image/png�PNG  IHDRe<��gAMA�� �a pHYs��(J�tEXtSoftwarepaint.net 4.0.6��c�IDATx^�ZWT�}�ġ�� M:H/� ]TDa�1&�DcG#�΀cI@Q��"�(�t��P޾�\� `yCt�{k�:kֽ��N��+��̿�d�2����/� �K:|{�&^w�\�451��/l|c�&GFD��y tդHĈ6�)_cc�gN�.��[�����.l|K�����9��Z���X�f��H6�_���O���<(��2����D�'_邴��ǎ��JN���^p��۷o�a��u ,�!��R�}�DC=S��1O�~ܹSUQI�#G9񧒜����������]���߿ϴ���w�?lG�Y}nNÉ'&������5<| �.Y²�������ii�jjqUՔ��O�۹�gY�&���}V�9���~�� � ±����UQL �������|��������]��=z������GNY����Q�_˾���>gGV������dnlBI8W'gXPp@ ye5q.����61ɚ�7gJ8�@�i}�U�dP���5[��57�yS��BTZƪ� BC1_�(��eτB�o}�W������AaiI ��DFD���s����3g�޹��������v��E�#�Ò6 ty�?�F�U����a!!s�O�+�#���ⳆF���)�L�|AB4#7l��:?�yCz� �ut����C}}=� �hr''ǐ�G�,LL[��!G�㪩!����/@M[[�Ⴧ4�*�efl" ���׵/l5����c|Q版¬�y�h�>�������,p��Y�E�Ԕ��"�=b��}g�G�k]�n���(a��c*��|��ͻ99��� �B����/����~�?�����K48�&4��I����d�PU%U0�2����R"����t!��O��`qaޥ�|��G,sw�,_�M�K�Y����2�/gI���q&_=o�z�X��0�̔#۶���F^-M�0�� b�|����_ݼ���á������Ώ��įi�z{z|��)^������>P֯]�����m4_������������{$�e�n����TUU���I�C��Y��FG�����P��ug�ID_+�~X` �`$����|M�CJr2SAa���{��DPpJ$��S|�B�fB�D�Tr2u�G��r��d��'��tf�DC��{�1�?N�����Q#�JJ���?�/挃��esl��XL���MOGG�`�#9y�� ��\,B�G����I6g���VTo߼ٳ{7�6�֙d�7�]g��_��y�sT��� �R� ��oaj��O�H:|�� Yh!.7��Ƴ��y�qԕU��{� ���E.>r��1T�p� �����^�ޢ�44�]�]  c��݂����z���>%���L������(\U5���i����w�bZMSϣ�CT�qost�ػ%��^?H�q�w�"]W[koc+֑,���>^ޟ����'_p: U5�?��҅~�[������-����s��}/��*�s�KK��鱌嫢���ʚ�ja]-���rR��N���8��Z�K���<��W�<�&Aͳg֯��@�!mk�l��jmia���|�BXA�E���ȜY2�_�v/7�����u��Y���ܸ~=��(�ܾ� H����b`)� ��q��1�Z����z�ܹh��@?� ���[��Ё;3J�Y���x�/�y{z��� vE4��~�__���#���8� ��̈�`��"_ 2����/� � �� s!��|��'�<�����$Q�*YX [Kf��Ye����,)d�\ᬶ���s�方 ����Ĥ䓉E�E G�|�=}��ٳ ���#�����3�3�◴��%d|I_�AƗt��.n�55���%�%���:2<���h�ğ�p)+/++-)yC����ے�HP��P������=Ҡ�D��������FFF_6V��-J����� U���p{oii��� ��e�"�CLM؋=J ���EE��� ��^��Q 57fb��0[�އD��P&�����͕��d�t)&�l�� k]b�o�UU㪩i������?����ԕU,LLoee�E>{�LO[j�gf޼qÐ����#C�ii��,�̞TU�=}FS]��:�����4���64xu{;���������ñ��hj^JOǚ{{�jj� &�8��}�����h���ʊ� +s c���Fz�S���������rw���nl$Ը:�dbZ��f{�����h1$��)[�ؿ7���Z[� M2 Lu|<��������J����z�B�@��*�|�r_oo��XT)p8�� �K�]X]�N���/_����������� �w� G����PPCH����������k����C~����:���/ mߺMI^A]EuU@`JRr� �Z x����E}CSSKR�霜;1�M�]U?}�5v z���}��%Y� t/60 j�*9�s`/�-���UC#�?��7/�^޽���ֲ�R,VUQIp!�x�X�UW,[~�ĉ��4,_�����#�? �+��t���W���:lf g����`&*��vK�>y��%'��%��������`�۷n1��)� 5sSx�#�GÁ�baj�͈X�n1(!�U���M}���[9�.���ˆ����p��}0����C�‚7��G�O;w���'t���F���VK+�G�7����WOO�����:T���k�N {��Q����=a� _�_�}{��UTܜ����`������ |egg3�i��&��+�� �����¢�iuQQ�W��R�cP���9N�cc�š�����G �����7|����c��,��{�.�%榪���K����dma���X)�x _�\C==4���Qu.�|:p�a��[�N$$$��.�pA48H�K���}q�[0�VMY��|e�� �����B����Sǧ��.: �&=��ߎ�h�hk�x���rF��ߏ9B���|>�S1_�3������.3c,���C��2R��6 =���`�ޞ���~  ��/_/oHz޾  "?@��|�1i�#�]��ȏl�_�vsqA��66��s ��okj�V O�LBB�������C�Wíj ��tt`_�_&:A��@�t�����1%F��}M�e�[��o�u�f/��w4��1_��DZ�>������Aa~H�[b(����rKs ����� A��+�����o�)��{$.���Kl��Ʈ`�P6]�]iip]cc6c�/_���Oݺ��Fmd�D� d�[Y��x�iS�x*%�=8r�0"4��ȡ��\MD[� � |!�bШ Y�p�ic����#��011 �\�t���'�����G�1_�y$( ������ ���Z���m��bc��� W>�w �I����<��puCVbD�ѹ:9���i����k��'􏦘k���(>zsrp�>r����JA�Ų�2Ow���+`)p�۷��N�jk��>�+���pq����`n@_c��؏A�ⵡa���=��{�P��� s˦I@CC��m�ܝ]������xJ��|��Y���2����/� �K:���2����/i05�O&� \�IEND�B`�PLDGWWoimage/png�PNG  IHDR� ���IDATx^�\|TU�?��7-�L&��@��T�DpU�A��ȷAvEe� Rt�UqaWD�T)"`A ,b�PCK�O�i����qf23$���~����A�{�����s&�KF:@jkk���� (��$0h=:���������d2��+��曟MIIY'��JdF���`P�D��a�dcV�~ O)OPX��| Ϟ=�@��٬6P�U1W�^�/��E�95�E&A.���E�@�e袥ϯL�� B��M^��ڹ���cLr.R�TV�^�5֑|���Rhhh����ᦤ��N�<m�ZP��ϱc�ПO��,�[����0�"�����1e��aJ~�Z�������O���џ�}���ghZ��wV��#˲� �0Ƭו�:,,�b``�7� �g��35r � �^ �7�Gc��������@Meh�t�Q|��kftAh^'w���u�ZH֓*����+W���[_+))�~��/�8h�dQ��W��Y�v�wM��Q�#J�Pn����_9�������4Z��v�� o7����'z0!!!�+�r$��� x�ԩS/�훁::8-�/�����:2���� H�t�$&�VX�_��Xp_9ݽר��jyq�P����r��о�v�ziѢEC� �N��%%e����1^_B?�&����I�<�yy� \ ��"}4s�@��Ɲ�\{G��o��w?PD_��B\� �|P ,�P��.��r|�˘� �W0ֺ�=`����h����o_���-��ZcD��N`���< �ʞ�s������@E�Y��ĐPo�.��0��JI�]gcSH:��J9�D���B&���~����A,�s���؆y!�@��İ�g"�N���hI°-�m�i�1��x}��/�J�:��9�b_��{=/��_q�C����\&m��������=�����q��$I7��C�1$Ɉ�Z��\�o�1��i�H;�Cv�N��)>щ�������,��D��Qf&ͼ�A�Q��_���]G�NZ\�Ϡ� T��/����d�%�!) �>c�(����������@�L��WхgjaD�I����GU]��.����q��MMM=rrr�^8����� ,UH� ���1����_���_����5�����r�ʐ�YY�+��4�c�>��W�v��n�&!1�[���}q���1�b���,XLJN:r�/�ܹs�/]�4� ?_�e��Q������(u���#""Π}y��W�8��Ayz�52//o̥�{�|�ɼ��;w.NJJZץK������ZLB2G�:urH�Z�8s���555�����GKH��u�N�+A��#�H@�O)�8�41�"qx9�e| rה@R5#���i�0E�,0A�6#���>������P ��Z���'n׽��/���J75�t�O ���ݍ>�|Tg!=^? ��(�E�+"�6-��$a��x�@ �A�����o��ơ��~[���G&M��7�Ʌݺu�'x :j5kAA��ז.ݴ��7��}ÇKӦO��a�� ���.Y�v���Ǐ���p��ő��~�_�׬����P�?L��?��L��t�N��p��o��7_[��=듀��G�L�ʹ��u� ���P0�D�h�.I�0nܸy��O^�J�ԭ 0���\]$�rm��j�_���d��G�: �e��ـ���6��T,\�3�c)���R�e��J˙��ު���4���~¸� ��+ʥ�֌����� Ҙ������0����g-�|�m�I� @)m� �~ㆠ+�/��~��,T>6� D�����b��H^���{��C��O>��e�:dȐ%����@A������P_Y j�����(mάY���̤Iq8�:n�V��)@�8lQNP�Z��9d�X�2��6oݱ݄~���ʫqn�S\<ת�Z�m�oЇ��s�$��g�XQ\lb��1�q�䩸1�)XU-k�Q�3�{Ԅ�������%�"���vi9'���ˋF>4*$����Qf �� �ɢ����[����2���D&����'b ���@�����c��ݻwo���w��n4g��#�BYA� ��/-���r��Od|,��ʋ/�윜\��iM�r���A�吃����<�� %�ep�m�1�Zm��f{W)�.H����žݻ����E$/�ׂlM �PVS��� 8��D'&8^l�;����-�으\ʉ8N�V�\'@W��]A��!ĝ�V��)�,��8�;g(�V�B�T��D��Aa=T �z!eؗ��[ >y�/�Ӧy�R�v7]�P0E�@n��5(�B�ގ�ϱ18Zh}���>OR{��\���۫7<0�!cdd$��h���!;;�~���`������?�E���� �Q�����I,�;��i���V ++K8�w�.։4���p��y@ ��%\ ����np�b� ���w�����o8�3�1�'s���9}z��+W>���I�_�3a��ݼ�Axt��"�#����n�_��Mh���> 6�/>�,������Es�z�O�.f_T���{A����ƺzxr�|3��%{�n8�V��[}���� R�t/�y�F�I =\D�'L4��,���f�S����yݞ$�M]�s�G��:A�O���� �gN�Z�-?���B��1����8zbT��7X%o��j�LV@�]^=�X�-M���6NB�k�>yeu�vYd�_��_�L�4�tD#y��d|�T�G͛�+-�o�1c�Ly����49�0�l�g0�JX�z����&��ڮ�V{�_�� �4�������å�)� ��֌���7r�U ��ۦ���b���G�@S��e,.��'y�Fc��Hr���i��PV�����Fѻ2$A�5I� �An�AӖ1�R��T�op[����mI��[�U����j7nf8�DH�*��<���w��%S�c@A)ax)T���q��TS_W���|��N���-�V�8EݧO��(�Z�W��Ν_� � ً� ��W_6�g�B���.(@���<��!��q:ιm{%��&??�I\�9xz c4L���� � p"�íwۅ f�����\�������FknQ!��:i�gB˒ ��Z��h,,+���?^8��y=8�8eI���nt8�(������]��\��C��HW �L���zowl�c���K�.�7�>}�cQ%/s��7 ���c|z �Ïv�q;�ݧ��k c�U��jW�e %���e �^��/�/�{y:��UD �h�(&⪶�߱�Z%���3�?���s�ί#�(�AN~S`��={����0M���ɁAAM�,�c�`���#,>.~����P�L(�%����z�޽{G���l���ի� YvYy���;������ N�,++U�\ /]V_ -�d��?����f��7�[x+�,�M"Hlp�g�������n+'M�<�g;�?g7IQ������oO���u�|�>�k����ϛyIID�=����F��S(�e��_;>N�SB��@�1 �aY��7�0���H�3� �X~�f��� ��w2�/G�Z���H8z@'�E�����6����={NC���<�/?7j�]��m�n����pnUdD�6���7�|���Əһgϫ$P8!8���ȅ����� Pha��Ž�}!{��bՃxP!L�?�~��q�p��=���{o͚XN��\ƹ�E��w@�����t̕۸q���B0��;�0`~�:�� g�\�kۺ ��[7��M=�smʜ|�eE%bi�5p�l6��7}p���Tr���9c���� C�O�Ё�"�t��h�� �^�]E����Y���Z�%7Bq�)X������)0�݄�kU w�����k��̘���GGB��@MU5-/*�6$.�� �$Bi �r�Z�`�}#���Wp��3I�N�I�Li�[VTL%��%��Vk5� �L��,#G�0wKM=��*���Z'F����[�������g��#�}�tH�1O���S�h�(���j̍�ѿ��8��O�=�̘1c��?��hjltx)x����f3����4:m���?��Vü���A/Ɖ�ܲFrML(q����׮ x넘8�r�1o��|�^'zs���$�^�#�j΅��� �\�����ΐ�X� �_oF�d��zK�W�Y���ז'`���r��#m>an2A�r�6uj�w��Bee����5�i���<^��wbb0D�>__���� 8�̝��><�� U���$I������z��H�1���\ׂ�������x�!=��pG���d���2��9s�3� �t�K/b|a8 �G���� ��� EƘ�x����h?oX�l٤O=�γ��Q�72>� g� �J���� ^���K���Uj���a��հ�m��z�'q�H��'��<� �bv��4ɠk�M]��V�6�zs�?׀( D�x]e#��ЎT�X���ߙ9O���}��M}���7��œ�O�7.�L��RVZx��Ep��3>��Sh��\����5�Bڠ���ߙ;bĈ-={�z/w�ċ��1F���16�`X�u���[�n� �ѭ;<<>�nlF�+h>���9r��C�m������7R�b��`��A�(c����o<�y=ri�:mڽ���y�-���� ��7�§��@�.D��f9[X�P����W���C�RSg%� �`p�Ex���:j5%�H\�����F�e(��|��Z�$���βC4�/�į���c��T&����?vBa�m�: $��m���Ԏk���F桝�J������r��J���(P!�۟�����(��D ��� ��� �˷P#����컞_ؾ;�!�r�Z=�-#��о�Ɨ(��†�e0 slg+����|�F��}�j�(� �|B)e|�F�5sf�g��kC ��!�lP�A�CG��ļ�w���?��ط��� �����Yh� ����q�������c^����SdOl�~힑[0�.�`���?�\F|���CB�PֿpCW�����I��{;�}$���k�����Q��ǯ Ή��� �_e?و���cdǞ�M �Wט���c�n6���eO�ƾ}����XK��r�v���ܟsb��(mm�)_�+������/G8�����㝜�WC_}��aH.��ud�!�`ˎ�sRRR����>��}�����}by�ֆ��|����:~��/��Em�C��eg��������}������� �t���Mf�@���.^��p׷�����m?�jZ�_��Je�Ǐ�����t���R�w�����/,Xp^��q;��j)���=�IEND�B`�SCNAWW�:�8��26J�>��&� �d��q�L�� �-�,�>0��B��F�L�(��>�Е�P@���ǚ;L����a@�p/Kc�9S��z1���B�h�w��5%SRCMWW�Operators_Swing_DitecݓI��SD�c�|=\�@a�rH/J����=�Ralcolor_Ditech�>����D�@!��Sw�8wC��.\N�ĸ��.M;Operators_Swing_DitecݓI��SD�c�|=\�@a�rH/J����=�Ralcolor_Ditech�>����D�@!��Sw�8wC��.\N�ĸ��.M;Ralcolor_Ditech�>����D�@!��Sw�8wC��.\N�ĸ��.M;Operators_Swing_DitecݓI��SD�c�|=\�@a�rH/J����=�CSRPWWTXTCWWCSMFWWCSMBWWFILEw�80GSYMGSAC�  �  wLh*Ralcolor_Ditec.gsmWW MYSGCASGDAEH��h�>����D�@!��Sw�8wC��.\N�ĸ��.M;SCNAP�SRCM�CSD3��@CSD2��@CSD1n>@CSRP�B@CSIU�B @CSLV�X @TXTC�YCSMF�Y@CSMB�Y@DRAP�YPLDG�^cSCNAWW�:�8��26J�>��&� �d��q�L�� �-�,�>0��B��F�L�(��>�Е�P@���ǚ;L����a@�p/Kc�9S��z1���B�h�w��5%SRCMWWCSD3WW� !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- m1=0:m2=0:m3=0:m4=0 if iralsurface=ral_gloss then m1=0.95:m2=0.77:m3=0.7:m4=40 else if iralsurface=ral_mat then m1=0.71:m2=0.82:m3=0.5:m4=3 else if iralsurface=ral_semigloss then m1=0.9:m2=0.74:m3=0.6:m4=23 endif endif endif end midx,ralr,ralg,ralb,m1,m2,m3,m4,stralsurf[iralsurface] CSD2WW� !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- end midx,ralr,ralg,ralb CSD1WW> !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- eps=0.0001:raltext="RAL":function_ui=1:function_getmatidx=2:function_getmat=3:ral_gloss=1:ral_mat=2:ral_semigloss=3 dim stralsurf[3]:stralsurf[1]=`Gloss`:stralsurf[2]=`Matt`:stralsurf[3]=`Semi-Gloss` dim ralidx[194],ralrgb[194][3]:i=1:ralidx[i]=1000:ralrgb[i][1]=214:ralrgb[i][2]=199:ralrgb[i][3]=148:r1000=i:i=i+1:ralidx[i]=1001:ralrgb[i][1]=217:ralrgb[i][2]=186:ralrgb[i][3]=140:r1001=i:i=i+1 ralidx[i]=1002:ralrgb[i][1]=214:ralrgb[i][2]=176:ralrgb[i][3]=117:r1002=i:i=i+1:ralidx[i]=1003:ralrgb[i][1]=252:ralrgb[i][2]=163:ralrgb[i][3]=41:r1003=i:i=i+1:ralidx[i]=1004:ralrgb[i][1]=227:ralrgb[i][2]=150:ralrgb[i][3]=36:r1004=i:i=i+1 ralidx[i]=1005:ralrgb[i][1]=201:ralrgb[i][2]=135:ralrgb[i][3]=33:r1005=i:i=i+1:ralidx[i]=1006:ralrgb[i][1]=224:ralrgb[i][2]=130:ralrgb[i][3]=31:r1006=i:i=i+1:ralidx[i]=1007:ralrgb[i][1]=227:ralrgb[i][2]=122:ralrgb[i][3]=31:r1007=i:i=i+1 ralidx[i]=1011:ralrgb[i][1]=173:ralrgb[i][2]=122:ralrgb[i][3]=79:r1011=i:i=i+1:ralidx[i]=1012:ralrgb[i][1]=227:ralrgb[i][2]=184:ralrgb[i][3]=56:r1012=i:i=i+1:ralidx[i]=1013:ralrgb[i][1]=255:ralrgb[i][2]=245:ralrgb[i][3]=227:r1013=i:i=i+1 ralidx[i]=1014:ralrgb[i][1]=240:ralrgb[i][2]=214:ralrgb[i][3]=171:r1014=i:i=i+1:ralidx[i]=1015:ralrgb[i][1]=252:ralrgb[i][2]=235:ralrgb[i][3]=204:r1015=i:i=i+1:ralidx[i]=1016:ralrgb[i][1]=255:ralrgb[i][2]=245:ralrgb[i][3]=66:r1016=i:i=i+1 ralidx[i]=1017:ralrgb[i][1]=255:ralrgb[i][2]=171:ralrgb[i][3]=89:r1017=i:i=i+1:ralidx[i]=1018:ralrgb[i][1]=255:ralrgb[i][2]=214:ralrgb[i][3]=77:r1018=i:i=i+1:ralidx[i]=1019:ralrgb[i][1]=163:ralrgb[i][2]=140:ralrgb[i][3]=122:r1019=i:i=i+1 ralidx[i]=1020:ralrgb[i][1]=156:ralrgb[i][2]=143:ralrgb[i][3]=97:r1020=i:i=i+1:ralidx[i]=1021:ralrgb[i][1]=252:ralrgb[i][2]=189:ralrgb[i][3]=31:r1021=i:i=i+1:ralidx[i]=1023:ralrgb[i][1]=252:ralrgb[i][2]=184:ralrgb[i][3]=33:r1023=i:i=i+1 ralidx[i]=1024:ralrgb[i][1]=181:ralrgb[i][2]=140:ralrgb[i][3]=79:r1024=i:i=i+1:ralidx[i]=1026:ralrgb[i][1]=255:ralrgb[i][2]=255:ralrgb[i][3]=10:r1026=i:i=i+1:ralidx[i]=1027:ralrgb[i][1]=153:ralrgb[i][2]=117:ralrgb[i][3]=33:r1027=i:i=i+1 ralidx[i]=1028:ralrgb[i][1]=255:ralrgb[i][2]=140:ralrgb[i][3]=26:r1028=i:i=i+1:ralidx[i]=1032:ralrgb[i][1]=227:ralrgb[i][2]=163:ralrgb[i][3]=41:r1032=i:i=i+1:ralidx[i]=1033:ralrgb[i][1]=255:ralrgb[i][2]=148:ralrgb[i][3]=54:r1033=i:i=i+1 ralidx[i]=1034:ralrgb[i][1]=247:ralrgb[i][2]=153:ralrgb[i][3]=92:r1034=i:i=i+1:ralidx[i]=2000:ralrgb[i][1]=224:ralrgb[i][2]=94:ralrgb[i][3]=31:r2000=i:i=i+1:ralidx[i]=2001:ralrgb[i][1]=186:ralrgb[i][2]=46:ralrgb[i][3]=33:r2001=i:i=i+1 ralidx[i]=2002:ralrgb[i][1]=204:ralrgb[i][2]=36:ralrgb[i][3]=28:r2002=i:i=i+1:ralidx[i]=2003:ralrgb[i][1]=255:ralrgb[i][2]=99:ralrgb[i][3]=54:r2003=i:i=i+1:ralidx[i]=2004:ralrgb[i][1]=242:ralrgb[i][2]=59:ralrgb[i][3]=28:r2004=i:i=i+1 ralidx[i]=2005:ralrgb[i][1]=252:ralrgb[i][2]=28:ralrgb[i][3]=20:r2005=i:i=i+1:ralidx[i]=2007:ralrgb[i][1]=255:ralrgb[i][2]=117:ralrgb[i][3]=33:r2007=i:i=i+1:ralidx[i]=2008:ralrgb[i][1]=250:ralrgb[i][2]=79:ralrgb[i][3]=41:r2008=i:i=i+1 ralidx[i]=2009:ralrgb[i][1]=235:ralrgb[i][2]=59:ralrgb[i][3]=28:r2009=i:i=i+1:ralidx[i]=2010:ralrgb[i][1]=212:ralrgb[i][2]=69:ralrgb[i][3]=41:r2010=i:i=i+1:ralidx[i]=2011:ralrgb[i][1]=237:ralrgb[i][2]=92:ralrgb[i][3]=41:r2011=i:i=i+1 ralidx[i]=2012:ralrgb[i][1]=222:ralrgb[i][2]=82:ralrgb[i][3]=71:r2012=i:i=i+1:ralidx[i]=3000:ralrgb[i][1]=171:ralrgb[i][2]=31:ralrgb[i][3]=28:r3000=i:i=i+1:ralidx[i]=3001:ralrgb[i][1]=163:ralrgb[i][2]=23:ralrgb[i][3]=26:r3001=i:i=i+1 ralidx[i]=3002:ralrgb[i][1]=163:ralrgb[i][2]=26:ralrgb[i][3]=26:r3002=i:i=i+1:ralidx[i]=3003:ralrgb[i][1]=138:ralrgb[i][2]=18:ralrgb[i][3]=20:r3003=i:i=i+1:ralidx[i]=3004:ralrgb[i][1]=105:ralrgb[i][2]=15:ralrgb[i][3]=20:r3004=i:i=i+1 ralidx[i]=3005:ralrgb[i][1]=79:ralrgb[i][2]=18:ralrgb[i][3]=26:r3005=i:i=i+1:ralidx[i]=3007:ralrgb[i][1]=46:ralrgb[i][2]=18:ralrgb[i][3]=26:r3007=i:i=i+1:ralidx[i]=3009:ralrgb[i][1]=94:ralrgb[i][2]=33:ralrgb[i][3]=33:r3009=i:i=i+1 ralidx[i]=3011:ralrgb[i][1]=120:ralrgb[i][2]=20:ralrgb[i][3]=23:r3011=i:i=i+1:ralidx[i]=3012:ralrgb[i][1]=204:ralrgb[i][2]=130:ralrgb[i][3]=115:r3012=i:i=i+1:ralidx[i]=3013:ralrgb[i][1]=150:ralrgb[i][2]=31:ralrgb[i][3]=28:r3013=i:i=i+1 ralidx[i]=3014:ralrgb[i][1]=217:ralrgb[i][2]=102:ralrgb[i][3]=117:r3014=i:i=i+1:ralidx[i]=3015:ralrgb[i][1]=232:ralrgb[i][2]=156:ralrgb[i][3]=181:r3015=i:i=i+1:ralidx[i]=3016:ralrgb[i][1]=166:ralrgb[i][2]=36:ralrgb[i][3]=38:r3016=i:i=i+1 ralidx[i]=3017:ralrgb[i][1]=209:ralrgb[i][2]=54:ralrgb[i][3]=84:r3017=i:i=i+1:ralidx[i]=3018:ralrgb[i][1]=207:ralrgb[i][2]=41:ralrgb[i][3]=66:r3018=i:i=i+1:ralidx[i]=3020:ralrgb[i][1]=199:ralrgb[i][2]=23:ralrgb[i][3]=18:r3020=i:i=i+1 ralidx[i]=3022:ralrgb[i][1]=217:ralrgb[i][2]=89:ralrgb[i][3]=79:r3022=i:i=i+1:ralidx[i]=3024:ralrgb[i][1]=252:ralrgb[i][2]=10:ralrgb[i][3]=28:r3024=i:i=i+1:ralidx[i]=3026:ralrgb[i][1]=252:ralrgb[i][2]=20:ralrgb[i][3]=20:r3026=i:i=i+1 ralidx[i]=3027:ralrgb[i][1]=181:ralrgb[i][2]=18:ralrgb[i][3]=51:r3027=i:i=i+1:ralidx[i]=3031:ralrgb[i][1]=166:ralrgb[i][2]=28:ralrgb[i][3]=46:r3031=i:i=i+1:ralidx[i]=4001:ralrgb[i][1]=130:ralrgb[i][2]=64:ralrgb[i][3]=128:r4001=i:i=i+1 ralidx[i]=4002:ralrgb[i][1]=143:ralrgb[i][2]=38:ralrgb[i][3]=64:r4002=i:i=i+1:ralidx[i]=4003:ralrgb[i][1]=201:ralrgb[i][2]=56:ralrgb[i][3]=140:r4003=i:i=i+1:ralidx[i]=4004:ralrgb[i][1]=92:ralrgb[i][2]=8:ralrgb[i][3]=43:r4004=i:i=i+1 ralidx[i]=4005:ralrgb[i][1]=99:ralrgb[i][2]=61:ralrgb[i][3]=156:r4005=i:i=i+1:ralidx[i]=4006:ralrgb[i][1]=145:ralrgb[i][2]=15:ralrgb[i][3]=102:r4006=i:i=i+1:ralidx[i]=4007:ralrgb[i][1]=56:ralrgb[i][2]=10:ralrgb[i][3]=46:r4007=i:i=i+1 ralidx[i]=4008:ralrgb[i][1]=125:ralrgb[i][2]=31:ralrgb[i][3]=122:r4008=i:i=i+1:ralidx[i]=4009:ralrgb[i][1]=158:ralrgb[i][2]=115:ralrgb[i][3]=148:r4009=i:i=i+1:ralidx[i]=4010:ralrgb[i][1]=191:ralrgb[i][2]=23:ralrgb[i][3]=115:r4010=i:i=i+1 ralidx[i]=5000:ralrgb[i][1]=23:ralrgb[i][2]=51:ralrgb[i][3]=107:r5000=i:i=i+1:ralidx[i]=5001:ralrgb[i][1]=10:ralrgb[i][2]=51:ralrgb[i][3]=84:r5001=i:i=i+1:ralidx[i]=5002:ralrgb[i][1]=0:ralrgb[i][2]=15:ralrgb[i][3]=117:r5002=i:i=i+1 ralidx[i]=5003:ralrgb[i][1]=0:ralrgb[i][2]=23:ralrgb[i][3]=69:r5003=i:i=i+1:ralidx[i]=5004:ralrgb[i][1]=3:ralrgb[i][2]=13:ralrgb[i][3]=31:r5004=i:i=i+1:ralidx[i]=5005:ralrgb[i][1]=0:ralrgb[i][2]=46:ralrgb[i][3]=122:r5005=i:i=i+1 ralidx[i]=5007:ralrgb[i][1]=38:ralrgb[i][2]=79:ralrgb[i][3]=135:r5007=i:i=i+1:ralidx[i]=5008:ralrgb[i][1]=26:ralrgb[i][2]=41:ralrgb[i][3]=56:r5008=i:i=i+1:ralidx[i]=5009:ralrgb[i][1]=23:ralrgb[i][2]=69:ralrgb[i][3]=112:r5009=i:i=i+1 ralidx[i]=5010:ralrgb[i][1]=0:ralrgb[i][2]=43:ralrgb[i][3]=112:r5010=i:i=i+1:ralidx[i]=5011:ralrgb[i][1]=3:ralrgb[i][2]=20:ralrgb[i][3]=46:r5011=i:i=i+1:ralidx[i]=5012:ralrgb[i][1]=41:ralrgb[i][2]=115:ralrgb[i][3]=184:r5012=i:i=i+1 ralidx[i]=5013:ralrgb[i][1]=0:ralrgb[i][2]=18:ralrgb[i][3]=69:r5013=i:i=i+1:ralidx[i]=5014:ralrgb[i][1]=77:ralrgb[i][2]=105:ralrgb[i][3]=153:r5014=i:i=i+1:ralidx[i]=5015:ralrgb[i][1]=23:ralrgb[i][2]=97:ralrgb[i][3]=171:r5015=i:i=i+1 ralidx[i]=5017:ralrgb[i][1]=0:ralrgb[i][2]=59:ralrgb[i][3]=128:r5017=i:i=i+1:ralidx[i]=5018:ralrgb[i][1]=56:ralrgb[i][2]=148:ralrgb[i][3]=130:r5018=i:i=i+1:ralidx[i]=5019:ralrgb[i][1]=10:ralrgb[i][2]=66:ralrgb[i][3]=120:r5019=i:i=i+1 ralidx[i]=5020:ralrgb[i][1]=5:ralrgb[i][2]=51:ralrgb[i][3]=51:r5020=i:i=i+1:ralidx[i]=5021:ralrgb[i][1]=26:ralrgb[i][2]=122:ralrgb[i][3]=99:r5021=i:i=i+1:ralidx[i]=5022:ralrgb[i][1]=0:ralrgb[i][2]=8:ralrgb[i][3]=79:r5022=i:i=i+1 ralidx[i]=5023:ralrgb[i][1]=46:ralrgb[i][2]=82:ralrgb[i][3]=143:r5023=i:i=i+1:ralidx[i]=5024:ralrgb[i][1]=87:ralrgb[i][2]=140:ralrgb[i][3]=181:r5024=i:i=i+1:ralidx[i]=6000:ralrgb[i][1]=51:ralrgb[i][2]=120:ralrgb[i][3]=84:r6000=i:i=i+1 ralidx[i]=6001:ralrgb[i][1]=38:ralrgb[i][2]=102:ralrgb[i][3]=41:r6001=i:i=i+1:ralidx[i]=6002:ralrgb[i][1]=38:ralrgb[i][2]=87:ralrgb[i][3]=33:r6002=i:i=i+1:ralidx[i]=6003:ralrgb[i][1]=61:ralrgb[i][2]=69:ralrgb[i][3]=46:r6003=i:i=i+1 ralidx[i]=6004:ralrgb[i][1]=13:ralrgb[i][2]=59:ralrgb[i][3]=46:r6004=i:i=i+1:ralidx[i]=6005:ralrgb[i][1]=10:ralrgb[i][2]=56:ralrgb[i][3]=31:r6005=i:i=i+1:ralidx[i]=6006:ralrgb[i][1]=41:ralrgb[i][2]=43:ralrgb[i][3]=36:r6006=i:i=i+1 ralidx[i]=6007:ralrgb[i][1]=28:ralrgb[i][2]=38:ralrgb[i][3]=23:r6007=i:i=i+1:ralidx[i]=6008:ralrgb[i][1]=33:ralrgb[i][2]=33:ralrgb[i][3]=26:r6008=i:i=i+1:ralidx[i]=6009:ralrgb[i][1]=23:ralrgb[i][2]=41:ralrgb[i][3]=28:r6009=i:i=i+1 ralidx[i]=6010:ralrgb[i][1]=54:ralrgb[i][2]=105:ralrgb[i][3]=38:r6010=i:i=i+1:ralidx[i]=6011:ralrgb[i][1]=94:ralrgb[i][2]=125:ralrgb[i][3]=79:r6011=i:i=i+1:ralidx[i]=6012:ralrgb[i][1]=31:ralrgb[i][2]=46:ralrgb[i][3]=43:r6012=i:i=i+1 ralidx[i]=6013:ralrgb[i][1]=117:ralrgb[i][2]=115:ralrgb[i][3]=79:r6013=i:i=i+1:ralidx[i]=6014:ralrgb[i][1]=51:ralrgb[i][2]=48:ralrgb[i][3]=38:r6014=i:i=i+1:ralidx[i]=6015:ralrgb[i][1]=41:ralrgb[i][2]=43:ralrgb[i][3]=38:r6015=i:i=i+1 ralidx[i]=6016:ralrgb[i][1]=15:ralrgb[i][2]=112:ralrgb[i][3]=51:r6016=i:i=i+1:ralidx[i]=6017:ralrgb[i][1]=64:ralrgb[i][2]=130:ralrgb[i][3]=54:r6017=i:i=i+1:ralidx[i]=6018:ralrgb[i][1]=79:ralrgb[i][2]=168:ralrgb[i][3]=51:r6018=i:i=i+1 ralidx[i]=6019:ralrgb[i][1]=191:ralrgb[i][2]=227:ralrgb[i][3]=186:r6019=i:i=i+1:ralidx[i]=6020:ralrgb[i][1]=38:ralrgb[i][2]=56:ralrgb[i][3]=41:r6020=i:i=i+1:ralidx[i]=6021:ralrgb[i][1]=133:ralrgb[i][2]=166:ralrgb[i][3]=122:r6021=i:i=i+1 ralidx[i]=6022:ralrgb[i][1]=43:ralrgb[i][2]=38:ralrgb[i][3]=28:r6022=i:i=i+1:ralidx[i]=6024:ralrgb[i][1]=36:ralrgb[i][2]=145:ralrgb[i][3]=64:r6024=i:i=i+1:ralidx[i]=6025:ralrgb[i][1]=74:ralrgb[i][2]=110:ralrgb[i][3]=51:r6025=i:i=i+1 ralidx[i]=6026:ralrgb[i][1]=10:ralrgb[i][2]=92:ralrgb[i][3]=51:r6026=i:i=i+1:ralidx[i]=6027:ralrgb[i][1]=125:ralrgb[i][2]=204:ralrgb[i][3]=189:r6027=i:i=i+1:ralidx[i]=6028:ralrgb[i][1]=38:ralrgb[i][2]=74:ralrgb[i][3]=51:r6028=i:i=i+1 ralidx[i]=6029:ralrgb[i][1]=18:ralrgb[i][2]=120:ralrgb[i][3]=38:r6029=i:i=i+1:ralidx[i]=6032:ralrgb[i][1]=41:ralrgb[i][2]=138:ralrgb[i][3]=64:r6032=i:i=i+1:ralidx[i]=6033:ralrgb[i][1]=66:ralrgb[i][2]=140:ralrgb[i][3]=120:r6033=i:i=i+1 ralidx[i]=6034:ralrgb[i][1]=125:ralrgb[i][2]=189:ralrgb[i][3]=181:r6034=i:i=i+1:ralidx[i]=7000:ralrgb[i][1]=115:ralrgb[i][2]=133:ralrgb[i][3]=145:r7000=i:i=i+1:ralidx[i]=7001:ralrgb[i][1]=135:ralrgb[i][2]=148:ralrgb[i][3]=166:r7001=i:i=i+1 ralidx[i]=7002:ralrgb[i][1]=122:ralrgb[i][2]=117:ralrgb[i][3]=97:r7002=i:i=i+1:ralidx[i]=7003:ralrgb[i][1]=112:ralrgb[i][2]=112:ralrgb[i][3]=97:r7003=i:i=i+1:ralidx[i]=7004:ralrgb[i][1]=156:ralrgb[i][2]=156:ralrgb[i][3]=166:r7004=i:i=i+1 ralidx[i]=7005:ralrgb[i][1]=97:ralrgb[i][2]=105:ralrgb[i][3]=105:r7005=i:i=i+1:ralidx[i]=7006:ralrgb[i][1]=107:ralrgb[i][2]=97:ralrgb[i][3]=87:r7006=i:i=i+1:ralidx[i]=7008:ralrgb[i][1]=105:ralrgb[i][2]=84:ralrgb[i][3]=56:r7008=i:i=i+1 ralidx[i]=7009:ralrgb[i][1]=77:ralrgb[i][2]=82:ralrgb[i][3]=74:r7009=i:i=i+1:ralidx[i]=7010:ralrgb[i][1]=74:ralrgb[i][2]=79:ralrgb[i][3]=74:r7010=i:i=i+1:ralidx[i]=7011:ralrgb[i][1]=64:ralrgb[i][2]=74:ralrgb[i][3]=84:r7011=i:i=i+1 ralidx[i]=7012:ralrgb[i][1]=74:ralrgb[i][2]=84:ralrgb[i][3]=89:r7012=i:i=i+1:ralidx[i]=7013:ralrgb[i][1]=71:ralrgb[i][2]=66:ralrgb[i][3]=56:r7013=i:i=i+1:ralidx[i]=7015:ralrgb[i][1]=61:ralrgb[i][2]=66:ralrgb[i][3]=82:r7015=i:i=i+1 ralidx[i]=7016:ralrgb[i][1]=38:ralrgb[i][2]=46:ralrgb[i][3]=56:r7016=i:i=i+1:ralidx[i]=7021:ralrgb[i][1]=26:ralrgb[i][2]=33:ralrgb[i][3]=41:r7021=i:i=i+1:ralidx[i]=7022:ralrgb[i][1]=61:ralrgb[i][2]=61:ralrgb[i][3]=59:r7022=i:i=i+1 ralidx[i]=7023:ralrgb[i][1]=122:ralrgb[i][2]=125:ralrgb[i][3]=117:r7023=i:i=i+1:ralidx[i]=7024:ralrgb[i][1]=48:ralrgb[i][2]=56:ralrgb[i][3]=69:r7024=i:i=i+1:ralidx[i]=7026:ralrgb[i][1]=38:ralrgb[i][2]=51:ralrgb[i][3]=56:r7026=i:i=i+1 ralidx[i]=7030:ralrgb[i][1]=145:ralrgb[i][2]=143:ralrgb[i][3]=135:r7030=i:i=i+1:ralidx[i]=7031:ralrgb[i][1]=77:ralrgb[i][2]=92:ralrgb[i][3]=107:r7031=i:i=i+1:ralidx[i]=7032:ralrgb[i][1]=189:ralrgb[i][2]=186:ralrgb[i][3]=171:r7032=i:i=i+1 ralidx[i]=7033:ralrgb[i][1]=122:ralrgb[i][2]=130:ralrgb[i][3]=117:r7033=i:i=i+1:ralidx[i]=7034:ralrgb[i][1]=143:ralrgb[i][2]=135:ralrgb[i][3]=112:r7034=i:i=i+1:ralidx[i]=7035:ralrgb[i][1]=212:ralrgb[i][2]=217:ralrgb[i][3]=219:r7035=i:i=i+1 ralidx[i]=7036:ralrgb[i][1]=158:ralrgb[i][2]=150:ralrgb[i][3]=156:r7036=i:i=i+1:ralidx[i]=7037:ralrgb[i][1]=122:ralrgb[i][2]=125:ralrgb[i][3]=128:r7037=i:i=i+1:ralidx[i]=7038:ralrgb[i][1]=186:ralrgb[i][2]=189:ralrgb[i][3]=186:r7038=i:i=i+1 ralidx[i]=7039:ralrgb[i][1]=97:ralrgb[i][2]=94:ralrgb[i][3]=89:r7039=i:i=i+1:ralidx[i]=7040:ralrgb[i][1]=158:ralrgb[i][2]=163:ralrgb[i][3]=176:r7040=i:i=i+1:ralidx[i]=7042:ralrgb[i][1]=143:ralrgb[i][2]=150:ralrgb[i][3]=153:r7042=i:i=i+1 ralidx[i]=7043:ralrgb[i][1]=64:ralrgb[i][2]=69:ralrgb[i][3]=69:r7043=i:i=i+1:ralidx[i]=7044:ralrgb[i][1]=194:ralrgb[i][2]=191:ralrgb[i][3]=184:r7044=i:i=i+1:ralidx[i]=7045:ralrgb[i][1]=143:ralrgb[i][2]=148:ralrgb[i][3]=158:r7045=i:i=i+1 ralidx[i]=7046:ralrgb[i][1]=120:ralrgb[i][2]=130:ralrgb[i][3]=140:r7046=i:i=i+1:ralidx[i]=7047:ralrgb[i][1]=217:ralrgb[i][2]=214:ralrgb[i][3]=219:r7047=i:i=i+1:ralidx[i]=8000:ralrgb[i][1]=125:ralrgb[i][2]=92:ralrgb[i][3]=56:r8000=i:i=i+1 ralidx[i]=8001:ralrgb[i][1]=145:ralrgb[i][2]=82:ralrgb[i][3]=46:r8001=i:i=i+1:ralidx[i]=8002:ralrgb[i][1]=110:ralrgb[i][2]=59:ralrgb[i][3]=48:r8002=i:i=i+1:ralidx[i]=8003:ralrgb[i][1]=115:ralrgb[i][2]=59:ralrgb[i][3]=36:r8003=i:i=i+1 ralidx[i]=8004:ralrgb[i][1]=133:ralrgb[i][2]=56:ralrgb[i][3]=43:r8004=i:i=i+1:ralidx[i]=8007:ralrgb[i][1]=94:ralrgb[i][2]=51:ralrgb[i][3]=31:r8007=i:i=i+1:ralidx[i]=8008:ralrgb[i][1]=99:ralrgb[i][2]=61:ralrgb[i][3]=36:r8008=i:i=i+1 ralidx[i]=8011:ralrgb[i][1]=71:ralrgb[i][2]=38:ralrgb[i][3]=28:r8011=i:i=i+1:ralidx[i]=8012:ralrgb[i][1]=84:ralrgb[i][2]=31:ralrgb[i][3]=31:r8012=i:i=i+1:ralidx[i]=8014:ralrgb[i][1]=56:ralrgb[i][2]=38:ralrgb[i][3]=28:r8014=i:i=i+1 ralidx[i]=8015:ralrgb[i][1]=77:ralrgb[i][2]=31:ralrgb[i][3]=28:r8015=i:i=i+1:ralidx[i]=8016:ralrgb[i][1]=61:ralrgb[i][2]=31:ralrgb[i][3]=28:r8016=i:i=i+1:ralidx[i]=8017:ralrgb[i][1]=46:ralrgb[i][2]=28:ralrgb[i][3]=28:r8017=i:i=i+1 ralidx[i]=8019:ralrgb[i][1]=43:ralrgb[i][2]=38:ralrgb[i][3]=41:r8019=i:i=i+1:ralidx[i]=8022:ralrgb[i][1]=13:ralrgb[i][2]=8:ralrgb[i][3]=13:r8022=i:i=i+1:ralidx[i]=8023:ralrgb[i][1]=156:ralrgb[i][2]=69:ralrgb[i][3]=41:r8023=i:i=i+1 ralidx[i]=8024:ralrgb[i][1]=110:ralrgb[i][2]=64:ralrgb[i][3]=48:r8024=i:i=i+1:ralidx[i]=8025:ralrgb[i][1]=102:ralrgb[i][2]=74:ralrgb[i][3]=61:r8025=i:i=i+1:ralidx[i]=8028:ralrgb[i][1]=64:ralrgb[i][2]=46:ralrgb[i][3]=33:r8028=i:i=i+1 ralidx[i]=9001:ralrgb[i][1]=255:ralrgb[i][2]=252:ralrgb[i][3]=240:r9001=i:i=i+1:ralidx[i]=9002:ralrgb[i][1]=240:ralrgb[i][2]=237:ralrgb[i][3]=230:r9002=i:i=i+1:ralidx[i]=9003:ralrgb[i][1]=255:ralrgb[i][2]=255:ralrgb[i][3]=255:r9003=i:i=i+1 ralidx[i]=9004:ralrgb[i][1]=28:ralrgb[i][2]=28:ralrgb[i][3]=33:r9004=i:i=i+1:ralidx[i]=9005:ralrgb[i][1]=3:ralrgb[i][2]=5:ralrgb[i][3]=10:r9005=i:i=i+1:ralidx[i]=9006:ralrgb[i][1]=166:ralrgb[i][2]=171:ralrgb[i][3]=181:r9006=i:i=i+1 ralidx[i]=9007:ralrgb[i][1]=125:ralrgb[i][2]=122:ralrgb[i][3]=120:r9007=i:i=i+1:ralidx[i]=9010:ralrgb[i][1]=250:ralrgb[i][2]=255:ralrgb[i][3]=255:r9010=i:i=i+1:ralidx[i]=9011:ralrgb[i][1]=13:ralrgb[i][2]=18:ralrgb[i][3]=26:r9011=i:i=i+1 ralidx[i]=9016:ralrgb[i][1]=252:ralrgb[i][2]=255:ralrgb[i][3]=255:r9016=i:i=i+1:ralidx[i]=9017:ralrgb[i][1]=20:ralrgb[i][2]=23:ralrgb[i][3]=28:r9017=i:i=i+1:ralidx[i]=9018:ralrgb[i][1]=219:ralrgb[i][2]=227:ralrgb[i][3]=222:r9018=i:i=i+1 nral=vardim1(ralidx):midx=0:ralr=0:ralg=0:ralb=0 if ifunction=function_getmatidx|ifunction=function_getmat then for i=1 to nral if ralidx[i]=iralcolor then midx=i:i=nral endif next i if midx>0 then ralr=ralrgb[midx][1]:ralg=ralrgb[midx][2]:ralb=ralrgb[midx][3] endif if ifunction=function_getmatidx then end midx endif endif CSRPWWCSIUWW  !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- if ifunction#function_ui then end customtext=`Custom`:mattype_sample=1 dim ralnames[] for i=nral to 1 step -1 ralnames[i]=raltext+str(ralidx[i],1,0) next i xmatsmall=30:xmatspace=5:xmatdiff=uiwidth-xmatsmall:px=24:py=24:surfx=uisurfx:cx=px+2:cy=py+2:yoffset=0 if imattype>0 then gosub imattype*10 endif end 10: ui_infield{3} "iRalSurface",uiposx,uiposy+3,surfx,19,8,"",0,0,0,0,0,0,0,stralsurf[1],ral_gloss,0,stralsurf[2],ral_mat,0,stralsurf[3],ral_semigloss:ui_infield{3} "iRalColor",uiposx+surfx+5,uiposy-yoffset,uiwidth-xmatdiff*(iralcolor=0)-surfx-5,uiheight, 2,1,1000,100,cx,cy,px,py,100,ralnames[r1000],1000,101,ralnames[r1001],1001,102,ralnames[r1002],1002,103,ralnames[r1003],1003,104,ralnames[r1004],1004,105,ralnames[r1005],1005,106,ralnames[r1006],1006,107,ralnames[r1007],1007,111,ralnames[r1011],1011, 112,ralnames[r1012],1012,113,ralnames[r1013],1013,114,ralnames[r1014],1014,115,ralnames[r1015],1015,116,ralnames[r1016],1016,117,ralnames[r1017],1017,118,ralnames[r1018],1018,119,ralnames[r1019],1019,120,ralnames[r1020],1020,121,ralnames[r1021],1021, 123,ralnames[r1023],1023,124,ralnames[r1024],1024,126,ralnames[r1026],1026,127,ralnames[r1027],1027,128,ralnames[r1028],1028,132,ralnames[r1032],1032,133,ralnames[r1033],1033,134,ralnames[r1034],1034,200,ralnames[r2000],2000,201,ralnames[r2001],2001, 202,ralnames[r2002],2002,203,ralnames[r2003],2003,204,ralnames[r2004],2004,205,ralnames[r2005],2005,207,ralnames[r2007],2007,208,ralnames[r2008],2008,209,ralnames[r2009],2009,210,ralnames[r2010],2010,211,ralnames[r2011],2011,212,ralnames[r2012],2012, 300,ralnames[r3000],3000,301,ralnames[r3001],3001,302,ralnames[r3002],3002,303,ralnames[r3003],3003,304,ralnames[r3004],3004,305,ralnames[r3005],3005,307,ralnames[r3007],3007,309,ralnames[r3009],3009,311,ralnames[r3011],3011,312,ralnames[r3012],3012, 313,ralnames[r3013],3013,314,ralnames[r3014],3014,315,ralnames[r3015],3015,316,ralnames[r3016],3016,317,ralnames[r3017],3017,318,ralnames[r3018],3018,320,ralnames[r3020],3020,322,ralnames[r3022],3022,324,ralnames[r3024],3024,326,ralnames[r3026],3026, 327,ralnames[r3027],3027,331,ralnames[r3031],3031,401,ralnames[r4001],4001,402,ralnames[r4002],4002,403,ralnames[r4003],4003,404,ralnames[r4004],4004,405,ralnames[r4005],4005,406,ralnames[r4006],4006,407,ralnames[r4007],4007,408,ralnames[r4008],4008, 409,ralnames[r4009],4009,410,ralnames[r4010],4010,500,ralnames[r5000],5000,501,ralnames[r5001],5001,502,ralnames[r5002],5002,503,ralnames[r5003],5003,504,ralnames[r5004],5004,505,ralnames[r5005],5005,507,ralnames[r5007],5007,508,ralnames[r5008],5008, 509,ralnames[r5009],5009,510,ralnames[r5010],5010,511,ralnames[r5011],5011,512,ralnames[r5012],5012,513,ralnames[r5013],5013,514,ralnames[r5014],5014,515,ralnames[r5015],5015,517,ralnames[r5017],5017,518,ralnames[r5018],5018,519,ralnames[r5019],5019, 520,ralnames[r5020],5020,521,ralnames[r5021],5021,522,ralnames[r5022],5022,523,ralnames[r5023],5023,524,ralnames[r5024],5024,600,ralnames[r6000],6000,601,ralnames[r6001],6001,602,ralnames[r6002],6002,603,ralnames[r6003],6003,604,ralnames[r6004],6004, 605,ralnames[r6005],6005,606,ralnames[r6006],6006,607,ralnames[r6007],6007,608,ralnames[r6008],6008,609,ralnames[r6009],6009,610,ralnames[r6010],6010,611,ralnames[r6011],6011,612,ralnames[r6012],6012,613,ralnames[r6013],6013,614,ralnames[r6014],6014, 615,ralnames[r6015],6015,616,ralnames[r6016],6016,617,ralnames[r6017],6017,618,ralnames[r6018],6018,619,ralnames[r6019],6019,620,ralnames[r6020],6020,621,ralnames[r6021],6021,622,ralnames[r6022],6022,624,ralnames[r6024],6024,625,ralnames[r6025],6025, 626,ralnames[r6026],6026,627,ralnames[r6027],6027,628,ralnames[r6028],6028,629,ralnames[r6029],6029,632,ralnames[r6032],6032,633,ralnames[r6033],6033,634,ralnames[r6034],6034,700,ralnames[r7000],7000,701,ralnames[r7001],7001,702,ralnames[r7002],7002, 703,ralnames[r7003],7003,704,ralnames[r7004],7004,705,ralnames[r7005],7005,706,ralnames[r7006],7006,708,ralnames[r7008],7008,709,ralnames[r7009],7009,710,ralnames[r7010],7010,711,ralnames[r7011],7011,712,ralnames[r7012],7012,713,ralnames[r7013],7013, 715,ralnames[r7015],7015,716,ralnames[r7016],7016,721,ralnames[r7021],7021,722,ralnames[r7022],7022,723,ralnames[r7023],7023,724,ralnames[r7024],7024,726,ralnames[r7026],7026,730,ralnames[r7030],7030,731,ralnames[r7031],7031,732,ralnames[r7032],7032, 733,ralnames[r7033],7033,734,ralnames[r7034],7034,735,ralnames[r7035],7035,736,ralnames[r7036],7036,737,ralnames[r7037],7037,738,ralnames[r7038],7038,739,ralnames[r7039],7039,740,ralnames[r7040],7040,742,ralnames[r7042],7042,743,ralnames[r7043],7043, 744,ralnames[r7044],7044,745,ralnames[r7045],7045,746,ralnames[r7046],7046,747,ralnames[r7047],7047,800,ralnames[r8000],8000,801,ralnames[r8001],8001,802,ralnames[r8002],8002,803,ralnames[r8003],8003,804,ralnames[r8004],8004,807,ralnames[r8007],8007, 808,ralnames[r8008],8008,811,ralnames[r8011],8011,812,ralnames[r8012],8012,814,ralnames[r8014],8014,815,ralnames[r8015],8015,816,ralnames[r8016],8016,817,ralnames[r8017],8017,819,ralnames[r8019],8019,822,ralnames[r8022],8022,823,ralnames[r8023],8023, 824,ralnames[r8024],8024,825,ralnames[r8025],8025,828,ralnames[r8028],8028,901,ralnames[r9001],9001,902,ralnames[r9002],9002,903,ralnames[r9003],9003,904,ralnames[r9004],9004,905,ralnames[r9005],9005,906,ralnames[r9006],9006,907,ralnames[r9007],9007, 910,ralnames[r9010],9010,911,ralnames[r9011],9011,916,ralnames[r9016],9016,917,ralnames[r9017],9017,918,ralnames[r9018],9018,1,customtext,0 return CSLVWW  !---------------------------------------------------- ! 2016, Ditec, made by BimObject !---------------------------------------------------- if paramname#"" then values paramname ralidx endif values "iRalSurface" ral_gloss,ral_mat,ral_semigloss TXTCWWCSMFWWCSMBWWDRAPWWWW��h(���?AP��?BP��?ZZYZXP �AC_show2DHotspotsIn3DP��?ac_bottomlevelP�ac_toplevelPiFunctionP�iRalColorPiRalSurfaceP paramNamePuihiMatTypeh uiPosXhduiPosYh�uiWidthhuiHeighthduiSurfXhiRalColorPLDGWWcimage/png�PNG  IHDR� `���IDATx^��ah^�y���XRbĴ�p������ n2C Z�;�` N�!sׅz���2<ڄ�]�hV��k����`�g&!��H�MR��1�bԺN�����\ W�P�![��X�1͖�����_:�����9y��&oL����$oP۶�X`��o `@��)t�&����}��4� �6� 0�i����� h����{��m<�n߄c,v@�2�Ϟ{(��d   0 `0 `@���A�����  �}�{_N��3'S�=��T*���K���|* ͝K��ٔZy��,rmi�)6{��y�C,0 `@� `@�����   0 `0 `@�@o�{k������?��I��<�;���}�>�  00 `@� `@�����  0���g�����L��u�K����Ri���T���|J=5�Z��yg����A�����  00 `0 `@���A�����;�J';�M ���P�B?��T�����:37Цжg>�Jw%�����,��F_��TZ���ZM( ���� S�L ,��X��A���  00 `@� `@����&�^ytu�B+�Ri�o$����t*]��E*�s�+�4p�/��;Y`0 `@���A�����  00 `0 `@����&e��7�J�%YD��  0 `0 `@� `@�������N���\*����T�y��J��gS��ĩTj?7�J�~<��l��/   0 `0 `@���A�����  h~�iu*MwߓJ�=�tޮ��ͫZ | `0 `@� `@�����   0 `0 `@�@�6���R���թ4�b'���ϦR�SM ��nS�ԏ粘M��� ��  0 `0 `@� `@������_nZݦ�t�=����[*�����  00 `@� �w*0 `@� `@������I��U+RiI@� `@���A���  00 `@� `@�����ѡ�)ՓR'gϤұ����\�J��:��fpy*M�����Tz��1 �00 `0 `@���A���  00 `��s�P*m���T����T��#7��EW��Ҟ�nO�+פҹ��T���Tznh�/   0 `0 `@���A�����  hR쥛7����J���+R��{����-K��ϭJ��d1{|Պ�� 00 `@� `@�����  0�<:��M���:9{&��ͧT��T�5�iRh�`���D��onS�c� | `0 `@� `@�����   0 `0 `@�@s粡6�6~zS*�xg*]���S颫�Si�}����kR���T*]uxO�B� ��<@� `@���A���  00 `@� `@����&�^�yC�B�?��I���+��힨=�e��z�ܪT���nR���|c�M��  0 `0 `@� `@������+ִ)���k����T��w7yX`@���  0 `0 `@� `@�����  i��b* t�I�koH��ܞJ~��TZ3�?��ۗj�.��������w��ҒT��   0 `0 `@���A����� 4w��M���3�t�� �����S��ޞJk&���cs�Rm��u�xx��T�αTZ�E00 `0 `@���A���  00 `����o�)������C��&�N`���  00 `0 `@���A����&e���-��$� `0 `@� `@�����   0 `0 `@�@�?�1��G�Sj��T��I��Ꮷ�Ľ�4�a[*�vdW*ͯK�Ɏ~ `0 `@� `@�����   0 `0 `@�@���GRi�������Si�����v0�&'R�ȩө4�e}*M<�M���߷� ��  0 `0 `@� `@�������[?�J���J�5��Si�5#�����M� 00 `@� `@���A���  0�&e���-�/3� 00 `@� `@�����  0��nlS�{t8��L���T��xJM�ۤ�Ȇmm �vdW*ͯK�Ɏ~ `0 `@� `@�����   0 `0 `@�@���GRi�������Si�����v0�&'R�ȩө4�e}*M<�M���߷� ��  0 `0 `@� `@�������[?ѦP�+�Ri���TZ}�H*��Ž���w4�^��M~X`@� `@���A���  00 `@� `@����&e��;7Z���A�����  00 `0 `@���A����#�\�Rӳ�445�J�)5??�J�f�Rifn&���zR���v�z�',�@� `@���A���  00 `@� `@����f�6�ҳ�����{_*��}8��s)�Y7�JW ���E#�t۵�R�S��^ 00 `@� `@�����  0�|i��T���GR�Б����Si��3���TJ�q�����ϧҩ53�4u� �00 `0 `@���A���  00 `�I�����ҥK�R�ګ֦�=�]�7 0 `@� `@�����  00 `@� `��F����2�y��A�����  00 `0 `@���A����#�\ݦ��l* M ���nJ��O�Ҫ��T���I����T�.�ݰ�� �00 `0 `@���A���  00 `�wlh$���w4��� �Rw��T��]�J�u�t��`*]42�J�]�-�>���X���A�����  00 `0 `@���A�������"��<�J񗻚z߃�m ��|&���J������λ>�J��OR��4�<@� `@���A���  00 `@� `@����f�C;R��ߴ)t钱T�������w���+��t��7���R��o�lRh~��00 `0 `@���A���  00 `�_�1����Ri~�X*=�g_*���M�4y��JG&~��   0 `0 `@���A�����  �=r�P*�w�`*�_�J�݁Tڻ��T�[��f�  00 `@� `@���A��� 47nڒJ�mO�������}s��������t��T�&����TZ��cx `0 `@� `@�����   0 `0 `@�@�b|�����O���[�H��:�495�J�lܐJ���y,0 `@���A���  00 `0 `@���A�4)��[_f800 `0 `@���A���  00 `���Ў6�f�?��s)u��R�G��R��T*����M ��Ʊ6�N�L��y �:@� `@���A���  00 `@� `@����ާ�z2����Ri~�X*}��ۛZ����<��b��'�5Yľ�i�/   0 `0 `@���A�����  �=r�P*�w�`*�_�J�݁6���y�I��ѱ6�6��J�����?��h*-��Z����  0 `0 `@� `@������7miS��㩴{��T��o.��ݴ%���~6���<�J��פ�c�ޞJk�}�/   0 `0 `@���A�����  hR쁯�M�]�}"���zG*8�I�ɩ�T�e�T����6�����o,0 `@� `@���������  00M�_�4֦В,"��A�����  00 `0 `@���A���̓7�iS��/ΥRO3�J���ҟ�;�d�<��M����Tzx��&�Xo��kzkλ x�  0 `0 `@���A�����  h>2��M���=����/7)����lS���)�jjMϧ�ĉM ]1��M�^�Yc��   0 `0 `@���A�����  h��Tw�M�֮H��� Si� ���O?hR�KV�ҕC}m ]��������X`@� `@���A���~[  00 `0 `��쫩4=�M��/M��+/K��������S�� {S�{��bv�mSiI@� `@���A���  00 `@� `@����f`py*�Lu���lۦ�%��L���A*��e� 00 `@� `@���A���  0��=�j�B���T�h��TZ��T:99�J��x<���7����&�ؙ�m}��<@� `@���A���  00 `@� `@����f`py�B3S�&o�����KV��s�� �޿����  00 `@� `@���A��� 4)��o}�M�N��Jw�u��5 00 `0 `@���A�����  00� ���bt�tIEND�B`�