Jump to content

Ultimate Talker (pretty sick multi-chat) version 23!

ludocus

By ludocus,
in AutoIt Example Scripts

 Share

Recommended Posts

ludocus Universalist

ludocus

Posted
Posted (edited)

Hello!

I made this chat client a long time ago with tcp.

Now I can't use my pc as a server (for some weird reason..), So i decided to use a website.

It works pretty simple:

Using _IE functions the program submits the username and text everytime you send something.

Also using _IE functions the program checks the username&text page for new messages and displays them in the gui.

Supports:

- Smileys

- Different colors, bold, etc.

- Account creating

- Xp and ranking

- Server is via website

- Anti-spam function

- Swearword filtering

- Offline messaging

- File sedning

- Moderator/Administrator/Owner (=Staff) ability's

- 23 Ranks (Last rank = 10000 XP)

- Strike option

- Giving XP

- Private-Messaging (PM)

- Ability to change password

- Gradient text color ([c=$begincolor]text[/c=$endcolor])

- Auto-update

- Changeable background!

That's not very good explained but I'm to lazy to do better, just check for yourself.

You gotta make an account before using it.

Because there are passwords in the source I can only give you the compiled full version.

I'm sorry ;)

You can download the program here: http://www.mediafire.com/?zc9osorel149ago

A movie about it was here:

Please comment!

ludocus

Edited by ludocus
Link to comment
Share on other sites
AlmarM Universalist

AlmarM

Posted
Posted

Yeh it is.

I will work on that.

Mayby you should HASH the passwords. I can view all of them. Pretty simple actualy. ;)

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Link to comment
Share on other sites
AlmarM Universalist

AlmarM

Posted
Posted

I mean when creating an account you should SHA1 hash the password.

When connection SHA1 again and then compare with the previous hashed and stored password.

I ment the accounts.txt file.

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Link to comment
Share on other sites
AlmarM Universalist

AlmarM

Posted
Posted (edited)

What's SHA1

Whoops, I ment MD5. ;)

EDIT:

Something like this.

#include  <Crypt.au3>

; Example of hashing data and using it to authenticate password

; This is the MD5-hash of the correct password
$bPasswordHash="0xCE950A8D7D367B5CE038E636893B49DC"

$sPassword=InputBox("Login","Please type the correct password.","Yellow fruit that is popular among monkeys")

If _Crypt_HashData($sPassword,$CALG_MD5)=$bPasswordHash Then
    MsgBox(64,"Access Granted","Password correct!")
Else
    MsgBox(16,"Access Denied","You entered the wrong password!")
EndIf
Edited by AlmarM

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Link to comment
Share on other sites
AlmarM Universalist

AlmarM

Posted
Posted (edited)

I don't get that MD5 then?

People will be able to reverse the hash if they see the function that turns the password into a hash.

Could you give a better example? I'm not great with terms like MD5 :)

MD5 is unhashable. Well, without 100's of super computers.

I'll make an example.

EDIT:

Here you go.

#include <Crypt.au3>

Global $sUsername, $sPassword
Global $iniPath = @ScriptDir & "\accounts.ini"

LogInForm()

Func LogInForm()
    $GUI = GUICreate("Login.", 180, 120)

    GUICtrlCreateLabel("Username", 10, 10)
    $Username = GUICtrlCreateInput("", 70, 7, 100)
    GUICtrlCreateLabel("Password", 10, 40)
    $Password = GUICtrlCreateInput("", 70, 37, 100)

    $Register = GUICtrlCreateButton("Register", 10, 65, 160)
    $Login = GUICtrlCreateButton("Log in", 10, 90, 160)

    GUISetState()
    While 1
        Switch GUIGetMsg()
            Case -3
                Exit

            Case $Register
                GUIDelete($GUI)
                RegisterForm()

            Case $Login
                If (IniRead($iniPath, "accounts", "username", "#") == GUICtrlRead($Username)) Then ; if the username exists
                    If (_Crypt_HashData(GUICtrlRead($Password), $CALG_MD5) == IniRead($iniPath, "accounts", "password", "#")) Then ; if hashing the giving password equals to the saved hashed password
                        MsgBox(64, "Succes.", "Login succes!") ; Login succes
                    Else
                        MsgBox(64, "Fail.", "Wrong password!") ; Wrong password
                    EndIf
                Else
                    MsgBox(64, "Fail.", "Wrong username!") ; Wrong username
                EndIf
        EndSwitch
    WEnd
EndFunc

Func RegisterForm()
    $GUI = GUICreate("Register.", 180, 100)

    GUICtrlCreateLabel("Username", 10, 10)
    $Username = GUICtrlCreateInput("", 70, 7, 100)
    GUICtrlCreateLabel("Password", 10, 40)
    $Password = GUICtrlCreateInput("", 70, 37, 100)

    $Register = GUICtrlCreateButton("Complete", 10, 65, 160)

    GUISetState()
    While 1
        Switch GUIGetMsg()
            Case -3
                Exit

            Case $Register
                IniWrite($iniPath, "accounts", "username", GUICtrlRead($Username))
                IniWrite($iniPath, "accounts", "password", _Crypt_HashData(GUICtrlRead($Password), $CALG_MD5)) ; hash the givin password and save it
                MsgBox(64, "Succes.", "Register succes! You can nog login.")

                GUIDelete($GUI)
                LogInForm()

        EndSwitch
    WEnd
EndFunc

This is how my accounts.ini now looks like.

[accounts]
username=AlmarM
password=0x9AA6E5F2256C17D2D430B100032B997C

Hope it makes sence! ;)

Edited by AlmarM

Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Link to comment
Share on other sites
  • 3 months later...
MvGulik Universalist

MvGulik

Posted
Posted (edited)

nevermind.

Edited by iEvKI3gv9Wrkd41u

"Straight_and_Crooked_Thinking" : A "classic guide to ferreting out untruths, half-truths, and other distortions of facts in political and social discussions."
"The Secrets of Quantum Physics" : New and excellent 2 part documentary on Quantum Physics by Jim Al-Khalili. (Dec 2014)

"Believing what you know ain't so" ...

Knock Knock ...
 

Link to comment
Share on other sites
shanet Universalist

shanet

Posted
Posted

Hmm... asking for source to 'create your own server' hey?

Maybe if you sweet talk the creator of this software enough he will tell you how its done, or create a tool to do that?

However that is completely up to him.

On another note, congratulations on this piece of work! However, just one problem:

-I created an account, closed the program then tried to log back in and it didnt work?

-So I then tried to sign up again and was able to sign up with exactly the same information? (username + password).

I also noticed above the mention of MD5 hashes as use for password encryption and you stating that it would be possible to reverse the encryption, it actually is not possible to reverse MD5 encryption, however it is possible to brute force the MD5 hash if they get their hands on it. However I do not think it would be easy to do so, and even if they did, it would take the average user ages to brute force a good password, the best way to crack an MD5 password is with rainbow tables where every single possible hash is pre-computed and stored in a rainbow table (hence the name). As you would imagine, this creates an enourmous file (20 GB for normal characters, I found one in excess of 100GB with German special chars!!!).

I hope you better understand this now?

shanet

[font="Comic Sans MS"]My code does not have bugs! It just develops random features.[/font]My Projects[list][*]Live Streaming (Not my project, but my edited version)[right]AutoIt Wrappers![/right][/list]Pure randomness[list][*]Small Minds.......................................................................................................[size="1"]Simple progress bar that changes direction at either sides.[/size][*]ChristmasIt AutoIt Christmas Theme..........................................................[size="1"]I WAS BOOOORED![/size][*]DriveToy..............................................................................................................[size="1"]Simple joke script. Trick your friends into thinking their computer drive is haywire![/size][/list]In Development[list][*]Your Background Task Organiser[*]AInstall Second Generation[/list]BEFORE POSTING ON THE FORUMS, TRY THIS:

%programfiles%/AutoIt3/autoit3.chm
Link to comment
Share on other sites
  • 1 month later...
  • 4 weeks 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
Go to topic listing

  • Recently Browsing   0 members

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