2018-03-06 02:42 PM
Solved! Go to Solution.
2018-03-14 11:17 PM
!!!Plate 1:40 Plate nr. 1 and 2
!============================================================================================================
FOR i = 1 TO NUM
PEN Linje1
sect_attrs{2}Linje1
SECT_FILL Fyll, pen_t, pen_g, pen_b
MATERIAL smat
IF i MOD 2 # 0 then
if Plate_type = 1 then
call "Plate_macro" parameters ZZYZX = 0.02, v = 1.43, ac_bottomlevel = 0.060, X1 = X1, Y1 = Y1, B = B
endif
endif
!!!Plate nr. 2
!!ADDY AV1
PEN Linje1
sect_attrs{2}Linje1
SECT_FILL Fyll1, pen_t, pen_g, pen_b
MATERIAL smat
if i MOD 2 = 0 THEN
if Plate_type = 1 then
call "Plate_macro" parameters ZZYZX = 0.05, v = 1.43, ac_bottomlevel = 0.060, X1 = X1, Y1 = Y1, B = B
endif
ADDZ 0.060
endif
!!ADDZ 0.060
ADDY AV1
Next i
Also, you should change your "NUM" parameter to an integer type.
HOTSPOT2 0,0
unID = 1000
HOTSPOT2 0, 0, unID, B, 1+128: unID=unID+1 !!! BASE
HOTSPOT2 0, B, unID, B, 2: unID=unID+1 !!! Move
HOTSPOT2 0, -1, unID, B, 3: unID=unID+1 !!! Ref
unID = 2000
HOTSPOT2 0, 0, unID, X1, 1+128: unID=unID+1 !!! BASE
HOTSPOT2 X1, 0, unID, X1, 2: unID=unID+1 !!! Move
HOTSPOT2 -1, 0, unID, X1, 3: unID=unID+1 !!! Ref
!unID = 3000
!HOTSPOT2 0.600, 0, unID, Y1, 1+128: unID=unID+1 !!! BASE
!HOTSPOT2 0.600, Y1, unID, Y1, 2: unID=unID+1 !!! Move
!HOTSPOT2 0, -1, unID, Y1, 3: unID=unID+1 !!! Ref
project2{2} 3, 270, 2
Hope that's what you are after.2018-03-07 09:24 PM
2018-03-12 08:45 AM
2018-03-12 09:20 AM
| AC22-28 AUS 3110 | Help Those Help You - Add a Signature |
| Self-taught, bend it till it breaks | Creating a Thread |
| Win11 | i9 10850K | 64GB | RX6600 | Win11 | R5 2600 | 16GB | GTX1660 |
2018-03-12 09:44 AM
2018-03-12 09:52 AM
| AC22-28 AUS 3110 | Help Those Help You - Add a Signature |
| Self-taught, bend it till it breaks | Creating a Thread |
| Win11 | i9 10850K | 64GB | RX6600 | Win11 | R5 2600 | 16GB | GTX1660 |
2018-03-12 10:19 AM
2018-03-12 10:44 PM
2018-03-14 06:41 AM
!!!Plate 1:40 Plate nr. 1 and 2
!============================================================================================================
!!!Plate nr. 1
FOR I = 1 TO NUM
PEN Linje1
sect_attrs{2}Linje1
SECT_FILL Fyll, pen_t, pen_g, pen_b
MATERIAL smat
if Plate_type = 1 then
call "Plate_macro" parameters ZZYZX = 0.02, v = 1.43, ac_bottomlevel = 0.060, X1 = X1, Y1 = Y1,
B = B
endif
ADDZ 0.060
ADDY AV1*2
Next i
Del top
!!!Plate nr. 2
ADDY AV1
FOR K = 1 TO NUM2
PEN Linje1
sect_attrs{2}Linje1
SECT_FILL Fyll1, pen_t, pen_g, pen_b
MATERIAL smat
if Plate_type = 1 then
call "Plate_macro" parameters ZZYZX = 0.05, v = 1.43, ac_bottomlevel = 0.060, X1 = X1, Y1 = Y1,
B = B
endif
ADDZ 0.0
ADDY AV1*2
Next K
2018-03-14 11:17 PM
!!!Plate 1:40 Plate nr. 1 and 2
!============================================================================================================
FOR i = 1 TO NUM
PEN Linje1
sect_attrs{2}Linje1
SECT_FILL Fyll, pen_t, pen_g, pen_b
MATERIAL smat
IF i MOD 2 # 0 then
if Plate_type = 1 then
call "Plate_macro" parameters ZZYZX = 0.02, v = 1.43, ac_bottomlevel = 0.060, X1 = X1, Y1 = Y1, B = B
endif
endif
!!!Plate nr. 2
!!ADDY AV1
PEN Linje1
sect_attrs{2}Linje1
SECT_FILL Fyll1, pen_t, pen_g, pen_b
MATERIAL smat
if i MOD 2 = 0 THEN
if Plate_type = 1 then
call "Plate_macro" parameters ZZYZX = 0.05, v = 1.43, ac_bottomlevel = 0.060, X1 = X1, Y1 = Y1, B = B
endif
ADDZ 0.060
endif
!!ADDZ 0.060
ADDY AV1
Next i
Also, you should change your "NUM" parameter to an integer type.
HOTSPOT2 0,0
unID = 1000
HOTSPOT2 0, 0, unID, B, 1+128: unID=unID+1 !!! BASE
HOTSPOT2 0, B, unID, B, 2: unID=unID+1 !!! Move
HOTSPOT2 0, -1, unID, B, 3: unID=unID+1 !!! Ref
unID = 2000
HOTSPOT2 0, 0, unID, X1, 1+128: unID=unID+1 !!! BASE
HOTSPOT2 X1, 0, unID, X1, 2: unID=unID+1 !!! Move
HOTSPOT2 -1, 0, unID, X1, 3: unID=unID+1 !!! Ref
!unID = 3000
!HOTSPOT2 0.600, 0, unID, Y1, 1+128: unID=unID+1 !!! BASE
!HOTSPOT2 0.600, Y1, unID, Y1, 2: unID=unID+1 !!! Move
!HOTSPOT2 0, -1, unID, Y1, 3: unID=unID+1 !!! Ref
project2{2} 3, 270, 2
Hope that's what you are after.