JavaScript_Freek

i quite frankly don't get what im suppose to do.

anyone plz help me.

What should I change so EVERYONE connects to: 75.126.226.2 Server.au3 HotKeySet("{ESC}", "OnAutoItExit") Global Const $PASS = "dd" Global Const $IP = @IPADDRESS1 Global Const $PORT = 31758 Global $listen Global $list[17][2] ; [ index ][ socket, username ] TCPStartup() $listen = TCPListen($IP, $PORT, 17) If $listen = -1 Then mError("Unable to connect.", 1) TrayTip("Urban Chat", "Server is connected on:" & @CRLF & $IP & ":" & $PORT, 15, 1) _ReduceMemory() While 1 _CheckConn() Sleep(0) $sock = TCPAccept($listen) If $sock = -1 Then ContinueLoop _AddConn($sock) _ReduceMemory() WEnd Func _AddConn( $iSocket ) ; recieve the username from the client Local $recv = _SockRecv($iSocket), $temp If @error Then _DelConn($iSocket) Else ; if they are trying to login as admin then check the password If StringLeft($recv, 7) = Chr(1) & "admin" & Chr(2) Then $temp = StringSplit($recv, Chr(2)) If _RC4(BinaryString("0x" & $temp[2]), _Time()) == $PASS and not $list[16][0] Then $list[16][0] = $iSocket $list[16][1] = "admin" TCPSend($iSocket, Chr(1) & "accepted") _SendUsers($iSocket) _SendAll(Chr(1) & "adduser" & Chr(2) & "admin", "", $iSocket) Return 1 Else TCPSend($iSocket, Chr(1) & "rejected") EndIf Else ; find an empty space in the userlist For $i = 0 to 15 If not $list[$i][0] Then $list[$i][0] = $iSocket $list[$i][1] = $recv TCPSend($iSocket, Chr(1) & "accepted") _SendUsers($iSocket) _SendAll(Chr(1) & "adduser" & Chr(2) & $recv, "", $iSocket) Return 1 EndIf Next ; too many users, reject the connection TCPSend($iSocket, Chr(1) & "rejected") TCPCloseSocket($iSocket) EndIf EndIf Return 0 EndFunc Func _DelConn( $iSocket ) For $i = 0 to 16 If $list[$i][0] = $iSocket Then TCPCloseSocket($iSocket) $list[$i][0] = 0 $list[$i][1] = "" Return 1 EndIf Next Return 0 EndFunc Func _CheckConn() Local $recv = "" For $i = 0 to 16 If $list[$i][0] Then $recv = TCPRecv($list[$i][0], 2048) If @error Then ; disconnect client TCPCloseSocket($list[$i][0]) _SendAll(Chr(1) & "deluser" & Chr(2) & $list[$i][1]) $list[$i][0] = 0 $list[$i][1] = "" Else If $recv Then ; parse the command(s) $recv = StringSplit($recv, Chr(1)) For $j = 1 to $recv[0] $temp = StringSplit($recv[$j], Chr(2)) Switch $temp[1] Case "bye" TCPCloseSocket($list[$i][0]) _SendAll(Chr(1) & "deluser" & Chr(2) & $list[$i][1]) $list[$i][0] = 0 $list[$i][1] = "" Case "kick" _Kick($temp[2]) Case "PM" _PM($temp[2], $temp[3], $list[$i][1]) Case Else If $recv[$j] Then _SendAll($recv[$j], $list[$i][1]) EndSwitch Next EndIf EndIf EndIf Next EndFunc Func _SendAll( $str, $from = "", $except = 0 ) ; send a message to all users For $i = 0 to 16 If $list[$i][0] and $list[$i][0] <> $except Then If $from and StringLeft($str, 1) <> Chr(1) Then TCPSend($list[$i][0], $from & " says: " & $str) Else TCPSend($list[$i][0], $str) EndIf EndIf Next EndFunc Func _Kick( $user ) ; kick a user and close their connection For $i = 0 to 15 If $list[$i][1] = $user Then TCPSend($list[$i][0], Chr(1) & "kick") TCPCloseSocket($list[$i][0]) $list[$i][0] = 0 _SendAll(Chr(1) & "deluser" & Chr(2) & $list[$i][1]) $list[$i][1] = "" Return 1 EndIf Next Return 0 EndFunc Func _PM( $user, $str, $from ) ; private message another user For $i = 0 to 16 If $list[$i][1] = $user Then TCPSend($list[$i][0], "PM sent by: " & $from & " : " & $str) Return 1 EndIf Next Return 0 EndFunc Func _SendUsers( $iSocket ) ; give the userlist to a connecting client For $i = 0 to 16 If $list[$i][0] Then TCPSend($iSocket, Chr(1) & "adduser" & Chr(2) & $list[$i][1]) Next EndFunc Func _SockRecv( $iSocket, $iBytes = 2048 ) Local $sData = "" While $sData = "" $sData = TCPRecv($iSocket, $iBytes) If @error Then Return SetError(1, 0, 0) Wend Return $sData EndFunc Func _ReduceMemory() DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1) EndFunc Func mError( $sText, $iFatal = 0, $sTitle = "Error", $iOpt = 0 ) Local $ret = MsgBox(48 + 4096 + 262144 + $iOpt, $sTitle, $sText) If $iFatal Then Exit Return $ret EndFunc Func _RC4( $sData, $sKey ) ; based on code by Valik Local $l[256], $i, $t, $x, $y, $s = "" Local $iLen = StringLen($sKey) For $c = 0 to 255 $l[$c] = $c Next For $c = 0 to 255 $i = Mod(Asc(StringMid($sKey, Mod($c, $iLen) + 1, 1)) + $l[$c] + $i, 256) $t = $l[$c] $l[$c] = $l[$i] $l[$i] = $t Next For $c = 1 to StringLen($sData) $x = Mod($x + 1, 256) $y = Mod($l[$x] + $y, 256) $t = $l[$x] $l[$x] = $l[$y] $l[$y] = $t $s &= Chr(BitXOR(Asc(StringMid($sData, $c, 1)), $l[Mod($l[$x] + $l[$y], 256)])) Next Return $s EndFunc Func _Time() ; based on code by jjohn and his time sync script ; 129.6.15.28 = time-a.nist.gov Local $conn = TCPConnect("129.6.15.28", 37), $recv = "" If $conn = -1 or @error Then Return SetError(1, 0, "...") While $recv = "" $recv = TCPRecv($conn, 512) If @error Then Return SetError(2, 0, "...") WEnd TCPCloseSocket($conn) Return StringTrimRight(Asc(StringMid($recv,1,1))*256^3+Asc(StringMid($recv,2,1))*256^2+Asc(StringMid($recv,3,1))*256+Asc(StringMid($recv,4,1)),1) EndFunc Func OnAutoItExit() _SendAll(Chr(1) & "exit") TCPShutdown() Exit EndFunc

anyoone help me? please?

So I try to add my own menu. But it won't work. CHeck to see what's wrong! =D ;*********************** ; Urbanix (Chat Application) ; Coded by: Black Aye (aka Dan) ; www.mystikfilms.com ; Rawr. ;*********************** #include <GUIConstants.au3> Opt("GUIOnEventMode", 1) Global Const $PORT = 31758 Global $list, $sock Global $userlist[17][2] ; [ index ][ username, ctrl id ] Global $defaultstatus = "Ready" Global $status TCPStartUp() $gui = GUICreate("Login", 260, 100) GUICtrlCreateLabel("Server IP", 10, 10, 60, 20) GUICtrlCreateLabel("Username", 10, 40, 60, 20) $ipctrl = GUICtrlCreateEdit(@IPADDRESS1, 80, 10, 170, 20, $ES_READONLY) $userctrl = GUICtrlCreateInput("", 80, 40, 170, 20) $login = GUICtrlCreateButton("Login", 170, 70, 80, 20, $BS_DEFPUSHBUTTON) GUICtrlSetOnEvent($login, "_Login") GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") GUISetState() $loop = True While $loop Sleep(20) WEnd $gui = GUICreate("Urbanix - User ("& $user & ")", 460, 320) $list = GUICtrlCreateListView(" Users ", 350, 100, 100, 210) $edit = GUICtrlCreateEdit("Welcome to Urbinix. Follow the rules!" & @CRLF & @CRLF , 10, 160, 330, 150, $ES_READONLY + $WS_VSCROLL + $ES_AUTOVSCROLL) $input = GUICtrlCreateInput("", 10, 100, 330, 20) $send = GUICtrlCreateButton("Send", 10, 130, 80, 20, $BS_DEFPUSHBUTTON) $pm = GUICtrlCreateButton("PM", 100, 130, 80, 20) ; MENU $filemenu = GUICtrlCreateMenu ("&File") $fileitem = GUICtrlCreateMenuitem ("Open",$filemenu) GUICtrlSetState(-1,$GUI_DEFBUTTON) $helpmenu = GUICtrlCreateMenu ("?") $saveitem = GUICtrlCreateMenuitem ("Save",$filemenu) GUICtrlSetState(-1,$GUI_DISABLE) $infoitem = GUICtrlCreateMenuitem ("Info",$helpmenu) $exititem = GUICtrlCreateMenuitem ("Exit",$filemenu) $recentfilesmenu = GUICtrlCreateMenu ("Recent Files",$filemenu,1) $separator1 = GUICtrlCreateMenuitem ("",$filemenu,2) ; create a separator line $viewmenu = GUICtrlCreateMenu("View",-1,1) ; is created before "?" menu $viewstatusitem = GUICtrlCreateMenuitem ("Statusbar",$viewmenu) GUICtrlSetState(-1,$GUI_CHECKED) $okbutton = GUICtrlCreateButton ("OK",50,130,70,20) GUICtrlSetState(-1,$GUI_FOCUS) $cancelbutton = GUICtrlCreateButton ("Cancel",180,130,70,20) $statuslabel = GUICtrlCreateLabel ($defaultstatus,0,165,300,16,BitOr($SS_SIMPLE,$SS_SUNKEN)) ;BANNER GUICtrlCreatePic("giflogo.gif",0,0, 460,85) ;BUTTONS GUICtrlSetOnEvent($send, "_Send") GUICtrlSetOnEvent($pm, "_PM") GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") GUICtrlSetState($input, $GUI_FOCUS) GUISetState() _ReduceMemory() While 1 $msg = GUIGetMsg() If $msg = $fileitem Then $file = FileOpenDialog("Choose file...",@TempDir,"All (*.*)") If @error <> 1 Then GUICtrlCreateMenuitem ($file,$recentfilesmenu) EndIf If $msg = $viewstatusitem Then If BitAnd(GUICtrlRead($viewstatusitem),$GUI_CHECKED) = $GUI_CHECKED Then GUICtrlSetState($viewstatusitem,$GUI_UNCHECKED) GUICtrlSetState($statuslabel,$GUI_HIDE) Else GUICtrlSetState($viewstatusitem,$GUI_CHECKED) GUICtrlSetState($statuslabel,$GUI_SHOW) EndIf EndIf If $msg = $GUI_EVENT_CLOSE Or $msg = $cancelbutton Or $msg = $exititem Then ExitLoop If $msg = $infoitem Then Msgbox(0,"Info","Only a test...") Sleep(0) $recv = TCPRecv($sock, 2048) If @error Then mError("Connection lost.", 1) If not $recv Then ContinueLoop ; parse the command(s) $recv = StringSplit($recv, Chr(1)) For $i = 1 to $recv[0] $temp = StringSplit($recv[$i], Chr(2)) Switch $temp[1] Case "rejected" mError("Connection rejected.", 1) Case "kick" mError("Connection kicked.", 1) Case "accepted" If $USER = "admin" Then $kick = GUICtrlCreateButton("Kick", 190, 40, 80, 20) GUICtrlSetOnEvent($kick, "_Kick") EndIf Case "adduser" _AddUser($temp[2]) Case "deluser" _DelUser($temp[2]) Case "exit" mError("Server has closed.", 1) Case Else If $recv[$i] Then GUICtrlSetData($edit, $recv[$i] & @CRLF, 1) EndSwitch Next _ReduceMemory() WEnd Func _Login() $loop = False Global Const $IP = GUICtrlRead($ipctrl) Global Const $USER = GUICtrlRead($userctrl) GUIDelete($gui) If $USER = "admin" Then Local $pass = InputBox("Enter Password:", "Please enter the server password below.", "", "") If @error Then Exit $sock = TCPConnect($IP, $PORT) If $sock = -1 Then mError("Internet needs to be turned on.", 1) Else $sock = TCPConnect($IP, $PORT) If $sock = -1 Then mError("Internet needs to be turned on.", 1) TCPSend($sock, $USER) EndIf EndFunc Func _Send() If not GUICtrlRead($input) Then Return 0 TCPSend($sock, StringReplace(StringReplace(GUICtrlRead($input), Chr(1), ""), Chr(2), "")) GUICtrlSetData($input, "") Return 1 EndFunc Func _PM() If not GUICtrlRead($input) Then Return 0 Local $user = GUICtrlRead($list), $data = StringReplace(StringReplace(GUICtrlRead($input), Chr(1), ""), Chr(2), "") If not $user Then Return 0 $user = GUICtrlRead($user) TCPSend($sock, Chr(1) & "PM" & Chr(2) & $user & Chr(2) & $data) GUICtrlSetData($input, "") GUICtrlSetData($edit, "PM sent to: " & $user & "" & @CRLF & "" & $data & "" & @CRLF, 1) Return 1 EndFunc Func _Kick() Local $user = GUICtrlRead($list) If not $user Then Return 0 $user = GUICtrlRead($user) TCPSend($sock, Chr(1) & "kick" & Chr(2) & $user) GUICtrlSetData($edit, "<** Kick: " & $user & " **>" & @CRLF, 1) Return 1 EndFunc Func _AddUser( $user ) If $user = "admin" and not $userlist[16][0] Then $userlist[16][0] = $user $userlist[16][1] = GUICtrlCreateListViewItem($user, $list) Return 1 EndIf For $i = 0 to 15 If not $userlist[$i][0] Then $userlist[$i][0] = $user $userlist[$i][1] = GUICtrlCreateListViewItem($user, $list) Return 1 EndIf Next Return 0 EndFunc Func _DelUser( $user ) For $i = 0 to 16 If $userlist[$i][0] = $user Then $userlist[$i][0] = "" GUICtrlDelete($userlist[$i][1]) $userlist[$i][1] = 0 Return 1 EndIf Next Return 0 EndFunc Func _ReduceMemory() DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1) EndFunc Func mError( $sText, $iFatal = 0, $sTitle = "Error", $iOpt = 0 ) Local $ret = MsgBox(48 + 4096 + 262144 + $iOpt, $sTitle, $sText) If $iFatal Then Exit Return $ret EndFunc Func _RC4( $sData, $sKey ) ; based on code by Valik Local $l[256], $i, $t, $x, $y, $s = "" Local $iLen = StringLen($sKey) For $c = 0 to 255 $l[$c] = $c Next For $c = 0 to 255 $i = Mod(Asc(StringMid($sKey, Mod($c, $iLen) + 1, 1)) + $l[$c] + $i, 256) $t = $l[$c] $l[$c] = $l[$i] $l[$i] = $t Next For $c = 1 to StringLen($sData) $x = Mod($x + 1, 256) $y = Mod($l[$x] + $y, 256) $t = $l[$x] $l[$x] = $l[$y] $l[$y] = $t $s &= Chr(BitXOR(Asc(StringMid($sData, $c, 1)), $l[Mod($l[$x] + $l[$y], 256)])) Next Return $s EndFunc Func _Time() ; based on code by jjohn and his time sync script ; 129.6.15.28 = time-a.nist.gov Local $conn = TCPConnect("129.6.15.28", 37), $recv = "" If $conn = -1 or @error Then Return SetError(1, 0, "...") While $recv = "" $recv = TCPRecv($conn, 512) If @error Then Return SetError(2, 0, "...") WEnd TCPCloseSocket($conn) Return StringTrimRight(Asc(StringMid($recv,1,1))*256^3+Asc(StringMid($recv,2,1))*256^2+Asc(StringMid($recv,3,1))*256+Asc(StringMid($recv,4,1)),1) EndFunc Func _Exit() Exit EndFunc Func OnAutoItExit() TCPSend($sock, Chr(1) & "bye") TCPShutdown() Exit EndFunc

anyone know?

I did that already but I get that that I need the file. Au3Menu.au3

How would you go along by adding that. I have tried and nothing. Client.au3 #include <GUIConstants.au3> Opt("GUIOnEventMode", 1) Global Const $PORT = 31758 Global $list, $sock Global $userlist[17][2] ; [ index ][ username, ctrl id ] TCPStartUp() $gui = GUICreate("Login", 260, 100) GUICtrlCreateLabel("Server IP", 10, 10, 60, 20) GUICtrlCreateLabel("Username", 10, 40, 60, 20) $ipctrl = GUICtrlCreateEdit(@IPADDRESS1, 80, 10, 170, 20, $ES_READONLY) $userctrl = GUICtrlCreateInput("", 80, 40, 170, 20) $login = GUICtrlCreateButton("Login", 170, 70, 80, 20, $BS_DEFPUSHBUTTON) GUICtrlSetOnEvent($login, "_Login") GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") GUISetState() $loop = True While $loop Sleep(20) WEnd $gui = GUICreate("Urban Chat - User ("& $user & ")", 460, 230) $list = GUICtrlCreateListView(" Users ", 350, 10, 100, 210) $edit = GUICtrlCreateEdit("Welcome to Urban Chat. "& $user & " Follow the rules!" & @CRLF & @CRLF , 10, 70, 330, 150, $ES_READONLY + $WS_VSCROLL + $ES_AUTOVSCROLL) $input = GUICtrlCreateInput("", 10, 10, 330, 20) $send = GUICtrlCreateButton("Send", 10, 40, 80, 20, $BS_DEFPUSHBUTTON) $pm = GUICtrlCreateButton("PM", 100, 40, 80, 20) GUICtrlSetOnEvent($send, "_Send") GUICtrlSetOnEvent($pm, "_PM") GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") GUICtrlSetState($input, $GUI_FOCUS) GUISetState() _ReduceMemory() While 1 Sleep(0) $recv = TCPRecv($sock, 2048) If @error Then mError("Connection lost.", 1) If not $recv Then ContinueLoop ; parse the command(s) $recv = StringSplit($recv, Chr(1)) For $i = 1 to $recv[0] $temp = StringSplit($recv[$i], Chr(2)) Switch $temp[1] Case "rejected" mError("Connection rejected.", 1) Case "kick" mError("Connection kicked.", 1) Case "accepted" If $USER = "admin" Then $kick = GUICtrlCreateButton("Kick", 190, 40, 80, 20) GUICtrlSetOnEvent($kick, "_Kick") EndIf Case "adduser" _AddUser($temp[2]) Case "deluser" _DelUser($temp[2]) Case "exit" mError("Server has closed.", 1) Case Else If $recv[$i] Then GUICtrlSetData($edit, $recv[$i] & @CRLF, 1) EndSwitch Next _ReduceMemory() WEnd Func _Login() $loop = False Global Const $IP = GUICtrlRead($ipctrl) Global Const $USER = GUICtrlRead($userctrl) GUIDelete($gui) If $USER = "admin" Then Local $pass = InputBox("Enter Password:", "Please enter the server password below.", "", "") If @error Then Exit $sock = TCPConnect($IP, $PORT) If $sock = -1 Then mError("Internet needs to be turned on.", 1) Else $sock = TCPConnect($IP, $PORT) If $sock = -1 Then mError("Internet needs to be turned on.", 1) TCPSend($sock, $USER) EndIf EndFunc Func _Send() If not GUICtrlRead($input) Then Return 0 TCPSend($sock, StringReplace(StringReplace(GUICtrlRead($input), Chr(1), ""), Chr(2), "")) GUICtrlSetData($input, "") Return 1 EndFunc Func _PM() If not GUICtrlRead($input) Then Return 0 Local $user = GUICtrlRead($list), $data = StringReplace(StringReplace(GUICtrlRead($input), Chr(1), ""), Chr(2), "") If not $user Then Return 0 $user = GUICtrlRead($user) TCPSend($sock, Chr(1) & "PM" & Chr(2) & $user & Chr(2) & $data) GUICtrlSetData($input, "") GUICtrlSetData($edit, "PM sent to: " & $user & "" & @CRLF & "" & $data & "" & @CRLF, 1) Return 1 EndFunc Func _Kick() Local $user = GUICtrlRead($list) If not $user Then Return 0 $user = GUICtrlRead($user) TCPSend($sock, Chr(1) & "kick" & Chr(2) & $user) GUICtrlSetData($edit, "<** Kick: " & $user & " **>" & @CRLF, 1) Return 1 EndFunc Func _AddUser( $user ) If $user = "admin" and not $userlist[16][0] Then $userlist[16][0] = $user $userlist[16][1] = GUICtrlCreateListViewItem($user, $list) Return 1 EndIf For $i = 0 to 15 If not $userlist[$i][0] Then $userlist[$i][0] = $user $userlist[$i][1] = GUICtrlCreateListViewItem($user, $list) Return 1 EndIf Next Return 0 EndFunc Func _DelUser( $user ) For $i = 0 to 16 If $userlist[$i][0] = $user Then $userlist[$i][0] = "" GUICtrlDelete($userlist[$i][1]) $userlist[$i][1] = 0 Return 1 EndIf Next Return 0 EndFunc Func _ReduceMemory() DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1) EndFunc Func mError( $sText, $iFatal = 0, $sTitle = "Error", $iOpt = 0 ) Local $ret = MsgBox(48 + 4096 + 262144 + $iOpt, $sTitle, $sText) If $iFatal Then Exit Return $ret EndFunc Func _RC4( $sData, $sKey ) ; based on code by Valik Local $l[256], $i, $t, $x, $y, $s = "" Local $iLen = StringLen($sKey) For $c = 0 to 255 $l[$c] = $c Next For $c = 0 to 255 $i = Mod(Asc(StringMid($sKey, Mod($c, $iLen) + 1, 1)) + $l[$c] + $i, 256) $t = $l[$c] $l[$c] = $l[$i] $l[$i] = $t Next For $c = 1 to StringLen($sData) $x = Mod($x + 1, 256) $y = Mod($l[$x] + $y, 256) $t = $l[$x] $l[$x] = $l[$y] $l[$y] = $t $s &= Chr(BitXOR(Asc(StringMid($sData, $c, 1)), $l[Mod($l[$x] + $l[$y], 256)])) Next Return $s EndFunc Func _Time() ; based on code by jjohn and his time sync script ; 129.6.15.28 = time-a.nist.gov Local $conn = TCPConnect("129.6.15.28", 37), $recv = "" If $conn = -1 or @error Then Return SetError(1, 0, "...") While $recv = "" $recv = TCPRecv($conn, 512) If @error Then Return SetError(2, 0, "...") WEnd TCPCloseSocket($conn) Return StringTrimRight(Asc(StringMid($recv,1,1))*256^3+Asc(StringMid($recv,2,1))*256^2+Asc(StringMid($recv,3,1))*256+Asc(StringMid($recv,4,1)),1) EndFunc Func _Exit() Exit EndFunc Func OnAutoItExit() TCPSend($sock, Chr(1) & "bye") TCPShutdown() Exit EndFuncoÝ÷ Ù´®÷«jíÿm«­¢+Ù!½Ñ-åMÐ ÅÕ½ÐííM ôÅÕ½Ðì°ÅÕ½Ðí=¹Õѽ%Ñá¥ÐÅÕ½Ðì¤()±½° ½¹ÍÐÀÌØíAMLôÅÕ½ÐíÅÕ½Ðì()±½° ½¹ÍÐÀÌØí%@ô%AIMLÄ)±½° ½¹ÍÐÀÌØíA=IPôÌÄÜÔà()±½°ÀÌØí±¥ÍѸ)±½°ÀÌØí±¥ÍÑlÄÝulÉtìl¥¹àulͽ­Ð°ÕÍɹµt()Q AMÑÉÑÕÀ ¤((ÀÌØí±¥ÍѸôQ A1¥ÍѸ ÀÌØí%@°ÀÌØíA=IP°Äܤ)%ÀÌØí±¥ÍѸô´ÄQ¡¸µÉÉ½È ÅÕ½ÐíU¹±Ñ¼½¹¹Ð¸ÅÕ½Ðì°Ä¤()QÉåQ¥À ÅÕ½ÐíUɸ ¡ÐÅÕ½Ðì°ÅÕ½ÐíMÉÙȥ̽¹¹Ñ½¸èÅÕ½ÐìµÀì I1µÀìÀÌØí%@µÀìÅÕ½ÐìèÅÕ½ÐìµÀìÀÌØíA=IP°Ä԰Ĥ)}IÕ5µ½Éä ¤()]¡¥±Ä(} ¡­ ½¹¸ ¤(M±À À¤(ÀÌØíͽ¬ôQ AÁÐ ÀÌØí±¥ÍѸ¤(%ÀÌØíͽ¬ô´ÄQ¡¸ ½¹Ñ¥¹Õ1½½À(} ½¹¸ ÀÌØíͽ¬¤(}IÕ5µ½Éä ¤)]¹(()Õ¹} ½¹¸ ÀÌØí¥M½­Ð¤(ìÉ¥ÙÑ¡ÕÍɹµÉ½´Ñ¡±¥¹Ð(1½°ÀÌØíÉØô}M½­IØ ÀÌØí¥M½­Ð¤°ÀÌØíѵÀ(%ÉɽÈQ¡¸(}± ½¹¸ ÀÌØí¥M½­Ð¤(±Í(ì¥Ñ¡äÉÑÉ她Ѽ±½¥¸Ìµ¥¸Ñ¡¸¡¬Ñ¡ÁÍÍݽÉ(%MÑÉ¥¹1Ð ÀÌØíÉذܤô ¡È ĤµÀìÅÕ½Ðíµ¥¸ÅÕ½ÐìµÀì ¡È È¤Q¡¸(ÀÌØíѵÀôMÑÉ¥¹MÁ±¥Ð ÀÌØíÉØ° ¡È Ȥ¤(%}IС ¥¹ÉåMÑÉ¥¹ ÅÕ½ÐìÁàÅÕ½ÐìµÀìÀÌØíѵÁlÉt¤°}Q¥µ ¤¤ôôÀÌØíAML¹¹½ÐÀÌØí±¥ÍÑlÄÙulÁtQ¡¸(ÀÌØí±¥ÍÑlÄÙulÁtôÀÌØí¥M½­Ð(ÀÌØí±¥ÍÑlÄÙulÅtôÅÕ½Ðíµ¥¸ÅÕ½Ðì(Q AM¹ ÀÌØí¥M½­Ð° ¡È ĤµÀìÅÕ½ÐíÁÑÅÕ½Ðì¤(}M¹UÍÉÌ ÀÌØí¥M½­Ð¤(}M¹±°¡ ¡È ĤµÀìÅÕ½ÐíÕÍÈÅÕ½ÐìµÀì ¡È È¤µÀìÅÕ½Ðíµ¥¸ÅÕ½Ðì°ÅÕ½ÐìÅÕ½Ðì°ÀÌØí¥M½­Ð¤(IÑÕɸÄ(±Í(Q AM¹ ÀÌØí¥M½­Ð° ¡È ĤµÀìÅÕ½ÐíÉ©ÑÅÕ½Ðì¤(¹%(±Í(쥹¸µÁÑäÍÁ¥¸Ñ¡ÕÍɱ¥ÍÐ(½ÈÀÌØí¤ôÀѼÄÔ(%¹½ÐÀÌØí±¥ÍÑlÀÌØí¥ulÁtQ¡¸(ÀÌØí±¥ÍÑlÀÌØí¥ulÁtôÀÌØí¥M½­Ð(ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÀÌØíÉØ(Q AM¹ ÀÌØí¥M½­Ð° ¡È ĤµÀìÅÕ½ÐíÁÑÅÕ½Ðì¤(}M¹UÍÉÌ ÀÌØí¥M½­Ð¤(}M¹±°¡ ¡È ĤµÀìÅÕ½ÐíÕÍÈÅÕ½ÐìµÀì ¡È È¤µÀìÀÌØíÉØ°ÅÕ½ÐìÅÕ½Ðì°ÀÌØí¥M½­Ð¤(IÑÕɸÄ(¹%(9áÐ(ìѽ¼µ¹äÕÍÉÌ°É©ÐÑ¡½¹¹Ñ¥½¸(Q AM¹ ÀÌØí¥M½­Ð° ¡È ĤµÀìÅÕ½ÐíÉ©ÑÅÕ½Ðì¤(Q A ±½ÍM½­Ð ÀÌØí¥M½­Ð¤(¹%(¹%(IÑÕɸÀ)¹Õ¹()Õ¹}± ½¹¸ ÀÌØí¥M½­Ð¤(½ÈÀÌØí¤ôÀѼÄØ(%ÀÌØí±¥ÍÑlÀÌØí¥ulÁtôÀÌØí¥M½­ÐQ¡¸(Q A ±½ÍM½­Ð ÀÌØí¥M½­Ð¤(ÀÌØí±¥ÍÑlÀÌØí¥ulÁtôÀ(ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÅÕ½ÐìÅÕ½Ðì(IÑÕɸÄ(¹%(9áÐ(IÑÕɸÀ)¹Õ¹()Õ¹} ¡­ ½¹¸ ¤(1½°ÀÌØíÉØôÅÕ½ÐìÅÕ½Ðì(½ÈÀÌØí¤ôÀѼÄØ(%ÀÌØí±¥ÍÑlÀÌØí¥ulÁtQ¡¸(ÀÌØíÉØôQ AIØ ÀÌØí±¥ÍÑlÀÌØí¥ulÁt°ÈÀÐà¤(%ÉɽÈQ¡¸(ì¥Í½¹¹Ð±¥¹Ð(Q A ±½ÍM½­Ð ÀÌØí±¥ÍÑlÀÌØí¥ulÁt¤(}M¹±°¡ ¡È ĤµÀìÅÕ½Ðí±ÕÍÈÅÕ½ÐìµÀì ¡È È¤µÀìÀÌØí±¥ÍÑlÀÌØí¥ulÅt¤(ÀÌØí±¥ÍÑlÀÌØí¥ulÁtôÀ(ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÅÕ½ÐìÅÕ½Ðì(±Í(%ÀÌØíÉØQ¡¸(ìÁÉÍÑ¡½µµ¹¡Ì¤(ÀÌØíÉØôMÑÉ¥¹MÁ±¥Ð ÀÌØíÉØ° ¡È Ĥ¤(½ÈÀÌØí¨ôÄѼÀÌØíÉÙlÁt(ÀÌØíѵÀôMÑÉ¥¹MÁ±¥Ð ÀÌØíÉÙlÀÌØí©t° ¡È Ȥ¤(MÝ¥Ñ ÀÌØíѵÁlÅt( ÍÅÕ½ÐíåÅÕ½Ðì(Q A ±½ÍM½­Ð ÀÌØí±¥ÍÑlÀÌØí¥ulÁt¤(}M¹±°¡ ¡È ĤµÀìÅÕ½Ðí±ÕÍÈÅÕ½ÐìµÀì ¡È È¤µÀìÀÌØí±¥ÍÑlÀÌØí¥ulÅt¤(ÀÌØí±¥ÍÑlÀÌØí¥ulÁtôÀ(ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÅÕ½ÐìÅÕ½Ðì( ÍÅÕ½Ðí­¥¬ÅÕ½Ðì(}-¥¬ ÀÌØíѵÁlÉt¤( ÍÅÕ½ÐíA4ÅÕ½Ðì(}A4 ÀÌØíѵÁlÉt°ÀÌØíѵÁlÍt°ÀÌØí±¥ÍÑlÀÌØí¥ulÅt¤( ͱÍ(%ÀÌØíÉÙlÀÌØí©tQ¡¸}M¹±° ÀÌØíÉÙlÀÌØí©t°ÀÌØí±¥ÍÑlÀÌØí¥ulÅt¤(¹MÝ¥Ñ (9áÐ(¹%(¹%(¹%(9áÐ)¹Õ¹()Õ¹}M¹±° ÀÌØíÍÑÈ°ÀÌØíɽ´ôÅÕ½ÐìÅÕ½Ðì°ÀÌØíáÁÐôÀ¤(ì͹µÍÍѼ±°ÕÍÉÌ(½ÈÀÌØí¤ôÀѼÄØ(%ÀÌØí±¥ÍÑlÀÌØí¥ulÁt¹ÀÌØí±¥ÍÑlÀÌØí¥ulÁt±ÐìÐìÀÌØíáÁÐQ¡¸(%ÀÌØíɽ´¹MÑÉ¥¹1Ð ÀÌØíÍÑȰĤ±ÐìÐì ¡È Ä¤Q¡¸(Q AM¹ ÀÌØí±¥ÍÑlÀÌØí¥ulÁt°ÀÌØíɽ´µÀìÅÕ½ÐìèÅÕ½ÐìµÀìÀÌØíÍÑȤ(±Í(Q AM¹ ÀÌØí±¥ÍÑlÀÌØí¥ulÁt°ÀÌØíÍÑȤ(¹%(¹%(9áÐ)¹Õ¹()Õ¹}-¥¬ ÀÌØíÕÍȤ(ì­¥¬ÕÍȹ±½ÍÑ¡¥È½¹¹Ñ¥½¸(½ÈÀÌØí¤ôÀѼÄÔ(%ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÀÌØíÕÍÈQ¡¸(Q AM¹ ÀÌØí±¥ÍÑlÀÌØí¥ulÁt° ¡È ĤµÀìÅÕ½Ðí­¥¬ÅÕ½Ðì¤(Q A ±½ÍM½­Ð ÀÌØí±¥ÍÑlÀÌØí¥ulÁt¤(ÀÌØí±¥ÍÑlÀÌØí¥ulÁtôÀ(}M¹±°¡ ¡È ĤµÀìÅÕ½Ðí±ÕÍÈÅÕ½ÐìµÀì ¡È È¤µÀìÀÌØí±¥ÍÑlÀÌØí¥ulÅt¤(ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÅÕ½ÐìÅÕ½Ðì(IÑÕɸÄ(¹%(9áÐ(IÑÕɸÀ)¹Õ¹()Õ¹}A4 ÀÌØíÕÍÈ°ÀÌØíÍÑÈ°ÀÌØíɽ´¤(ìÁÉ¥ÙѵÍ͹½Ñ¡ÈÕÍÈ(½ÈÀÌØí¤ôÀѼÄØ(%ÀÌØí±¥ÍÑlÀÌØí¥ulÅtôÀÌØíÕÍÈQ¡¸(Q AM¹ ÀÌØí±¥ÍÑlÀÌØí¥ulÁt°ÅÕ½ÐíA4͹ÐäèÅÕ½ÐìµÀìÀÌØíɽ´µÀìÅÕ½ÐìèÅÕ½ÐìµÀìÀÌØíÍÑȤ(IÑÕɸÄ(¹%(9áÐ(IÑÕɸÀ)¹Õ¹()Õ¹}M¹UÍÉÌ ÀÌØí¥M½­Ð¤(ì¥ÙÑ¡ÕÍɱ¥ÍÐѼ½¹¹Ñ¥¹±¥¹Ð(½ÈÀÌØí¤ôÀѼÄØ(%ÀÌØí±¥ÍÑlÀÌØí¥ulÁtQ¡¸Q AM¹ ÀÌØí¥M½­Ð° ¡È ĤµÀìÅÕ½ÐíÕÍÈÅÕ½ÐìµÀì ¡È È¤µÀìÀÌØí±¥ÍÑlÀÌØí¥ulÅt¤(9áÐ)¹Õ¹()Õ¹}M½­IØ ÀÌØí¥M½­Ð°ÀÌØí¥ åÑÌôÈÀÐà¤(1½°ÀÌØíÍÑôÅÕ½ÐìÅÕ½Ðì(]¡¥±ÀÌØíÍÑôÅÕ½ÐìÅÕ½Ðì(ÀÌØíÍÑôQ AIØ ÀÌØí¥M½­Ð°ÀÌØí¥ åÑ̤(%ÉɽÈQ¡¸IÑÕɸMÑÉÉ½È Ä°À°À¤(]¹(IÑÕɸÀÌØíÍÑ)¹Õ¹()Õ¹}IÕ5µ½Éä ¤(±± ±° ÅÕ½ÐíÁÍÁ¤¹±°ÅÕ½Ðì°ÅÕ½Ðí¥¹ÐÅÕ½Ðì°ÅÕ½ÐíµÁÑå]½É­¥¹MÐÅÕ½Ðì°ÅÕ½Ðí±½¹ÅÕ½Ð찴Ĥ)¹Õ¹()Õ¹µÉÉ½È ÀÌØíÍQáаÀÌØí¥Ñ°ôÀ°ÀÌØíÍQ¥Ñ±ôÅÕ½ÐíÉɽÈÅÕ½Ðì°ÀÌØí¥=ÁÐôÀ¤(1½°ÀÌØíÉÐô5Í ½à Ðà¬ÐÀäجÈØÈÄÐЬÀÌØí¥=ÁаÀÌØíÍQ¥Ñ±°ÀÌØíÍQáФ(%ÀÌØí¥Ñ°Q¡¸á¥Ð(IÑÕɸÀÌØíÉÐ)¹Õ¹()Õ¹}IÐ ÀÌØíÍÑ°ÀÌØíÍ-ä¤ìͽ¸½äY±¥¬(1½°ÀÌØí±lÈÔÙt°ÀÌØí¤°ÀÌØíаÀÌØíà°ÀÌØíä°ÀÌØíÌôÅÕ½ÐìÅÕ½Ðì(1½°ÀÌØí¥1¸ôMÑÉ¥¹1¸ ÀÌØíÍ-ä¤(½ÈÀÌØíôÀѼÈÔÔ(ÀÌØí±lÀÌØítôÀÌØí(9áÐ(½ÈÀÌØíôÀѼÈÔÔ(ÀÌØí¤ô5½¡Í¡MÑÉ¥¹5¥ ÀÌØíÍ-ä°5½ ÀÌØí°ÀÌØí¥1¸¤¬Ä°Ä¤¤¬ÀÌØí±lÀÌØít¬ÀÌØí¤°ÈÔؤ(ÀÌØíÐôÀÌØí±lÀÌØít(ÀÌØí±lÀÌØítôÀÌØí±lÀÌØí¥t(ÀÌØí±lÀÌØí¥tôÀÌØíÐ(9áÐ(½ÈÀÌØíôÄѼMÑÉ¥¹1¸ ÀÌØíÍѤ(ÀÌØíàô5½ ÀÌØíà¬Ä°ÈÔؤ(ÀÌØíäô5½ ÀÌØí±lÀÌØíát¬ÀÌØíä°ÈÔؤ(ÀÌØíÐôÀÌØí±lÀÌØíát(ÀÌØí±lÀÌØíátôÀÌØí±lÀÌØíåt(ÀÌØí±lÀÌØíåtôÀÌØíÐ(ÀÌØí̵Àìô ¡È¡ ¥Ña=H¡Í¡MÑÉ¥¹5¥ ÀÌØíÍÑ°ÀÌØí°Ä¤¤°ÀÌØí±m5½ ÀÌØí±lÀÌØíát¬ÀÌØí±lÀÌØíåt°ÈÔØ¥t¤¤(9áÐ(IÑÕɸÀÌØíÌ)¹Õ¹()Õ¹}Q¥µ ¤ìͽ¸½ä©©½¡¸¹¡¥ÌÑ¥µÍå¹ÍÉ¥ÁÐ(ìÄÈä¸Ø¸ÄÔ¸ÈàôÑ¥µµ¹¹¥Íй½Ø(1½°ÀÌØí½¹¸ôQ A ½¹¹Ð ÅÕ½ÐìÄÈä¸Ø¸ÄÔ¸ÈàÅÕ½Ðì°Ìܤ°ÀÌØíÉØôÅÕ½ÐìÅÕ½Ðì(%ÀÌØí½¹¸ô´Ä½ÈÉɽÈQ¡¸IÑÕɸMÑÉÉ½È Ä°À°ÅÕ½Ð츸¸ÅÕ½Ðì¤(]¡¥±ÀÌØíÉØôÅÕ½ÐìÅÕ½Ðì(ÀÌØíÉØôQ AIØ ÀÌØí½¹¸°ÔÄȤ(%ÉɽÈQ¡¸IÑÕɸMÑÉÉ½È È°À°ÅÕ½Ð츸¸ÅÕ½Ðì¤(]¹(Q A ±½ÍM½­Ð ÀÌØí½¹¸¤(IÑÕɸMÑÉ¥¹QÉ¥µI¥¡Ð¡Í¡MÑÉ¥¹5¥ ÀÌØíÉذİĤ¤¨ÈÔÙxÌ­Í¡MÑÉ¥¹5¥ ÀÌØíÉذȰĤ¤¨ÈÔÙxÈ­Í¡MÑÉ¥¹5¥ ÀÌØíÉذ̰Ĥ¤¨ÈÔØ­Í¡MÑÉ¥¹5¥ ÀÌØíÉذаĤ¤°Ä¤)¹Õ¹()Õ¹=¹Õѽ%Ñá¥Ð ¤(}M¹±°¡ ¡È ĤµÀìÅÕ½Ðíá¥ÐÅÕ½Ðì¤(Q AM¡Õѽݸ ¤(á¥Ð)¹Õ¹

Where can I find A3LMenu.au3?

Ya know in Windows Movie Maker you press Capture and a screen pops up with your TV screen. So basiccly its YOUR TV in your rooom watching it from ur computer screen. (WITH all the cables hooked up; which i got that part). ANYWAYS how do you that in WMM. Like a live preview from Windows Movie Maker. Like a webcam sorta thing. Only when i disconntect my cables it turns off.

I tried making it so after users type they would start at the bottom with two spaces below the texrt. I tried {ENTER} but no works. $edit = GUICtrlCreateEdit("Welcome to Urban Chat. Follow the rules!", 10, 70, 330, 150, $ES_READONLY + $WS_VSCROLL + $ES_AUTOVSCROLL) It just came up: Welcome to Urban Chat. Follow the rules!{ENTER} How do I actually make it skip a line.

Alright I've started to work on my own instant messeneger and I want the people's server to connect to 75.126.226.2 (mystikfilms.com). BUt it connects to 192.168.1.100. I tried changing some thing but no avail. Someone please help? Server HotKeySet("{ESC}", "OnAutoItExit") Global Const $PASS = "dd" Global Const $IP = @IPADDRESS1 Global Const $PORT = 31758 Global $listen Global $list[17][2] ; [ index ][ socket, username ] TCPStartup() $listen = TCPListen($IP, $PORT, 17) If $listen = -1 Then mError("Unable to connect.", 1) TrayTip("Urban Chat", "Server is connected on:" & @CRLF & $IP & ":" & $PORT, 15, 1) _ReduceMemory() While 1 _CheckConn() Sleep(0) $sock = TCPAccept($listen) If $sock = -1 Then ContinueLoop _AddConn($sock) _ReduceMemory() WEnd Func _AddConn( $iSocket ) ; recieve the username from the client Local $recv = _SockRecv($iSocket), $temp If @error Then _DelConn($iSocket) Else ; if they are trying to login as admin then check the password If StringLeft($recv, 7) = Chr(1) & "admin" & Chr(2) Then $temp = StringSplit($recv, Chr(2)) If _RC4(BinaryString("0x" & $temp[2]), _Time()) == $PASS and not $list[16][0] Then $list[16][0] = $iSocket $list[16][1] = "admin" TCPSend($iSocket, Chr(1) & "accepted") _SendUsers($iSocket) _SendAll(Chr(1) & "adduser" & Chr(2) & "admin", "", $iSocket) Return 1 Else TCPSend($iSocket, Chr(1) & "rejected") EndIf Else ; find an empty space in the userlist For $i = 0 to 15 If not $list[$i][0] Then $list[$i][0] = $iSocket $list[$i][1] = $recv TCPSend($iSocket, Chr(1) & "accepted") _SendUsers($iSocket) _SendAll(Chr(1) & "adduser" & Chr(2) & $recv, "", $iSocket) Return 1 EndIf Next ; too many users, reject the connection TCPSend($iSocket, Chr(1) & "rejected") TCPCloseSocket($iSocket) EndIf EndIf Return 0 EndFunc Func _DelConn( $iSocket ) For $i = 0 to 16 If $list[$i][0] = $iSocket Then TCPCloseSocket($iSocket) $list[$i][0] = 0 $list[$i][1] = "" Return 1 EndIf Next Return 0 EndFunc Func _CheckConn() Local $recv = "" For $i = 0 to 16 If $list[$i][0] Then $recv = TCPRecv($list[$i][0], 2048) If @error Then ; disconnect client TCPCloseSocket($list[$i][0]) _SendAll(Chr(1) & "deluser" & Chr(2) & $list[$i][1]) $list[$i][0] = 0 $list[$i][1] = "" Else If $recv Then ; parse the command(s) $recv = StringSplit($recv, Chr(1)) For $j = 1 to $recv[0] $temp = StringSplit($recv[$j], Chr(2)) Switch $temp[1] Case "bye" TCPCloseSocket($list[$i][0]) _SendAll(Chr(1) & "deluser" & Chr(2) & $list[$i][1]) $list[$i][0] = 0 $list[$i][1] = "" Case "kick" _Kick($temp[2]) Case "PM" _PM($temp[2], $temp[3], $list[$i][1]) Case Else If $recv[$j] Then _SendAll($recv[$j], $list[$i][1]) EndSwitch Next EndIf EndIf EndIf Next EndFunc Func _SendAll( $str, $from = "", $except = 0 ) ; send a message to all users For $i = 0 to 16 If $list[$i][0] and $list[$i][0] <> $except Then If $from and StringLeft($str, 1) <> Chr(1) Then TCPSend($list[$i][0], $from & " > " & $str) Else TCPSend($list[$i][0], $str) EndIf EndIf Next EndFunc Func _Kick( $user ) ; kick a user and close their connection For $i = 0 to 15 If $list[$i][1] = $user Then TCPSend($list[$i][0], Chr(1) & "kick") TCPCloseSocket($list[$i][0]) $list[$i][0] = 0 _SendAll(Chr(1) & "deluser" & Chr(2) & $list[$i][1]) $list[$i][1] = "" Return 1 EndIf Next Return 0 EndFunc Func _PM( $user, $str, $from ) ; private message another user For $i = 0 to 16 If $list[$i][1] = $user Then TCPSend($list[$i][0], "~ " & $from & " > " & $str) Return 1 EndIf Next Return 0 EndFunc Func _SendUsers( $iSocket ) ; give the userlist to a connecting client For $i = 0 to 16 If $list[$i][0] Then TCPSend($iSocket, Chr(1) & "adduser" & Chr(2) & $list[$i][1]) Next EndFunc Func _SockRecv( $iSocket, $iBytes = 2048 ) Local $sData = "" While $sData = "" $sData = TCPRecv($iSocket, $iBytes) If @error Then Return SetError(1, 0, 0) Wend Return $sData EndFunc Func _ReduceMemory() DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1) EndFunc Func mError( $sText, $iFatal = 0, $sTitle = "Error", $iOpt = 0 ) Local $ret = MsgBox(48 + 4096 + 262144 + $iOpt, $sTitle, $sText) If $iFatal Then Exit Return $ret EndFunc Func _RC4( $sData, $sKey ) ; based on code by Valik Local $l[256], $i, $t, $x, $y, $s = "" Local $iLen = StringLen($sKey) For $c = 0 to 255 $l[$c] = $c Next For $c = 0 to 255 $i = Mod(Asc(StringMid($sKey, Mod($c, $iLen) + 1, 1)) + $l[$c] + $i, 256) $t = $l[$c] $l[$c] = $l[$i] $l[$i] = $t Next For $c = 1 to StringLen($sData) $x = Mod($x + 1, 256) $y = Mod($l[$x] + $y, 256) $t = $l[$x] $l[$x] = $l[$y] $l[$y] = $t $s &= Chr(BitXOR(Asc(StringMid($sData, $c, 1)), $l[Mod($l[$x] + $l[$y], 256)])) Next Return $s EndFunc Func _Time() ; based on code by jjohn and his time sync script ; 129.6.15.28 = time-a.nist.gov Local $conn = TCPConnect("129.6.15.28", 37), $recv = "" If $conn = -1 or @error Then Return SetError(1, 0, "...") While $recv = "" $recv = TCPRecv($conn, 512) If @error Then Return SetError(2, 0, "...") WEnd TCPCloseSocket($conn) Return StringTrimRight(Asc(StringMid($recv,1,1))*256^3+Asc(StringMid($recv,2,1))*256^2+Asc(StringMid($recv,3,1))*256+Asc(StringMid($recv,4,1)),1) EndFunc Func OnAutoItExit() _SendAll(Chr(1) & "exit") TCPShutdown() Exit EndFuncoÝ÷ Ù°¥éíý¶®¶­sb6æ6ÇVFRfÇC´uT6öç7FçG2æS2fwC°¤÷BgV÷C´uTöäWfVçDÖöFRgV÷C²Â ¤vÆö&Â6öç7Bb33cµõ%BÒ3sS¤vÆö&Âb33c¶Æ7BÂb33c·6ö6°¤vÆö&Âb33c·W6W&Æ7E³uÕ³%в²æFWÕ²W6W&æÖRÂ7G&ÂBÐ ¥D57F'EW ¢b33c¶wVÒuT7&VFRgV÷C´ÆövâgV÷C²Â#c¤uT7G&Ä7&VFTÆ&VÂgV÷Cµ6W'fW"gV÷C²ÂÂÂcÂ#¤uT7G&Ä7&VFTÆ&VÂgV÷CµW6W&æÖRgV÷C²ÂÂCÂcÂ#¢b33c¶7G&ÂÒuT7G&Ä7&VFTçWBDE$U53ÂÂÂsÂ#¢b33c·W6W&7G&ÂÒuT7G&Ä7&VFTçWBgV÷C²gV÷C²ÂÂCÂsÂ#¢b33c¶ÆövâÒuT7G&Ä7&VFT'WGFöâgV÷C´ÆövâgV÷C²ÂsÂsÂÂ#Âb33c´%5ôDTeU4%UEDôâ ¤uT7G&Å6WDöäWfVçBb33c¶ÆövâÂgV÷CµôÆövâgV÷C²¤uT6WDöäWfVçBb33c´uTôUdTåEô4Äõ4RÂgV÷CµôWBgV÷C² ¤uT6WE7FFR¢b33c¶Æö÷ÒG'VP ¥vÆRb33c¶Æö÷¢6ÆVW#¥tVæ@ ¢b33c¶wVÒuT7&VFRgV÷CµW&&â6BÒW6W"gV÷C²fײb33c·W6W"fײgV÷C²gV÷C²ÂCcÂ#3¢b33c¶Æ7BÒuT7G&Ä7&VFTÆ7EfWrgV÷C²W6W'2gV÷C²Â3SÂÂÂ#¢b33c¶VFBÒuT7G&Ä7&VFTVFBgV÷C²gV÷C²ÂÂsÂ33ÂSÂb33c´U5õ$TDôäŲb33cµu5õe45$ôIJb33c´U5ôUDõe45$ôÄ¢b33c¶çWBÒuT7G&Ä7&VFTçWBgV÷C²gV÷C²ÂÂÂ33Â#¢b33c·6VæBÒuT7G&Ä7&VFT'WGFöâgV÷Cµ6VæBgV÷C²ÂÂCÂÂ#Âb33c´%5ôDTeU4%UEDôâ¢b33c·ÒÒuT7G&Ä7&VFT'WGFöâgV÷CµÒgV÷C²ÂÂCÂÂ# ¤uT7G&Å6WDöäWfVçBb33c·6VæBÂgV÷Cµõ6VæBgV÷C²¤uT7G&Å6WDöäWfVçBb33c·ÒÂgV÷CµõÒgV÷C²¤uT6WDöäWfVçBb33c´uTôUdTåEô4Äõ4RÂgV÷CµôWBgV÷C² ¤uT7G&Å6WE7FFRb33c¶çWBÂb33c´uTôdô5U2¤uT6WE7FFR ¥õ&VGV6TÖVÖ÷' ¥vÆR¢6ÆVW¢b33c·&V7bÒD5&V7bb33c·6ö6²Â#C¢bW'&÷"FVâÔW'&÷"gV÷C´6öææV7FöâÆ÷7BâgV÷C²Â¢bæ÷Bb33c·&V7bFVâ6öçFçVTÆö÷¢²'6RFR6öÖÖæB2¢b33c·&V7bÒ7G&æu7ÆBb33c·&V7bÂ6"¢f÷"b33c¶ÒFòb33c·&V7e³Ð b33c·FV×Ò7G&æu7ÆBb33c·&V7e²b33c¶ÒÂ6"" 7vF6b33c·FV׳Р66RgV÷C·&V¦V7FVBgV÷C° ÔW'&÷"gV÷C´6öææV7Föâ&V¦V7FVBâgV÷C²Â 66RgV÷C¶¶6²gV÷C° ÔW'&÷"gV÷C´6öææV7Föâ¶6¶VBâgV÷C²Â 66RgV÷C¶66WFVBgV÷C° bb33cµU4U"ÒgV÷C¶FÖâgV÷C²FVà b33c¶¶6²ÒuT7G&Ä7&VFT'WGFöâgV÷C´¶6²gV÷C²ÂÂCÂÂ# uT7G&Å6WDöäWfVçBb33c¶¶6²ÂgV÷Cµô¶6²gV÷C² VæD` 66RgV÷C¶FGW6W"gV÷C° ôFEW6W"b33c·FV׳%Ò 66RgV÷C¶FVÇW6W"gV÷C° ôFVÅW6W"b33c·FV׳%Ò 66RgV÷C¶WBgV÷C° ÔW'&÷"gV÷Cµ6W'fW"26Æ÷6VBâgV÷C²Â 66RVÇ6P bb33c·&V7e²b33c¶ÒFVâuT7G&Å6WDFFb33c¶VFBÂb33c·&V7e²b33c¶Òfײ5$Äb VæE7vF6¢æW@¢õ&VGV6TÖVÖ÷'¥tVæ@ ¤gVæ2ôÆövâ¢b33c¶Æö÷ÒfÇ6P¢vÆö&Â6öç7Bb33c´ÒuT7G&Å&VBb33c¶7G&¢vÆö&Â6öç7Bb33cµU4U"ÒuT7G&Å&VBb33c·W6W&7G&¢uTFVÆWFRb33c¶wV¢bb33cµU4U"ÒgV÷C¶FÖâgV÷C²FVà Æö6Âb33c·72ÒçWD&÷gV÷C´VçFW"77v÷&C¢gV÷C²ÂgV÷CµÆV6RVçFW"FR6W'fW"77v÷&B&VÆ÷râgV÷C²ÂgV÷C²gV÷C²ÂgV÷C¹RgV÷C² bW'&÷"FVâW@ b33c·6ö6²ÒD56öææV7Bb33c´Âb33cµõ%B bb33c·6ö6²ÒÓFVâÔW'&÷"gV÷CµVæ&ÆRFò6öææV7BâgV÷C²Â¢VÇ6P b33c·6ö6²ÒD56öææV7Bb33c´Âb33cµõ%B bb33c·6ö6²ÒÓFVâÔW'&÷"gV÷CµVæ&ÆRFò6öææV7BâgV÷C²Â D56VæBb33c·6ö6²Âb33cµU4U"¢VæD`¤VæDgVæ0 ¤gVæ2õ6VæB¢bæ÷BuT7G&Å&VBb33c¶çWBFVâ&WGW&â¢D56VæBb33c·6ö6²Â7G&æu&WÆ6R7G&æu&WÆ6RuT7G&Å&VBb33c¶çWBÂ6"ÂgV÷C²gV÷C²Â6""ÂgV÷C²gV÷C²¢uT7G&Å6WDFFb33c¶çWBÂgV÷C²gV÷C²¢&WGW&â¤VæDgVæ0 ¤gVæ2õÒ¢bæ÷BuT7G&Å&VBb33c¶çWBFVâ&WGW&â¢Æö6Âb33c·W6W"ÒuT7G&Å&VBb33c¶Æ7BÂb33c¶FFÒ7G&æu&WÆ6R7G&æu&WÆ6RuT7G&Å&VBb33c¶çWBÂ6"ÂgV÷C²gV÷C²Â6""ÂgV÷C²gV÷C²¢bæ÷Bb33c·W6W"FVâ&WGW&â¢b33c·W6W"ÒuT7G&Å&VBb33c·W6W"¢D56VæBb33c·6ö6²Â6"fײgV÷CµÒgV÷C²fײ6""fײb33c·W6W"fײ6""fײb33c¶FF¢uT7G&Å6WDFFb33c¶çWBÂgV÷C²gV÷C²¢uT7G&Å6WDFFb33c¶VFBÂgV÷C²fÇC²¢¢Ò6VçBFó¢gV÷C²fײb33c·W6W"fײgV÷C²¢¢fwC²gV÷C²fײ5$ÄbfײgV÷C²fÇC²¢¢gV÷C²fײb33c¶FFfײgV÷C²¢¢fwC²gV÷C²fײ5$Äb¢&WGW&â¤VæDgVæ0 ¤gVæ2ô¶6²¢Æö6Âb33c·W6W"ÒuT7G&Å&VBb33c¶Æ7B¢bæ÷Bb33c·W6W"FVâ&WGW&â¢b33c·W6W"ÒuT7G&Å&VBb33c·W6W"¢D56VæBb33c·6ö6²Â6"fײgV÷C¶¶6²gV÷C²fײ6""fײb33c·W6W"¢uT7G&Å6WDFFb33c¶VFBÂgV÷C²fÇC²¢¢¶6³¢gV÷C²fײb33c·W6W"fײgV÷C²¢¢fwC²gV÷C²fײ5$Äb¢&WGW&â¤VæDgVæ0 ¤gVæ2ôFEW6W"b33c·W6W"¢bb33c·W6W"ÒgV÷C¶FÖâgV÷C²æBæ÷Bb33c·W6W&Æ7E³eÕ³ÒFVà b33c·W6W&Æ7E³eÕ³ÒÒb33c·W6W b33c·W6W&Æ7E³eÕ³ÒÒuT7G&Ä7&VFTÆ7EfWtFVÒb33c·W6W"Âb33c¶Æ7B &WGW&â¢VæD`¢f÷"b33c¶ÒFòP bæ÷Bb33c·W6W&Æ7E²b33c¶Õ³ÒFVà b33c·W6W&Æ7E²b33c¶Õ³ÒÒb33c·W6W b33c·W6W&Æ7E²b33c¶Õ³ÒÒuT7G&Ä7&VFTÆ7EfWtFVÒb33c·W6W"Âb33c¶Æ7B &WGW&â VæD`¢æW@¢&WGW&â¤VæDgVæ0 ¤gVæ2ôFVÅW6W"b33c·W6W"¢f÷"b33c¶ÒFò` bb33c·W6W&Æ7E²b33c¶Õ³ÒÒb33c·W6W"FVà b33c·W6W&Æ7E²b33c¶Õ³ÒÒgV÷C²gV÷C° uT7G&ÄFVÆWFRb33c·W6W&Æ7E²b33c¶Õ³Ò b33c·W6W&Æ7E²b33c¶Õ³ÒÒ &WGW&â VæD`¢æW@¢&WGW&â¤VæDgVæ0 ¤gVæ2õ&VGV6TÖVÖ÷'¢FÆÄ6ÆÂgV÷C·6æFÆÂgV÷C²ÂgV÷C¶çBgV÷C²ÂgV÷C´V×Gv÷&¶æu6WBgV÷C²ÂgV÷C¶ÆöærgV÷C²ÂÓ¤VæDgVæ0 ¤gVæ2ÔW'&÷"b33c·5FWBÂb33c¶fFÂÒÂb33c·5FFÆRÒgV÷C´W'&÷"gV÷C²Âb33c¶÷BÒ¢Æö6Âb33c·&WBÒ×6t&÷C²Cb²#c#CB²b33c¶÷BÂb33c·5FFÆRÂb33c·5FWB¢bb33c¶fFÂFVâW@¢&WGW&âb33c·&W@¤VæDgVæ0 ¤gVæ2õ$3Bb33c·4FFÂb33c·4¶W²&6VBöâ6öFR'fÆ°¢Æö6Âb33c¶Å³#SeÒÂb33c¶Âb33c·BÂb33c·Âb33c·Âb33c·2ÒgV÷C²gV÷C°¢Æö6Âb33c¶ÆVâÒ7G&ætÆVâb33c·4¶W¢f÷"b33c¶2ÒFò#SP b33c¶Å²b33c¶5ÒÒb33c¶0¢æW@¢f÷"b33c¶2ÒFò#SP b33c¶ÒÖöB627G&ætÖBb33c·4¶WÂÖöBb33c¶2Âb33c¶ÆVâ²Â²b33c¶Å²b33c¶5Ò²b33c¶Â#Sb b33c·BÒb33c¶Å²b33c¶5Ð b33c¶Å²b33c¶5ÒÒb33c¶Å²b33c¶Ð b33c¶Å²b33c¶ÒÒb33c·@¢æW@¢f÷"b33c¶2ÒFò7G&ætÆVâb33c·4FF b33c·ÒÖöBb33c·²Â#Sb b33c·ÒÖöBb33c¶Å²b33c·Ò²b33c·Â#Sb b33c·BÒb33c¶Å²b33c·Ð b33c¶Å²b33c·ÒÒb33c¶Å²b33c·Ð b33c¶Å²b33c·ÒÒb33c·@ b33c·2f׳Ò6"&Eõ"627G&ætÖBb33c·4FFÂb33c¶2ÂÂb33c¶Å´ÖöBb33c¶Å²b33c·Ò²b33c¶Å²b33c·ÒÂ#SbÒ¢æW@¢&WGW&âb33c·0¤VæDgVæ0 ¤gVæ2õFÖR²&6VBöâ6öFR'¦¦öâæB2FÖR7æ267&@¢²#ãbãRã#ÒFÖRÖææ7Bæv÷`¢Æö6Âb33c¶6öæâÒD56öææV7BgV÷C³#ãbãRã#gV÷C²Â3rÂb33c·&V7bÒgV÷C²gV÷C°¢bb33c¶6öæâÒÓ÷"W'&÷"FVâ&WGW&â6WDW'&÷"ÂÂgV÷C²âââgV÷C²¢vÆRb33c·&V7bÒgV÷C²gV÷C° b33c·&V7bÒD5&V7bb33c¶6öæâÂS" bW'&÷"FVâ&WGW&â6WDW'&÷""ÂÂgV÷C²âââgV÷C²¢tVæ@¢D56Æ÷6U6ö6¶WBb33c¶6öæâ¢&WGW&â7G&æuG&Õ&vB627G&ætÖBb33c·&V7bÃã#Seã2´627G&ætÖBb33c·&V7bÃ"ã#Seã"´627G&ætÖBb33c·&V7bÃ2ã#Sb´627G&ætÖBb33c·&V7bÃBÃäVæDgVæ0 ¤gVæ2ôWB¢W@¤VæDgVæ0 ¤gVæ2öäWFôDWB¢D56VæBb33c·6ö6²Â6"fײgV÷C¶'RgV÷C²¢D56WFF÷vâ¢W@¤VæDgVæ Thank you.

How would you go about making or starting a regular online chat? An example is RazerM's Connect Four in Online play.

is there a way of doing that? if so. let me have it.

Oh yea, whoops. I'll have to edit that xD

Bump.

0.25 seconds :cool:

Cool it's dugagok! I have even gotton past Exam II =(

I like it Val, but I don't use paypal.

Nice! Is there another way where they don't need to pay money and just active their account? for 30 days? :R

Yes I love super size

No But now the tabs or text won't show

It works but after the I login sucessfully. The login one won't go away..

Can someone help me get a login script created by rambo3889: #include <Guiconstants.au3> Guicreate("Login",200,200) $username=Guictrlcreateinput("Username",50,20,90,20) Guictrlcreatelabel("Password",0,50) $pasword=Guictrlcreateinput("Password",50,50,90,20) $login=Guictrlcreatebutton("Login",50,70,90,20) $new=Guictrlcreatebutton("New Accout",50,110,90,20) GUISetState() While 1 $msg=guigetmsg() Switch $msg Case $GUI_EVENT_CLOSE Exit Case $login ; HERE YOU MAKE THE LOGIN Case $new $newusername=Inputbox("Username","Please enter the username you want") If @error or $newusername = ""then Msgbox(0,"No Username","You didn't enter any username") Continueloop endif $newpassword=Inputbox("Password","Please enter the Password you want") If @error or $newpassword = "" then Msgbox(0,,"No Password","You didn't enter any Password") Continueloop endif Filewrite("File.log","Username="&$newusername&@CRLF&"Password="&$newpassword) endswitch wend Help me get That ^^ into CODE;*********************** ; ZetaBase ; Project Manager: keen ; Coded by: Dan of www.zetastyles.com ; Code Started: August 9, 2006 ; Coded Ended: ; Special Thanks to: keen for graphics! ;*********************** #include <GUIConstants.au3> #include <File.au3> FileWrite("c:/blank.txt", "") Global $oRP ;PRO SKINS $skin1 = "http://invisionfreeskins.com/index.php?showtopic=4038" $skin2 = "http://invisionfreeskins.com/index.php?showtopic=4039" $skin3 = "http://invisionfreeskins.com/index.php?showtopic=15888" $skin4 = "http://invisionfreeskins.com/index.php?showtopic=2319" $skin5 = "http://invisionfreeskins.com/index.php?showtopic=12961" $skin6 = "http://invisionfreeskins.com/index.php?showtopic=7046" $skin7 = "http://invisionfreeskins.com/index.php?showtopic=2305" $skin8 = "http://invisionfreeskins.com/index.php?showtopic=16709" $skin9 = "http://invisionfreeskins.com/index.php?showtopic=13403" $skin10 = "http://invisionfreeskins.com/index.php?showtopic=2307" $skin11 = "http://invisionfreeskins.com/index.php?showtopic=7859" $skin12 = "http://invisionfreeskins.com/index.php?showtopic=13775" $skin13 = "http://invisionfreeskins.com/index.php?showtopic=2308" $skin14 = "http://invisionfreeskins.com/index.php?showtopic=2246" $skin15 = "http://invisionfreeskins.com/index.php?showtopic=17120" $skin16 = "http://invisionfreeskins.com/index.php?showtopic=14185" ;END PRO SKINS ;DOCUMENTS $doc1 = "http://invisionfreeskins.com/index.php?showtopic=4038" $doc2 = "http://invisionfreeskins.com/index.php?showtopic=4039" $doc3 = "http://invisionfreeskins.com/index.php?showtopic=15888" ;END DOCUMENTS ;TUTORIALS $tut1 = "http://invisionfreeskins.com/index.php?showtopic=4038" $tut2 = "http://invisionfreeskins.com/index.php?showtopic=4039" $tut3 = "http://invisionfreeskins.com/index.php?showtopic=15888" ;END TUTORIALS ;WEBSITE TEMPLATES $wt1 = "http://invisionfreeskins.com/index.php?showtopic=4038" $wt2 = "http://invisionfreeskins.com/index.php?showtopic=4039" $wt3 = "http://invisionfreeskins.com/index.php?showtopic=15888" ;END WEBSITE TEMPLATES ; GUI $Form1 = GUICreate("ZetaBase", 400, 400) GUISetIcon("C:\Program Files\AutoIt3\beta\Icons\au3.ico", 0) $Slider1 = GUICtrlCreateSlider(0, 8, 265, 49) GUICtrlSetLimit(-1,255) GUICtrlSetData(-1,220) ; BANNER $s_TempFile = _TempFile() InetGet("http://209.85.48.9/8805/35/upload/p1488438.gif", $s_TempFile) GUICtrlCreatePic($s_TempFile, 0, 0, 400, 67) ; TEXT GUICtrlCreateLabel("Sample Label ", 10, 275, 389, 20) ;GUICtrlSetStyle (-1, $SS_RIGHT ) GUICtrlCreateLabel("Logged in as: " & $nam3, 1, 258, 400, 14) ; MENU $filemenu = GUICtrlCreateMenu("File") $fileitem = GUICtrlCreateMenuitem("Open...", $filemenu) $recentfilesmenu = GUICtrlCreateMenu("Recent Files", $filemenu) $separator1 = GUICtrlCreateMenuitem("", $filemenu) $exititem = GUICtrlCreateMenuitem("Exit", $filemenu) ;ZETA STYLES $filemenu = GUICtrlCreateMenu("Zeta Styles") $zs1 = GUICtrlCreateMenuitem("Visit Website", $filemenu) $zs2 = GUICtrlCreateMenuitem("Visit Forum", $filemenu) $zs3 = GUICtrlCreateMenuitem("Support", $filemenu) $zs12 = GUICtrlCreateMenuitem("Terms of Service", $filemenu) ;FORUM OPTIONS $filemenu = GUICtrlCreateMenu("Forum Options") $zs4 = GUICtrlCreateMenuitem("Control Panel", $filemenu) $zs5 = GUICtrlCreateMenuitem("Inbox", $filemenu) $zs6 = GUICtrlCreateMenuitem("View New Posts", $filemenu) $zs11 = GUICtrlCreateMenuitem("View Members", $filemenu) $zs13 = GUICtrlCreateMenuitem("Calender", $filemenu) GUICtrlCreateMenuItem("", $filemenu) $file1 = GUICtrlCreateMenu("Statistics", $filemenu) $zs7 = GUICtrlCreateMenuitem("Zeta Styles Staff", $file1) $zs8 = GUICtrlCreateMenuitem("Today's Active Topics", $file1) $zs9 = GUICtrlCreateMenuitem("Today's Top 10 Posters", $file1) $zs10 = GUICtrlCreateMenuitem("Overall Top 10 Posters", $file1) $file3 = GUICtrlCreateMenu("ZetaFX") $zs19 = GUICtrlCreateMenuitem("ZetaFX V1", $file3) $zs20 = GUICtrlCreateMenuitem("ZetaFX V2", $file3) $separator1 = GUICtrlCreateMenuitem("", $file3) $aboutfx = GUICtrlCreateMenuitem("About ZetaFX", $file3) GUICtrlCreateMenuItem("", $filemenu) $file2 = GUICtrlCreateMenu("Board Options", $filemenu) $zs14 = GUICtrlCreateMenuitem("Email Settings", $file2) $zs15 = GUICtrlCreateMenuitem("Board Settings", $file2) $zs16 = GUICtrlCreateMenuitem("Skin and Languages", $file2) $zs17 = GUICtrlCreateMenuitem("Change Email Address", $file2) $zs18 = GUICtrlCreateMenuitem("Change Password", $file2) ;ABOUT $helpmenu = GUICtrlCreateMenu("About") $aboutitem = GUICtrlCreateMenuitem("About ZetaBase", $helpmenu) GUISetState(@SW_SHOW) ; TAB GUICtrlCreateTab(1, 70, 400, 190) $tab1 = GUICtrlCreateTabItem("Welcome") GUICtrlCreateLabel("Welcome to ZetaBase." & @CRLF & " " & @CRLF & "This project was started by keen and coded by Dan of www.zetastyles.com. This is ZetaBase. A program to show you the best of the best of what ZetaStyles has to offer. This program has ZS Best Skins, ZS Document Database, GFX Tutorial Database, and Website Template Database!", 20, 120, 375, 100) GUICtrlCreateTabItem("Pro Skins") GUICtrlCreateLabel("Category: Pro Skins" & @CRLF & " " & @CRLF & "Welcome to ZetaBase's Pro Skins category. To view skins, just simply select one from the drop down menu and you will be redirected to the skins topic in your default browser.", 20, 125, 375, 100) $skincombo = GUICtrlCreateCombo("", 10, 100) ; PRO SKINS DROP DOWN GUICtrlSetData(-1, "Choose a skin|Astro Jax|Aurora|Black sk00n|Creative Stripes|Dark Slate Blue|Encrypted V 2.0|Enlightened Blue|Epinephrine|Green Media Revamped|Hall'o'Queen|Highway Star|Iligua|Kryptonisis|Smoothy Bluey|Tropic Summer PR|wibbleFLOP", "Choose a skin") ; add other item snd set a new default GUICtrlCreateTabItem("Documents") GUICtrlCreateLabel("Category: Documents" & @CRLF & " " & @CRLF & "Welcome to ZetaBase's Documents category. To view the documents, just simply select one from the drop down menu and you will be redirected to the document topic in your default browser.", 20, 125, 375, 100) $doccombo = GUICtrlCreateCombo("", 10, 100) ; DOCUMENT DROP DOWN GUICtrlSetData(-1, "Choose a document|DOC1|DOC2|DOC3", "Choose a document") GUICtrlCreateTabItem("Tutorials") GUICtrlCreateLabel("Category: Tutorials" & @CRLF & " " & @CRLF & "Welcome to ZetaBase's Tutorials category. To view the tutorials, just simply select one from the drop down menu and you will be redirected to the tutorial topic in your default browser.", 20, 125, 375, 100) $tutcombo = GUICtrlCreateCombo("", 10, 100) ; TUTORIAL DROP DOWN GUICtrlSetData(-1, "Choose a tutorial|TUT1|TUT2|TUT3", "Choose a tutorial") GUICtrlCreateTabItem("Website Templates") GUICtrlCreateLabel("Category: Website Templates" & @CRLF & " " & @CRLF & "Welcome to ZetaBase's Website Templates category. To view the templates, just simply select one from the drop down menu and you will be redirected to the template topic in your default browser.", 20, 125, 375, 100) $wtcombo = GUICtrlCreateCombo("", 10, 100) ; TUTORIAL DROP DOWN GUICtrlSetData(-1, "Choose a website template|WT1|WT2|WT3", "Choose a website template") ; GUI MESSAGE LOOP GUICtrlCreateTabItem("") ; end tabitem definition GUICtrlSetState($tab1, $GUI_SHOW) ; will be display first GUISetState() While 1 WinSetState("ZetaBase", "", @SW_SHOWNORMAL) $msg = GUIGetMsg() Select Case $msg = $fileitem $file = FileOpenDialog("Choose file...", @TempDir, "All (*.*)") If @error <> 1 Then GUICtrlCreateMenuitem($file, $recentfilesmenu) Case $msg = $skincombo ;START SKIN URL If StringInStr(GUICtrlRead($skincombo), "Astro Jax") Then Run(@ComSpec & " /c Start " & $skin1, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Aurora") Then Run(@ComSpec & " /c Start " & $skin2, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Black sk00n") Then Run(@ComSpec & " /c Start " & $skin3, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Creative Stripes") Then Run(@ComSpec & " /c Start " & $skin4, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Dark Slate Blue") Then Run(@ComSpec & " /c Start " & $skin5, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Encrypted V 2.0") Then Run(@ComSpec & " /c Start " & $skin6, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Enlightened Blue") Then Run(@ComSpec & " /c Start " & $skin7, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Epinephrine") Then Run(@ComSpec & " /c Start " & $skin8, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Green Media Revamped") Then Run(@ComSpec & " /c Start " & $skin9, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Hall'o'Queen") Then Run(@ComSpec & " /c Start " & $skin10, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Highway Star") Then Run(@ComSpec & " /c Start " & $skin11, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Iligua") Then Run(@ComSpec & " /c Start " & $skin12, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Kryptonisis") Then Run(@ComSpec & " /c Start " & $skin13, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Smoothy Bluey") Then Run(@ComSpec & " /c Start " & $skin14, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "Tropic Summer PR") Then Run(@ComSpec & " /c Start " & $skin15, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($skincombo), "wibbleFLOP") Then Else EndIf;END SKIN URL Case $msg = $doccombo ;START DOC URL If StringInStr(GUICtrlRead($doccombo), "Doc1") Then Run(@ComSpec & " /c Start " & $doc1, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($doccombo), "doc2") Then Run(@ComSpec & " /c Start " & $doc2, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($doccombo), "doc3") Then Run(@ComSpec & " /c Start " & $doc3, "", @SW_HIDE) Else EndIf;END DOC URL Case $msg = $tutcombo ;START TUT URL If StringInStr(GUICtrlRead($tutcombo), "TUT1") Then Run(@ComSpec & " /c Start " & $tut1, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($tutcombo), "TUT2") Then Run(@ComSpec & " /c Start " & $tut2, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($tutcombo), "TUT3") Then Run(@ComSpec & " /c Start " & $tut3, "", @SW_HIDE) Else EndIf;END TUT URL Case $msg = $wtcombo ;START WT URL If StringInStr(GUICtrlRead($wtcombo), "WT1") Then Run(@ComSpec & " /c Start " & $wt1, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($wtcombo), "WT2") Then Run(@ComSpec & " /c Start " & $wt2, "", @SW_HIDE) ElseIf StringInStr(GUICtrlRead($wtcombo), "WT3") Then Run(@ComSpec & " /c Start " & $wt3, "", @SW_HIDE) Else EndIf;END WT URL ;START MENU URL Case $msg = $zs1 Run(@ComSpec & ' /c start http://www.zetastyles.com', '', @SW_HIDE) Case $msg = $zs2 Run(@ComSpec & ' /c start http://www.InvisionFreeSkins.com', '', @SW_HIDE) Case $msg = $zs3 Run(@ComSpec & ' /c start http://support.zetastyles.com/submit.php', '', @SW_HIDE) Case $msg = $zs4 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=UserCP&CODE=00"' '', @SW_HIDE) Case $msg = $zs5 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=Msg&CODE=01"' '', @SW_HIDE) Case $msg = $zs6 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=Search&CODE=getnew"' '', @SW_HIDE) Case $msg = $zs7 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=Stats&CODE=leaders"' '', @SW_HIDE) Case $msg = $zs8 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=Search&CODE=getactive"' '', @SW_HIDE) Case $msg = $zs9 Run(@ComSpec & ' /c start http://invisionfreeskins.com/index.php?act=Stats', '', @SW_HIDE) Case $msg = $zs10 Run(@ComSpec & ' /c start http://invisionfreeskins.com/index.php?act...order=desc', '', @SW_HIDE) Case $msg = $zs11 Run(@ComSpec & ' /c start http://invisionfreeskins.com/index.php?act=Members', '', @SW_HIDE) Case $msg = $zs12 Run(@ComSpec & ' /c start http://invisionfreeskins.com/index.php?act=boardrules', '', @SW_HIDE) Case $msg = $zs13 Run(@ComSpec & ' /c start http://invisionfreeskins.com/index.php?act=calendar', '', @SW_HIDE) Case $msg = $zs14 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=UserCP&CODE=02"' '', @SW_HIDE) Case $msg = $zs15 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=UserCP&CODE=04"' '', @SW_HIDE) Case $msg = $zs16 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=UserCP&CODE=06"' '', @SW_HIDE) Case $msg = $zs17 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=UserCP&CODE=08"' '', @SW_HIDE) Case $msg = $zs18 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?act=UserCP&CODE=28"' '', @SW_HIDE) Case $msg = $zs19 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?showtopic=17686"' '', @SW_HIDE) Case $msg = $zs20 Run(@ComSpec & ' /c start " " "http://invisionfreeskins.com/index.php?showtopic=18261"' '', @SW_HIDE) ;END MENU URL Case $msg = $aboutitem ;ABOUT MsgBox(0, "About ZetaBase", "ZetaBase"& @CRLF &"http://z9.invisionfree.com/TeamSTYLE/index.php?" & @CRLF & @CRLF & "Created by: keen" & @CRLF & "" & @CRLF & "Coded by: Dan" & @CRLF & "" & @CRLF & "© 2006 to repective topic starters.") Case $msg = $aboutfx ;ABOUT ZETA FX MsgBox(0, "About ZetaFX", "ZetaFX" & @CRLF & @CRLF & "Created by: .Mohib" & @CRLF & "" & @CRLF & "ZetaFX is a document that allowes users to have many ideal codes installed into their board." & @CRLF & "" & @CRLF & "© 2006 to .Mohib") Case $msg = $GUI_EVENT_CLOSE ;CLOSE ExitLoop Case $msg = $exititem ExitLoop EndSelect WEnd So it works properly. The login code will come first then everything else. Thank you

Ok the problem is the thing is offseted. I was wondering if anyone could make the browser page and the tabs neat. CODE ; ******************************************************* ; Nelmen Browser by keen ; Special thanks to Dan! ; ******************************************************* ; #include <GUIConstants.au3> #include <IE.au3> #include <GuiTab.au3> global $tabcount = 1 dim $aTabs[1] _IEErrorHandlerRegister () GUISetState() ;Show GUI $gui = GUICreate("Nelmen Browser", 1000, 850, _ (@DesktopWidth - 1300) / 2, (@DesktopHeight - 870) / 2, _ $WS_MAXIMIZE + $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) GUICtrlSetResizing (-1,$GUI_DOCKMENUBAR+$GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKBOTTOM) $size = WinGetClientSize($gui) $GUI_Button_Back = GUICtrlCreateButton("Back", 10, 420, 100, 30) $GUI_Button_Forward = GUICtrlCreateButton("Forward", 120, 420, 100, 30) $GUI_Button_Home = GUICtrlCreateButton("Home", 230, 420, 100, 30) $GUI_Button_Stop = GUICtrlCreateButton("Stop", 340, 420, 100, 30) $GUI_Button_AddTab = GUICtrlCreateButton ("Add Tab", 10, 10, 100) $tab=GUICtrlCreateTab (3,60, 875,610) GUICtrlSetResizing (-1,$GUI_DOCKMENUBAR+$GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKBOTTOM) $oIE = _IECreateEmbedded () $GUIActiveX = GUICtrlCreateObj($oIE, 10, 100, 870, 600) addtab() GUISetState() ;Show GUI _IENavigate ($oIE, "http://www.zetastyles.com") ; Waiting for user to close the window While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $GUI_Button_Home _IENavigate ($oIE, "http://www.zetastyles.com") Case $msg = $GUI_Button_Back _IEAction ($oIE, "back") Case $msg = $GUI_Button_Forward _IEAction ($oIE, "forward") Case $msg = $GUI_Button_Stop _IEAction ($oIE, "stop") Case $msg = $GUI_Button_AddTab addtab() EndSelect WEnd func addtab() redim $aTabs[$tabcount] $aTabs[$tabcount-1] = GUICtrlCreateTabitem ("Tab "&$tabcount) GUICtrlSetResizing (-1,$GUI_DOCKMENUBAR+$GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKBOTTOM) GUICtrlSetStyle(-1,$WS_VISIBLE) GUICtrlCreateTabitem (""); end tabitem definition $tabcount += 1 EndFunc GUIDelete() Exit