Error with sliders and expression

Replies to This Discussion

Permalink Reply by Francisco Lara on March 11, 2013 at 3:48pm

It is the same error since I started to try to make this definition work. even after davide fized it.

Its got to be a bug or some kind of problem

Permalink Reply by Michael Pryor on March 11, 2013 at 4:55pm

Im pretty sure your just not putting the expression correctly. Can you put a screenshot of whats in it.

Permalink Reply by Francisco Lara on March 11, 2013 at 5:28pm

I dont think so Davide del Giudice checked out for me and he made it work.

but any ways each slider as:

and the script is

'Script written By Luis E. Fraguada
    'http://www.livearchitecture.net
    'code@livearchitecture.net

    Dim arrPt(0 To u, 0 To v) As On3dPoint



    Dim cnt As Integer = 0

    For i As Int32 = 0 To u

      For j As Int32 = 0 To v

        arrPt(i, j) = pts(cnt)

        cnt = cnt + 1

      Next

    Next


    Dim lines As New List(Of OnPolyline)()
    'Point Culling

    Dim ptArr As New On3dPointArray()


    Dim pt_list As New List(Of On3dPoint)

    For i As Int32 = 0 To u - 2 Step 2

      For j As Int32 = 0 To v - 3 Step 4

        ptArr.Append(arrPt(i + 1, j).x, arrPt(i + 1, j).y, arrPt(i + 1, j).z)
        ptArr.Append(arrPt(i + 2, j + 1).x, arrPt(i + 2, j + 1).y, arrPt(i + 2, j + 1).z)
        ptArr.Append(arrPt(i + 2, j + 2).x, arrPt(i + 2, j + 2).y, arrPt(i + 2, j + 2).z)
        ptArr.Append(arrPt(i + 1, j + 3).x, arrPt(i + 1, j + 3).y, arrPt(i + 1, j + 3).z)
        ptArr.Append(arrPt(i, j + 2).x, arrPt(i, j + 2).y, arrPt(i, j + 2).z)
        ptArr.Append(arrPt(i, j + 1).x, arrPt(i, j + 1).y, arrPt(i, j + 1).z)
        ptArr.Append(arrPt(i + 1, j).x, arrPt(i + 1, j).y, arrPt(i + 1, j).z)

        Dim pline As New OnPolyline(ptArr)


        lines.Add(pline)

        Dim pt As New On3dPoint((arrPt(i + 1, j).x + arrPt(i + 1, j + 3).x) / 2, (arrPt(i + 1, j).y + arrPt(i + 1, j + 3).y) / 2, (arrPt(i + 1, j).z + arrPt(i + 1, j + 3).z) / 2)
        pt_list.Add(pt)

        ptArr.destroy

      Next

    Next

    For i As Int32 = 1 To u - 2 Step 2

      For j As Int32 = 2 To v - 3 Step 4

        ptArr.Append(arrPt(i + 1, j).x, arrPt(i + 1, j).y, arrPt(i + 1, j).z)
        ptArr.Append(arrPt(i + 2, j + 1).x, arrPt(i + 2, j + 1).y, arrPt(i + 2, j + 1).z)
        ptArr.Append(arrPt(i + 2, j + 2).x, arrPt(i + 2, j + 2).y, arrPt(i + 2, j + 2).z)
        ptArr.Append(arrPt(i + 1, j + 3).x, arrPt(i + 1, j + 3).y, arrPt(i + 1, j + 3).z)
        ptArr.Append(arrPt(i, j + 2).x, arrPt(i, j + 2).y, arrPt(i, j + 2).z)
        ptArr.Append(arrPt(i, j + 1).x, arrPt(i, j + 1).y, arrPt(i, j + 1).z)
        ptArr.Append(arrPt(i + 1, j).x, arrPt(i + 1, j).y, arrPt(i + 1, j).z)

        Dim pline As New OnPolyline(ptArr)

        lines.Add(pline)

        Dim pt As New On3dPoint((arrPt(i + 1, j).x + arrPt(i + 1, j + 3).x) / 2, (arrPt(i + 1, j).y + arrPt(i + 1, j + 3).y) / 2, (arrPt(i + 1, j).z + arrPt(i + 1, j + 3).z) / 2)
        pt_list.Add(pt)

        ptArr.destroy

      Next

    Next

    PolyCrv = lines   'hexagon cells
    CPts = pt_list 'center pt










  End Sub

Permalink Reply by David Rutten on March 11, 2013 at 6:06pm

As the error claims, the slider expression is using the slider name. It's supposed to use "x" now. So change HexU*2 to x*2 and your slider error should go away.

--

David Rutten

david@mcneel.com

Poprad, Slovakia

Permalink Reply by Francisco Lara on March 11, 2013 at 6:35pm

David thats right I did change it earlier this day. and the error goes away but then nothing comes out of the script.

the definition as a note and it says clearly

 "*Note: This is the number of cells in each direction.  There is an expression in each of the sliders which control a multiplier which relates to the script.  Do not change the expression in each slider or the slider names."

so if I change it error goes away but definition doesnt work.

Please help me out! I dont know who to ask for help anymore. no one knows

Permalink Reply by Michael Pryor on March 11, 2013 at 7:29pm

Why dont you just multiply the slider by 2 via the multiplication component for now. Its the same thing.

Permalink Reply by Michael Pryor on March 11, 2013 at 7:02pm

I can confirm putting x*2 clears the error but the expression is not accounted for.

Permalink Reply by Francisco Lara on March 11, 2013 at 7:37pm

it must be something inside the script because I cant still make it work. is either that or a bug.

Michael Pryor did you make the definition work????

Permalink Reply by Andrew Heumann on March 11, 2013 at 8:27pm

works just fine for me when the slider expressions are fixed to be X*2. The script is fine - did you forget to specify a surface?

Permalink Reply by Francisco Lara on March 11, 2013 at 8:32pm

See everyone!

Thats exactly what I mean for some people works and for others dont!

Michael Pryor just tested it and it doesnt work then Andrew Heumann tested it and it works! somethings is got to be not working well!

Andrew Heumann what grasshopper and rhino version are you running?

I am currently running rhino 5, under 64 bit OS.

Grasshopper 0.9.0014

Permalink Reply by Andrew Heumann on March 11, 2013 at 8:37pm

rhino 5 64 bit with the same grasshopper as you. try opening the version I'm uploading here with the rhino file you originally posted.

Attachments:

• xx_Hexagonalplanarwithspan_CodeiT.gh, 27 KB

Permalink Reply by Francisco Lara on March 11, 2013 at 8:41pm

See we already did all this with Davide del Giudice

the definition worked just fine on his computer he even sent me the definition attached to the rhino file but no luck!

It just comes NULL out of the script!

This is really strange!

must be a bug or something!

Thanks for your kind help!

• ‹ Previous
• 1
• 2
• Next ›
• Page