home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1994 #1
/
monster.zip
/
monster
/
BBS_GAME
/
LOD400E.ZIP
/
PROGRAMR.ZIP
/
MAKEDEV.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1994-03-01
|
130KB
|
4,805 lines
uses gtscott, globals,crt,setgen,make0;
const
numquest=16; { number of predefined quests }
numdev=264; { number of devices defined here }
devfilesize=350; { total number of records to be in devdef file }
devicedef: array[0..numdev] of devdeftype= (
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: radio;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Nil';
store: [];
cost: 0;
usable: false;
pic: 'NIL';
picnum: 0),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: radio;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Radio';
store: [supp];
cost: 1000;
usable: true;
pic: 'RADIO';
picnum: 15),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: lrscan;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'LR Scan';
store: [supp,town2];
cost: 32000;
usable: true;
pic: 'LRSCAN';
picnum: 2),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medkit;
useleft: 10;
maxuse: 10;
decuse: true;
name: 'MedKit';
store: [supp,basemed];
cost: 750;
usable: true;
pic: 'MEDKIT10';
picnum: 17),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medkit;
useleft: 15;
maxuse: 15;
decuse: true;
name: 'MedKit';
store: [supp,basemed];
cost: 1500;
usable: true;
pic: 'MEDKIT15';
picnum: 17),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medkit;
useleft: 25;
maxuse: 25;
decuse: true;
name: 'MedKit';
store: [supp,town2,town3,town4,town7,basemed];
cost: 5000;
usable: true;
pic: 'MEDKIT25';
picnum: 17),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medkit;
useleft: 50;
maxuse: 50;
decuse: true;
name: 'MedKit';
store: [supp,town2,town3,town4,town7,basemed];
cost: 10000;
usable: true;
pic: 'MEDKIT50';
picnum: 17),
(num: 0;
var1: 001003; {*** 0103}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Rolling Pin';
store: [];
cost: 350;
usable: false;
pic: 'RPIN';
picnum: 64),
(num: 0;
var1: 001003; {*** 0103}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Knife';
store: [weap];
cost: 350;
usable: false;
pic: 'KNIFE';
picnum: 4),
(num: 0;
var1: 002003; {*** 0203}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Dagger';
store: [weap];
cost: 500;
usable: false;
pic: 'DAGGER';
picnum: 28),
(num: 0;
var1: 002005; {*** 0205}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Sword';
store: [weap];
cost: 1000;
usable: false;
pic: 'SWORD';
picnum: 19),
(num: 0;
var1: 003007; {*** 0307}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'RazorLance';
store: [weap];
cost: 2100;
usable: false;
pic: 'LANCE';
picnum: 12),
(num: 0;
var1: 03004008; {*** 030408}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ElectroBlade';
store: [weap];
cost: 7500;
usable: false;
pic: 'EBLADE';
picnum: 27),
(num: 0;
var1: 03005010; {*** 030510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ElectroSword';
store: [weap,town2,town3];
cost: 20000;
usable: false;
pic: 'ESWORD';
picnum: 20),
(num: 0;
var1: 03006012; {*** 030612}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ElectroLance';
store: [weap,town3,town3];
cost: 40000;
usable: false;
pic: 'ELANCE';
picnum: 9),
(num: 0;
var1: 008016; {*** 0816}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Slicer-Dicer';
store: [town3];
cost: 50000;
usable: false;
pic: 'SDICER';
picnum: 33),
(num: 0;
var1: 04009018; {*** 040918}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'GravSword';
store: [town3];
cost: 100000;
usable: false;
pic: 'GSWORD';
picnum: 67),
(num: 0;
var1: 06010020; {*** 061020}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'WidowLance';
store: [town4];
cost: 125000;
usable: false;
pic: 'WLANCE';
picnum: 41),
(num: 0;
var1: 07014022; {*** 071422}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Sabre';
store: [weap,town2,town3];
cost: 250000;
usable: false;
pic: 'NSABRE';
picnum: 59),
(num: 0;
var1: 004007; {*** 0407}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'SlingShot';
store: [];
cost: 500;
usable: false;
pic: 'SLING';
picnum: 43),
(num: 0;
var1: 01006009; {*** 010609}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Crossbow';
store: [weaplr];
cost: 2100;
usable: false;
pic: 'CROSSBOW';
picnum: 30),
(num: 0;
var1: 02008011; {*** 020811}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Clip Pistol';
store: [weaplr,town2];
cost: 5000;
usable: false;
pic: 'PISTOL';
picnum: 32),
(num: 0;
var1: 02008011; {was 9-13}
var2: 8;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Uzi SMG';
store: [town2];
cost: 30000;
usable: false;
pic: 'UZI';
picnum: 5),
(num: 0;
var1: 03010017; {*** 031017}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phaser-1';
store: [weaplr];
cost: 20000;
usable: false;
pic: 'PHASER1';
picnum: 60),
(num: 0;
var1: 03012018; {*** 031218}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phaser-2';
store: [weaplr];
cost: 25000;
usable: false;
pic: 'PHASER2';
picnum: 61),
(num: 0;
var1: 03014020; {*** 031420}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phaser-3';
store: [weaplr,town2];
cost: 35000;
usable: false;
pic: 'PHASER3';
picnum: 62),
(num: 0;
var1: 03016022; {*** 031622}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Comp Blaster';
store: [weaplr];
cost: 40000;
usable: false;
pic: 'COMPBLST';
picnum: 63),
(num: 0;
var1: 017023; {*** 1723}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Torpx Cannon';
store: [town3];
cost: 55000;
usable: false;
pic: 'TORPX';
picnum: 40),
(num: 0;
var1: 04019025; {*** 041925}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'GravBlast';
store: [weaplr];
cost: 60000;
usable: false;
pic: 'GRAVBLST';
picnum: 1),
(num: 0;
var1: 05023030; {*** 052330}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'PlasmaBlast';
store: [weaplr];
cost: 150000;
usable: false;
pic: 'PBLAST';
picnum: 24),
(num: 0;
var1: 06025032; {*** 062532}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'WidowBlaster';
store: [town4];
cost: 200000;
usable: false;
pic: 'WBLAST';
picnum: 44),
(num: 0;
var1: 07025035; {*** 072535}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Rifle';
store: [weaplr];
cost: 250000;
usable: false;
pic: 'NEUTRIF';
picnum: 69),
(num: 0;
var1: 015030; {*** 1530}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: grenade;
useleft: 25;
maxuse: 25;
decuse: false;
name: 'Grenade Pack';
store: [weaplr,town2,town3];
cost: 20000;
usable: false;
pic: 'GRENADE';
picnum: 13),
(num: 0;
var1: 01;
var2: 20;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Crossbow bolts';
store: [ammo];
cost: 200;
usable: false;
pic: 'BOLTS';
picnum: 31),
(num: 0;
var1: 02;
var2: 20;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: '9mm ammo';
store: [ammo,town2];
cost: 800;
usable: false;
pic: '9MMAMMO';
picnum: 29),
(num: 0;
var1: 03;
var2: 35;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Power Pack';
store: [ammo,town2,town3,town4,Baseene];
cost: 3000;
usable: false;
pic: 'PPACK';
picnum: 23),
(num: 0;
var1: 03;
var2: 150;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Power Belt';
store: [ammo,baseene];
cost: 20000;
usable: false;
pic: 'BELT';
picnum: 57),
(num: 0;
var1: 04;
var2: 35;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'GravPack';
store: [ammo,baseene];
cost: 12000;
usable: false;
pic: 'GRAVPACK';
picnum: 54),
(num: 0;
var1: 05;
var2: 40;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'PlasmaPack';
store: [ammo,baseene];
cost: 17000;
usable: false;
pic: 'PLASPACK';
picnum: 51),
(num: 0;
var1: 06;
var2: 60;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'WidowPack';
store: [town4];
cost: 25000;
usable: false;
pic: 'WPACK';
picnum: 34),
(num: 0;
var1: 07;
var2: 80;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Pack';
store: [ammo,baseene];
cost: 50000;
usable: false;
pic: 'NPACK';
picnum: 56),
(num: 0;
var1: 0;
var2: 10;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 8;
maxuse: 8;
decuse: false;
name: 'Apron';
store: [];
cost: 175;
usable: false;
pic: 'APRON';
picnum: 65),
(num: 0;
var1: 0;
var2: 12;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 10;
maxuse: 10;
decuse: false;
name: 'Cheerldr Suit';
store: [];
cost: 200;
usable: false;
pic: 'CHEERLDR';
picnum: 26),
(num: 0;
var1: 0;
var2: 15;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 10;
maxuse: 10;
decuse: false;
name: 'Cloth';
store: [armr];
cost: 250;
usable: false;
pic: 'CLOTH';
picnum: 21),
(num: 0;
var1: 0;
var2: 20;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 20;
maxuse: 20;
decuse: false;
name: 'Leather';
store: [armr];
cost: 1000;
usable: false;
pic: 'LEATHER';
picnum: 3),
(num: 0;
var1: 0;
var2: 30;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 30;
maxuse: 30;
decuse: false;
name: 'Kevlar';
store: [armr,town2];
cost: 5000;
usable: false;
pic: 'KEVLAR';
picnum: 16),
(num: 0;
var1: 0;
var2: 35;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 100;
maxuse: 100;
decuse: false;
name: 'Laser-Resist';
store: [armr,town2];
cost: 25000;
usable: false;
pic: 'LASER';
picnum: 42),
(num: 0;
var1: flagarmorrecharge;
var2: 45;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 200;
maxuse: 200;
decuse: false;
name: 'PlasmaVest';
store: [armr];
cost: 100000;
usable: false;
pic: 'PVEST';
picnum: 46),
(num: 0;
var1: flagarmorrecharge;
var2: 60;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 500;
maxuse: 500;
decuse: false;
name: 'Energy Armor';
store: [town3,town4];
cost: 200000;
usable: false;
pic: 'ENARMR';
picnum: 47),
(num: 0;
var1: flagarmorrecharge;
var2: 65;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 600;
maxuse: 600;
decuse: false;
name: 'Widow Armor';
store: [town4];
cost: 250000;
usable: false;
pic: 'WARMR';
picnum: 48),
(num: 0;
var1: 1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medline;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Std Medline';
store: [armr];
cost: 15000;
usable: false;
pic: 'STDMED';
picnum: 100),
(num: 0;
var1: 5;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medline;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Adv Medline';
store: [armr];
cost: 50000;
usable: false;
pic: 'ADVMED';
picnum: 99),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rope;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Rope';
store: []; {supp}
cost: 250;
usable: true;
pic: 'ROPE';
picnum: 14),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rations;
useleft: 5;
maxuse: 5;
decuse: true;
name: 'Rations';
store: [supp,town2,town3,town4];
cost: 250;
usable: true;
pic: 'RATION5';
picnum: 18),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rations;
useleft: 10;
maxuse: 10;
decuse: true;
name: 'Rations';
store: [supp];
cost: 750;
usable: true;
pic: 'RATION10';
picnum: 18),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rations;
useleft: 20;
maxuse: 20;
decuse: true;
name: 'Rations';
store: [supp];
cost: 5000;
usable: true;
pic: 'RATION20';
picnum: 18),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rations;
useleft: 25;
maxuse: 25;
decuse: true;
name: 'GSRZ Rations';
store: [gsrz];
cost: 3000;
usable: true;
pic: 'GRATN25';
picnum: 68),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rations;
useleft: 50;
maxuse: 50;
decuse: true;
name: 'GSRZ Rations';
store: [gsrz];
cost: 6000;
usable: true;
pic: 'GRATN50';
picnum: 68),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: scanner;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scanner';
store: [supp,town2];
cost: 25000;
usable: true;
pic: 'SCANNER';
picnum: 25),
(num: 0;
var1: 0;
var2: 50;
x: 0;
y: 0;
z: 0;
devapp: stealth;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Stealth Field';
store: [supp,town2];
cost: 2000;
usable: true;
pic: 'STEALTH';
picnum: 8),
(num: 0;
var1: 2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Ghetto Blaster';
store: [];
cost: 250;
usable: true;
pic: 'GBLASTER';
picnum: 11),
(num: 0;
var1: 0;
var2: 50;
x: 0;
y: 0;
z: 0;
devapp: armorn;
useleft: 175;
maxuse: 175;
decuse: false;
name: 'Iron Plating';
store: [];
cost: 40000;
usable: false;
pic: 'IPLATING';
picnum: 37),
(num: 0;
var1: 0;
var2: 60;
x: 0;
y: 0;
z: 0;
devapp: armorn;
useleft: 250;
maxuse: 250;
decuse: false;
name: 'Steel Plating';
store: [];
cost: 50000;
usable: false;
pic: 'SPLATING';
picnum: 45),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: cyceye;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Cyclops Eye';
store: [];
cost: 500;
usable: false;
pic: 'CYCEYE';
picnum: 39),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: deathbadge;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Death Badge';
store: [];
cost: 5000;
usable: false;
pic: 'Dbadge';
picnum: 38),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: warper;
useleft: 5;
maxuse: 5;
decuse: True;
name: 'Warper';
store: [];
cost: 100000;
usable: true;
pic: 'WARPER';
picnum: 36),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Communicator';
store: [];
cost: 1000;
usable: true;
pic: 'COMMUN';
picnum: 49),
(num: 0;
var1: 25;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Windmill';
store: [basereact];
cost: 5000;
usable: false;
pic: 'BRWMILL';
picnum: 0),
(num: 0;
var1: 100;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Solar Cells';
store: [basereact];
cost: 25000;
usable: false;
pic: 'BRSCELL';
picnum: 0),
(num: 0;
var1: 135;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Solar Array';
store: [basereact];
cost: 40000;
usable: false;
pic: 'BRSARRAY';
picnum: 0),
(num: 0;
var1: 200;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fusion';
store: [basereact];
cost: 75000;
usable: false;
pic: 'BRFUSION';
picnum: 0),
(num: 0;
var1: 300;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Cold Fusion';
store: [basereact];
cost: 200000;
usable: false;
pic: 'BRCFUS';
picnum: 0),
(num: 0;
var1: 350;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Turbine';
store: [basereact];
cost: 300000;
usable: false;
pic: 'BRNTURB';
picnum: 0),
(num: 0; {obsolete}
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: comm;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Std. Comset';
store: [];
cost: 10000;
usable: false;
pic: 'BCOMSET';
picnum: 0),
(num: 0;
var1: 35;
var2: 35;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Energy Bars';
store: [basedef];
cost: 10000;
usable: false;
pic: 'BDEBARS';
picnum: 0),
(num: 0;
var1: 75;
var2: 75;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Energy Screen';
store: [basedef];
cost: 20000;
usable: false;
pic: 'BDESCRN';
picnum: 0),
(num: 0;
var1: 150;
var2: 150;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Energy Wall';
store: [basedef];
cost: 100000;
usable: false;
pic: 'BDEWALL';
picnum: 0),
(num: 0;
var1: 200;
var2: 200;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Zone';
store: [basedef];
cost: 250000;
usable: false;
pic: 'BDNZONE';
picnum: 0),
(num: 0;
var1: 005010; {*** 0510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Dirty Water';
store: [basemoat];
cost: 5000;
usable: false;
pic: 'BMDWATR';
picnum: 0),
(num: 0;
var1: 009012; {*** 0912}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Water/Aligater';
store: [basemoat];
cost: 15000;
usable: false;
pic: 'BMALIG';
picnum: 0),
(num: 0;
var1: 012015; {*** 1215}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Acid';
store: [basemoat];
cost: 30000;
usable: false;
pic: 'BMACID';
picnum: 0),
(num: 0;
var1: 014018; {*** 1418}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Flaming Acid';
store: [basemoat];
cost: 75000;
usable: false;
pic: 'BMFLAME';
picnum: 0),
(num: 0;
var1: 5010; {*** 510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'RoboPistol';
store: [baseweap];
cost: 10000;
usable: false;
pic: 'BWRPIST';
picnum: 0),
(num: 0;
var1: 7012; {*** 712}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'RoboCannon';
store: [baseweap];
cost: 20000;
usable: false;
pic: 'BWRCAN';
picnum: 0),
(num: 0;
var1: 010015; {*** 1015}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'RoboPhaser';
store: [baseweap];
cost: 60000;
usable: false;
pic: 'BWRPHAS';
picnum: 0),
(num: 0;
var1: 013020; {*** 1320}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'RoboGrav';
store: [baseweap];
cost: 150000;
usable: false;
pic: 'BWRGRAV';
picnum: 0),
(num: 0; {obsolete}
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: tele;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Teleporter';
store: [];
cost: 100000;
usable: false;
pic: 'BTSTD';
picnum: 0),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: laptop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Laptop';
store: [computer];
cost: 5000;
usable: true;
pic: 'LAPTOP';
picnum: 50),
(num: 0;
var1: 1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Notes';
store: [computer];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: AutoNav';
store: [computer];
cost: 25000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 4;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Transfer';
store: [computer];
cost: 55000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 8;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Rankings';
store: [computer];
cost: 750;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 16;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: ViewLog';
store: [computer];
cost: 750;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 32;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Em-Warp';
store: [];
cost: 60000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 64;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: FortList';
store: [computer];
cost: 1500;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 128;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Diet';
store: [computer];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 256;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: C-Stats';
store: [computer];
cost: 1000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 512;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: LR-Scan';
store: [computer];
cost: 75000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 1024;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Scanner';
store: [computer];
cost: 75000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 2048;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: TroyInfo';
store: [troydisk];
cost: 0;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 4096;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Commlink';
store: [];
cost: 0;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 8192;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Tetris';
store: [];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 16384;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Appraise';
store: [computer];
cost: 1500;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 32768;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: TCode';
store: [];
cost: 25000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: troysteakp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Troy''s Steaks';
store: [troysteak];
cost: 0;
usable: false;
pic: 'STEAK';
picnum: 58),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: troysteakp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'B.A.D. Device';
store: [];
cost: 0;
usable: false;
pic: 'BAD';
picnum: 55),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: recharge;
useleft: 3;
maxuse: 3;
decuse: true;
name: 'Recharger';
store: [supp];
cost: 250000;
usable: true;
pic: 'RECHRGE';
picnum: 66),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: pylonkey;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Pylon Key';
store: [town2];
cost: 5000;
usable: false;
pic: 'PKEY';
picnum: 70),
(num: 0;
var1: 50;
var2: 1000;
x: 0;
y: 0;
z: 0;
devapp: VortexBatt;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Vortex Cell';
store: [eeee];
cost: 150000;
usable: true;
pic: 'VORTCELL';
picnum: 76), {71}
(num: 0;
var1: 75;
var2: 1250;
x: 0;
y: 0;
z: 0;
devapp: VortexBatt;
useleft: 0;
maxuse: 1;
decuse: false;
name: 'Kralox Cell';
store: [eeee];
cost: 300000;
usable: true;
pic: 'KRALCELL';
picnum: 78), {72}
(num: 0;
var1: 90;
var2: 1500;
x: 0;
y: 0;
z: 0;
devapp: VortexBatt;
useleft: 0;
maxuse: 2;
decuse: false;
name: 'Vitron Cell';
store: [eeee];
cost: 800000;
usable: true;
pic: 'VITRCELL';
picnum: 77), {73}
(num: 0;
var1: 15;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medline;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Zilpox Medline';
store: [eeee];
cost: 130000;
usable: false;
pic: 'ZILMED';
picnum: 90),
(num: 0;
var1: 25;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: medline;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Stilzi Medline';
store: [eeee];
cost: 290000;
usable: false;
pic: 'STIMED';
picnum: 91),
(num: 0;
var1: 08030045; {*** 083045}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Pulse Rifle';
store: [eeee];
cost: 500000;
usable: false;
pic: 'PRIFLE';
picnum: 86),
(num: 0;
var1: 08035055; {*** 083555}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Pulse Bazooka';
store: [eeee];
cost: 750000;
usable: false;
pic: 'PBAZOO';
picnum: 89),
(num: 0;
var1: 08040055; {*** 084055}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Xenon''s Surprise';
store: [eeee];
cost: 1000000;
usable: false;
pic: 'XENON';
picnum: 119),
(num: 0;
var1: 08;
var2: 75;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Trivex Pack';
store: [eeee];
cost: 125000;
usable: false;
pic: 'TPACK';
picnum: 92),
(num: 0;
var1: 00045060; {*** 004560}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'DreamBlaster';
store: [];
cost: 2000000;
usable: false;
pic: 'DREAMBLA';
picnum: 114),
(num: 0;
var1: 00020025; {*** 002025}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'DreamSabre';
store: [];
cost: 1250000;
usable: false;
pic: 'DREAMSAB';
picnum: 74), {79}
(num: 0;
var1: flagarmorrecharge;
var2: 70;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 800;
maxuse: 800;
decuse: false;
name: 'DreamArmor';
store: [];
cost: 1250000;
usable: false;
pic: 'DREAMARM';
picnum: 071), {80}
(num: 0;
var1: 250;
var2: 250;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Dimensional Wall';
store: [basedef];
cost: 750000;
usable: false;
pic: 'BDDWALL';
picnum: 0),
(num: 0;
var1: 300;
var2: 300;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Vortex Barrier';
store: [basedef];
cost: 1000000;
usable: false;
pic: 'BDVBAR';
picnum: 0),
(num: 0;
var1: 350;
var2: 350;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Vitronic Shield';
store: [basedef];
cost: 2500000;
usable: false;
pic: 'BDVIT';
picnum: 0),
(num: 0;
var1: 020025; {*** 2025}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Energy Swamp';
store: [basemoat];
cost: 250000;
usable: false;
pic: 'BMESWAMP';
picnum: 0),
(num: 0;
var1: 018025; {*** 1825}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Torch';
store: [baseweap];
cost: 500000;
usable: false;
pic: 'BWNTORCH';
picnum: 0),
(num: 0;
var1: 022030; {*** 2230}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phase Cannon';
store: [baseweap];
cost: 1500000;
usable: false;
pic: 'BWPCAN';
picnum: 0),
(num: 0;
var1: 00025035; {*** 002535}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Cabal Sceptre';
store: [];
cost: 5000000;
usable: false;
pic: 'CABSCEP';
picnum: 73), {81}
(num: 0;
var1: 00050070; {*** 005070}
var2: flagweapburst+flagweapstun+flagweapacc3;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'TerrorBlast';
store: [];
cost: 12000000;
usable: false;
pic: 'TERBLAST';
picnum: 98),
(num: 0;
var1: flagarmorrecharge;
var2: 80;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 2000;
maxuse: 2000;
decuse: false;
name: 'Quantum Field';
store: [];
cost: 5000000;
usable: false;
pic: 'QFIELD';
picnum: 0), {Need a picture}
(num: 0;
var1: 09050065; {*** 095065}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Nuke-O-Matic';
store: [eeee];
cost: 1500000;
usable: false;
pic: 'NUKEO';
picnum: 103),
(num: 0;
var1: 07018025; {*** 071825}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fire Sabre';
store: [eeee];
cost: 600000;
usable: false;
pic: 'FSABRE';
picnum: 72), {84}
(num: 0;
var1: 09;
var2: 30;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Nuke Shell';
store: [eeee];
cost: 200000;
usable: false;
pic: 'NSHELL';
picnum: 94),
(num: 0;
var1: flagarmorrecharge;
var2: 75;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 999;
maxuse: 999;
decuse: false;
name: 'Phase Armor';
store: [eeee];
cost: 1500000;
usable: false;
pic: 'PHASEARM';
picnum: 97),
(num: 0;
var1: 00025030; {*** 002530}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'A-Mk.II';
store: [];
cost: 2000000;
usable: false;
pic: 'AMKII';
picnum: 96),
(num: 0;
var1: 00050065; {*** 005065}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'TachyonBlaster';
store: [];
cost: 2000000;
usable: false;
pic: 'TACHBLAS';
picnum: 93),
(num: 0;
var1: 0;
var2: 70;
x: 0;
y: 0;
z: 0;
devapp: stealth;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'EnviroBlur';
store: [];
cost: 60000;
usable: true;
pic: 'EVLUR';
picnum: 95),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: unitran;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Uni-Translator';
store: [];
cost: 50000;
usable: true;
pic: 'UTRAN';
picnum: 75), {90}
(num: 0;
var1: 00005020; {*** 000520}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Dumb Mine';
store: [eeee];
cost: 75000;
usable: true;
pic: 'DMINE';
picnum: 79),
(num: 0;
var1: 01005020; {*** 010520}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Smart Mine';
store: [eeee];
cost: 200000;
usable: true;
pic: 'SMINE';
picnum: 80),
(num: 0;
var1: 00015025; {*** 001525}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 5;
maxuse: 5;
decuse: false;
name: 'Day Ruiner';
store: [kill];
cost: 750000;
usable: true;
pic: 'DRMINE';
picnum: 83),
(num: 0;
var1: 01020035; {*** 012035}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 5;
maxuse: 5;
decuse: false;
name: 'MegaMine';
store: [kill];
cost: 2000000;
usable: true;
pic: 'MMINE';
picnum: 84),
(num: 0;
var1: 01050099; {*** 015099}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 2;
maxuse: 2;
decuse: false;
name: 'MicroNuke';
store: [kill];
cost: 5000000;
usable: true;
pic: 'NMINE';
picnum: 87),
(num: 0;
var1: 65536;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: History';
store: [];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 131072;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Windows';
store: [];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 262144;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Fortinv';
store: [];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0; {obsolete}
var1: 1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: tele;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Excelsior Teleporter';
store: [];
cost: 350000;
usable: false;
pic: 'BTEXC';
picnum: 0),
(num: 0;
var1: 524288;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Bartalk';
store: [];
cost: 5000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 400;
var2: 400;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Force Wall';
store: [basedef];
cost: 5000000;
usable: false;
pic: 'BDFORCE';
picnum: 0),
(num: 0;
var1: 450;
var2: 450;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Sonic Shield';
store: [basedef];
cost: 10000000;
usable: false;
pic: 'BDSONIC';
picnum: 0),
(num: 0;
var1: 500;
var2: 500;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Zone Shield';
store: [basedef];
cost: 15000000;
usable: false;
pic: 'BDZONE';
picnum: 0),
(num: 0;
var1: 550;
var2: 550;
x: 0;
y: 0;
z: 0;
devapp: deffield;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Black Globe';
store: [basedef];
cost: 25000000;
usable: false;
pic: 'BDGLOBE';
picnum: 0),
(num: 0;
var1: 030040; {*** 3040}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Disolver';
store: [basemoat];
cost: 1000000;
usable: false;
pic: 'BMDIS';
picnum: 0),
(num: 0;
var1: 040050; {*** 4050}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Charged Acid';
store: [basemoat];
cost: 5000000;
usable: false;
pic: 'BMCACID';
picnum: 0),
(num: 0;
var1: 050060; {*** 5060}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: moat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Neutron Swamp';
store: [basemoat];
cost: 10000000;
usable: false;
pic: 'BMNSWAMP';
picnum: 0),
(num: 0;
var1: 025035; {*** 2535}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Destructor';
store: [baseweap];
cost: 4000000;
usable: false;
pic: 'BWDEST';
picnum: 0),
(num: 0;
var1: 030040; {*** 3040}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bweap;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phaser Thrasher';
store: [baseweap];
cost: 10000000;
usable: false;
pic: 'BWTHRASH';
picnum: 0),
(num: 0;
var1: 500;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Hot Fusion';
store: [basereact];
cost: 1000000;
usable: false;
pic: 'BRHFUS';
picnum: 0),
(num: 0;
var1: 750;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: reactor;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Mass Energizer';
store: [basereact];
cost: 5000000;
usable: false;
pic: 'BRMASSE';
picnum: 0),
(num: 0; {obsolete}
var1: 2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: tele;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Transporter';
store: [];
cost: 20000000;
usable: false;
pic: 'BTTRANS';
picnum: 0),
(num: 0;
var1: 03020035; {*** 032035}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 5;
maxuse: 5;
decuse: false;
name: 'Zapper Mine';
store: [kill];
cost: 8000000;
usable: true;
pic: 'ZMINE';
picnum: 88),
(num: 0;
var1: 05020035; {*** 052035}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 5;
maxuse: 5;
decuse: false;
name: 'TeleMine';
store: [kill];
cost: 8000000;
usable: true;
pic: 'TMINE';
picnum: 85),
(num: 0;
var1: 07020035; {*** 072035}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 5;
maxuse: 5;
decuse: false;
name: 'Protector';
store: [kill];
cost: 15000000;
usable: true;
pic: 'PMINE';
picnum: 81),
(num: 0;
var1: 072035;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: boat;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'MiniRaft';
store: [supp,town2,town3];
cost: 50000;
usable: true;
pic: 'MRAFT';
picnum: 82),
(num: 0;
var1: 005020; {*** 0520}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Storm Force';
store: [];
cost: 1000;
usable: false;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mapper;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Mapper';
store: [kill];
cost: 6000000;
usable: true;
pic: '';
picnum: 118),
(num: 0;
var1: 1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rations;
useleft: 25;
maxuse: 25;
decuse: true;
name: 'Kelp Rations';
store: [];
cost: 3000;
usable: true;
pic: '';
picnum: 124),
(num: 0;
var1: 005012; {*** 0512}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Kelp Stinger';
store: [];
cost: 7500;
usable: false;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 0;
var2: 60;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 250;
maxuse: 250;
decuse: false;
name: 'Thick Weeds';
store: [];
cost: 100000;
usable: false;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: cryo;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Cryo-Unit';
store: [town7];
cost: 250000;
usable: true;
pic: '';
picnum: 113),
(num: 0;
var1: 109005010; {*** 1090510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Robomine 2';
store: [kill];
cost: 2000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 209005010; {*** 2090510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Robomine 3';
store: [kill];
cost: 4000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 309005010; {*** 3090510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Robomine 4';
store: [kill];
cost: 7000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 409005010; {*** 4090510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Robomine 5';
store: [kill];
cost: 11000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 509005010; {*** 5090510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Robomine 6';
store: [kill];
cost: 16000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 611020035; {*** 6112035}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Guardian';
store: [kill];
cost: 22000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 711005010; {*** 7110510}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Draku Mine';
store: [];
cost: 7000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 811020035; {*** 8112035}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mine;
useleft: 1;
maxuse: 1;
decuse: false;
name: 'Xeboc Mine';
store: [];
cost: 22000000;
usable: true;
pic: '';
picnum: 0), {need a picture}
(num: 0;
var1: 1048576;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: SPWeap';
store: [];
cost: 15000;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 010020; {*** 1020}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Frost Sceptre';
store: [];
cost: 125000;
usable: false;
pic: '';
picnum: 116),
(num: 0;
var1: 025032; {*** 2532}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Frost Cannon';
store: [];
cost: 200000;
usable: false;
pic: '';
picnum: 115),
(num: 0;
var1: flagarmorrecharge;
var2: 65;
x: 0;
y: 0;
z: 0;
devapp: armor;
useleft: 600;
maxuse: 600;
decuse: false;
name: 'Frost Vest';
store: [];
cost: 250000;
usable: false;
pic: '';
picnum: 104),
(num: 0;
var1: flagbgencomm;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fort Comset';
store: [basemsc];
cost: 10000;
usable: false;
pic: 'BCOMSET';
picnum: 0),
(num: 0;
var1: flagbgentele1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Teleporter';
store: [basemsc];
cost: 100000;
usable: false;
pic: 'BTSTD';
picnum: 0),
(num: 0;
var1: flagbgentele2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Excelsior Teleporter';
store: [basemsc];
cost: 350000;
usable: false;
pic: 'BTEXC';
picnum: 0),
(num: 0;
var1: flagbgentele3;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Transporter';
store: [basemsc];
cost: 20000000;
usable: false;
pic: 'BTTRANS';
picnum: 0),
(num: 0;
var1: flagbgencloak;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Bogus!';
store: [];
cost: 1000000;
usable: false;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgencloak+flagbgenreactor+flagbgenprox0;
var2: 150;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Defender Pack';
store: [basepack];
cost: 2500000;
usable: false;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgentele2+flagbgencomm;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Convenience Pack';
store: [basepack];
cost: 500000;
usable: false;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgentoll2+flagbgentele2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Profit Pack';
store: [basepack];
cost: 13000000;
usable: false;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgenspread3+flagbgenprox2+flagbgencloak+flagbgenfactory;
var2: 0; {linkfactory MegaMine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Hostility Pack';
store: [basepack];
cost: 22000000;
usable: false;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Dumb Mine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Dumb Mine';
store: [basefact];
cost: 225000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Smart Mine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Smart Mine';
store: [basefact];
cost: 225000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Day Ruiner}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Day Ruiner';
store: [basefact];
cost: 2250000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory MegaMine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: MegaMine';
store: [basefact];
cost: 6000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory MicroNuke}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: MicroNuke';
store: [basefact];
cost: 15000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Zapper Mine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Zapper Mine';
store: [basefact];
cost: 24000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory TeleMine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: TeleMine';
store: [basefact];
cost: 24000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Protector}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Protector';
store: [basefact];
cost: 45000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Robomine 2}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Robomine 2';
store: [basefact];
cost: 6000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Robomine 3}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Robomine 3';
store: [basefact];
cost: 12000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Robomine 4}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Robomine 4';
store: [basefact];
cost: 21000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Robomine 5}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Robomine 5';
store: [basefact];
cost: 33000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Robomine 6}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Robomine 6';
store: [basefact];
cost: 48000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Guardian}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Guardian';
store: [basefact];
cost: 66000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Draku Mine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Draku Mine';
store: [];
cost: 21000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenfactory;
var2: 0; {linkfactory Xeboc Mine}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: Xeboc Mine';
store: [];
cost: 66000000;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0; { - Unused - }
var1: flagbgenfactory;
var2: 0; {linkfactory}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: ';
store: [];
cost: 0;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0; { - Unused - }
var1: flagbgenfactory;
var2: 0; {linkfactory }
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: ';
store: [];
cost: 0;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0; { - Unused - }
var1: flagbgenfactory;
var2: 0; {linkfactory}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: ';
store: [];
cost: 0;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0; { - Unused - }
var1: flagbgenfactory;
var2: 0; {linkfactory }
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fact: ';
store: [];
cost: 0;
usable: false;
pic: 'BGFACT';
picnum: 0),
(num: 0;
var1: flagbgenwander;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Wanderer';
store: [basemsc];
cost: 99000000;
usable: false;
pic: 'BGWANDER';
picnum: 0),
(num: 0;
var1: flagbgenspread0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Mine Spreader R0';
store: [basemsc];
cost: 100000;
usable: false;
pic: 'BGSPREAD';
picnum: 0),
(num: 0;
var1: flagbgenspread1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Mine Spreader R1';
store: [basemsc];
cost: 500000;
usable: false;
pic: 'BGSPREAD';
picnum: 0),
(num: 0;
var1: flagbgenspread2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Mine Spreader R2';
store: [basemsc];
cost: 2500000;
usable: false;
pic: 'BGSPREAD';
picnum: 0),
(num: 0;
var1: flagbgenspread3;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Mine Spreader R3';
store: [basemsc];
cost: 12500000;
usable: false;
pic: 'BGSPREAD';
picnum: 0),
(num: 0;
var1: flagbgenprox0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Proximity Trip R0';
store: [basemsc];
cost: 100000;
usable: false;
pic: 'BGPROX';
picnum: 0),
(num: 0;
var1: flagbgenprox1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Proximity Trip R1';
store: [basemsc];
cost: 500000;
usable: false;
pic: 'BGPROX';
picnum: 0),
(num: 0;
var1: flagbgenprox2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Proximity Trip R2';
store: [basemsc];
cost: 2500000;
usable: false;
pic: 'BGPROX';
picnum: 0),
(num: 0;
var1: flagbgentoll0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Toll Station R0';
store: [basemsc];
cost: 500000;
usable: false;
pic: 'BGTOLL';
picnum: 0),
(num: 0;
var1: flagbgentoll1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Toll Station R1';
store: [basemsc];
cost: 2500000;
usable: false;
pic: 'BGTOLL';
picnum: 0),
(num: 0;
var1: flagbgentoll2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Toll Station R2';
store: [basemsc];
cost: 12500000;
usable: false;
pic: 'BGTOLL';
picnum: 0),
(num: 0;
var1: flagbgencloak;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Fortress SFG';
store: [basemsc];
cost: 100000;
usable: false;
pic: 'BGSFG';
picnum: 0),
(num: 0;
var1: flagbgenscan;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'UltraScan';
store: [basemsc];
cost: 50000;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgendevlock+flagbgenantisd+flagbgentele1+flagbgenreactor;
var2: 100;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Sacre Pack';
store: [];
cost: 1000000;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgendevlock+flagbgenantisd+flagbgentele3+flagbgenwander+flagbgenscav4;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Terra Labs Pack';
store: [];
cost: 1000000;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgendevlock+flagbgensell1;
var2: 0; {linkfactory}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Terra Seller A';
store: [];
cost: 1000000;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgendevlock+flagbgensell2;
var2: 0; {linkfactory}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Terra Seller B';
store: [];
cost: 1000000;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgendevlock+flagbgensell3;
var2: 0; {linkfactory}
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Terra Seller C';
store: [];
cost: 1000000;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: flagbgendevlock+flagbgenantisd;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Anti Self Destruct';
store: [basemsc];
cost: 1000000;
usable: true;
pic: 'BGANTISD';
picnum: 0),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: warper;
useleft: 25;
maxuse: 25;
decuse: True;
name: 'UltraWarper';
store: [];
cost: 1000000;
usable: true;
pic: '0';
picnum: 131),
(num: 0;
var1: 0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: recharge;
useleft: 10;
maxuse: 10;
decuse: true;
name: 'UltraCharger';
store: [];
cost: 1250000;
usable: true;
pic: '';
picnum: 129),
(num: 0;
var1: 0;
var2: 80;
x: 0;
y: 0;
z: 0;
devapp: stealth;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'UltraCloak';
store: [];
cost: 350000;
usable: true;
pic: '';
picnum: 130),
(num: 0;
var1: 1001;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: mappack;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Sacre Map';
store: [supp];
cost: 100;
usable: true;
pic: '';
picnum: 101),
(num: 0;
var1: 10080120;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'FortSlayer MK1';
store: [AcmeFort];
cost: 3000000;
usable: false;
pic: '';
picnum: 108),
(num: 0;
var1: 100100140;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'FortSlayer Deluxe';
store: [AcmeFort];
cost: 6000000;
usable: false;
pic: '';
picnum: 109),
(num: 0;
var1: 10;
var2: 1;
x: 0;
y: 0;
z: 0;
devapp: ammop;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'FortShell';
store: [AcmeFort];
cost: 1500000;
usable: false;
pic: '';
picnum: 107),
(num: 0;
var1: 02009013;
var2: 8;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'AK-47 9mm';
store: [AcmeWeap];
cost: 50000;
usable: false;
pic: 'AK47';
picnum: 7),
(num: 0;
var1: 02010015;
var2: 8;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'M-16 9mm';
store: [AcmeWeap];
cost: 70000;
usable: false;
pic: 'M16';
picnum: 6),
(num: 0;
var1: 2097152;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: rom;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'ROM: Weapsmith';
store: [Acmerom];
cost: 250;
usable: false;
pic: 'ROMDISK';
picnum: 53),
(num: 0;
var1: 00050065; {*** 005065}
var2: flagweapburst+flagweapstun+flagweapacc3;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'SLM-9000 PulseRay';
store: [];
cost: 10000000;
usable: false;
pic: 'SLM9000';
picnum: 126),
(num: 0;
var1: 03012018; {*** 031218}
var2: flagweapburst;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phaser Ripper';
store: [ACMEWeap];
cost: 110000;
usable: false;
pic: 'RIPPHAS';
picnum: 110),
(num: 0;
var1: 03014020; {*** 031420}
var2: flagweapacc3;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Phaser Sniper';
store: [ACMEWeap];
cost: 100000;
usable: false;
pic: 'SNPPHAS';
picnum: 111),
(num: 0;
var1: flagbgenscav0;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scavenger R0';
store: [BaseScav];
cost: 40000;
usable: false;
pic: 'BGSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scavenger R1';
store: [BaseScav];
cost: 100000;
usable: false;
pic: 'BGSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav2;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scavenger R2';
store: [BaseScav];
cost: 250000;
usable: false;
pic: 'BGSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav3;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scavenger R3';
store: [BaseScav];
cost: 625000;
usable: false;
pic: 'BGSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav4;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scavenger R4';
store: [BaseScav];
cost: 1562500;
usable: false;
pic: 'BGSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav5;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Scavenger R5';
store: [BaseScav];
cost: 3906250;
usable: false;
pic: 'BGSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav0+flagbgensmartscav;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Smart Scav R0';
store: [BaseScav];
cost: 50000;
usable: false;
pic: 'BGSMSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav1+flagbgensmartscav;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Smart Scav R1';
store: [BaseScav];
cost: 125000;
usable: false;
pic: 'BGSMSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav2+flagbgensmartscav;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Smart Scav R2';
store: [BaseScav];
cost: 312500;
usable: false;
pic: 'BGSMSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav3+flagbgensmartscav;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Smart Scav R3';
store: [BaseScav];
cost: 781250;
usable: false;
pic: 'BGSMSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav4+flagbgensmartscav;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Smart Scav R4';
store: [BaseScav];
cost: 1953125;
usable: false;
pic: 'BGSMSCAV';
picnum: 0),
(num: 0;
var1: flagbgenscav5+flagbgensmartscav;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: bgen;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Smart Scav R5';
store: [BaseScav];
cost: 4882812;
usable: false;
pic: 'BGSMSCAV';
picnum: 0),
(num: 0;
var1: 015020;
var2: flagweapstun;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Radiation Blast';
store: [];
cost: 0;
usable: false;
pic: '';
picnum: 0),
(num: 0;
var1: 03016022;
var2: flagweapburst+flagweapstun+flagweapuni;
x: 0;
y: 0;
z: 0;
devapp: rangeweapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Combat Phaser';
store: [AcmeWeap];
cost: 250000;
usable: false;
pic: 'CMBTPHAS';
picnum: 121),
(num: 0;
var1: 1;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Chaos Medallion';
store: [];
cost: 100;
usable: true;
pic: '';
picnum: 106),
(num: 0;
var1: 4;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Worthless Junk';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 123),
(num: 0;
var1: 5;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Loki Summoner';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 125),
(num: 0;
var1: 3;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Technical Tools';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 128),
(num: 0;
var1: 6;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Sonic Whistle';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 132),
(num: 0;
var1: 255;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Replicator';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: 254;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'MedGen';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: 253;
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: genobjapp;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Test-O-Matic';
store: [];
cost: 0;
usable: true;
pic: '';
picnum: 0),
(num: 0;
var1: 005020; {*** 0520}
var2: 0;
x: 0;
y: 0;
z: 0;
devapp: weapon;
useleft: 0;
maxuse: 0;
decuse: false;
name: 'Elemental Force';
store: [];
cost: 1000;
usable: false;
pic: '';
picnum: 0) {need a picture}
);
tdng: array[1..50] of word = (10, 0, 15,
15, 5, 45,
15, 30, 5,
5, 40, 12,
5, 100, 45,
5, 15, 0,
15, 20, 5,
5, 5, 5,
5, 5, 5,
5, 5, 5,
0, 0, 0,
0, 0, 0,
0, 0, 0,
0, 0, 0,
0, 0, 0,
0, 0, 0,
0, 0);
ttype: array[1..50] of string[11] = ('Plains', 'Impass. Mtn', 'Desert',
'Mountains', 'Road', 'Wastelands',
'River', 'Swamp', 'U-Pylon',
'D-Pylon', 'Radiation', 'Forrest',
'Hort. Stn.', 'Phsr Cache', 'Nuke Silo',
'Clone Cntr', 'Lake', 'Snow Mntn',
'Snow Plains', 'Snow Hills', 'Sacre Base',
'Freedom Cty', 'DW HQ', 'Widow Base',
'Draku HQ', 'Xeboc HQ', 'Frost Bite',
'Blood Lust', 'Town', 'EEEE Center',
'Comm Tower', 'Sett. Dome', 'Kill, Inc.',
'Wall', 'Floor', 'Lava River',
'Hut: ObiWan', 'Hut #2', 'Hut #3',
'Hut #4', 'Hut #5', 'Hut #6',
'Cave', 'Snow Cave', 'ACME Weapons',
'Loki City', 'Serp Camp', 'Cloud',
'??', '??');
terrain: array[1..50] of string[3] = ('--','MM','..','mm','||','ww',
'~~','""','/\','/\','rr','ff',
'HS','PC','NS','CC','~~','MM',
'--','mm','11','22','33','44',
'55','66','77','88','99','EE',
'CT', 'SD', 'KI',
'MM', '--', '%%',
'HT', 'HT', 'HT',
'HT', 'HT', 'HT',
'CV', 'CV', 'AW',
'LC', 'SC', 'CD',
'??', '??');
tcolor: array[1..50] of byte = (lightgreen,lightgray,yellow,
brown,white,lightgreen,
lightblue,lightcyan,lightred,
lightred,red,lightgreen,
green,yellow,yellow,
yellow,blue,white,
white,white,yellow,
yellow,yellow,yellow,
yellow,yellow,yellow,
yellow,yellow,yellow,
yellow,yellow,yellow,
blue,darkgray,lightred,
yellow,yellow,yellow,
yellow,yellow,yellow,
yellow,yellow,yellow,
yellow,yellow,white,
lightgray,lightgray);
tpassd: array[1..50] of tpass= (pass, imp, pass, pass, pass, pass,
water, pass, pass, pass, pass, pass,
pass, pass, pass, pass, water, imp,
pass, pass, pass, pass, pass, pass,
pass, pass, pass, pass, pass, pass,
pass, pass, pass, pass, pass, lava,
pass, pass, pass,
pass, pass, pass,
pass, pass, pass,
pass, pass, pass,
pass, pass);
quests: array[1..numquest] of questtype=
((award: 5000; {1 Get troy his steaks}
mask: 1;
pts: 1),
(award: 3000; {2 Find location of BW}
mask: 2;
pts: 1),
(award: 15000; {3 Get into Death Warrior city}
mask: 4;
pts: 1),
(award: 4000; {4 Play tetris game}
mask: 8;
pts: 1),
(award: 5000; {5 Find TADSU}
mask: 16;
pts: 1),
(award: 45000; {6 Fight Xeboc}
mask: 32;
pts: 1),
(award: 30000; {7 Fight Kirk}
mask: 64;
pts: 1),
(award: 50000; {8 Talk to Cabal Warrior}
mask: 128;
pts: 1),
(award: 25000; {9 Talk to spider droid}
mask: 256;
pts: 1),
(award: 5000; {10 Macroswift windows}
mask: 512;
pts: 1),
(award: 5000; {11 History}
mask: 1024;
pts: 1),
(award: 15000; {12 Kill, Inc}
mask: 2048;
pts: 1),
(award: 2000; {13 Freedom City}
mask: 4096;
pts: 1),
(award: 5000; {14 Killer Kelp}
mask: 8192;
pts: 1),
(award: 5000; {15 Spweap ROM}
mask: 16384;
pts: 1),
(award: 25000; {16 Loki cloud city}
mask: 32768;
pts: 1));
function finddev(s1: string): word;
var
a: word;
begin;
finddev:=0;
for a:=1 to numdev do if stu(devicedef[a].name)=s1 then finddev:=a;
end;
procedure linkfactory(s1,s2: string);
var
d1,d2: word;
begin;
d1:=finddev(stu(s1));
d2:=finddev(stu(s2));
if (d1=0) then begin;
writeln('Linkfactory: couldn''t find ',s1,^G^G);
end else if (d2=0) then begin;
writeln('Linkfactory: couldn''t find ',s2,^G^G);
end else begin;
devicedef[d1].var2:=d2;
end;
end;
var
a,b,c: word;
f2: file of devdeftype;
f3: file of terraintype;
f4: text;
t: terraintype;
d,d2: devdeftype;
f: file;
gtd: array[1..200] of string[12];
gtdcount: word;
s: string;
begin;
linkfactory('Hostility Pack','MegaMine');
linkfactory('Fact: Dumb Mine','Dumb Mine');
linkfactory('Fact: Smart Mine','Smart Mine');
linkfactory('Fact: Day Ruiner','Day Ruiner');
linkfactory('Fact: MegaMine','MegaMine');
linkfactory('Fact: MicroNuke','MicroNuke');
linkfactory('Fact: Zapper Mine','Zapper Mine');
linkfactory('Fact: TeleMine','TeleMine');
linkfactory('Fact: Protector','Protector');
linkfactory('Fact: Robomine 2','Robomine 2');
linkfactory('Fact: Robomine 3','Robomine 3');
linkfactory('Fact: Robomine 4','Robomine 4');
linkfactory('Fact: Robomine 5','Robomine 5');
linkfactory('Fact: Robomine 6','Robomine 6');
linkfactory('Fact: Guardian','Guardian');
linkfactory('Fact: Draku Mine','Draku Mine');
linkfactory('Fact: Xeboc Mine','Xeboc Mine');
linkfactory('Terra Seller A','Ultrawarper');
linkfactory('Terra Seller B','Ultracharger');
linkfactory('Terra Seller C','Ultracloak');
assign(f4,'GTDEVSTR.TXT');
reset(f4);
gtdcount:=0;
while not eof(f4) do begin;
readln(f4,s);
if (s<>'') and (s[1]<>';') then begin;
inc(gtdcount);
gtd[gtdcount]:=s;
end;
end;
close(f4);
assign(f4,'D:\TURBO\NEWGT\DEVRES.TXT');
rewrite(f4);
writeln(f4,'STRINGTABLE');
writeln(f4,'BEGIN');
for a:=1 to numdev do begin;
writeln(f4,' ',500+a,', "',devicedef[a].name,'"');
end;
writeln(f4,'END');
close(f4);
for a:=1 to numdev do if (devicedef[a].picnum=0) and (devicedef[a].name<>'') then begin;
c:=0;
s:=devicedef[a].name;
if length(s)>10 then s[0]:=#10;
for b:=1 to gtdcount do if s=gtd[b] then c:=b;
if c=0 then begin;
inc(gtdcount);
gtd[gtdcount]:=s;
c:=gtdcount;
end;
devicedef[a].picnum:=1000+c;
end;
assign(f2,'DEVICES.BIN');
rewrite(f2);
fillchar(d,sizeof(d),0);
d.name:='Nil';
for a:=0 to numdev do begin;
if a=0 then write(f2,d) else begin;
d2:=devicedef[a];
write(f2,d2);
end;
end;
for a:=numdev+1 to devfilesize do begin;
write(f2,d);
end;
close(f2);
assign(f4,'GTDEVSTR.TXT');
rewrite(f4);
writeln(f4,';_Maintained_ by MAKEDEV.PAS.');
for a:=1 to gtdcount do writeln(f4,gtd[a]);
close(f4);
assign(f4,'GTSTRS.DEF');
rewrite(f4);
writeln(f4,numstr);
for a:=1 to numstr do writeln(f4,stringdef[a]+'~');
writeln(f4,gtdcount);
for a:=1 to gtdcount do writeln(f4,gtd[a]);
close(f4);
assign(f3,'TERRAIN.BIN');
rewrite(f3);
fillchar(t,sizeof(t),0);
write(f3,t);
for a:=1 to 50 do begin;
t.dng:=tdng[a];
t.typ:=ttype[a];
t.map:=terrain[a];
t.clr:=tcolor[a];
t.pas:=tpassd[a];
write(f3,t);
end;
close(f3);
setgeneral;
general.numquest:=numquest;
assign(f,'MISC.BIN');
rewrite(f,1);
blockwrite(f,general,sizeof(general));
close(f);
assign(f,'QUEST.BIN');
rewrite(f,1);
for a:=1 to maxquest do begin;
b:=1;
for c:=1 to a-1 do b:=b*2;
quests[a].mask:=b;
blockwrite(f,quests[a],sizeof(quests[a]));
end;
end.
