Jump to content
Sign in to follow this  
AlmarM

Simple Profile Maker

Recommended Posts

AlmarM

#include <GUIConstants.au3>

MsgBox(0, "Credits", "Credits to AlmarM")
$First_Name = InputBox("First Name", "Whats your first name?")
$Last_Name = InputBox("Last Name", "Whats your last name?")
$Sex = InputBox("Sex", "Whats your sex? (Male / Female)")
$Age = InputBox("Age", "Whats your age?")
$Day_of_Birth = InputBox("Day of Birth", "Whats your Day of Birth? (DD-MM-YYYY)")
$Country = InputBox("Country", "Where do you live?")
$ZIP_Code = InputBox("ZIP Code", "Whats your ZIP Code?")
$Email = InputBox("Email", "Whats your email?")

$GUI = GUICreate("", 300, 300, -1, -1)
$INFO = GUICtrlCreateEdit("Profile for: " & $First_Name & " " & $Last_Name & @CRLF & @CRLF & "First name: " & $First_Name & @CRLF & "Last name: " & $Last_Name & @CRLF & "Sex: " & $Sex & @CRLF & "Age: " & $Age & @CRLF & "Day of Birth: " & $Day_of_Birth & @CRLF & "Country: " & $Country & @CRLF & "ZIP Code: " & $ZIP_Code & @CRLF & "Email: " & $Email, 10, 10, 280, 280)
GUISetState(@SW_SHOW)
$FileSave = FileSaveDialog("Save Profile", "", "Text files (*.txt)", 2, "Profile.txt")
$Read_INFO = GUICtrlRead($INFO)
FileWrite($FileSave, $Read_INFO)
GUIDelete($GUI)
_Exit()

While 1
$nMsg = GUIGetMsg()
Select
Case $nMsg = $GUI_EVENT_CLOSE
Exit
EndSelect
WEnd

Func _Exit()
Sleep(100)
Exit
EndFunc

I know its easy but I was bored ^^

And in some times it could be very handy ;)

And mayby u guys could use the idea :P


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.

Share this post


Link to post
Share on other sites
ludocus

yeh, Very easy...

unusefull

Share this post


Link to post
Share on other sites

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
Sign in to follow this  

×