DaSpudLord wrote:

Semi-support, while I believe it exists in other languages, I feel it might be underused- and by that I mean it won't be very useful, especially considering Scratch is not case-sensitive. If you need it, though, there are workarounds, but they can be a bit tedious.

define convert (string) to (upper/lower) case
set [new string v] to [] //will return string converted to upper/lower case
set [i v] to [1]
repeat (length of (string)) //loop through string
  set [j v] to [1]
  repeat until << (letter (j) of [abcdefghijklmnopqrstuvwxuz]) = (letter (i) of (string)) > or < (j) > [26] >>
    change [j v] by (1) //loop through alphabet until letter is found
  end
  if < (j) > [26] > //if it is not in alphabet
    set [new string v] to (join (new string) (letter (i) of (string))
  else
    if <(upper/lower) = [upper]>
      set [new string v] to (join (new string) (letter (j) of [ABCDEFGHIJKLMNOPQRSTUVWXYZ]) //add uppercase version to new string
    end
    if <(upper/lower) = [lower]>
      set [new string v] to (join (new string) (letter (j) of [abcdefghijklmnopqrstuvwxuz]) //add lowercase letter to string
    end
  end
  change [i v] by (1) //on to next letter in string!
end

define convert (string) to (upper/lower) case
set [new string v] to [] //will return string converted to upper/lower case
set [i v] to [1]
repeat (length of (string)) //loop through string
  set [j v] to [1]
  repeat until << (letter (j) of [abcdefghijklmnopqrstuvwxuz]) = (letter (i) of (string)) > or < (j) > [26] >>
    change [j v] by (1) //loop through alphabet until letter is found
  end
  if < (j) > [26] > then //if it is not in alphabet
    set [new string v] to (join (new string) (letter (i) of (string))
  else
    if <(upper/lower) = [upper]> then
      set [new string v] to (join (new string) (letter (j) of [ABCDEFGHIJKLMNOPQRSTUVWXYZ]))//add uppercase version to new string
    end
    if <(upper/lower) = [lower]> then
      set [new string v] to (join (new string) (letter (j) of [abcdefghijklmnopqrstuvwxuz])) //add lowercase letter to string
    end
  end
  change [i v] by (1) //on to next letter in string!
end

set (Password) to [PaSSWoRd]
set (Letter) to [1]
set (Password2) to []
repeat (length of (Password))
repeat (26)
if <(letter (Letter) of (Password)) = (letter (Iterations) of [abcdefghijklmnopqrstuvwxyz])> then
set (Password2) to (join (Password2) (letter (Iterations) of [abcdefghijklmnopqrstuvwxyz]))
end
change (Iterations) by (1)
end
change (Letter) by (1)
set (Iterations) to [1]
end
say (Password2) for (2) secs
say [password]