SRL Archive - Suggestions

Send me SMS Messages :)


Avaphi

2010-05-14 14:15:19

Of proggies ! What do you think?

Gu3st...

2010-05-14 15:52:56

Huh?

Illkillutill

2010-05-14 16:09:08

we know what you mean, i think lol

getting it to send you a text is pretty easy, but to me the hard part is a picture message…

Gu3st...

2010-05-14 16:10:00

Oh! that would be cool.. Why do you need pictures?

Illkillutill

2010-05-14 16:11:45

well the whole point behind it is for captcha's.


there is a game i'm working on a script for, but the only thing stoping it is a captcha…

if i can get the script to take a pic, txt it to me, and i give it the answer, than it can continue…

get it?

noidea

2010-05-14 16:11:46

Just setup an email thing (Trilez's) and have it send to your sms number. number@place
here are the addresses.

http://www.hurt911.org/investigation/sms-text-message-address.html

Illkillutill

2010-05-14 16:20:09

Yup, Trilez tut is all you need, or just use the stmp…

i got this from somewhere and just edited it… a bit, but its what i use

Procedure WaitForResponse(c : Integer);
var s : String;
begin
repeat
if (ReadConnectionData(c, s)) then
begin
Wait(50);
end else
begin
Writeln('Connection error');
Exit;
end;
until(s<>'')or(not IsConnectionOpen(c));
end;


Procedure SendEmail(smtpserver, frommail, tomail, subject, data, : String);
var c : Integer;
begin
c := OpenConnection(smtpserver, 25, 1000);
WaitForResponse(c);
SendConnectionData(c, 'HELO me' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'MAIL FROM: ' + frommail + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'RCPT TO: <' + tomail + '>' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'DATA' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'Subject: ' + subject + #13#10#13#10);
SendConnectionData(c, data + #13#10);
SendConnectionData(c, '.' + #13#10);
WaitForResponse(c);
end;


and use like this

SendEmail('smtp.isp.net', 'youremail@whatever.com', 'yourphone#@whatever.com', 'test', 'testing');

for me it goes like this…

SendEmail('smtp.windstream.net', 'Illkillutill@live.com', 'my#@vtext.com', 'test', 'testing');


i had a lot of help figuring this out lol, cause i'm noobish at it.

MylesMadness

2010-05-14 16:34:33

If someone could figure out how to send picture messages from inside scar that would be sick. Also how to email the responces

Gu3st...

2010-05-14 16:37:25

From: noidea
Just setup an email thing (Trilez's) and have it send to your sms number. number@place
here are the addresses.

http://www.hurt911.org/investigation/sms-text-message-address.html
Didn't work for me :(
I use Norway's Netcom

Illkillutill

2010-05-14 16:42:46

Use what i posted zytex :P

stmp is the way to go imho :p


Edit: wouldn't all we need is a site that can send pic message like pixdrop.com?

MylesMadness

2010-05-14 17:23:13

PostHTTPFormData('http://www.pixdrop.com/', ['group1', 'to', 'MAX_FILE_SIZE', 'genit'], ['Verizon', 'phonenumber', '200000', 'Send Your Picture Message'], ['userfile'], ['filepath'], ['image/png']);
That doesn't work, but I would guess it would with a little more work

Gu3st...

2010-05-14 17:54:07

From: Illkillutill
Use what i posted zytex :P

stmp is the way to go imho :p


Edit: wouldn't all we need is a site that can send pic message like pixdrop.com?


Successfully compiled (33 ms)
Connection error
Connection error
Connection error
Connection error
Connection error
Connection error
Successfully executed
:'(

using this:
Procedure WaitForResponse(c : Integer);
var s : String;
begin
repeat
if (ReadConnectionData(c, s)) then
begin
Wait(50);
end else
begin
Writeln('Connection error');
Exit;
end;
until(s<>'')or(not IsConnectionOpen(c));
end;

Procedure SendEmail(smtpserver, frommail, tomail, subject, data : String);
var c : Integer;
begin
c := OpenConnection(smtpserver, 25, 1000);
WaitForResponse(c);
SendConnectionData(c, 'HELO me' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'MAIL FROM: ' + frommail + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'RCPT TO: <' + tomail + '>' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'DATA' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'Subject: ' + subject + #13#10#13#10);
SendConnectionData(c, data + #13#10);
SendConnectionData(c, '.' + #13#10);
WaitForResponse(c);
end;

begin // Edited out my phone
SendEmail('smtp.windstream.net', 'xxxxxxxx@sms.netcom.no', 'axel_sa@hotmail.com', 'test', 'testing');
end.

Illkillutill

2010-05-14 20:49:36

hmm… i must have messed up something in my example :p

i think we can do this a lot easier than expected

Harry

2010-05-14 21:27:23

Why would you want pictures? Of the current screen?

Might have problems && the @phoneprovider email will only for for SMS, not MMS.

Using your ISP's smtp's servers would probably the best way (or running your own, if you're not in spamhaus (which is doubtful for a residential ISP)).

Illkillutill

2010-05-14 22:06:37

Yea, im using the smtp server but don't know what other connection's i can use to actually upload the picture to.

Edit: The point of picture messaging is this:

I run the script, and when it comes to a captcha screen, it sends me the pic of the captcha, so i can give it the answer, it then input's the answer to the program and continue's to run…

Avaphi

2010-05-14 22:32:39

i'm glad this inspired some conversation ! :)

Illkillutill

2010-05-14 22:43:36

It inspired a whole new… something :p

Yea, so I think this is a great idea! :)

Avaphi

2010-05-23 19:26:37

What if it activated the ability to send messages only when a pmod/jmod is on the chatbox? Identify the icon, send an SMS alert and send the message that the mod is saying to your phone?

Smartzkid

2010-05-23 22:45:07

That would be a little… slow..

ShowerThoughts

2010-05-24 09:40:53

From: Zyt3x
Successfully compiled (33 ms)
Connection error
Connection error
Connection error
Connection error
Connection error
Connection error
Successfully executed
:'(

using this:
Procedure WaitForResponse(c : Integer);
var s : String;
begin
repeat
if (ReadConnectionData(c, s)) then
begin
Wait(50);
end else
begin
Writeln('Connection error');
Exit;
end;
until(s<>'')or(not IsConnectionOpen(c));
end;

Procedure SendEmail(smtpserver, frommail, tomail, subject, data : String);
var c : Integer;
begin
c := OpenConnection(smtpserver, 25, 1000);
WaitForResponse(c);
SendConnectionData(c, 'HELO me' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'MAIL FROM: ' + frommail + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'RCPT TO: <' + tomail + '>' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'DATA' + #13#10);
WaitForResponse(c);
SendConnectionData(c, 'Subject: ' + subject + #13#10#13#10);
SendConnectionData(c, data + #13#10);
SendConnectionData(c, '.' + #13#10);
WaitForResponse(c);
end;

begin // Edited out my phone
SendEmail('smtp.windstream.net', 'xxxxxxxx@sms.netcom.no', 'axel_sa@hotmail.com', 'test', 'testing');
end.


Not sure if someone already answered your question; but you switched the from and to -mail. You have to switch the parameters.

Camaro'

2010-06-02 19:48:20

From: Smartzkid
That would be a little… slow..


How so?

It would be the same thing as sending a proggy to your phone.

SRL can detect and grab the mods text in what, a few seconds?

Also, you could have SCAR/Simba put the image on a website, and just send you the link if you have a internet browser enabled phone. :)

Smartzkid

2010-06-02 21:28:12

I dont know about you, but my SMS' commonly take more than 30 seconds each way. 1 minute or more would be a pretty slow response time.

i luffs yeww

2010-06-02 21:42:58

^ Takes a few seconds for me. 2-5, usually.

Camaro'

2010-06-02 22:07:35

From: i luffs yeww
^ Takes a few seconds for me. 2-5, usually.


Same.

Avaphi

2010-06-03 00:53:46

From: i luffs yeww
^ Takes a few seconds for me. 2-5, usually.


Same..

Smartzkid

2010-06-03 22:35:01

Wow, nice. I guess its just my reception.. 1-2 bars typ.

Gu3st...

2010-06-16 16:43:29

Bump!

http://for-ever.us/
You can use this to send free sms messages to anywhere in the world! :O
Only problem is that you have to enter a captcha, but it looks easy to make a solver for :)