Scratch

SeptimusHeap wrote:

Is there any way to make a repeat command in Smalltalk?

I found out how to do repeats!

10 timesRepeat: [Transcript show: 'hi']

NOTE: You will nead to open the transcript to see the result.

*whistles... wow.

nXIII wrote:

Sperry wrote:

I thought of something while looking at the source code:

I found an old hat block and for some things I thought it might be useful. The block is:
('When' #W #-) OR ('When W -)<-(for source code users). It displays "When <> is true"

I am adding this in my 'Roar' and I thought you might like to know about it to. I don't think anybodys ever mentioned anything about this block before! 

Yea, I found that buried in the source, too. Did you notice the commented block spec in the Stage's blockSpecs with x's next to it? It has a VERY strange function.... try it out.

I'm not sure I like that hat block, because you can accomplish it with a forever if, and it's also supposedly obsolete.

I see your point, and I did find that in the source but havent tried it. Will do soon though! Thanks for that!

Old question: Wheres ScratchSkin located?

nXIII, did you get my new blocks added?

@Everyone - I changed the custom link on mediafire to 'http://mediafire.com/panther' now. (That's the base folder)

SeptimusHeap wrote:

I get this error from whiletrue.

Code:

    (t2 >= 0) whileTrue: [^t2 _ t2 - 1 <- receiver of whileTrue: must be a block or variable ->].

I think it's trying to tell you that the -1 needs to be a variable e.g: ^t2 _ t2 - t3.

Try declaring a temp variable and then putting that in. Set the variable to 1.

Hope this helps!

markyparky56 wrote:

Ok... whats changed?

Look up at nXIII's very long post. It should explain everythings that you've missed.

NXIIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXII er, you know that's not password protected, right?NXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXIINXII

SeptimusHeap wrote:

Help with this:

Code:

 listaverage: t1 
    | t2 t3 t4 |
    t2 _ t1 lineCount.
    t3 _ 0.
    t4 _ 1.
    [t2 >= 0]
        whileTrue: [t2 _ t2 - 1. t3 _ t3 + lineAt: (self lineNum: t4 forList: t3). t4 _ t4 + 1.]

Is it something to do with the blocks I suggested earlier?

Sperry wrote:

SeptimusHeap wrote:

Help with this:

Code:

 listaverage: t1 
    | t2 t3 t4 |
    t2 _ t1 lineCount.
    t3 _ 0.
    t4 _ 1.
    [t2 >= 0]
        whileTrue: [t2 _ t2 - 1. t3 _ t3 + lineAt: (self lineNum: t4 forList: t3). t4 _ t4 + 1.]

Is it something to do with the blocks I suggested earlier?

Yes. It SHOULD add all numbers in a list.

Then I'm going to divide it by the list length. DUHDUH! Average!

SeptimusHeap wrote:

Sperry wrote:

SeptimusHeap wrote:

Help with this:

Code:

 listaverage: t1 
    | t2 t3 t4 |
    t2 _ t1 lineCount.
    t3 _ 0.
    t4 _ 1.
    [t2 >= 0]
        whileTrue: [t2 _ t2 - 1. t3 _ t3 + lineAt: (self lineNum: t4 forList: t3). t4 _ t4 + 1.]

Is it something to do with the blocks I suggested earlier?

Yes. It SHOULD add all numbers in a list.

Then I'm going to divide it by the list length. DUHDUH! Average!

And it'll be an error is there is a letter in that list. Plus, i thought it was a
average of _ to _ in [list↓] was it not? So it has to work out the average of the amount of items i.e. the difference between start and finish.

markyparky56 wrote:

SeptimusHeap wrote:

Sperry wrote:

Is it something to do with the blocks I suggested earlier?

Yes. It SHOULD add all numbers in a list.

Then I'm going to divide it by the list length. DUHDUH! Average!

And it'll be an error is there is a letter in that list. Plus, i thought it was a
average of _ to _ in [list↓] was it not? So it has to work out the average of the amount of items i.e. the difference between start and finish.

Well, this will let you find the mean of any size data set.