ALL MAPS Cheat (made by me) replacing button F25:
string descF25 = "Reload location - for CALLS";
void CalculateInfoDataF25()
{
totalInfo = descF25;
ref ch=getmaincharacter();
// -->
GiveItem2Character(ch,"map_LSC"
GiveItem2Character(ch,"map_bad"
GiveItem2Character(ch,"map_normal"
GiveItem2Character(ch,"map_bermudas"
GiveItem2Character(ch,"map_jam"
GiveItem2Character(ch,"map_cayman"
GiveItem2Character(ch,"map_barbados"
GiveItem2Character(ch,"map_TORTUGA"
GiveItem2Character(ch,"map_Curacao"
GiveItem2Character(ch,"map_martiniqua"
GiveItem2Character(ch,"map_dominica"
GiveItem2Character(ch,"map_trinidad"
GiveItem2Character(ch,"map_puerto"
GiveItem2Character(ch,"map_cuba"
GiveItem2Character(ch,"map_Pearl"
GiveItem2Character(ch,"map_hisp"
GiveItem2Character(ch,"map_nevis"
GiveItem2Character(ch,"map_guad"
GiveItem2Character(ch,"map_santa"
GiveItem2Character(ch,"map_antigua"
GiveItem2Character(ch,"map_terks"
GiveItem2Character(ch,"map_maine_1"
GiveItem2Character(ch,"map_maine_2"
GiveItem2Character(ch,"map_panama"
GiveItem2Character(ch,"map_cumana"
GiveItem2Character(ch,"map_full"
GiveItem2Character(ch,"map_part1"
GiveItem2Character(ch,"map_part2"
// <--
totalInfo = totalInfo + LanguageConvertString(idLngFile,"new_string" +
LanguageConvertString(idLngFile,"new_string" +
"...Skills added successfully!";
LanguageCloseFile(idLngFile);
SetFormatedText("INFO_TEXT",totalInfo);
}
ALSO BEST WEAPONS / ITEMS CHEAT replaces F27 button
string descF27 = "Best weapons";
void CalculateInfoDataF27()
{
totalInfo = descF27;
ref ch = GetMainCharacter();
// -->
GiveItem2Character(ch,"toporAZ"
GiveItem2Character(ch,"pistol7"
GiveItem2Character(ch,"cirass5"
GiveItem2Character(ch,"spyglass5"
aref arItm;
Items_FindItem("pistol7",&arItm);
arItm.chargespeed = 3;
arItm.dmg_min = 3250.0;
arItm.dmg_max = 6500.
// <--
totalInfo = totalInfo + LanguageConvertString(idLngFile,"new_string" +
LanguageConvertString(idLngFile,"new_string" +
"Best weapons added!";
LanguageCloseFile(idLngFile);
SetFormatedText("INFO_TEXT",totalInfo);
}
ALSO KINGS SHIP replaces F28 button
string descF28 = "Get the kings ship";
void CalculateInfoDataF28()
{
totalInfo = descF28;
ref mc = GetMainCharacter();
// -->
mc.Ship.Type = GenerateShip(SHIP_SOLEYRU, true);
SetBaseShipData(mc);
mc.Ship.Cannons.Type = CANNON_TYPE_CANNON_LBS42;
SetCrewQuantityFull(mc);
// <--
totalInfo = totalInfo + LanguageConvertString(idLngFile,"new_string" +
LanguageConvertString(idLngFile,"new_string" +
"King's ship created!";
LanguageCloseFile(idLngFile);
SetFormatedText("INFO_TEXT",totalInfo);
}
ALSO MAX CREW & SOME GOODS replaces F30 button
string descF30 = "Max Crew & Goods";
void CalculateInfoDataF30()
{
totalInfo = descF30;
ref mc = getmaincharacter();
// -->
SetCrewQuantityFull(mc);
SetCharacterGoods(mc,GOOD_FOOD,2000);
SetCharacterGoods(mc,GOOD_BALLS,2000);
SetCharacterGoods(mc,GOOD_GRAPES,300);
SetCharacterGoods(mc,GOOD_KNIPPELS,400);
SetCharacterGoods(mc,GOOD_BOMBS,2000);;
SetCharacterGoods(mc,GOOD_POWDER,2000);
SetCharacterGoods(mc,GOOD_PLANKS,400);
SetCharacterGoods(mc,GOOD_RUM,100);
SetCharacterGoods(mc,GOOD_WEAPON,2000);
// <--
totalInfo = totalInfo + LanguageConvertString(idLngFile,"new_string" +
LanguageConvertString(idLngFile,"new_string" +
"Command executed successfully!";
LanguageCloseFile(idLngFile);
SetFormatedText("INFO_TEXT",totalInfo);
}
ALL TOTEMS CHEAT replaces F6 button
string descF6 = "Give all totems";
void CalculateInfoDataF6()
{
idLngFile = LanguageOpenFile("ItemsDescribe.txt"
// -->
totalInfo = descF6;
ref mc = GetMainCharacter();
GiveItem2Character(mc,"totem_1"
GiveItem2Character(mc,"totem_2"
GiveItem2Character(mc,"totem_3"
GiveItem2Character(mc,"totem_4"
GiveItem2Character(mc,"totem_5"
GiveItem2Character(mc,"totem_6"
GiveItem2Character(mc,"totem_7"
GiveItem2Character(mc,"totem_8"
GiveItem2Character(mc,"totem_9"
GiveItem2Character(mc,"totem_10"
GiveItem2Character(mc,"totem_11"
GiveItem2Character(mc,"totem_12"
GiveItem2Character(mc,"totem_13"
GiveItem2Character(mc,"totem_14"
GiveItem2Character(mc,"totem_15"
// <
totalInfo = totalInfo + LanguageConvertString(idLngFile,"new_string" +
LanguageConvertString(idLngFile,"new_string" +
"Totems added successfully!";
LanguageCloseFile(idLngFile);
SetFormatedText("INFO_TEXT",totalInfo);
}
[Edited by FastPhoenix, 9/28/2009 2:37:18 PM]
[Edited by FastPhoenix, 9/29/2009 2:11:00 PM]