Scratch

waveOSBeta · 2011-06-22 21:50:25

Anybody have teh code?

jji7skyline · 2011-06-22 22:07:08

waveOSBeta wrote:
Anybody have teh code?

I hope this comes out in Scratch 2.0... big_smile

sparks · 2011-06-23 04:32:52

stamp text $String$ at x:$Number$ y:$Number$ font $String$ size $Number$ color $Color$

Code:

(stage := self ownerThatIsA: ScratchStageMorph) ifNotNil: [stage createOrResizeTrailsForm. form := stage penTrailsForm] ifNil: [^ self].
canvas := FormCanvas on: form.
canvas text: t1 at: t2+240@(t3 negated + 180) font: (StrikeFont fontName: t4 size: t5) color: t6.
stage changed.

All credit to MathWizz, he made this and I use it all the time! One of the most useful blocks Scratch never made!

A few notes: if you don't enter a standard font size it wont make it that size, it will jump to around size 10 and if you leave the font space blank then a default font is used which I find the safest option as if the font you enter isn't on the viewers computer it can cause layout problems.

enjoy smile

sparks · 2011-06-23 04:37:02

This is actually already online in the Panther > Pen section of the block library along with rectangle and oval drawing blocks to compliment it!

scimonster · 2011-06-23 05:05:10

sparks wrote:
This is actually already online in the Panther > Pen section of the block library along with rectangle and oval drawing blocks to compliment it!

Oh, great! I was wondering where it is; I saw it in your block lib stats project. smile

sparks · 2011-06-23 05:44:59

Yes, I used the text stamping and the rectangle drawing blocks to get my stats project to display quickly smile Very useful indeed. Using the rectangle drawing tool you can do some pretty nice things!

waveOSBeta · 2011-06-23 06:35:53

sparks wrote:
stamp text $String$ at x:$Number$ y:$Number$ font $String$ size $Number$ color $Color$
Code:
(stage := self ownerThatIsA: ScratchStageMorph) ifNotNil: [stage createOrResizeTrailsForm. form := stage penTrailsForm] ifNil: [^ self].
canvas := FormCanvas on: form.
canvas text: t1 at: t2+240@(t3 negated + 180) font: (StrikeFont fontName: t4 size: t5) color: t6.
stage changed.
All credit to MathWizz, he made this and I use it all the time! One of the most useful blocks Scratch never made!

A few notes: if you don't enter a standard font size it wont make it that size, it will jump to around size 10 and if you leave the font space blank then a default font is used which I find the safest option as if the font you enter isn't on the viewers computer it can cause layout problems.

enjoy

Wow, thanks! Is it possible to use this in scratch by changing the $something$ things?

scimonster · 2011-06-23 07:44:00

waveOSBeta wrote:
sparks wrote:
stamp text $String$ at x:$Number$ y:$Number$ font $String$ size $Number$ color $Color$
Code:
(stage := self ownerThatIsA: ScratchStageMorph) ifNotNil: [stage createOrResizeTrailsForm. form := stage penTrailsForm] ifNil: [^ self].
canvas := FormCanvas on: form.
canvas text: t1 at: t2+240@(t3 negated + 180) font: (StrikeFont fontName: t4 size: t5) color: t6.
stage changed.
All credit to MathWizz, he made this and I use it all the time! One of the most useful blocks Scratch never made!

A few notes: if you don't enter a standard font size it wont make it that size, it will jump to around size 10 and if you leave the font space blank then a default font is used which I find the safest option as if the font you enter isn't on the viewers computer it can cause layout problems.

enjoy
Wow, thanks! Is it possible to use this in scratch by changing the $something$ things?

('stamp text %s at x:%n y:%n' #- #stampText:atX:y: 'text' 0 0)

stampText: t1 atX: t2 y: t3
(stage := self ownerThatIsA: ScratchStageMorph) ifNotNil: [stage createOrResizeTrailsForm. form := stage penTrailsForm] ifNil: [^ self].
canvas := FormCanvas on: form.
canvas text: t1 at: t2+240@(t3 negated + 180) font: (StrikeFont fontName: t4 size: t5) color: t6.
stage changed.

waveOSBeta · 2011-06-23 11:02:06

Stage is an unknown variable... sad

sparks · 2011-06-23 13:40:36

odd... it really should work in Scratch but I've only used it in Panther. Perhaps it can't find stage in the area of the browser you placed it? Contact MathWizz, he might know!

Pecola1 · 2011-06-23 13:54:53

waveOSBeta wrote:
Stage is an unknown variable...

add it to the variables of that method, it will work I think... IDK why... that's what I did.

Last edited by Pecola1 (2011-06-23 13:55:20)

waveOSBeta · 2011-06-23 13:55:12

Tried all 3... MathWizz?

MathWizz · 2011-06-23 16:05:17

Mmmm...
*opens Scratch*

EDIT:
Try this:

Code:

('stamp text %s with font %s' #- #stampText:font: 'Hello, World' 'Arail')

Code:

stampText: text font: font 
    | stage form canvas |
    (stage _ self ownerThatIsA: ScratchStageMorph) ifNil: [^ self].
    stage createOrResizeTrailsForm.
    form _ stage penTrailsForm.
    canvas _ FormCanvas on: form.
    canvas
        text: text
        at: self xpos + 240 @ (self ypos negated + 180)
        font: (StrikeFont fontName: font size: penSize)
        color: penColor.
    stage changed

Last edited by MathWizz (2011-06-23 16:22:33)

waveOSBeta · 2011-06-23 16:55:19

MathWizz wrote:

Mmmm...
*opens Scratch*

EDIT:
Try this:

Code:

('stamp text %s with font %s' #- #stampText:font: 'Hello, World' 'Arail')

Code:

stampText: text font: font 
    | stage form canvas |
    (stage _ self ownerThatIsA: ScratchStageMorph) ifNil: [^ self].
    stage createOrResizeTrailsForm.
    form _ stage penTrailsForm.
    canvas _ FormCanvas on: form.
    canvas
        text: text
        at: self xpos + 240 @ (self ypos negated + 180)
        font: (StrikeFont fontName: font size: penSize)
        color: penColor.
    stage changed

penSize ain't a variable, all that jazz. Any other ideas?

MathWizz · 2011-06-23 17:49:20

It goes into the ScratchSpriteMorph.

waveOSBeta · 2011-06-23 17:54:04

The block stays highlighted, it doesn't work.

MathWizz · 2011-06-23 21:58:01

If it stays highlighted, click the stop button and run it again.

waveOSBeta · 2011-06-24 13:04:58

MathWizz wrote:
If it stays highlighted, click the stop button and run it again.

Nope. sad

waveOSBeta · 2011-06-25 12:06:08

Bumpmubmpub Mphinhihiknknikjjdsihisk

^^'

ProgrammingFreak · 2011-06-25 13:30:08

I was going to do this in a mod a was going to make a year ago. 0_e

waveOSBeta · 2011-06-26 12:19:31

waveOSBeta wrote:
Bumpmubmpub Mphinhihiknknikjjdsihisk

^^'

Scratch

archived forums

#1 2011-06-22 21:50:25

[draw text [] at x() y()] block

#2 2011-06-22 22:07:08

Re: [draw text [] at x() y()] block

waveOSBeta wrote:

#3 2011-06-23 04:32:52

Re: [draw text [] at x() y()] block

Code:

#4 2011-06-23 04:37:02

Re: [draw text [] at x() y()] block

#5 2011-06-23 05:05:10

Re: [draw text [] at x() y()] block

sparks wrote:

#6 2011-06-23 05:44:59

Re: [draw text [] at x() y()] block

#7 2011-06-23 06:35:53

Re: [draw text [] at x() y()] block

sparks wrote:

Code:

#8 2011-06-23 07:44:00

Re: [draw text [] at x() y()] block

waveOSBeta wrote:

sparks wrote:

Code:

#9 2011-06-23 11:02:06

Re: [draw text [] at x() y()] block

#10 2011-06-23 13:40:36

Re: [draw text [] at x() y()] block

#11 2011-06-23 13:54:53

Re: [draw text [] at x() y()] block

waveOSBeta wrote:

#12 2011-06-23 13:55:12

Re: [draw text [] at x() y()] block

#13 2011-06-23 16:05:17

Re: [draw text [] at x() y()] block

Code:

Code:

#14 2011-06-23 16:55:19

Re: [draw text [] at x() y()] block

MathWizz wrote:

Code:

Code:

#15 2011-06-23 17:49:20

Re: [draw text [] at x() y()] block

#16 2011-06-23 17:54:04

Re: [draw text [] at x() y()] block

#17 2011-06-23 21:58:01

Re: [draw text [] at x() y()] block

#18 2011-06-24 13:04:58

Re: [draw text [] at x() y()] block

MathWizz wrote:

#19 2011-06-25 12:06:08

Re: [draw text [] at x() y()] block

#20 2011-06-25 13:30:08

Re: [draw text [] at x() y()] block

#21 2011-06-26 12:19:31

Re: [draw text [] at x() y()] block

waveOSBeta wrote:

Board footer