Jump to content

aliraj

Members
  • Posts

    1
  • Joined

  • Last visited

aliraj's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. aliraj

    PakCN Chat Network

    u all invited on www.pakcn.com
  2. im goona paste u a file, u just copy n paste in notepad n then upload it in ur script, when u will upload it, it will ask you that u want to protect ur mirc yes o no, u have to type " y " after that its will ask u ur password, enjoy urself on 1:load: { echo -a %b 15Password Protection Loaded! %b :start1 set %yes.or.no $?="Do you want your script to be password protected (y/n)" if (%yes.or.no == y) goto set1 elseif (%yes.or.no == n) { set %on.off OFF halt } elseif (%yes.or.no == $null) goto start1 :set1 set %on.off ON set %pass $?*="What do you want the password to be?" if (%pass == $null) goto set1 elseif (%pass != $null) { echo %c1 $+ Password has been successfully set as: %c2 $+ %pass halt } } on 1:start: { :start if (%yes.or.no == y) goto check if (%yes.or.no == n) halt elseif (%yes.or.no == $null) { set %yes.or.no $?="Do you want your script to be password protected (y/n)" if (%yes.or.no == y) goto set elseif (%yes.or.no == n) { set %on.off OFF halt } else goto start } :set set %on.off ON set %pass $?*="What do you want the password to be?" if (%pass == $null) goto set elseif (%pass != $null) { echo %c1 $+ Password has been successfully set to: %c2 $+ %pass halt } :check set %check.pass $?*="Enter the password:" if (%check.pass === %pass) { echo 14P15asswor14d A15ccepte14d halt } elseif (%check.pass === $null) goto check elseif (%check.pass != %pass) { set %check.pass $?*="Password incorrect. Try again:" if (%check.pass === %pass) { echo %c1 $+ Password Accepted $+ %c2 $+ ! halt } else exit } } alias passchange { .timer -m 1 1 timer_now } alias timer_now { change.pass } alias change.pass { if (%on.off == ON) { set %check.pass $?="Enter the old password" if (%check.pass === %pass) { :set1 set %pass $?*="Enter the new password" if (%pass == $null) goto set1 echo -a %c1 $+ Password has been successfully %c2 $+ changed %c1 $+ to: %c2 $+ %pass halt } elseif (%check.pass != %pass) { echo -a %c1 $+ Incorrect Password $+ %c2 $+ ! halt } } elseif (%on.off == OFF) { :start set %pass $$?*="Enter the new password" if (%pass == $null) goto start else { echo -a %c1 $+ Password has been successfully set to: %c2 $+ %pass set %on.off ON set %yes.or.no y halt } } } dialog apass { size -1 -1 300 200 title "Password Protection" button "Ok",1, 150 175 65 20, OK button "Cancel",2, 220 175 65 20, CANCEL box "",3, 5 5 285 160 text "Password Protection",4, 20 22 120 20 radio "On",5, 150 20 35 20, group radio "Off",6, 200 20 35 20 box "Settings",7, 10 50 275 100 text "Password:",8, 20 72 65 20 edit "",9, 90 70 80 20, autohs %pass button "Change",10, 190 70 60 20 text "Password Protection is created to only allow people who know your password to access IRC. This way lamers can't mess up anything you have created",11, 20 100 250 60 } on *:dialog:apass:edit:*: { if ($did == 9) { set %pass $did(9) } } on *:dialog:apass:sclick:*: { if ($did == 5) { .timer 1 0 set %yes.or.no y | did -e $dname 8,9,10 } if ($did == 6) { .timer 1 0 set %yes.or.no n | did -b $dname 8,9,10 } if ($did == 10) { passchange } } on *:dialog:apass:init:0: { if (%passs >= 1) { goto start } set %passs 0 inc %passs 1 if (%passs == 1) { startpass } :start did -o apass 9 1 %pass $did(9) did -b $dname 10 if (%yes.or.no == y) { did -c apass 5 1 %yes.or.no $did(5) | did -e $dname 8,9,10 } if (%yes.or.no == n) { did -c apass 6 1 %yes.or.no $did(6) | did -b $dname 8,9,10 } } alias startpass { .timer -m 1 1 startpass_now } alias startpass_now { set %yes.or.no $?="Do you want your script to be password protected? (y/n)" | if (%yes.or.no == y) { set %pass $?*="What do you want the password to be?" } | if (%yes.or.no == n) { did -b $dialog(apass) 8,9,10 | did -c $dialog(apass) 6 1 }
×
×
  • Create New...