Skype bot [help]

[gerulisexe]

Reikia skype boto kur irasai teksta i ji ir kai issiuncia paraso tarkim mano skype nick yra Domas. ir apraso Sveikas, Domas.
BLABLABLA

Reikia tokio skype bot pirmas daves +7REP

[DeFine]

Pilna Google'i ir YouTube...

[DeFine]

on error resume next

set yADAl = WScript.CreateObject("Skype4COM.Skype", "Skype_")
yADAl.Client.Start()

For Each GAG In yADAl.Friends
yADAl.SendMessage GAG.handle,"Jūsų tekstas"
yADAl.SendMessage GAG.handle,"Jūsų tektas"
yADAl.SendMessage GAG.handle,"Jūsų tekstas"
yADAl.SendMessage GAG.handle,"Jūsų tekstas"
yADAl.SendMessage GAG.handle,"Jūsų tekstas"
yADAl.SendMessage GAG.handle,"Jūsų tekstas"
next

 

Įrašai į notepad'a ir išsaugai .vbs

Redaguota Kovo 27, 2014, nario DeFine

[demaxas]

parsisiūsk iš kokio tinklapio skype bota ir pasikeisk užrašus tik ....

[žygiux']

Čia yra clownfish

 

--

http://clownfish-translator.com/download.html

Redaguota Kovo 27, 2014, nario eGo'

[žygiux']

on error resume next

set yADAl = WScript.CreateObject("Skype4COM.Skype", "Skype_")

yADAl.Client.Start()

For Each GAG In yADAl.Friends

yADAl.SendMessage GAG.handle,"Jūsų tekstas"

yADAl.SendMessage GAG.handle,"Jūsų tektas"

yADAl.SendMessage GAG.handle,"Jūsų tekstas"

yADAl.SendMessage GAG.handle,"Jūsų tekstas"

yADAl.SendMessage GAG.handle,"Jūsų tekstas"

yADAl.SendMessage GAG.handle,"Jūsų tekstas"

next

 

Įrašai į notepad'a ir išsaugai .vbs

Jis prašo kur parašo. Sveikas, [kontakto vardas]

[gerulisexe]

per clown fish kur eiti?

[MantelisTMT]

I nustatymus > Broadcast mass message > Ir rasai Sveikas, <Contact> blablabla