Clipboard to phone

[itsjustmatt]

This macro will send whatever text is in your clipboard to your cell via SMS. Substitute your number. Email out server must be setup.

ClipToPhone

Code:

Copy      Help

str Clip MesText
Clip.getclip
MesText.from("Would you like to send the following text?[][]" Clip)
mes-(MesText "ClipToPhone" "YN?a")
SendMail "[email protected]" "ClipToPhone" Clip
bee 4

[LyLerK]

I believe teleflip.com no longer works. I use this function (only tested with verizon and sprint)
Function TextMessage2

Code:

Copy      Help

function ~number ~message [carrier] ;;carrier 1 = verizon, 2 = sprint, 3 = nextel, 4 = att, 5 = alltell, 6 = tmobile, 7 = myboostmobile
str s =
;smtp_server smtp.gmail.com
;smtp_port 465
;smtp_user [email protected]
;smtp_password B6FB7681A7F595CE
;smtp_auth 2
;smtp_secure 1
;smtp_timeout 60
;smtp_email [email protected]
;smtp_displayname AutoText
;smtp_replyto [email protected]
;pop_server pop.gmail.com
;pop_port 995
;pop_user [email protected]
;pop_password B6FB7681A7F595CE
;pop_auth 0
;pop_secure 1
;pop_timeout 60
number + "@"
sel carrier
,case 1: number + "vtext.com"
,case 2: number + "messaging.sprintpcs.com"
,case 3: number + "messaging.nextel.com"
,case 4: number + "txt.att.net"
,case 5: number + "message.alltell.com"
,case 6: number + "tmomail.net"
,case 6: number + "vmobl.net"
,case 7: number + "myboostmobile.com"
,case else: number + "vtext.com"  ;;you can put a default here or a return
SendMail2 number "" message 0 "" "" "" "" "" s
err
,ret 0
ret 1