ProfFileWizard vol. 2

By mysterycool on Dec 29, 2006

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|

Many more options added
You can have many things typed and not just one like the last edition
You must login to your account to edit it
Your account is Password-protected
The info of the users are stored in ini files which you can easily manage
Help file added
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 (Fuck 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 (Fuck 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 (Fuck 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 }
}
Like Page Follow Author
Comments

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
Storm2108 - Jul 07, 2007
Oh sorry tired didnt see it -_-
Respond
Storm2108 - Jul 07, 2007
Good job But maybe you should add a `view nickname So other people could view it :/ 5/10
Respond
mysterycool - Jun 17, 2007
Hey guys! SO here is y new snippet! I hope you like it! For any bugs, problems contact me here in the comments bar! Also if you have any suggesitons on how I can improve it please tell me! Er.. anyway.. that\'s for now.. So.. ENJOY!
Respond