! Yet another wonderful script made by me, AbyssDragon.
! Here's how to make a strategy game like WarCraft. This little (yeah right)
! script lets you click on any chracter with the class Troop, and become him.
! The character you were controlling is dropped off just as he was!
! Insert this in you CONTROL.SCR at the very bottom of the part labelled:
! :VIEW_CLICK. Place it right above the STOP; at the bottom of this part.
! NOTE: You must have a chracter class of TROOP in your DCCTOKEN.DAT to use
! this.
  L2 = locate( npc, pointx, pointy );
  if success then
  L222 = npc.x;
  L223 = npc.y;
  if npc.class = troop then
  L101 = player.block;
  L102 = player.block2;
  L103 = player.class;
  L104 = player.type;
  L105 = player.weapon.damage;
  L106 = player.str;
  L107 = player.spd;
  L108 = player.dex;
  L109 = player.aim;
  L110 = player.hp;
  L111 = player.ac;
  L112 = player.pwr;
  L113 = player.mhp;
  L114 = player.mpwr;
  L115 = group.gold;
   if random(5) = 0 then
   writeln ( "At your command." );
   elsif random(5) = 1 then
   writeln ( "Whatever you say, my liege." );
   elsif random(5) = 2 then
   writeln ( "Yes, sire!" );
   elsif random(5) = 3 then
   writeln ( "I will obey!" );
   elsif random(5) = 4 then
   writeln ( "Yes, your majesty." );
   endif;
  teleport( 0, L222, L223 );
  L222 = player.x;
  L223 = player.y;
  player.block = npc.block;
  player.block2 = npc.block2;
  player.name = npc.name;
  player.class = npc.class;
  player.type = npc.type;
  player.str = npc.str;
  player.dex = npc.dex;
  player.spd = npc.spd;
  player.aim = npc.aim;
  player.hp = npc.hp;
  player.ac = npc.ac;
  player.iq = npc.iq;
  player.pwr = npc.pwr;
  player.mhp = npc.mhp;
  player.mpwr = npc.mpwr;
  player.weapon.damage = npc.weapon.damage;
  group.gold = npc.value;
  npc.x = L222;
  npc.y = L223;
  npc.block = L101;
  npc.block2 = L102;
  npc.class = L103;
  npc.type = L104;
  npc.weapon.damage = L105;
  npc.str = L106;
  npc.spd = L107;
  npc.dex = L108;
  npc.aim = L109;
  npc.hp = L110;
  npc.ac = L111;
  npc.pwr = L112;
  npc.mhp = L113;
  npc.mpwr = L114;
  npc.value = L115;
  endif;
  endif;
! THE END! Worship Me, Hahahahahahahaha!!!