Scratch

when gf clicked
object (sprite1 v)

when gf clicked
script variables (a)
set (a v) to <object [sprite1 v]>
run ((test v) of (sprite1 v))

when gf clicked
if <I'm at school>
say [Let's play tag!]
end
add [Fourth Grade v] to [tag]
if <I'm it>
go to [nearest player v]
if <touching [player v]?>
say [Tag! Your it!]
end

Last edited by maxamillion321 (2013-01-30 18:30:38)

when gf clicked
forever if touching <unicorn>?
hide
change score by 1

when gf clicked
forever
say [RAWRRRRRRR] for (2) years
end

Free fall w/ air resistance equation.

when gf clicked
set [k v] to ((0.5) * ((Air density) * ((Drag Coefficient) * (Reference area))))
set [Free fall with air resistance time v] to (( [sqrt v] of ((Mass) / ((Gravitational acceleration) * (k)))) * ( [ln v] of (((e) ^ (((Height) * (k)) / (Mass))) + (( [sqrt v] of (((e) ^ (((Height) * (k)) / (Mass))) - (1))) * ( [sqrt v] of (((e) ^ (((Height) * (k)) / (Mass))) + (1)))))))
say [This equation is real!]

hELP ME  PLEASE HOW TO MAKE CAT GREET IN DIFFERENT LANGUAGES

[When I receive [runny nose v]
If < (nose) = [full] >
Sneeze [A girrafe! :D v ]
else
Buy [Unicorn! :D :D v ]

When Green Flag clicked
Suprise me!

Last edited by RalphDavid4 (2013-02-02 18:52:02)

 
kapag Gf click ng 
paulit-ulit hanggang sa <(timer)> [10]> 
  pumunta sa [mouse-pointer v] 
pagtatapos 
tingin [Script sa iyong mga post!] para sa (3) segundo 

Last edited by RalphDavid4 (2013-02-02 18:59:28)

when gf clicked
say [ ]
ask [First number] and wait
set [i v] to (answer)
ask [Second number] and wait
set [k v] to (answer)
set [ik v] to (join (i) (k))
say (ik)

when gf clicked
set [5j49h48u4hhjgddjj v] to [2]
repeat (5j49h48u4hhjgddjj)  
 set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
 repeat (5j49h48u4hhjgddjj)  
  set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
  repeat (5j49h48u4hhjgddjj)  
   set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
   repeat (5j49h48u4hhjgddjj)  
    set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
    repeat (5j49h48u4hhjgddjj)  
     set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
     repeat (5j49h48u4hhjgddjj)  
      set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
      repeat (5j49h48u4hhjgddjj)  
       set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
       repeat (5j49h48u4hhjgddjj)  
        set [5j49h48u4hhjgddjj v] to ((5j49h48u4hhjgddjj) * (5j49h48u4hhjgddjj))
       end
      end
     end
    end
   end
  end
 end
end

Finally! how to make planetary transfer phase angle calculator!
you need 2 scripts

when gf clicked
say []
forever  
 set [pt v] to ((((((r) * (2)) + ((h1) + (h2))) / (((r) * (2)) + ((h2) * (2)))) * ( [sqrt v] of ((((r) * (2)) + ((h1) + (h2))) / (((r) * (2)) + ((h2) * (2)))))) / (2))
 set [ft v] to ((pt) mod (1))
 set [Sweep angle v] to ((ft) * (360))
end

when gf clicked
forever  
 if <<(Sweep angle) < [180]> or <(Sweep angle) = [180]>>
  set [Phase angle v] to ((180) - (Sweep angle))
  say (join [Planetary transfer phase angle is ] (join (Phase angle) [ Degrees counterclockwise]))
 else
  set [Phase angle v] to ((Sweep angle) - (180))
  say (join [Planetary transfer phase angle is ] (join (Phase angle) [ Degrees clockwise]))
 end
end