Jump to content

A little help with my msn script please..?


Recommended Posts

I want my msn script to read the text people send and then respond to it...

I have a little code like this..:

But the only thing that it does is send some text to people how start talking to me...:

#include <File.au3>
; Script Start - Add your code below here
;$run = runwait ( @ProgramFilesDir&"\MSN Messenger\msnmsgr.exe" )
sleep ( 2000 )
;send ( $pos[0]&' '&$pos[1] )
;praat plek:          
global $talk[63] = ['Hallo', 'P1P2P3', 'Wat een dag......', 'Ik heb zin in een red bull.. Jij ook?', 'Waarom ga je niet even aardig doen?','Doeg... Grapje... Ik ga niet hoor!', ':D :) :D :) .. I (L) Emoiticons', 'Ik zou eigenlijk iets anders willen doen dan de hele tijd praten...', 'Maar ik vindt jou gewoon zo aardig..', 'zin in.... Chips','Ik ben onoverwinnelijk', 'waarom zou mijn naam ... zijn?', 'Vindt jij mij een sukkel?', 'wat een weirdo ben jij', 'waarom.. .ga je niet zwemmen?', 'Ik vind..... dat jij..... super cool bent... ;).. :)..', 'school is stom he!', 'zo. zo...', 'goh..', 'Nou zeg!', 'Poeh.. poeh...', 'tsjaa..', 'nou... umm..','uhhhh...', 'neeee!','nee','jaa!','ja','umm.. tsjaa.. daar vraag je me wat..','ik zou het niet weten', 'Mensen Mensen... Wat een bende hier op msn', 'wat is jou lievelingsdier?', 'Spa rood is niet te drinken he!', 'Je moet niet zo opscheppen jij!', 'ja.. Tuurlijk.. Ga jij maar lekker chocola eten!', 'kijk ik doe gordon na: Ow... god.. Ik heb er de kracht niet meer voor..','Waarom moet je nou altijd zo doen..?!','Spinazie.. is voor de echte knul!  (jij niet)','Get a Life','Dit is een lange zin: je moet goed je tanden poetsen als je het niet erg vindt om niet zo vaak naar de tandarts te gaan... maar goed...','Love You so much(L)','Ik wil je nooit meer kwijt(L)','Doe je cam ns aan','Oef....',':D :) ;) :P xd','Kinderen en ... dammed.. ben me tekst kwijt.','Shize... hoe schrijf je dat in het duits?','Red Bull is goden voedsel','Wat vind je nou van die honden die zomaar midden op straat poepen?',';)',':)',':(',":'(",":|",':D',':P','(L)','(K)','(L)(K)(L)','(A)',':@',':o' ]
While 1
$var = PixelGetColor( 561 , 1016 )
$var1 = PixelGetColor( 581 , 1016 )
$var2 = PixelGetColor( 620 , 1016 )
$var3 = PixelGetColor( 750 , 1016 )
$var4 = PixelGetColor( 422 , 1016 )
$var5 = PixelGetColor( 900 , 1016 )
$var6 = PixelGetColor( 800 , 1016 )
$var7 = PixelGetColor( 786 , 1016 )
$var8 = PixelGetColor( 567 , 1016 )
$add = PixelGetColor( 272, 185 )
sleep ( 200 )
if $add = '15460845' then send ( "{ENTER}" )
if $var = '14174752' Then
    MouseClick ( "Left", 561, 1016 )
    praat()
EndIf
if $var1 = '14174752' Then
    MouseClick ( "Left", 581 , 1016 )
    praat()
EndIf
if $var2 = '14174752' Then
    MouseClick ( "Left", 620 , 1016 )
    praat()
EndIf
if $var3 = '14174752' Then
    MouseClick ( "Left", 750 , 1016 )
    praat()
EndIf

    
    if $var4 = '14174752' Then
    MouseClick ( "Left", 422 , 1016 )
    praat()
EndIf

    
    if $var5 = '14174752' Then
    MouseClick ( "Left", 900 , 1016 )
    praat()
EndIf

    
    if $var6 = '14174752' Then
    MouseClick ( "Left", 800 , 1016 )
    praat()
EndIf

    
    if $var7 = '14174752' Then
    MouseClick ( "Left", 786 , 1016 )
    praat()
EndIf


    
    if $var8 = '14174752' Then
    MouseClick ( "Left", 567 , 1016 )
    praat()
EndIf
WEnd

func praat()
    $num = random ( 0, 62, 1 )
    send ( $talk[$num] )
    send ( '{ENTER}' )
    sleep (10)
    send ( '{ENTER}' )
    sleep ( 100 )
    send ( "!{F4}")
    $i = FileOpen ( "keer.txt", 0 )
    $n = FileReadLine ( $i, 1 )
    _FileWriteToLine ( 'keer.txt', 1, $n + 1&'',1 )
    FileClose ( $i )
EndFunc
Link to comment
Share on other sites

I haven't found a way of doing this since most of the WinGet* functions don't work on msn, except tabbing to the received messages part of the window and sending Ctrl+A then Ctrl+C then using ClipGet() to see the message. This way is really bad, slow and fails sometimes depending on what control takes focus first.

Link to comment
Share on other sites

I haven't found a way of doing this since most of the WinGet* functions don't work on msn, except tabbing to the received messages part of the window and sending Ctrl+A then Ctrl+C then using ClipGet() to see the message. This way is really bad, slow and fails sometimes depending on what control takes focus first.

Thnx.. could you give me an example of the ClipGet stuff..?
Link to comment
Share on other sites

  • Developers

:) is dutch :party: so.. yeah you probaly don't understand it..

Sure .... maar nederlands lezen en schrijven lukt aardig :)

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

I thought Dutch people did understand dutch :)

:) Jos peut parler le néerlandais ? Depuis quand ? but I can speak french:

Voir... Je peux parler le français :party:

Translation:

See...I can speak french :lmao:

Edited by R6V2
Link to comment
Share on other sites

  • Developers

WHAHAHAHAHA

sorry

ik wist niet dat je nl was... :)

Al meer dan 48 jaar... kan je in mijn profiel zien.

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...