CodyBarrett Posted March 18, 2009 Share Posted March 18, 2009 (edited) ok guys, ive been messing around with chatrooms and TCPIP and blah blah, well ive found it QUITE tedious to search for and find then open and configure the chatrooms seperately... SO ive had an idea for an allinone, "AIOCR" simple name eh? anyway i have this much done sofar and plan on making most of the communication means that autoit supports EXCLUDING UDP because i frankly hate that function... so yeah LAN, TCP\IP(Client&Server) and im not sure what its called but you have a file on a shared drive and the program writes and view the contents of it in a GUI i call this SHARED. [autoit]#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=..\M.ico #AutoIt3Wrapper_Outfile=AIOCR.exe #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Comment=User Controled ChatRoom Using LAN, Fileread, TCP\IP. #AutoIt3Wrapper_Res_Description=All In One Chatroom. #AutoIt3Wrapper_Res_Fileversion=10.57.0.0 #AutoIt3Wrapper_Res_LegalCopyright=Cody Barrett #AutoIt3Wrapper_Run_Tidy=y #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <WindowsConstants.au3> #include <GUIConstants.au3> #include <EditConstants.au3> #include <ButtonConstants.au3> #include <File.au3> #include <Array.au3> #include <String.au3> #include <ProgressConstants.au3> #include <ScrollBarConstants.au3> #include <StaticConstants.au3> #include <Misc.au3> #include <GuiEdit.au3> Opt('GUIOnEventMode', 1) HotKeySet('{F1}', '_Help_File_') HotKeySet('{F2}', '_Tools_') $LS_INI = @ScriptDir & '\LAN_S.Ini' $TS_INI = @ScriptDir & '\TCPIP_S.Ini' $TS_INI_C = IniRead($TS_INI, 'GLOBAL', 'C', '') $TS_INI_F1 = IniRead($TS_INI, 'GLOBAL', 'F_C', '') $TS_INI_F2 = IniRead($TS_INI, 'GLOBAL', 'F_S', '') $TS_INI_F3 = IniRead($TS_INI, 'GLOBAL', 'F_N', '') $SS_INI = @ScriptDir & '\SHARED_S.Ini' $S_TXT = IniRead($SS_INI, 'GLOBAL', 'P', '') $SS_INI_C = IniRead($SS_INI, 'GLOBAL', 'C', '') $SS_INI_F1 = IniRead($SS_INI, 'GLOBAL', 'F_C', '') $SS_INI_F2 = IniRead($SS_INI, 'GLOBAL', 'F_S', '') $SS_INI_F3 = IniRead($SS_INI, 'GLOBAL', 'F_N', '') $Name_S = IniRead($SS_INI, 'GLOBAL', 'N', '') $Name_L = IniRead($LS_INI, 'GLOBAL', 'N', '') $Name_T = IniRead($TS_INI, 'GLOBAL', 'N', '') $CHATSTATUS = 0 $CONNECTIONS = 0 $CLIENTS = 0 $SOCKET = 0 $Last = '' $TCPListen = 0 $a = 0 $Send = 0 $Main = 0 $Tool_GUI = 0 $BlackList = 0 $Administrative_Status = 'User' If FileExists($TS_INI) And FileExists($TS_INI) Then Opt('Guioneventmode', 0) Choose_Chat() Else Opt('Guioneventmode', 0) Install() EndIf While 1 Sleep(100) WEnd Func _Accept_() $NewClient = TCPAccept($TCPListen) If $NewClient = -1 Then Else For $i = 1 To $CONNECTIONS If $CLIENTS[$i][0] = 0 Then $CLIENTS[$i][0] = $NewClient $CLIENTS[0][0] += 1 Do TCPSend($CLIENTS[$i][0], _StringToHex('<R><1|1|4></R>')) If @error Then ErrorCheck(@error, 'Unable to Parse USER Name Or LogonName Or IP.') $RECV = TCPRecv($CLIENTS[$i][0], 1000000) Until $RECV <> '' $RECV = _HexToString($RECV) $RECV = StringSplit($RECV, '|') $CLIENTS[$i][1] = StringTrimLeft($RECV[1], 4) $CLIENTS[$i][2] = $RECV[2] $CLIENTS[$i][3] = StringTrimRight($RECV[3], 5) $CLIENTS[$i][4] = 'User' SoundPlay(@ScriptDir & '\Online.wma') _New_Client_() $RECV = 0 ExitLoop EndIf Next EndIf $NewClient = 0 Return EndFunc ;==>_Accept_ Func _Broadcast_($a) For $i = 1 To $CONNECTIONS If $CLIENTS[$i][0] > 0 Then TCPSend($CLIENTS[$i][0], _StringToHex($a)) Next EndFunc ;==>_Broadcast_ Func Choose_Chat() $ChooseChat_GUI = GUICreate('Choose Chat', 300, 200, -1, -1, BitOR($WS_POPUP, $WS_VISIBLE)) GUISetBkColor(0x000000, $ChooseChat_GUI) $bGUI = GUICreate('', 340, 240, -1, -1, BitOR($WS_POPUP, $WS_VISIBLE), -1, $ChooseChat_GUI) GUISetBkColor(0x2E2E2E, $bGUI) $l = GUICtrlCreateLabel('Choose Chat', 40, 0, 260, 20, $SS_CENTER) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) $Exit = GUICtrlCreateLabel(' x', 0, 0, 20, 20) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetColor(-1, 0xFFFFA2) GUICtrlSetBkColor(-1, 0x2E2E2E) $Min = GUICtrlCreateLabel('_', 20, 0, 20, 20) GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') $l2 = GUICtrlCreateLabel('Please Choose Your Chat....', 50, 30, 220, 30) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetColor(-1, 0xFFFFA2) $LAN_Radio = GUICtrlCreateRadio('', 50, 60, 20, 20) GUICtrlSetColor(-1, 0xFFFFA2) $la = GUICtrlCreateLabel('LAN', 70, 65, 60, 20) GUICtrlSetColor(-1, 0xFFFFA2) $TCPIP_SERVER_Radio = GUICtrlCreateRadio('', 50, 90, 20, 20) GUICtrlSetColor(-1, 0xFFFFA2) $ts = GUICtrlCreateLabel('TCP-Server', 70, 95, 60, 20) GUICtrlSetColor(-1, 0xFFFFA2) $TCPIP_CLIENT_Radio = GUICtrlCreateRadio('', 50, 115, 20, 20) GUICtrlSetColor(-1, 0xFFFFA2) $tc = GUICtrlCreateLabel('TCP-Client', 70, 120, 60, 20) GUICtrlSetColor(-1, 0xFFFFA2) $SHARED_Radio = GUICtrlCreateRadio('', 50, 140, 20, 20) GUICtrlSetColor(-1, 0xFFFFA2) $s = GUICtrlCreateLabel('SHARED', 70, 145, 60, 20) GUICtrlSetColor(-1, 0xFFFFA2) $NONE_Radio = GUICtrlCreateRadio('', 50, 170, 20, 20) GUICtrlSetColor(-1, 0xFFFFA2) $q = GUICtrlCreateLabel('Quit', 70, 175, 60, 20) GUICtrlSetColor(-1, 0xFFFFA2) $l3 = GUICtrlCreateLabel('Once Chosen, Hit "START" To Start The Chatroom Services.', 150, 60, 100, 60) GUICtrlSetColor(-1, 0xFFFFA2) $START_Button = GUICtrlCreateButton('Start', 150, 130, 100, 50) GUICtrlSetState($LAN_Radio, $GUI_Disable) ;GUICtrlSetState($TCPIP_CLIENT_Radio, $GUI_Disable) ;GUICtrlSetState($TCPIP_SERVER_Radio, $GUI_Disable) GUICtrlSetState($START_Button, $GUI_FOCUS) WinSetTrans($bGUI, '', 100) GUISetState() While 1 $m = GUIGetMsg() If $m = $GUI_EVENT_CLOSE Then _Exit($ChooseChat_GUI) If $m = $Exit Then _Exit($ChooseChat_GUI) If $m = $Min Then GUISetState(@SW_MINIMIZE, $ChooseChat_GUI) If $m = $START_Button Then If GUICtrlRead($NONE_Radio) = $GUI_CHECKED Then _Exit($ChooseChat_GUI) ElseIf GUICtrlRead($TCPIP_SERVER_Radio) = $GUI_CHECKED Then GUIDelete($ChooseChat_GUI) GUIDelete($bGUI) _TCP_SERVER_() ElseIf GUICtrlRead($TCPIP_CLIENT_Radio) = $GUI_CHECKED Then GUIDelete($ChooseChat_GUI) GUIDelete($bGUI) _TCP_CLIENT_() ElseIf GUICtrlRead($SHARED_Radio) = $GUI_CHECKED Then GUIDelete($ChooseChat_GUI) GUIDelete($bGUI) _SHARED_Chat_() Else EndIf EndIf If $m = $l Or $m = $GUI_EVENT_PRIMARYDOWN Then $MouseXY = MouseGetPos() $WinXY = WinGetPos($ChooseChat_GUI) $xOff = $MouseXY[0] - $WinXY[0] $yOFF = $MouseXY[1] - $WinXY[1] While _IsPressed('01') WinMove($ChooseChat_GUI, '', MouseGetPos(0) - $xOff, MouseGetPos(1) - $yOFF) WinMove($bGUI, '', MouseGetPos(0) - $xOff - 20, MouseGetPos(1) - $yOFF - 20) Sleep(10) WEnd $MouseXY = 0 $WinXY = 0 $xOff = 0 $yOFF = 0 EndIf WEnd EndFunc ;==>Choose_Chat Func _Choose_Name_($a) $Choose_Name_GUI = GUICreate('Choose UserName', 300, 100, -1, -1, BitOR($WS_POPUP, $WS_VISIBLE)) GUISetBkColor(0x000000, $Choose_Name_GUI) $bGUI = GUICreate('', 340, 140, -1, -1, BitOR($WS_POPUP, $WS_VISIBLE), -1, $Choose_Name_GUI) GUISetBkColor(0x2E2E2E, $bGUI) $l = GUICtrlCreateLabel('Choose UserName', 40, 0, 260, 20, $SS_CENTER) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) $Exit = GUICtrlCreateLabel(' x', 0, 0, 20, 20) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) $Min = GUICtrlCreateLabel('_', 20, 0, 20, 20) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) GUICtrlCreateLabel('Please Choose a desired Username..', 30, 30, 280, 20) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetColor(-1, 0xFFFFA2) $Input = GUICtrlCreateInput($Name_T, 30, 60, 280, 20, $SS_CENTER) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) GUICtrlCreateLabel('', 29, 89, 282, 22) GUICtrlSetState(-1, $GUI_Disable) GUICtrlSetBkColor(-1, 0xFFFFA2) $SignIn = GUICtrlCreateLabel('Sign In', 30, 90, 280, 20, $SS_CENTER) GUICtrlSetFont(-1, 12, '', '', 'Fixedsys') GUICtrlSetBkColor(-1, 0x2E2E2E) GUICtrlSetColor(-1, 0xFFFFA2) WinSetTrans($bGUI, '', 100) WinSetOnTop($Choose_Name_GUI, '', 1) WinSetOnTop($bGUI, '', 1) GUISetState() While 1 $m = GUIGetMsg() If $m = $GUI_EVENT_CLOSE Or $m = $Exit Then GUIDelete($Choose_Name_GUI) Return 1 EndIf If $m = $Min Then GUISetState(@SW_MINIMIZE, $Choose_Name_GUI) If $m = $l Or $m = $GUI_EVENT_PRIMARYDOWN Then $MouseXY = MouseGetPos() $WinXY = WinGetPos($Choose_Name_GUI) $xOff = $MouseXY[0] - $WinXY[0] $yOFF = $MouseXY[1] - $WinXY[1] While _IsPressed('01') WinMove($Choose_Name_GUI, '', MouseGetPos(0) - $xOff, MouseGetPos(1) - $yOFF) WinMove($bGUI, '', MouseGetPos(0) - $xOff - 20, MouseGetPos(1) - $yOFF - 20) Sleep(10) WEnd $MouseXY = 0 $WinXY = 0 $xOff = 0 $yOFF = 0 EndIf If $m = $SignIn Then Select Case $CHATSTATUS = 3 $a = GUICtrlRead($Input) If $a = '' Then ErrorCheck(@error, 'User Definded Name, either is invlalid, or already exits.') Else If @error Then ErrorCheck(@error, 'Unable to write to file.') IniWrite($SS_INI, 'GLOBAL', 'N', $a) If @error Then ErrorCheck(@error, 'Unable to write to file.') EndIf Case $CHATSTATUS = 2 Or $CHATSTATUS = 2.5 $a = GUICtrlRead($Input) IniWrite($TS_INI, 'GLOBAL', 'N', $a) EndSelect GUIDelete($Choose_Name_GUI) Return $a EndIf WEnd EndFunc ;==>_Choose_Name_ Func _Disconnect_($a) For $i = 1 To $CONNECTIONS If $CLIENTS[$i][1] = $a Or $CLIENTS[$i][2] = $a Or $CLIENTS[$i][3] = $a Then $User = $CLIENTS[$i][1] TCPSend($CLIENTS[$i][0], _StringToHex('<D>%</C>')) Sleep(500) TCPCloseSocket($CLIENTS[$i][0]) EndIf Next _Broadcast_('<MSG><[-SERVER MESSAGE-] ' & $User & ' Has been Disconnected.></MSG>') $User = 0 EndFunc ;==>_Disconnect_ Func ErrorCheck($Error, $eMessage) $hWnd = WinGetHandle(WinGetTitle('[active]'), '') MsgBox(32, $Error, $eMessage & @CRLF & $Error, '', $hWnd) $hWnd = 0 $Error = 0 $eMessage = 0 EndFunc ;==>ErrorCheck Func _File_Write($String) FileWrite($S_TXT, _StringToHex(@CRLF & ' Edited June 16, 2009 by CodyBarrett [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
CodyBarrett Posted March 23, 2009 Author Share Posted March 23, 2009 NEW VERSION!!updated at the top.. Funtions added have been crossed out.. ONLY the SHARED file is currently operational. toughest part is multiclient server AND client.. possible but tough [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
CodyBarrett Posted April 6, 2009 Author Share Posted April 6, 2009 NEW VERSION!!!updated at the topi have COMPLETELY REDESIGNED... this is one reason why i havent yet started TCP yet...*what i changed is i made the sections into functions instead of constatly there*made custom title bar*Status updates on new messages [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
zackrspv Posted April 10, 2009 Share Posted April 10, 2009 NEW VERSION!!!updated at the topi have COMPLETELY REDESIGNED... this is one reason why i havent yet started TCP yet...*what i changed is i made the sections into functions instead of constatly there*made custom title bar*Status updates on new messageslooks like a nice and good project to play around with I've been working on a few implementations as well of IRC and XMPP Now, if only we could get encryption down lol -_-------__--_-_-____---_-_--_-__-__-_ ^^€ñ†®øÞÿ ë×阮§ wï†høµ† ƒë@®, wï†høµ† †ïmë, @ñd wï†høµ† @ †ïmïdï†ÿ ƒø® !ïƒë. €×阮 ñø†, bµ† ïñ§†ë@d wï†hïñ, ñ@ÿ, †h®øµghøµ† †hë 맧ëñ§ë øƒ !ïƒë. Link to comment Share on other sites More sharing options...
CodyBarrett Posted April 10, 2009 Author Share Posted April 10, 2009 haha i gave up on _stringencrypt() because its lag.. most people who WOULD use this.. wouldnt know HEX when they see it.. and if they do recognize it cant read it, and if that fails then i think.. they are worthy to read what is in it if they that desperate to read it... but yeah thanks.. working on PM system..(currently the SHARED section) so far FAILED every time... but HEY!! TCP is very easy to send a PM to... [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
jaenster Posted April 10, 2009 Share Posted April 10, 2009 Like the 1337e own made chat program...but nice -jaenster Link to comment Share on other sites More sharing options...
CodyBarrett Posted April 10, 2009 Author Share Posted April 10, 2009 thank you... only roughly 25% now... i am NOT doing UPD connections ahaha in my opinion those are harder than TCP [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
CodyBarrett Posted April 11, 2009 Author Share Posted April 11, 2009 NEW VERSIONadded:pm systemthe downside is.. to START a PM convoexample of text input to Send edit!TOName MessageNow when it brings up Input boxes you NEED to type the persons name again but like thisToName Messagei havent quite gotten the stringbetween for the FROM name, it keeps giving me a "subscript out of bounds" but oh wellalso the Inputbox is JUST temporary... i want to make a custom GUI for it also [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
CodyBarrett Posted April 13, 2009 Author Share Posted April 13, 2009 (edited) NEW VERSIONadded :*unboot*clearhistory*Bootall*better PM messenging & custom GUIthe commands are as lists: (just type into the bottom editboxCommands Examples remarksTo PM -> !Name Message -> NATo Get Admin Password -> [ap] -> adminpassword=@username & 0x00ff00To Boot -> $Boot={name.} -> must be administrator.... BOOT=BAN as in they cannot log back into AIOCR untill UnbootedTo UnBoot -> $UnBoot={name.} -> ^^^^^^^^^^^^^^^^ Unbooting, means they WILL be alowed back into the chat OR when the file is deleted they will beTo Erasehistory -> $EraseCH={} -> ^^^^^^^^^^^^^^^^makes the $S_TXT=''... or Filedelete()To BootAll -> $BootAll={} -> ^^^^^^^^^^^^^^^^EVERYONE including yourself is bootedthat should be it for now lol... gonna start on TCP tommorrow Edited June 16, 2009 by CodyBarrett [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
CodyBarrett Posted June 10, 2009 Author Share Posted June 10, 2009 (edited) alright guys...ive been working on this off and on for a few months currently im... finishing the TCP Client.. and gonna work on the LAN part next week.... so far.. having only: (i completely removed Personal messages from the SHARED chat... to much string manipulation) gui for choosing the chat 100% of SHARED (file reading) 80% of TCPIP Server 60% of TCPIP Client 0% of LAN i have 1150 lines of code in there :S i will update it and post the code at the top when im finished... but i thought i would have to give you guys a taste of what ive been up too (i know there are those who couldn't care less.. *whistles*valik*whistles*) ...... here are the GUI PICS Edited June 16, 2009 by CodyBarrett [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
Triblade Posted June 10, 2009 Share Posted June 10, 2009 (edited) Looks great. Cancel button does not work. You could simply add "If $m=$Install_Cancel_Button Then _Exit ()" To exit is cancelled. Also, the date is serperated by semicoloms ( . Maybe dashes (-) are better Add the following code anywhere: Edit: Place: $Name_S = choose_name()oÝ÷ Ø¢·å¡Wµ{ax[§q!ÀD@«ZºÚ"µÍËKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKB[ÈÚÛÜÙWÛ[YJ HÎÈÚÛÜÙHH[YKY][ÈÈ ÌÍÓ[YWÔËY][YH^ÝËÚÛÜÙH[Ý[È[Ý[ÛÈ[Ý[ÛXYHHXYKLL LH [[K^^^JBRY[Q^ÝÊ ÌÍÔÔ×ÝÙ×ÒSJHH[[UÜ]TÙXÝ[Û ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝË ][ÝÌS]È[YI][ÝÊBSØØ[ ÌÍÛÛÓ[YWÔË ÌÍÙÝXK ÌÍÝÙÈH[TXYÙXÝ[Û ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝÊBBRYÐ^J ÌÍÝÙÊHH[BR[UÜ]J ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝË ÌÍÓ[YWÔÊBBT] ÌÍÓ[YWÔÂQ[QQÂBIÌÍÙÝXHH[ÙBBQÜ ÌÍÚHHÈ ÌÍÝÙÖÌVÌBBBRY ÌÍÝÙÖÉÌÍÚWVÌWHH ÌÍÓ[YWÔÈ[BBBIÌÍÙÝXHHYBBBBQ^]ÛÜBBQ[YBS^BRY ÌÍÙÝXHHYH[BBIÌÍÛÛÓ[YWÔÈH ÌÍÓ[YWÔÂBBIÌÍÓ[YWÔÈH[]Þ ][ÝÐÚ[ÙHÙ[YI][ÝË ][ÝÕÙ[YHÈZÙ[XÙH[H]È[YK][ÝË ÌÍÓ[YWÔÈ [È ][Ý×É][ÝÈ [È[ÛJK ÌÍÝÙÖÌVÌJÌLJJBBBRYÜ[ ÌÍÓ[YWÔÈH ÌÍÛÛÓ[YWÔÂBQ[YU[[ ÌÍÙÝXHH[ÙBR[UÜ]J ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝËÙXÚÛ[X K ÌÍÓ[YWÔÊBT] ÌÍÓ[YWÔÂ[[Â[È[[ÝWÛ[YJ HÎÈÈ[[ÝH[YK[ÜÝZÙ[HÙY]ÙÜ[H^]È[Ý[ÛXYHHXYKLL LH [[K^^^JBSØØ[ ÌÍÚHH ÌÍÜÙXÝ[ÛÛ[YË ÌÍÙÝ[IÌÍÜÙXÝ[ÛÛ[YÈH[TXYÙXÝ[Û ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝÊBQÂBIÌÍÙÝ[HÐ^TÙXÚ ÌÍÜÙXÝ[ÛÛ[YË ÌÍÓ[YWÔËKJBBIÌÍÚH ÏHBU[[ ÌÍÙÝ[ ÉÝÈLHÜÜRY ÌÍÙÝ[ ÉÝÈLH[BR[Q[]J ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝË ÌÍÜÙXÝ[ÛÛ[YÖÉÌÍÙÝ[VÌJBBT] ÌÍÙÝ[Q[YT]LB[[Â[ÈÙXÚÛ[X HÎÈÛÚÜÈÜÛY^Ý[È[HÙ^H[XÈ[ÜÙÈ ÌÎNÙ[HÛÈ[Ý[ÛXYHHXYKLL LH [[K^^^JBSØØ[ ÌÍÚHHLK ÌÍÜÙXÝ[ÛÛ[YË ÌÍÙÝ[IÌÍÜÙXÝ[ÛÛ[YÈH[TXYÙXÝ[Û ÌÍÔÔ×ÝÙ×ÒSK ][ÝÑÓÐS ][ÝÊBQÂBIÌÍÚH ÏHBBIÌÍÙÝ[HÐ^TÙXÚ ÌÍÜÙXÝ[ÛÛ[YË ÌÍÚJBU[[ ÌÍÙÝ[HLBT] ÌÍÚB[[ÂËKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK I added "Global $SS_users_INI = @ScriptDir & "\SHARED_users.ini"" at top. This would be more conform your code. Also I did nothing with the install. So maybe you want to create that file at install. Edited June 10, 2009 by Triblade My active project(s): A-maze-ing generator (generates a maze) My archived project(s): Pong3 (Multi-pinger) Link to comment Share on other sites More sharing options...
CodyBarrett Posted June 10, 2009 Author Share Posted June 10, 2009 (edited) i've fixed everything that you have stated (the date.. im not changing ).... but its not finished yet...you do realize that the above code hasn't been updated since april? and its middle of june?I added "Global $SS_users_INI = @ScriptDir & "\SHARED_users.ini"" at top. This would be more conform your code.Also I did nothing with the install. So maybe you want to create that file at install.wtf? that isn't in the script thats just an adapation you put there... i see no need to place it there... the cancel button.. i would need to have the check if $m=cancel after everysingle $i+=10.... instead i did it more efficeint and had the Cancel button disabled.. (again not in the above code)EDITalright.. i see what you've done to the INI thingbut i still see no need to have it because the INI is local.. in the same folder as the script and the file your reading from.. was intentionally designed for a virtual drive.. one on a shared computer serverand ill look into the idea about the names...(i think i fixed that one already)but yeah... currently 1150lines of code.. the code from april has only.. 520ish.. there is a lot different Edited June 10, 2009 by CodyBarrett [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
Triblade Posted June 10, 2009 Share Posted June 10, 2009 (edited) No, I didn't know that you didn't updated that code Edit: ok, nvm this line. I see you edited Time to update code Edited June 10, 2009 by Triblade My active project(s): A-maze-ing generator (generates a maze) My archived project(s): Pong3 (Multi-pinger) Link to comment Share on other sites More sharing options...
CodyBarrett Posted June 10, 2009 Author Share Posted June 10, 2009 not even 70% done what i want xD [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
Triblade Posted June 10, 2009 Share Posted June 10, 2009 Well, people can't help out that way. My active project(s): A-maze-ing generator (generates a maze) My archived project(s): Pong3 (Multi-pinger) Link to comment Share on other sites More sharing options...
CodyBarrett Posted June 10, 2009 Author Share Posted June 10, 2009 i realized that..i only posted the other day so show what is to be expected...they also cannot help out if its not finished... its only an idea until its transformed into working code [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
Triblade Posted June 10, 2009 Share Posted June 10, 2009 Well, good luck then. I hope my code could contribute. My active project(s): A-maze-ing generator (generates a maze) My archived project(s): Pong3 (Multi-pinger) Link to comment Share on other sites More sharing options...
CodyBarrett Posted June 15, 2009 Author Share Posted June 15, 2009 (edited) hahahaa ok... i REreREmade the GUI xD ill post whatever i have done currently tommorrow night *working on* *Functions like BOOT and IGNORE for the TCP section *(shared is completely done) *(TCP SERVER & Client are finished except for the functions) *other small bugs Edited June 15, 2009 by CodyBarrett [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
CodyBarrett Posted June 16, 2009 Author Share Posted June 16, 2009 (edited) ok... i promised.. here is the code AT THE TOPand its still unfinished i gotta make the TCP functions (boot, ignore, ect.. ) work but its there now if you guys wanna helpEDIT (F2 brings up the funtion list... just click on the labels to get the functions.. they appear in an INPUT near the bottom... and just alter the text in the input for the funtion you want (just change the names & message for PM) then click USE FUNCTION.. sadely i haven't made these functions work in TCP just yet... will do tommorrowhere are some Pics of the GUIs Edited June 16, 2009 by CodyBarrett [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
liten Posted August 3, 2009 Share Posted August 3, 2009 Nice but i want to run this off my real server i pay for, how would i hook that up, ? just set the ports open on my server online? My UDF:Freeze.au3-Freeze values like CE, ML, ETC[i][/i][u][/u] 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