Взломы среднего и высокого уровня 2
Сикреты, приколы, программирование, знание компьютера
Cборник кодов моих программ
Здравствуйте!
Меня зовут Александр Могилевский , живу в Канаде с 2000го года, мне сейчас 37 лет. В первой книге я вам писал немного введения в мир программирования и взломов и в основном я вам описывал чужие программы. Сейчас я хочу поделится с вами своими программами, я б сказал что они скорее среднего уровня, чем высокого, в общем это смотря как на это посмотреть. Ну и по ходу написания кодов я попробую еще добавить разных приколов и знаний от се6я! Давайте для начала напишем одну программу, которая по вводу текста говорит вам этот текст голосом робота. Вы наверное подумаете! А зачем она комуто нужна?! Тут дело фантазии, можно просто поприкаловатся, или если вы занимаетесь созданием сайтов с чатами можно её подключить к вашему чату и назвать его голосовой чат. Еще можно говорить по телефону с кемто, кому вы не хотите выдавать свой реальный голос, ну и вконце концов глухонемые могут пользоватся этой программой. Для тех кто не читал мою первую книгу, повторюсь, для запуска этих кодов и для компеляции их, нужно иметь программу под названием Autoit! После инсталации у вас появится папка под названием Autoit, возможно с разными номерами, в зависимости от того, какой версией вы пользуетесь, там чуть глубже в папках вы найдете файл примерно вот такого названия SciTE4.exe с расширением. ехе – тоесть запускаемый файл, это и есть компелятор! Удачи! В этом коде вы увидите первую функцию! Название программы!
TEXT TO VOICE!
#include <GUIConstantsEx.au3>
#include <GDIPlus.au3>
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <IE.au3>
Deeman ()
Func Deeman ()
Local Const $CLSID_SpVoice =» {96749377-3391-11D2—9EE3-
00C04F797396}»; этот кусочек надо писать вместе с тем что выше!
Local Const $IID_ISpVoice =» {6C44DF74—72B9-4992-A1EC-EF996E0422D4}»
Local Const $SPF_DEFAULT = 0
Local Const $sSpVoice = «SetNotifySink hresult (ptr)» & _
«SetNotifyWindowMessage hresult (hwnd; uint; long; long);" & _
«SetNotifyCallbackFunction hresult (ptr; long, long);" & _
«SetNotifyCallbackInterface hresult (ptr; long, long);" & _
«SetNotifyWin32Event hresult ();" & _
«WaitForNotifyEvent hresult (dword);" & _
«GetNotifyEventHandle hresult ();" & _
«SetInterest hresult (long; long);" & _
«GetEvents hresult (ulong; ptr; ptr)» & _
«GetInfo hresult (ptr);" & _
«SetOutput hresult (ptr; boolean);" & _
«GetOutputObjectToken hresult (ptr);" & _
«GetOutputStream result (ptr);" & _
«Pause hresult ();" & _
«Resume hresult ();" & _
«SetVoice hresult (ptr);" & _
«GetVoice hresult (ptr);" & _
«Speak hresult (wstr; dword; ulong);" & _
«SpeakStream hresult (ptr; dword; ulong);" & _
«GetStatus hresult (ptr; ptr);" & _
«Skip hresult (wstr; long; ulong);" & _
«SetPriority hresult (long);" & _
«GetPriority hresult (ptr);" & _
«SetAlertBoundary hresult (long);" & _
«GetAlertBoundary hresult (ptr);" & _
«SetRate hresult (long);" & _
«GetRate hresult (ptr);" & _
«SetVolume hresult (ushort);" & _
«GetVolume hresult (ptr);" & _
«WaitUntilDone hresult (ulong);" & _
«SetSyncSpeakTimeout hresult (ulong);" & _
«GetSyncSpeakTimeout hresult (ptr);" & _
«SpeakCompleteEvent hresult ();" & _
«IsUISupported hresult (ptr; ptr; ptr; ptr);" & _
«DisplayUI hresult (hwnd; ptr; ptr; ptr; ulong);»
Opt («GUICoordMode», 2)
GUISetBkColor (0X000000)
Global $hGuiWin = GUICreate («Robot from Deeman», 550, 200)
GUISetBkColor (0x000000, $hGuiWin)
GUICtrlCreatePic('5.jpg’, 0, 0, 0, 0)
GUICtrlSetState (-1, $GUI_DISABLE)
$Input_1 = GUICtrlCreateInput («Hello, from Deeman!», 35, 55, 480, 40)
$Button_1 = GUICtrlCreateButton («Start Talk», -270, 30, 70)
GUISetState ()
While 1
$msg = GUIGetMsg ()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button_1
$oSpVoice = ObjCreateInterface ($CLSID_SpVoice, $IID_ISpVoice, $sSpVoice)
$oSpVoice.SetRate (-3)
$text = GUICtrlRead ($Input_1)
$oSpVoice. speak ($text, $SPF_DEFAULT, 0)
EndSelect
WEnd
EndFunc;==> Deeman
В общем первые строки вам уже знакомы из
ЛитРес