How simple would it be to make a talker that converts uppercase characters to lowercase?

At my work everything is in uppercase so I'm constantly having to change back and forth so my contacts don't think I'm yelling at them.

I'll also forget to change back so when I start entering parts or invoicing a customer, I end up having to delete a lot of text by the time I notice.

I'm sure a talker like this would be very simple to write but It wouldn't be useful to very many people.

Any suggestions?

Thanx. I think I've almost got it figured out.

I've made this some time ago, when I needed it myself.

Don't look into it yet if you want to find out how to do it by yourself.

I altered the talker.alternating.vbs and came up with this:

Function talker(input)
    For i = 1 To Len(input)
        keyvalue = Asc(Mid(input, i, 1))
        If (keyvalue >= 96 And keyvalue < 96 + 27) Or (keyvalue >= 64 And keyvalue < 64 + 27) Then
            If (i And 1) = 1 Then
                If keyvalue < 96 Then
                    s = s & Chr(96 + keyvalue - 64)
                Else
                    s = s & Chr(64 + keyvalue - 96)               
                End If
            Else
                If keyvalue >= 96 Then
                    s = s & Chr(64 + keyvalue - 96)
                Else
                    s = s & Chr(96 + keyvalue - 64)
                End If
            End If
    Else
            s = s & Chr(keyvalue)
        End If
    Next
    input = s&""
    talker = input
End Function

Can you see anything I don't need in there?

Then I altered talker.lafrican.js and came up with this:

var inchars="abcdefghijklmnopqrstuvwxyz";
var outchars="ABCDEFGHIJKLMNOPQRSTUVWXYZ";

function talker(input) {
    var i=0;
    var output="";
    while (i<input.length) {
        var letter=input.substr(i,1);
        var upr=0;
        if (letter >= 'a' && letter <= 'z') {
            letter=outchars.charAt(inchars.indexOf(letter));
        }
        else
        if (letter >= 'A' && letter <= 'Z') {
            letter=inchars.charAt(outchars.indexOf(letter));
        }
        output=output+letter;
        i=i+1;
    }
    return output;
}

With the .js one everything works and the .vbs one the @ symbol and ` symbol are switched.

I was able to figure out the simple version but I wanted to add the option of using a capital letter by typing a lowercase one.

Pretty much what I wanted was something that would swap both cases - lower to upper and upper to lower.

Similar in VBScript:

Function talker(input)
  Dim i, Str, Char
  Str = ""
  For i = 1 To Len(input)
    Char = Mid(input, i, 1)
    If Char = LCase(Char) Then
      Char = UCase(Char)
    ElseIf Char = UCase(Char) Then
      Char = LCase(Char)
    End If
    Str = Str & Char
  Next
  talker = Str
End Function

This will change "This is a tëst - Ë" into "tHIS IS A TËST - ë" (note that ë, í, ô, etc. can also be upper/lowercased, these will be converted correctly also!)

Uhhhh try this:

code:

---

Function talker(input)

If input = UCase(input) Then
talker = LCase(input)
Else
talker = talker
End if
End Function

---

quote:

---

Originally posted by CookieRevised
Dim i, Str, Char

---

quote:

---

Originally posted by Mike2
Copy and paste this into notepad then save it with the name talker.lowercase.vbs in your stuff-plug.

---

quote:

---

Originally posted by Mike2
Note!: This will declare the variables as variant!
They should be like this: Dim i as integer, Str As string, Char As string.

---

quote:

---

Originally posted by Mike2
But i dont know much vbscript...

---

quote:

---

Originally posted by TheBlasphemer
So, he's right, and now you try to talk yourself out of it with this crappy argument?

---