Like

Profile Wizard(c) vol.2

Platform:  mIRC
Published  Jun 17, 2007
Updated  Jun 17, 2007
1,107  10
Hey guys! I had a long time to post something so I created this in like an hour and posted it! So it's a newer version of my Profile Wizard! This version is SO cooler than the last one!

|Updates|
---------

1. Many more options added
2. You can have many things typed and not just one like the last edition
3. You must login to your account to edit it
4. Your account is Password-protected
5. The info of the users are stored in ini files which you can easily manage
6. Help file added
7. For more cool stuff, check out the bot!

The commands are simple:

`register - create an account
`MyProfile - view your own profile
`View (name) - view the (name)'s profile
`Help - view the help file
`EditProfile - View Your Edit Options

By the way, don't forget to go to your variables section in the script editor and type:

%ProfileChan #your-channel

otherwise the bot won't work!

Anyway, Enjoy it! PROFILE WIZARD (c) vol.2
Created By: mystery/msyterycool
(c) 2007
You may not remove the Credits section from the help file or this message from here!

on *:text:`Register:#: {
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick 11,1You already have a profile! | halt }
Notice $nick 11,1Welcome to the ProfileWizard(c) vol.2! Here create your own little profile and have some fun! Ok, so let's start. 91,Step 1: 11,1What's your name? Type `Name (your-name)
}

on *:text:*`Name *:*:{
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick 11,1You already have a profile! | halt }
if ($readini($nick $+ .ini,Register,Name) == Yes) { Notice $nick You already Made a Name! | halt }
if ($chan != %ProfileChan) { halt }
if (fark isin $2-) { Notice $nick 4Please Reword It | halt }
if (/ isin $2-) { Notice $nick Please Reword it! | halt }
writeini $nick $+ .ini $nick Name $2-
writeini $nick $+ .ini Register Name Yes
Notice $nick 9,1Step 2. 11,1What's your date of birth? Type `DOB (day/month/year)
}

on *:text:*`DOB *:*:{
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick 11,1You already Made a Account! | halt }
if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick 11,1You didn't Make a Name! | halt }
if ($readini($nick $+ .ini,Register,DOB) == Yes) { Notice $nick 11,1You already selected your date of birth! | halt }
if ($chan != %ProfileChan) { halt }
if (fark isin $2-) { Notice $nick 4Please Reword It | halt }
if (/ isin $2-) { Notice $nick Please Reword it! | halt }
writeini $nick $+ .ini $nick DOB $2-
writeini $nick $+ .ini Register DOB Yes
Notice $nick 9,1Step 3. 11,1What's your gender? Type `Gender (your-gender)
}

on *:text:*`Gender *:*:{
if ($readini($nick $+ .ini,Register,Complete) == Yes) { Notice $nick 11,1You already Made a Account! | halt }
if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick 11,1You didn't Make a Name! | halt }
if ($readini($nick $+ .ini,Register,DOB) != Yes) { Notice $nick 11,1You didn't select your date of birth! | halt }
if ($readini($nick $+ .ini,Register,Gender) == Yes) { Notice $nick 11,1You already selected your gender! | halt }
if ($chan != %ProfileChan) { halt }
if (fark isin $2-) { Notice $nick 4Please Reword It | halt }
if (/ isin $2-) { Notice $nick Please Reword it! | halt }
writeini $nick $+ .ini $nick Gender $2-
writeini $nick $+ .ini Register Gender Yes
Notice $nick 11,1Your basic information are saved! You can not edit your basic information. Only edit the other information of your profile such as your hair color, eyes etc.. But now for your account safety, select a pssword for loging into your profile. Type /msg $me `Password (your-password)
}

on *:text:*`Password *:?:{
if ($readini($nick $+ .ini,Register,Name) != Yes) { Notice $nick 11,1Please Choose a Name `Name (Name) | halt }
if ($readini($nick $+ .ini,Register,DOB) != Yes) { Notice $nick 11,1Please Choose a Type `DOB (Type) | halt }
if (/ isin $2) { Notice $nick Please Reword it! | halt }
if ($ isin $2) { Notice $nick Please Reword it! | halt }
if ($readini($nick $+ .ini,Pass,Pass) == $null) {
if ($2 == $Null) { Notice $nick 11,1Please Type /msg $me `Password (Password) | halt }
Writeini $nick $+ .ini Pass Pass $2
Writeini $nick $+ .ini Register Complete Yes
Mode %ProfileChan +v $nick
Notice $nick 9,1Your Password is11,1 $2
Notice $nick 9,1Your Registration is Complete! Type `Help to get some help with editing or viewing your profile and the other futures of the ProfileWizard vol.2! Thanks for registering!
writeini $nick $+ .ini Pass Logged Yes
Halt
}
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Log in, By Typing /msg $Me `Login (your-password) | halt }
if ($2 == $Null) { Notice $nick 11,1Please Type /msg $me `Password (Password) | halt }
Writeini $nick $+ .ini Pass Pass $2
Mode %ProfileChan +v $nick
Notice $nick 11,1You Changed Your Password too9,1 $2
writeini $nick $+ .ini Pass Logged Yes
}

on *:text:*`Login *:?:{
if ($2 == $readini($nick $+ .ini,Pass,Pass)) {
Writeini $nick $+ .ini Pass Logged Yes
Notice $nick 11,1You have logged in! Type `Help fpr help!
Mode %ProfileChan +v $nick
Halt
}
}
on *:text:*`Logout:*: {
writeini $nick $+ .ini Pass Logged No
notice $nick 11,1You have now logged out
Mode %ProfileChan -v $nick
Halt
}

on *:join:#:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && (%ProfileChan == $Chan) { Notice $nick Welcome to %ProfileChan $+ ! You Have Not Registered with the Profile Wizard vol.2! Type `Register to start your profile!| halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) && (%ProfileChan == $Chan) { Notice $nick Welcome to %ProfileChan $+ ! You are Registered with the ProfileWizard vol.2! Type `Help for Help! | halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) {
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
}
}
on *:nick:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
Mode %ProfileChan -v $nick
}
on *:part:#:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
}
on *:Quit:{
if ($readini($nick $+ .ini,Register,Complete) != Yes) && ($readini($nick $+ .ini,Register,Name) == Yes) { Remove -b $Nick $+ .ini }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { halt }
writeini -n $nick $+ .ini Pass Logged No
}
on *:text:`EditProfile:#: {
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { notice $nick 11,You don't have a profile! Type `register to start up an account! | halt }
if ($readini($nick $+ .ini,Register,Complete) == Yes) { notice $nick 11,1These are the options you can add to your profile: 9,1EyesColor - HairColor - HairSize - HairStyle - Height - SkinColor - Nationality - Location - AboutMe - Interests 11,1[Favourite Stuff] 9,1MusicTypes - Artists - Song - MusicAlbum - Books - Movies - Quote 11,1Type `(topic) (what-you-want-to-write) For example `EyesColor Black | halt }
}


on *:text:*`EyesColor *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini Appearance EyesColor $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`HairColor *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini Appearance HairColor $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`HairSize *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini Appearance HairSize $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`HairStyle *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini Appearance HairStyle $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Height *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini Appearance Height $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`SkinColor *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini Appearance SkinColor $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Nationality *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini $nick Nationality $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Location *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini $nick Location $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`AboutMe *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini $nick AboutMe $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Interests *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini $nick Interests $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`MusicTypes *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff MusicTypes $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Artists *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff Artists $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Song *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff Song $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`MusicAlbum *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff MusicAlbum $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Books *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff Books $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Movies *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff Movies $2-
notice $nick 11,1Your info has been saved!
}

on *:text:*`Quote *:*:{
if ($chan != %ProfileChan) { halt }
if ($readini($nick $+ .ini,Register,Complete) != Yes) { Notice $nick 11,1You don't have an account! Type `register to create an account | halt }
if ($readini($nick $+ .ini,Pass,Logged) != Yes) { Notice $nick 11,1Please Login, By typing /msg $Me `Login (your-password) | halt }
writeini $nick $+ .ini FavouriteStuff Quote $2-
notice $nick 11,1Your info has been saved!
}

on *:text:`MyProfile:#: {
if ($readini($nick $+ .ini,Register,Complete) == Yes) {
msg $nick 11,1General Info:
msg $nick 9,1Name: 15,1 $readini($nick $+ .ini,$nick,name)
msg $nick 9,1Date Of Birth: 15,1 $readini($nick $+ .ini,$nick,DOB)
msg $nick 9,1Gender: 15,1 $readini($nick $+ .ini,$nick,Gender)
msg $nick 9,1Nationality: 15,1 $readini($nick $+ .ini,$nick,Nationality)
msg $nick 9,1Location: 15,1 $readini($nick $+ .ini,$nick,Location)
msg $nick 9,1About Me: 15,1 $readini($nick $+ .ini,$nick,AboutMe)
msg $nick 9,1Interests: 15,1 $readini($nick $+ .ini,$nick,interests)
msg $nick 11,1Appearance:
msg $nick 9,1Eyes Color: 15,1 $readini($nick $+ .ini,appearance,EyesColor)
msg $nick 9,1Hair Color: 15,1 $readini($nick $+ .ini,appearance,HairColor)
msg $nick 9,1Hair Size: 15,1 $readini($nick $+ .ini,appearance,HairSize)
msg $nick 9,1Hair Style: 15,1 $readini($nick $+ .ini,appearance,HairStyle)
msg $nick 9,1Height: 15,1 $readini($nick $+ .ini,appearance,height)
msg $nick 9,1Skin Color: 15,1 $readini($nick $+ .ini,appearance,SkinColor)
msg $nick 11,1Favourite...
msg $nick 9,1Music Types: 15,1 $readini($nick $+ .ini,FavouriteStuff,MusicTypes)
msg $nick 9,1Artists: 15,1 $readini($nick $+ .ini,FavouriteStuff,Artists)
msg $nick 9,1Song: 15,1 $readini($nick $+ .ini,FavouriteStuff,Song)
msg $nick 9,1Music Album: 15,1 $readini($nick $+ .ini,FavouriteStuff,MusicAlbum)
msg $nick 9,1Books: 15,1 $readini($nick $+ .ini,FavouriteStuff,Books)
msg $nick 9,1Movies: 15,1 $readini($nick $+ .ini,FavouriteStuff,Movies)
msg $nick 9,1Quote: 15,1 $readini($nick $+ .ini,FavouriteStuff,Quote)
}
}

on *:text:*`View *:#: {
if ($readini($2 $+ .ini,register,complete) != yes) { Notice $nick 9,1 $2 didn't register with ProfileWizard vol.2! | halt }
if ($readini($2 $+ .ini,register,complete) == yes) {
msg $nick 13,1 $2 's profile:
msg $nick 11,1General Info:
msg $nick 9,1Name: 15,1 $readini($2 $+ .ini,$2,name)
msg $nick 9,1Date Of Birth: 15,1 $readini($2 $+ .ini,$nick,DOB)
msg $nick 9,1Gender: 15,1 $readini($2 $+ .ini,$2,Gender)
msg $nick 9,1Nationality: 15,1 $readini($2 $+ .ini,$2,Nationality)
msg $nick 9,1Location: 15,1 $readini($2 $+ .ini,$2,Location)
msg $nick 9,1About Me: 15,1 $readini($2 $+ .ini,$2,AboutMe)
msg $nick 9,1Interests: 15,1 $readini($2 $+ .ini,$2,interests)
msg $nick 11,1Appearance:
msg $nick 9,1Eyes Color: 15,1 $readini($2 $+ .ini,appearance,EyesColor)
msg $nick 9,1Hair Color: 15,1 $readini($2 $+ .ini,appearance,HairColor)
msg $nick 9,1Hair Size: 15,1 $readini($2 $+ .ini,appearance,HairSize)
msg $nick 9,1Hair Style: 15,1 $readini($2 $+ .ini,appearance,HairStyle)
msg $nick 9,1Height: 15,1 $readini($2 $+ .ini,appearance,height)
msg $nick 9,1Skin Color: 15,1 $readini($2 $+ .ini,appearance,SkinColor)
msg $nick 11,1Favourite...
msg $nick 9,1Music Types: 15,1 $readini($2 $+ .ini,FavouriteStuff,MusicTypes)
msg $nick 9,1Artists: 15,1 $readini($2 $+ .ini,FavouriteStuff,Artists)
msg $nick 9,1Song: 15,1 $readini($2 $+ .ini,FavouriteStuff,Song)
msg $nick 9,1Music Album: 15,1 $readini($2 $+ .ini,FavouriteStuff,MusicAlbum)
msg $nick 9,1Books: 15,1 $readini($2 $+ .ini,FavouriteStuff,Books)
msg $nick 9,1Movies: 15,1 $readini($2 $+ .ini,FavouriteStuff,Movies)
msg $nick 9,1Quote: 15,1 $readini($2 $+ .ini,FavouriteStuff,Quote)

}
}

on *:text:`Help:#:{
Notice $nick 9,1Help Topics: 11,1Register - EditProfile - ViewProfile - Credits 9,1Type `Help (topic-here)
}

on *:text:*`Help *:#: {
if ($2 == Register) { Notice $nick 11,1Type `register to register | halt }
if ($2 == EditProfile) { Notice $nick 11,1You can edit your profile if you want! To see the options of what info you can add on your profile type `EditProfile | halt }
if ($2 == ViewProfile) { Notice $nick 11,1To view your own profile type `MyProfile. If you want to view somebody's else profile type `View (name-of-person) | halt }
if ($2 == Credits) { Notice $nick 11,1Profile Wizard(c) vol.2 was created by 9,1mystery 11,1(in some places mystery appears as mysterycool) For any problems, bugs etc.. contact me at rajiv_hurhangee@yahoo.gr or in IRC in irc.SurrealChat.net or irc.aXpi2.net at the channels #mystery. The Bot is protected with CopyRights - (c) 2007 | halt }
}

Comments

Sign in to comment.
carmellia   -  Mar 28, 2012
I was unable to get it to work for me, so am still looking for one like I had posted in the snippet requests.
 Respond  
penelope   -  Oct 31, 2011
Ok... I am coming back years later. Does anyone know if there's a profile script that writes to a hash table? I've looked, but can't find one. I'll keep searching, but in the meantime.. anyone?
 Respond  
Xale   -  Aug 26, 2009
Can this be set so that a person can create multiple profiles, and link them together to that one person?
 Respond  
Syele   -  Aug 25, 2009
Can someone help me use this without needing a password?
 Respond  
Fuzion   -  Aug 08, 2008
nice
 Respond  
cariad[ST]   -  May 08, 2008
I figured out how to get the `DOB to work: when entering the info type it as: day-month-year not day/month/year.

I just need to figure out how to get the bot to do it without it showing in all channels.

thank you for such a wonderful script.
 Respond  
cariad[ST]   -  May 07, 2008
I have one issue with this script and that is that it will not accept the `DOB as it is typed: ie: 03/05/68 or 03/may/1968 or 03/may/68

It says to type it: day/month/year and I have tried 3/may/68 and 03/may/68 and 3/may/1968 and 3/5/1968.

Please tell me what I am doing wrong.
 Respond  
mountaindew   -  Jan 26, 2008
well you can do /writeini -n

but it would be a lot better to use a hash table if you\'re going to have that many profiles
 Respond  
penelope   -  Jan 26, 2008
As an ini file can max out and become \'full\', is there a way to have this write to a text file so it will hold unlimited profiles??
 Respond  
Noutrious   -  Jun 17, 2007
http://www.hawkee.com/snippet/2225/
Already posted - You don\'t need to repost it only cuz it has 2.0 as score.
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.