iLogic Help

[Anonymous]

I am designing some code to provide the quantity of rungs for a ladder of a certain order size with a certain space from top and bottom of concrete. 

If they order 4000mm, the amount of rungs that can fit are 4000 ("ORDER")-200("First_rung") / 300 ("RungSpace") = 12.67 so 13.

This makes the space between the bottom rung and the ground: 4000 - [ 12*300 (one less) +200 ] = 200mm

The critical points are when the bottom rung is 0<x<50, in these cases we want parameter "First_rung" to be changed to 150. 0 is fine because in this case it will compute 12 rungs and 50 is fine because the bottom rail will be touching the ground. I have some code working that was half right, then i re-wrote in an effort to clean it up but now the "Rungs" parameter is just staying at 0. 

[Mark.Lancaster]

@Anonymous

iLogic/programming questions and issue should be posted in the Inventor Customization forum https://forums.autodesk.com/t5/inventor-customization/bd-p/120 for best results.   I will have the moderator relocate it there to better suit your needs.

[bradeneuropeArthur]

use floor()

or Use Ceil()

e.g.:

parx = 12.34

pary =Ceil(parx) >>> gives 13

pary =floor(parx) >>> gives 12

Regards,

Autodesk Software: Inventor Professional 2018 | Vault Professional 2018 | Autocad Mechanical 2018
Programming Skills: Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Dimension Component! | Partlist Export! | Derive I-properties! | Vault Prompts Via API! | Vault Handbook/Manual!
Drawing Toggle Sheets! | Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !

[Anonymous]

Arthur,

My question was more how to ensure the spacing changes from 150 to 200 and back to 200 when not needed. But i figured it out by getting rid of the value + (or -) 50 line and making it a direct swap.

Thanks for looking into it though!

SyntaxEditor Code Snippet

Parameter("Rungs") = Ceil((Order-FirstRung)/RungSpace)

VarSpace = Order-FirstRung-(Parameter("Rungs")-1)*300

If (VarSpace > 0) AndAlso (VarSpace < d2) Then
	Parameter("FirstRung") = 150
	Else
		Parameter("FirstRung") = 200
	End If