Scratch

Here a slight thing:

hookupSensorNames
    | t1 t2 t3 t4 t5 |
    t5 _ 'distance'.
    t1 _ #('slider' 'light' 'sound' 'resistance' ).
    t1 _ t1 , #('-' 'tilt' 'distance' ).
    (t2 _ self ownerThatIsA: ScratchStageMorph) ifNotNil: [t2 scratchServer
            ifNotNil: 
                [t3 _ t2 scratchServer sensorNames.
                t3 size > 0 ifTrue: [^ t1 , {'-'} , t2 scratchServer sensorNames]]].
    t4 _ 1.
    t1 size
        timesRepeat: 
            [(t1 at: t4)
                = t5 ifTrue: [t1 at: t4 put: '-'].
            t4 _ t4 + 1].
    ^ t1

hookupSensorNames
    | t1 t2 t3 t4 |
    t1 _ #('slider' 'light' 'sound' 'resistance' ).
    t1 _ t1 , #('-' 'tilt' 'distance' ).
    (t2 _ self ownerThatIsA: ScratchStageMorph) ifNotNil: [t2 scratchServer
            ifNotNil:
                [t3 _ t2 scratchServer sensorNames.
                t3 size > 0 ifTrue: [t1 _ t1 , {'-'} , t2 scratchServer sensorNames]]].
    t4 _ 1.
    t1 size
        timesRepeat:
            [((t1 at: t4) findSubStr: 'distance') > 0 ifTrue: [t1 at: t4 put: '-'].
            t4 _ t4 + 1].
    ^ t1

it should work with mesh now.
it was just a little tweak.
tell me if it does 

Last edited by LS97 (2010-08-05 11:45:28)

johnnydean1 wrote:

does this do the 000 001 002 thing

it should, but that code was from memory, so i mightve got somethng wrong.

tomorrow i'll post the mesh version

edited my last post with code (reply number 29, this is #33).
use that code, it should work now.

findSubString: is not working

i'm not sure about what you're looking for. if you want to know what method creates the buttons, find it in ScriptableScratch > blocks > variablesPage. if you wan't to know what the code for creating a list look in ScriptableScratch > lists > addGlobalList

it should be under 'variablespage'

I found it, but I need to mod its in the same way, to not show variables with List in them. How?

Can you explain this further?

@nxiii Look Here!