Author Topic: Title Levels (Read 2960 times)

Wanuarmi · « **on:** December 21, 2005, 10:09:29 am »

This will show info on Title Levels

!tl
!tl <1-7>
!tl <profession>

modules/TitleLevels.php

<?
$titleLevels = new TitleLevels($bot);

$commands["tell"]["tl"] = &$titleLevels;
$commands["pgmsg"]["tl"] = &$titleLevels;
$commands["gc"]["tl"] = &$titleLevels;


class TitleLevels
{
 var $bot;
 var $title_levels;


 function TitleLevels (&$bot)
 {
  $this -> bot = &$bot;
  $this -> title_levels = array(
  "TL1" => "Title Level 1 starts at Level 5, 5k IP per level",
  "TL2" => "Title Level 2 starts at Level 15, 10k IP per level",
  "TL3" => "Title Level 3 starts at Level 50, 20k IP per level",
  "TL4" => "Title Level 4 starts at Level 100, 40k IP per level",
  "TL5" => "Title Level 5 starts at Level 150, 80k IP per level",
  "TL6" => "Title Level 6 starts at Level 190, 150k IP per level",
  "TL7" => "Title Level 7 starts At Level 205, 600k IP per level"
  );
 }

 function tell($name, $msg)
 {
  $this -> bot -> send_tell($name, $this -> make_output($msg));
 }

 function pgmsg($name, $msg)
 {
  $this -> bot -> send_pgroup($this -> make_output($msg));
 }

 function gc($name, $msg)
 {
  $this -> bot -> send_gc($this -> make_output($msg));
 }

 function make_output($msg)
 {
  $title_levels = $this -> title_levels;
  $output = "<font color=CCInfoText><font color=CCInfoHeadline>::: Title Levels :::</font>\n";
  if (preg_match("/^" . $this -> bot -> commpre . "tl$/i", $msg))
  {
   $output .= "\n" . implode("\n", $title_levels);
   return "Title Levels :: " . $this -> bot -> make_blob("click to view", $output);
  }
  else if (preg_match("/^" . $this -> bot -> commpre . "tl ([1-7])$/i", $msg, $info))
   return $title_levels['TL'.$info[1]];
  else if (preg_match("/^" . $this -> bot -> commpre . "tl ad.*$/i", $msg))
   $show = "Adventurer";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl ag.*$/i", $msg))
   $show = "Agent";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl bu.*$/i", $msg))
   $show = "Bureaucrat";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl do.*$/i", $msg))
   $show = "Doctor";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl enf.*$/i", $msg))
   $show = "Enforcer";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl eng.*$/i", $msg))
   $show = "Engineer";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl fi.*$/i", $msg))
   $show = "Fixer";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl ke.*$/i", $msg))
   $show = "Keeper";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl ma.*$/i", $msg))
   $show = "Martial Artist";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl me.*$/i", $msg))
   $show = "Meta-Physicist";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl na.*$/i", $msg))
   $show = "Nano-Technician";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl sh.*$/i", $msg))
   $show = "Shade";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl so.*$/i", $msg))
   $show = "Soldier";
  else if (preg_match("/^" . $this -> bot -> commpre . "tl tra.*$/i", $msg))
   $show = "Trader";
  else
   return "Wrong syntax, please /tell <botname> <pre>help <pre>tl";
 
  if ($show == 'Adventurer')
  {
$output .= "\nAdventurer
TL1 Scout
TL2 Hunter
TL3 Preserver
TL4 Adventurer
TL5 Wanderer
TL6 Ranger
TL7 Vanguard";
  }
  else if ($show == 'Agent')
  {
$output .= "\nAgent
TL1 Informer
TL2 Spy
TL3 Agent
TL4 Assassin
TL5 Master Assasin
TL6 Grandmaster Assasin
TL7 Finalizer";
  }
  else if ($show == 'Bureaucrat')
  {
$output .= "\nBureaucrat
TL1 Clerk
TL2 Bureaucrat
TL3 Secretary
TL4 Manager
TL5 Minister
TL6 President
TL7 Dictator";
  }
  else if ($show == 'Doctor')
  {
$output .= "\nDoctor
TL1 Nurse
TL2 Medic
TL3 Doctor
TL4 Surgeon
TL5 Master Surgeon
TL6 Chief of Staff Surgery
TL7 Eternalist";
  }
  else if ($show == 'Enforcer')
  {
$output .= "\nEnforcer
TL1 Docker
TL2 Worker
TL3 Foreman
TL4 Union Man
TL5 Made Man
TL6 Don
TL7 Godfather";
  }
  else if ($show == 'Engineer')
  {
$output .= "\nEngineer
TL1 Techie
TL2 Mechanic
TL3 Engineer
TL4 Chief Engineer
TL5 Master Engineer
TL6 Nobel Prize Engineer
TL7 Supreme Creator";
  }
  else if ($show == 'Fixer')
  {
$output .= "\nFixer
TL1 Lifter
TL2 Thug
TL3 Embezzler
TL4 Fixer
TL5 Doer
TL6 The Man
TL7 Kingpin";
  }
  else if ($show == 'Keeper')
  {
$output .= "\nKeeper
TL1 Escort
TL2 Sentinel
TL3 Warden
TL4 Vigilante
TL5 Defender
TL6 Keeper
TL7 Savior";
  }
  else if ($show == 'Martial Artist')
  {
$output .= "\nMartial Artist
TL1 Initiate
TL2 Apprentice
TL3 Monk
TL4 Master 5th Dan
TL5 Master 10th Dan
TL6 Legend
TL7 Guru";
  }
  else if ($show == 'Meta-Physicist')
  {
$output .= "\nMeta-Physicist
TL1 Disciple
TL2 Devotee
TL3 Priest
TL4 Archdeacon
TL5 Spiritual Leader
TL6 Saint
TL7 Deity";
  }
  else if ($show == 'Nano-Technician')
  {
$output .= "\nNano-Technician
TL1 Novice
TL2 Apprentice
TL3 Initiate
TL4 Sorcerer
TL5 Techno-Mage
TL6 Techno-Wizard
TL7 Techno Arch-Wizard";
  }
  else if ($show == 'Shade')
  {
$output .= "\nShade
TL1 Haunt
TL2 Phantom
TL3 Shadow
TL4 Spectre
TL5 Vampire
TL6 Spirit
TL7 Lich";
  }
  else if ($show == 'Soldier')
  {
$output .= "\nSoldier
TL1 Militiaman
TL2 Mercenary
TL3 Soldier
TL4 Lieutenant
TL5 Colonel
TL6 General
TL7 Field Marshall";
  }
  else if ($show == 'Trader')
  {
$output .= "\nTrader
TL1 Courier
TL2 Salesman
TL3 Merchant
TL4 Board Member
TL5 CEO
TL6 Chairman and CEO
TL7 Mogul";
  }
  return "Title Levels :: " . $this -> bot -> make_blob("click to view", $output);
 }

}
?>

help/tl.txt

Code: [Select]

<font color=CCInfoHeader><pre>tl</font>
<font color=CCInfoText>Shows info on title levels.

<font color=CCInfoHeader><pre>tl &lt;1-7&gt;</font>
<font color=CCInfoText>Shows info on TL 1-7.

<font color=CCInfoHeader><pre>tl &lt;profession&gt;</font>
<font color=CCInfoText>Shows profession titles.

Naturalistic · « **Reply #1 on:** December 21, 2005, 03:41:33 pm »

That won't all fit onto 1 display screen. There's a display limit ( # of characters/words ) on new windows. I think it's 30 lines or something along that.

Why not !titlelevels <prof> instead, would lower the amount of lines.

IMO, having 2 pages just for titles is wasting resources when you can just make it one