Ibrahim Posted November 22, 2007 Share Posted November 22, 2007 (edited) expandcollapse popup#NoTrayIcon #Region;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=wrong.ico #AutoIt3Wrapper_outfile=..\1111.exe #AutoIt3Wrapper_Allow_Decompile=n #AutoIt3Wrapper_Res_Description=Application By Ibrahim Ghorabah #AutoIt3Wrapper_Res_Fileversion=3.1.0.0 #AutoIt3Wrapper_Res_LegalCopyright=This Is Ibrahim Ghorabah Program #AutoIt3Wrapper_Res_Language=1033 #EndRegion;**** Directives created by AutoIt3Wrapper_GUI **** #include <IE.au3> #include <GUIConstants.au3> _IEErrorHandlerRegister () $oIE = _IECreateEmbedded () $WholeWidth = @DesktopWidth - 50 $includedWidth = $WholeWidth - 20 Global $Button[46], $Expand[9] $gui = GUICreate ("My Control Center", $WholeWidth, 520, -1, -1, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) GUISetState (@SW_HIDE) $background = GUICtrlCreatePic ("prog.cap", 0, 0, 0, 0) $Label_1 = GUICtrlCreateLabel ("Operation In Progress", 30, 31, 201, 215) $Button[1] = GUICtrlCreateButton ("&Search it.!", 10, 400, 100, 25) $Button[2] = GUICtrlCreateButton ("&Forums", 10, 430, 100, 25) $Button[3] = GUICtrlCreateButton ("&Link it. .!", 10, 460, 100, 25) $Button[4] = GUICtrlCreateButton ("Programming", 115, 400, 100, 25) $Button[5] = GUICtrlCreateButton ("&Network", 115, 430, 100, 25) $Button[6] = GUICtrlCreateButton ("&Email Check", 115, 460, 100, 25) $Button[7] = GUICtrlCreateButton ("&Messenger", 220, 400, 100, 25) $Button[8] = GUICtrlCreateButton ("&Office", 220, 430, 100, 25) $Button[9] = GUICtrlCreateButton ("Check Mail.", 220, 460, 100, 25) $Button[10] = GUICtrlCreateButton ('IMDB', 115, 400, 50, 25) $Button[11] = GUICtrlCreateButton ('SubS.', 170, 400, 50, 25) $Button[12] = GUICtrlCreateButton ('Yahoo!', 225, 400, 50, 25) $Button[13] = GUICtrlCreateButton ('Torrent', 280, 400, 50, 25) $Button[14] = GUICtrlCreateButton ('Autoit', 115, 430, 50, 25) $Button[15] = GUICtrlCreateButton ('Andr', 170, 430, 50, 25) $Button[16] = GUICtrlCreateButton ('Systern', 225, 430, 50, 25) $Button[17] = GUICtrlCreateButton ('Live.@', 280, 430, 50, 25) $Button[18] = GUICtrlCreateButton ('IE', 115, 460, 50, 25) $Button[19] = GUICtrlCreateButton ('Ftp_E', 170, 460, 50, 25) $Button[20] = GUICtrlCreateButton ('Ftp_c', 225, 460, 50, 25) $Button[21] = GUICtrlCreateButton ('TelNet', 280, 460, 50, 25) $Button[22] = GUICtrlCreateButton ('Browse', 220, 400, 50, 25) $Button[23] = GUICtrlCreateButton ('Compile', 275, 400, 50, 25) $Button[24] = GUICtrlCreateButton ('Edit', 330, 400, 50, 25) $Button[25] = GUICtrlCreateButton ('Tidy', 385, 400, 50, 25) $Button[26] = GUICtrlCreateButton ('P_GWay', 220, 430, 50, 25) $Button[27] = GUICtrlCreateButton ('P_Web', 275, 430, 50, 25) $Button[28] = GUICtrlCreateButton ('Sniff', 330, 430, 50, 25) $Button[29] = GUICtrlCreateButton ('Capture', 385, 430, 50, 25) $Button[30] = GUICtrlCreateButton ('Aplay 1', 220, 460, 50, 25) $Button[31] = GUICtrlCreateButton ('Aplay 2', 275, 460, 50, 25) $Button[32] = GUICtrlCreateButton ('Aplay 3', 330, 460, 50, 25) $Button[33] = GUICtrlCreateButton ('Aplay 4', 385, 460, 50, 25) $Button[34] = GUICtrlCreateButton ('&Yahoo', 325, 400, 50, 25) $Button[35] = GUICtrlCreateButton ('M&SN', 380, 400, 50, 25) $Button[36] = GUICtrlCreateButton ('&Gmail', 435, 400, 50, 25) $Button[37] = GUICtrlCreateButton ('&Web', 490, 400, 50, 25) $Button[38] = GUICtrlCreateButton ('Word', 325, 430, 50, 25) $Button[39] = GUICtrlCreateButton ('Excel', 380, 430, 50, 25) $Button[40] = GUICtrlCreateButton ('Access', 435, 430, 50, 25) $Button[41] = GUICtrlCreateButton ('P.Point', 490, 430, 50, 25) $Button[42] = GUICtrlCreateButton ('Yahoo', 325, 460, 50, 25) $Button[43] = GUICtrlCreateButton ('Hotmail', 380, 460, 50, 25) $Button[44] = GUICtrlCreateButton ('Gmail', 435, 460, 50, 25) $Button[45] = GUICtrlCreateButton ('Maktoob', 490, 460, 50, 25) $DelTemp = GUICtrlCreateButton ('Empty Brwosing History', 550, 400, 200, 25) $DelTemp = GUICtrlCreateButton ('MsConfig', 550, 430, 200, 25) $DelTemp = GUICtrlCreateButton ('Control Panel', 550, 460, 200, 25) $DelTemp = GUICtrlCreateButton ('MsConfig', 550, 490, 200, 25) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) $Topic = GUICtrlCreateInput ("", 10, 490, 530, 20) ;GUICtrlSetColor ($Button[1], 0xff0000) GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) For $p = 10 To 45 GUICtrlSetState ($Button[$p], $GUI_HIDE + $GUI_DISABLE) Next GUISetState (@SW_SHOW) $oldclip="" While 1 IF $Topic() <> "" and $oldclip<> ClipGet() Then $oldclip=ClipGet() GUICtrlSetData($Topic,ClipGet()) EndIf $msg = GUIGetMsg () Select Case $msg = $GUI_EVENT_CLOSE Exit Case $msg = $Button[1] GUICtrlSetData ($Label_1, 'Movie Search') $searchstr=StringReplace(GUICtrlRead($Topic),"."," ") $searchstr=StringReplace($searchstr,"-"," ") $searchstr=StringReplace($searchstr,"<"," ") $searchstr=StringReplace($searchstr,"("," ") $searchstr=StringReplace($searchstr,")"," ") $searchstr=StringReplace($searchstr,"["," ") $searchstr=StringReplace($searchstr,"]"," ") $searchstr=StringReplace($searchstr,"-"," ") $searchstr=StringReplace($searchstr,"_"," ") $searchstr=StringReplace($searchstr,"AC3","") $searchstr=StringReplace($searchstr,"XViD","") $searchstr=StringReplace($searchstr,"2006","") $searchstr=StringReplace($searchstr," avi","") $searchstr=StringReplace($searchstr," ENG ","") $searchstr=StringReplace($searchstr,"aXXo","") $searchstr=StringReplace($searchstr,"DvDrip","") $searchstr=StringReplace($searchstr," "," ") $searchstr=StringReplace($searchstr," "," ") GUICtrlSetData($Topic,$searchstr) Expand(0, 10, 13) Case $msg = $DelTemp run("RunDll32.exe "&"InetCpl.cpl,ClearMyTracksByProcess 4351") Case $msg = $Button[2] GUICtrlSetData ($Label_1, "Last Button Pressed: Check Mail") Expand(1, 14, 17) Case $msg = $Button[3] GUICtrlSetData ($Label_1, 'Movie Search') $searchstr=StringReplace(GUICtrlRead($Topic)," ",".") ;~ StringInStr ( $searchstr, "com")+StringInStr ( $searchstr, "com")+StringInStr ( $searchstr, "com")=0 Then GUICtrlSetData($Topic,$searchstr) GUICtrlSetData ($Label_1, "Last Button Pressed: Messenger") Expand(2, 18, 21) Case $msg = $Button[4] GUICtrlSetData ($Label_1, "Last Button Pressed: C++") Expand(3, 22, 25) Case $msg = $Button[5] GUICtrlSetData ($Label_1, "Last Button Pressed: Scite") Expand(4, 26, 29) Case $msg = $Button[6] GUICtrlSetData ($Label_1, "Last Button Pressed: Autoplay") Expand(5, 30, 33) Case $msg = $Button[7] GUICtrlSetData ($Label_1, "Last Button Pressed: MessengerX") Expand(6, 34, 37) Case $msg = $Button[8] GUICtrlSetData ($Label_1, "Last Button Pressed: Office") Expand(7, 38, 41) Case $msg = $Button[9] GUICtrlSetData ($Label_1, "Last Button Pressed: Check Mail") Expand(8, 42, 45) ;______________________________________________Web Search__________________________________________ Case $msg = $Button[10] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Internet Movie Database") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://www.imdb.com/find?s=all&q=" & GUICtrlRead ($Topic), 0) ;_IECreate ("http://www.imdb.com/find?s=all&q="&GUICtrlRead($Topic),0,1,0) Case $msg = $Button[11] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Yahoo Movies") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://subscene.com/subtitlesearch.aspx?title=" & GUICtrlRead ($Topic), 0) ;_IECreate ("http://movies.yahoo.com/mv/search?p="&GUICtrlRead($Topic)&"&fr=Dtk-tab-web-t&toggle=1&cop=&ei=UTF-8",0,1,0) Case $msg = $Button[12] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Web Searching using yahoo Search Engine") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://search.yahoo.com/search?p=" & GUICtrlRead ($Topic) & "&fr=yfp-t-501&toggle=1&cop=mss&ei=UTF-8", 0) ;_IECreate ("http://search.yahoo.com/search?p="&GUICtrlRead($Topic)&"&fr=yfp-t-501&toggle=1&cop=mss&ei=UTF-8",0,1,0) Case $msg = $Button[13] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Web Searching using Google Search Engine") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) $torrentName=StringReplace(GUICtrlRead ($Topic)," ","+") _IENavigate ($oIE, "http://www.isohunt.com/torrents/?iht=-1&ihq="&$torrentName,0) ;_IENavigate ($oIE, "http://www.google.com.eg/search?hl=ar&q=" & GUICtrlRead ($Topic) & "&btnG=%D8%A8%D8%AD%D8%AB+Google%E2%80%8F&meta=", 0) ;_IECreate ("http://www.google.com.eg/search?hl=ar&q="&GUICtrlRead($Topic)&"&btnG=%D8%A8%D8%AD%D8%AB+Google%E2%80%8F&meta=",0,1,0) ;_________________________________________________Forums_________________________________________ ________ Case $msg = $Button[14] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://www.autoitscript.com/forum/index.php?", 0) Case $msg = $Button[15] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://forum.andr.net", 0) Case $msg = $Button[16] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://forum.sysinternals.com", 0) Case $msg = $Button[17] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://www.lifehacker.com", 0) ;------------------------------------------------Link It . . . .!----------------------------- Case $msg = $Button[18] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, GUICtrlRead ($Topic), 0) Case $msg = $Button[19] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, GUICtrlRead ($Topic), 0) Case $msg = $Button[20] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE,"Ftp "&GUICtrlRead ($Topic), 0) Case $msg = $Button[21] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE,"Telnet "&GUICtrlRead ($Topic), 0) Case $msg = $Button[22] ;-----------------------------------------------Programming----------------------- GUICtrlSetData ($Label_1, "Last Button Pressed: Browse") Case $msg = $Button[23] GUICtrlSetData ($Label_1, "Last Button Pressed: Compile") Case $msg = $Button[24] GUICtrlSetData ($Label_1, "Last Button Pressed: Edit") Case $msg = $Button[25] GUICtrlSetData ($Label_1, "Last Button Pressed: Tidy") Case $msg = $Button[26] ;------------------------------------------ GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 1") Case $msg = $Button[27] GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 2") Case $msg = $Button[28] GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 3") Case $msg = $Button[29] GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 4") ;---------------------------------------------- Case $msg = $Button[30] GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 1") Case $msg = $Button[31] GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 2") Case $msg = $Button[32] GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 3") Case $msg = $Button[33] GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 4") ;-----------------------------------------------------Messenger------------------------------------ Case $msg = $Button[34] GUICtrlSetData ($Label_1, "Last Button Pressed: Yahoo") run (@ProgramFilesDir & "\Yahoo!\Messenger\YahooMessenger.exe") WinWaitActive ("Yahoo! Messenger", "YLoginWnd") Sleep (500) Send ("me") Send ("{tab}") Send ("pwwd") Send ("{enter}") Case $msg = $Button[35] GUICtrlSetData ($Label_1, "Last Button Pressed: MSN") run (@ProgramFilesDir & "\MSN Messenger\msnmsgr.exe") WinWaitActive ("Windows Live Messenger", "") Sleep (500) Send ("me@msn.com") Send ("{tab}") Send ("pwwd") Send ("{enter}") Case $msg = $Button[36] GUICtrlSetData ($Label_1, "Last Button Pressed: Gmail") run (@ProgramFilesDir & "\Google\Google Talk\googletalk.exe") WinWaitActive ("Google Talk", "@main") Sleep (500) Send ("pwwd") Send ("{enter}") Case $msg = $Button[37] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://www.ebuddy.com/", 0) ;----------------------------------------------------------------------------------------------- Case $msg = $Button[38] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Last Button Pressed: MYahoo") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "G:\ibrahimat\SS.SWF", 0) Case $msg = $Button[39] GUICtrlSetData ($Label_1, "Last Button Pressed: Excel") Case $msg = $Button[40] GUICtrlSetData ($Label_1, "Last Button Pressed: Access") Case $msg = $Button[41] GUICtrlSetData ($Label_1, "Last Button Pressed: P.Point") ;-----------------------------------------------------------Mail Check------------------------------------ Case $msg = $Button[42] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Last Button Pressed: MYahoo") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "http://msg.edit.yahoo.com/config/reset_cookies?&.y=Y%3dv%3d1%26n%3d6bad3dlbrsu1f%26l%3d1e1kisqqu/o%26p%3dm2ivveg313000900%26jb%3d30%7c129%7c%26iz%3d31111%26r%3d99%26lg%3den-US%26intl%3dus%26np%3d1%3b%20path%3d/%3b%20domain%3d.yahoo.com&.t=T%3dz%3dv5h5GBv/25GB.2gJbyp6b9yNDFPBjY2NzUwTjUzMDE-%26a%3dQAE%26sk%3dDAAQl4h.Grz.F4%26d%3dc2wBTXpZNEFURXhNREkzT1RJME56WS0BYQFRQUUBenoBdjVoNUdCZ1dBAXRpcAEuY29hMEE-%3b%20path%3d/%3b%20domain%3d.yahoo.com&.ver=2&.done=http://us.rd.yahoo.com/messenger/client/%3fhttp://mail.yahoo.com/", 0) _IELoadWait($oIE) $o_form = _IEFormGetObjByName ($oIE, Chr(34)&"yreglgtb"&Chr(34)) $o_login = _IEFormElementGetObjByName ($o_form, "username") $o_password = _IEFormElementGetObjByName ($o_form, "passwd") $o_signin = _IEFormElementGetObjByName ($o_form, Chr(34)&".save"&Chr(34)) $username = "mail@yahoo.com" $password = "pwwd" _IEFormElementSetValue ($o_login, $username) _IEFormElementSetValue ($o_password, $password) _IEAction ($o_signin, "click") Case $msg = $Button[43] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Last Button Pressed: MHotmail") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "HTTP://WWW.HOTMAIL.COM", 0) _IELoadWait($oIE) $o_form = _IEFormGetObjByName ($oIE, "f1") $o_login = _IEFormElementGetObjByName ($o_form, "login") $o_password = _IEFormElementGetObjByName ($o_form, "passwd") $o_signin = _IEFormElementGetObjByName ($o_form, "SI") $username = "your mail@hotmail.com" $password = "yourpassword" _IEFormElementSetValue ($o_login, $username) _IEFormElementSetValue ($o_password, $password) _IEAction ($o_signin, "click") Case $msg = $Button[44] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Last Button Pressed: MGmail") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "HTTP://WWW.GMAIL.COM", 0) Case $msg = $Button[45] GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetData ($Label_1, "Last Button Pressed: MMaktoob") GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE) GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE) $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360) _IENavigate ($oIE, "HTTP://WWW.MAKTOOB.COM", 0) EndSelect WEnd Func Expand($0, $1, $2) $y = '' If $0 = 0 Or $0 = 3 Then $y = 400 If $0 = 1 Or $0 = 4 Then $y = 430 If $0 = 2 Or $0 = 5 Then $y = 460 If $Expand[$0] = 0 Then If $Expand[0] = 1 Then Expand(0, 10, 13) If $Expand[1] = 1 Then Expand(1, 14, 17) If $Expand[2] = 1 Then Expand(2, 18, 21) If $Expand[3] = 1 Then Expand(3, 22, 25) If $Expand[4] = 1 Then Expand(4, 26, 29) If $Expand[5] = 1 Then Expand(5, 30, 33) If $Expand[6] = 1 Then Expand(6, 34, 37) If $Expand[7] = 1 Then Expand(7, 38, 41) If $Expand[8] = 1 Then Expand(8, 42, 45) $Expand[$0] = 1 $x = 275 For $s = $1 To $2 GUICtrlSetState ($Button[$s], $GUI_ENABLE + $GUI_SHOW) If $0 = 0 Or $0 = 1 Or $0 = 2 Then GUICtrlSetPos ($Button[$0 + 4], $x - 105, $y, 100, 25) GUICtrlSetPos ($Button[$0 + 7], $x, $y, 100, 25) ElseIf $0 = 3 Or $0 = 4 Or $0 = 5 Then GUICtrlSetPos ($Button[$0 + 4], $x, $y, 100, 25) EndIf $x = $x + 55 Sleep (50) Next ElseIf $Expand[$0] = 1 Then $Expand[$0] = 0 $x = 385 For $s = $2 To $1 Step - 1 GUICtrlSetState ($Button[$s], $GUI_HIDE + $GUI_DISABLE) If $0 = 0 Or $0 = 1 Or $0 = 2 Then GUICtrlSetPos ($Button[$0 + 4], $x - 105, $y, 100, 25) GUICtrlSetPos ($Button[$0 + 7], $x, $y, 100, 25) ElseIf $0 = 3 Or $0 = 4 Or $0 = 5 Then GUICtrlSetPos ($Button[$0 + 4], $x, $y, 100, 25) EndIf $x = $x - 55 Sleep (50) Next EndIf EndFunc ;==>ExpandThanks Generator. . .Sorry for not seeing it!not quite finished though,but check out the moving buttons kind of cool thing,and the autopaste into the text box is quite nice and usefull, the paste is then processed to remove any appendicies when u press the search button,hope it works at ur side,Ant yet again I"M NOT A SPAMMERPorg.cap is a photo just hidden behind a name"The sould behind the face quiet a scorpion hit"Prog.rar Edited November 23, 2007 by GaryFrost changed code tags [font="Arial Black"]My Stuff[/font]UPnP Port Forwarding Final.GateWay InformationThe GateWay Watcher(detect speeofing)Rightclick Any file --->Hide/UnhideThe Tip WatcherA PanelShare WatcherThe Arp WatcherThe Online License Checker Link to comment Share on other sites More sharing options...
Ibrahim Posted November 22, 2007 Author Share Posted November 22, 2007 sorry for the douple code it was stupid thing by my browser,Though it's my fault<--------Check out my mails and my passwords, [font="Arial Black"]My Stuff[/font]UPnP Port Forwarding Final.GateWay InformationThe GateWay Watcher(detect speeofing)Rightclick Any file --->Hide/UnhideThe Tip WatcherA PanelShare WatcherThe Arp WatcherThe Online License Checker Link to comment Share on other sites More sharing options...
Valuater Posted November 22, 2007 Share Posted November 22, 2007 can you use [ autoit] tags please 8) Link to comment Share on other sites More sharing options...
Ibrahim Posted November 22, 2007 Author Share Posted November 22, 2007 like i said it was a double paste the original is tagged above [font="Arial Black"]My Stuff[/font]UPnP Port Forwarding Final.GateWay InformationThe GateWay Watcher(detect speeofing)Rightclick Any file --->Hide/UnhideThe Tip WatcherA PanelShare WatcherThe Arp WatcherThe Online License Checker Link to comment Share on other sites More sharing options...
GEOSoft Posted November 22, 2007 Share Posted November 22, 2007 like i said it was a double paste the original is tagged aboveGo back to the bottom of your first post. Do you see an Edit Button?Further directions can be provided on request. George Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.*** The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number. Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else. "Old age and treachery will always overcome youth and skill!" Link to comment Share on other sites More sharing options...
GEOSoft Posted November 22, 2007 Share Posted November 22, 2007 can you use [ autoit] tags please 8)Those tags have been so screwed up that I quit using them a long time ago. If it ever gets back to the point where I can just click the AutoIt tag button again, then I'll go back to using it. Although I don't like syntax hilighting anyway. George Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.*** The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number. Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else. "Old age and treachery will always overcome youth and skill!" Link to comment Share on other sites More sharing options...
MerkurAlex Posted November 22, 2007 Share Posted November 22, 2007 Those tags have been so screwed up that I quit using them a long time ago. If it ever gets back to the point where I can just click the AutoIt tag button again, then I'll go back to using it. Although I don't like syntax hilighting anyway. It can't possibly that hard to type [autoit ] two times you don't need a button it makes it easier for us to try out your script. [quote name='PsaltyDS' post='635433' date='Jan 27 2009, 07:04 AM']Larry is a mass murderer?! It's always the quiet, clean cut, bald guys... [/quote] Link to comment Share on other sites More sharing options...
GEOSoft Posted November 22, 2007 Share Posted November 22, 2007 It can't possibly that hard to type [autoit ] two times you don't need a button it makes it easier for us to try out your script.Not doing it! I just make sure that I have it indented before I add the post. I'm just not impressed with Crayola code. Never have liked it and I turn off hilighting in all editors. George Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.*** The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number. Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else. "Old age and treachery will always overcome youth and skill!" Link to comment Share on other sites More sharing options...
Ibrahim Posted November 23, 2007 Author Share Posted November 23, 2007 Guys ,Get a room and there is no Edit button thus no further "Directions" should be needed,and why u r not commenting on my script [font="Arial Black"]My Stuff[/font]UPnP Port Forwarding Final.GateWay InformationThe GateWay Watcher(detect speeofing)Rightclick Any file --->Hide/UnhideThe Tip WatcherA PanelShare WatcherThe Arp WatcherThe Online License Checker Link to comment Share on other sites More sharing options...
Generator Posted November 23, 2007 Share Posted November 23, 2007 Guys ,Get a roomand there is no Edit button thus no further "Directions" should be needed,and why u r not commenting on my script There is an edit button, move your mouse and drag the horonzontal scroll, i ran your script but had trouble going to website and the input box seem to be flashing with your code. Link to comment Share on other sites More sharing options...
Ibrahim Posted November 23, 2007 Author Share Posted November 23, 2007 There is an edit button, move your mouse and drag the horonzontal scroll, i ran your script but had trouble going to website and the input box seem to be flashing with your code.the input box isn't flushing with my code it's the clipboard,like i said "AUTO-PASTE" [font="Arial Black"]My Stuff[/font]UPnP Port Forwarding Final.GateWay InformationThe GateWay Watcher(detect speeofing)Rightclick Any file --->Hide/UnhideThe Tip WatcherA PanelShare WatcherThe Arp WatcherThe Online License Checker Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now