Advertisement
Ford

Untitled

Feb 4th, 2013
206
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.00 KB | None | 0 0
  1. on *:LOAD: { /bbossetup }
  2.  
  3. menu channel {
  4.   Blood Bank System Online v1.6 (Beta) loaded!
  5. }
  6. ;
  7.  
  8. alias bbossetup {
  9.   var %x $$?="Enter the name you want to make administrator :"
  10.   writeini BBankAdmins.ini Admins %x 1600
  11.   set %bboscode $rand(1,9) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9)
  12.   writeini BBankAdmins.ini AdminsCode %x %bboscode
  13.   timer 1 2 echo -at Generating BBOS Code, please wait...
  14.   timer 1 3 echo -at 4BBOS setup code: $readini(BBankAdmins.ini,AdminsCode,%x)
  15.   var %y $$?="Installing Blood Bank Online System, please enter the code :"
  16.   :check
  17.   if (%y != %bboscode) {
  18.     echo -at Invalid code!
  19.     var %y $$?="Enter the code again:"
  20.     goto check
  21.   }
  22.   else {
  23.     timer 1 2 set %bbanktoken 0
  24.     timer 1 3 write BBankDB.ini BBOS Database
  25.     timer 1 4 set %tkbbank 123
  26.     timer 1 5 echo Please type /bbank to get syntax trigger(s).
  27.     timer 1 6 echo -at BBOS Installed successfully.
  28.     timer 1 7 echo -at BBOS v1.6 (Beta) [By Sagar] loaded successfully.
  29.   }
  30.   ;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement