Scratch

pwiter wrote:

I got a new block
http://img831.imageshack.us/img831/1435/capturesc.jpg
Instance ops:

Code:

| dialogBox |
    dialogBox _ DialogBoxMorph new.
    dialogBox title: t1.
    dialogBox withButtonsForYes: false no: false okay: true cancel: false.
    dialogBox message: t2.
    dialogBox getUserResponse.

Blockspecs

Code:

('show dialog titled %s with contents %s' #- #showDialogTitle:Contents: 'info' 'hello')

Copyright pwitter 2010

COPYRIGHT!!! How could you have copyrighted it??? Or did you just say that so people wouldn't steal it? :s One or the other because copyrighting is harder than you think...

(P.S. Hope I don't sound angry!  )

Last edited by sonicjosh (2010-08-18 15:25:02)

Do you know how to make the set/change blur effect to/by n? 

i need help from my sister to do that, shes good at codes

LS97 wrote:

randalpik wrote:

I can't figure out how to make the Graphic effect reporter block... can someone help?

Here it is just quickly. i've got hw to do now!

Code:

getEffect: t1 
    filterPack ifNil: [^ 0].
    'blur' = t1 ifTrue: [^ filterPack blur].
    'brightness' = t1 ifTrue: [^ filterPack brightnessShift].
    'fisheye' = t1 ifTrue: [^ filterPack fisheye].
    'color' = t1 ifTrue: [^ filterPack hueShift].
    'colour' = t1 ifTrue: [^ filterPack hueShift].
    'mosaic' = t1 ifTrue: [^ filterPack mosaicCount].
    'pixelate' = t1 ifTrue: [^ filterPack pixelateCount].
    'pointillize' = t1 ifTrue: [^ filterPack pointillizeSize].
    'saturation' = t1 ifTrue: [^ filterPack saturationShift].
    'transparency' = t1 | ('ghost' = t1) ifTrue: [^ self transparency].
    'whirl' = t1 ifTrue: [^ filterPack whirl]

Hope it helps.

What about the block spec?

johnnydean1 wrote:

kinker wrote:

LS97 wrote:

Here it is just quickly. i've got hw to do now!

Code:

getEffect: t1 
    filterPack ifNil: [^ 0].
    'blur' = t1 ifTrue: [^ filterPack blur].
    'brightness' = t1 ifTrue: [^ filterPack brightnessShift].
    'fisheye' = t1 ifTrue: [^ filterPack fisheye].
    'color' = t1 ifTrue: [^ filterPack hueShift].
    'colour' = t1 ifTrue: [^ filterPack hueShift].
    'mosaic' = t1 ifTrue: [^ filterPack mosaicCount].
    'pixelate' = t1 ifTrue: [^ filterPack pixelateCount].
    'pointillize' = t1 ifTrue: [^ filterPack pointillizeSize].
    'saturation' = t1 ifTrue: [^ filterPack saturationShift].
    'transparency' = t1 | ('ghost' = t1) ifTrue: [^ self transparency].
    'whirl' = t1 ifTrue: [^ filterPack whirl]

Hope it helps.

What about the block spec?

it should be
Source
('graphic effect %s'         r        getEffect: 'blur')
Not source
('graphic effect %s'   #r  #getEffect: 'blur')

Never mind.

kinker wrote:

Whats the beep block spec and the code to work the beep block?

spec: ('beep' - doBeep)
method:
doBeep
     self beep

TheSuccessor wrote:

johnnydean1 wrote:

kinker wrote:

What about the block spec?

it should be
Source
('graphic effect %s'         r        getEffect: 'blur')
Not source
('graphic effect %s'   #r  #getEffect: 'blur')

%g is better than %s. It gives a menu with the graphic effect names.

I know I was tring to rember what the graphic effects names letter was!

LS97 wrote:

johnnydean1 wrote:

TheSuccessor wrote:

%g is better than %s. It gives a menu with the graphic effect names.

I know I was tring to rember what the graphic effects names letter was!

if you have any doubts next time, first of all there's a list on the first page and you can always check under commandblockmorph's uncoloredargmorphfor: method 

Ok thanks, but I was working from memory!

TheSuccessor wrote:

Joeman592 wrote:

roger- wrote:

here's a good exponent block. put it under operators.

Code:

exp: t1 raisedTo: t2 
    | t3 |
    t3 _ t1 raisedTo: t2.
    ^ t3

But there isn't an operators... and if there is PLEASE TELL ME CUZ I CANT FIND IT! please? Also, please tell me if it goes in string.

Operators is the new name for numbers in 1.4

What about the block spec?

kinker wrote:

TheSuccessor wrote:

Joeman592 wrote:

But there isn't an operators... and if there is PLEASE TELL ME CUZ I CANT FIND IT! please? Also, please tell me if it goes in string.

Operators is the new name for numbers in 1.4

What about the block spec?=|

It would be: ('%n ^ %n' #r #exp:raisedTo:)

what is the 'i recieve block?

LS97 wrote:

The string control blocks
these are requested blocks, so i'll get to it immidiately.
i can't really guarantee 'cause this is off the top of my head...

THE REVERSE BLOCK
add to blockSpecs under operators: ('reverse %s' #r #rev:)

add to code under string ops:

Code:

rev: t1
^ t1 reversed

THE LOWERCASE/UPPERCASE
please note that i put this once only (for lowercase). just change all the 'lower' to 'upper' for uppercase. (duh)

put in blockSpecs: ('%s lowercase' #r #lowercase:)

put in code under string ops:

Code:

lowercase: t1
^ t1 asLowercase

there you go!

I needed this! Thank you!   

<<  <not>  >>

Last edited by zorket (2010-08-25 18:36:03)

hm... pwnt?      
i honestly think that was to scare people from using 'his'* block.

*=not his