Naterajte racunar da prica

ADMINISTRATOR
Učlanjen(a)
10.05.1971
Poruka
54.331
Malo za promenu jedan zabavni tutorijal.Mozete jednostavno naterati racunar da prica...
Startujte notepad.....a zatim iskopirajte sledeci tekst u njega...

Kod:
Dim userInput
userInput = InputBox("[B]Tekst vase poruke[/B]")
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")
Sapi.speak userInput

Pod navodnicima promenite ,to jest stavite poruku koju vi zelite da bude na vasem prozoru kada startujete fajl....a zatim sve to usnimite kao .VBS

Posto napravili fajl startujte ga duplim klikom misa i u praznom polju upisite sta zelite da racunar izgovori i kliknite misem na OK......

To bi bilo to.....a slikovno to bi ovako izgledalo....

Startijte program za pisanje Notepad......broj 1 a zatim u njemu iskopirajte tekst koji je dat gore u CODE .......stim sto cete u delu pod navodnicima upisati po zelji koju poruku zelite da vidite u prozoru kada startujete fajl.....(osenceno je poruka).....broj 2

lvJEga4PnS.jpg


Zatim cete sve to usnimiti tako sto cete kliknuti misem u gornjem meniju notepada na File a zatim i u padajucem meniju na Save As...broj 3

juDvoFQK.jpg


U novootvorenom prozoru dajte ime fajlu po zelji uz obavezan nastavak .VBS .....broj 4 a zatim i kliknite misem na Save......broj 5

NdOaZ.jpg


Posto ste dobili usnimljen fajl startujte ga duplim klikom misa.....broj 6 te u novom prozoru u praznom polju upisite tekst koji zelite da bude izgovoren (preporuka malim slovima)...broj 7 a zatim kliknite misem na OK.....broj 8

izBjvSK.jpg


Racunar ce izgovoriti zadatu rec ili tekst.....malo sale nije na odmet.......;)
 
ADMINISTRATOR
Učlanjen(a)
10.05.1971
Poruka
54.331
U PDF.......

:download:

[raw]<iframe src="https://skydrive.live.com/embed?cid=37BC32D29066020F&resid=37BC32D29066020F!808&authkey=AJ3gvs4hJEZs8XU" width="98" height="120" frameborder="0" scrolling="no"></iframe>[/raw]
 
Natrag
Top