Author Topic: Title Levels (Read 4787 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