Jump to content

AIOCR


CodyBarrett
 Share

Recommended Posts

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 by CodyBarrett
Link to comment
Share on other sites

NEW VERSION!!updated at the top..

Funtions added have been crossed out.. ONLY the SHARED file is currently operational. :D

toughest part is multiclient server AND client.. possible but tough

Link to comment
Share on other sites

  • 2 weeks later...

NEW VERSION!!!

updated at the top

i 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

:D

Link to comment
Share on other sites

NEW VERSION!!!

updated at the top

i 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

:P

looks like a nice and good project to play around with :D I've been working on a few implementations as well of IRC and XMPP :o Now, if only we could get encryption down lol :D

-_-------__--_-_-____---_-_--_-__-__-_ ^^€ñ†®øÞÿ ë×阮§ wï†høµ† ƒë@®, wï†høµ† †ïmë, @ñd wï†høµ† @ †ïmïdï†ÿ ƒø® !ïƒë. €×阮 ñø†, bµ† ïñ§†ë@d wï†hïñ, ñ@ÿ, †h®øµghøµ† †hë 맧ëñ§ë øƒ !ïƒë.

Link to comment
Share on other sites

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... :D but HEY!! :o TCP is very easy to send a PM to...

Link to comment
Share on other sites

thank you... only roughly 25% now... i am NOT doing UPD connections ahaha in my opinion those are harder than TCP

Link to comment
Share on other sites

NEW VERSION

added:

pm system

the downside is.. to START a PM convo

example of text input to Send edit

!TOName Message

Now when it brings up Input boxes you NEED to type the persons name again but like this

ToName Message

i havent quite gotten the stringbetween for the FROM name, it keeps giving me a "subscript out of bounds" but oh well

also the Inputbox is JUST temporary... i want to make a custom GUI for it also

Link to comment
Share on other sites

NEW VERSION

added :

*unboot

*clearhistory

*Bootall

*better PM messenging & custom GUI

the commands are as lists: (just type into the bottom editbox

Commands Examples remarks

To PM -> !Name Message -> NA

To Get Admin Password -> [ap] -> adminpassword=@username & 0x00ff00

To Boot -> $Boot={name.} -> must be administrator.... BOOT=BAN as in they cannot log back into AIOCR untill Unbooted

To UnBoot -> $UnBoot={name.} -> ^^^^^^^^^^^^^^^^ Unbooting, means they WILL be alowed back into the chat OR when the file is deleted they will be

To Erasehistory -> $EraseCH={} -> ^^^^^^^^^^^^^^^^makes the $S_TXT=''... or Filedelete()

To BootAll -> $BootAll={} -> ^^^^^^^^^^^^^^^^EVERYONE including yourself is booted

that should be it :D for now lol... gonna start on TCP tommorrow

Edited by CodyBarrett
Link to comment
Share on other sites

  • 1 month later...

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*) :D ...... here are the GUI PICS

Edited by CodyBarrett
Link to comment
Share on other sites

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 ( :D . Maybe dashes (-) are better :D

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 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

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)

EDIT

alright.. i see what you've done to the INI thing

but 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 server

and 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 by CodyBarrett
Link to comment
Share on other sites

not even 70% done what i want xD

Link to comment
Share on other sites

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

Link to comment
Share on other sites

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 by CodyBarrett
Link to comment
Share on other sites

ok... i promised.. here is the code AT THE TOP

and its still unfinished i gotta make the TCP functions (boot, ignore, ect.. ) work but its there now if you guys wanna help

EDIT (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 tommorrow

here are some Pics of the GUIs

Posted Image

Posted Image

Posted Image

Posted Image

Posted Image

Posted Image

Posted Image

Posted Image

Edited by CodyBarrett
Link to comment
Share on other sites

  • 1 month later...

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...