...
 
Commits (2)
......@@ -8,6 +8,7 @@ Inst: $Id: install-xtrn.ini,v 1.1 2020/04/17 09:13:48 rswindell Exp $
[prog:DRUGLORD]
cmd = ?druglord.js
settings = XTRN_MULTIUSER
execution_ars = ANSI
required = true
!include install-json-service.ini
......
......@@ -8,6 +8,7 @@ Inst: $Id: install-xtrn.ini,v 1.1 2020/04/17 08:05:27 rswindell Exp $
[prog:FATFISH]
cmd = ?fatfish.js
settings = XTRN_MULTIUSER
execution_ars = ANSI
required = true
!include install-json-service.ini
......
......@@ -10,3 +10,4 @@ Inst: $Id: install-xtrn.ini,v 1.2 2020/04/17 09:20:20 rswindell Exp $
[prog:KNK]
cmd = ?knk.js
settings = XTRN_MULTIUSER
execution_ars = ANSI
......@@ -11,6 +11,7 @@ Inst: $Id: install-xtrn.ini,v 1.4 2020/04/21 04:41:22 rswindell Exp $
[prog:LORD]
cmd = ?lord
ars = NOT GUEST
execution_ars = ANSI
settings = XTRN_MULTIUSER
required = true
......@@ -36,4 +37,7 @@ prompt = Install LORD IGM: The Grab Bag
prompt = Install LORD IGM: Aragorn's Timer
[exec:lord.js +IGM oorphans/oorphans.js]
prompt = Install Olodrin's Orphanage
prompt = Install LORD IGM: Olodrin's Orphanage
[exec:lord.js +IGM pickle/pickle.js]
prompt = Install LORD IGM: Pickle's Magic Garden
This diff is collapsed.
# otherplacespickles
Other Places Pickles is an IGM for Lord 5.00 JS by
The Lizard Master
See LORD 5.00 JS Sysop.doc for installing this and other IGMs
In this IGM you find the Pickle Goddess and her magic pickle
garden. The magic pickles are stronger the higher you select
from the patch. You gain or lose a percentage of what you
have from a randomly selected trait. The trick to this is
you can keep eating stronger pickles, but the deck is stacked
in a Las Vegas slot machine way. On a long enough time line,
the house will win so as not to upset the balance of the game.
 
 111112222233333444445555566666777777888888999999
 111112222233333444445555566666777777888888999999
 111112222233333444445555566666777777888888999999
 111112222233333444445555566666777777888888999999
 PICKLE'S MAGIC GARDEN
\ No newline at end of file

 
۲ ۲
۲۰
۲۱
۲۲
۲

۲۲
۲
۱ ۰
۲۱ ۰
۲۲
۲۱ ۰
۲۲۲  
۲۱۲  
۲۱
  


\ No newline at end of file
function menu() {
sclrscr();
sln('');
sln('');
lln(' `5Welcome Other Places Pickles\'s!');
lln(' `2Home of the Pickle Goddess!');
sln('');
display_file(js.exec_dir+'pickle.ans');
more_nomail();
var runonce = false;
do {
sclrscr();
display_file(js.exec_dir+'garden.ans');
lln(' `5The Pickle Goddess has decided to allow you to');
lln(' `5pick a Pickle from her garden! But choose wisely,');
lln(' `5Not all are great choices! The higher you go,');
lln(' `5The more potent the pickle!');
if (runonce) { lln('\n`2Must be a choice from 1-9!'); }
lln('\n`2Which row would you like to pick from?');
sw(' ');
tempnum = parseInt(getstr(0, 0, 10, 0, 7, '', {integer:true}), 10);
runonce = true;
} while (isNaN(tempnum) || tempnum < 1 || tempnum > 10);
sclrscr();
sln('');
sln('');
var randNum = random(100) + 1;
var strType;
var strWhat;
var truncated;
var pctGainLost;
pctGainLost = '.0' + tempnum;
if (randNum >= 49) // Vegas slot machine odds, tilting to the house
strType='Bad'
else
strType='Good';
var randNum = random(10) + 1;
if (randNum == 1) {
strWhat='hit points';
truncated=parseInt(player.hp * parseFloat(pctGainLost));
if (strType=='Bad')
player.hp=player.hp-truncated;
else
player.hp=player.hp+truncated;
}
else if (randNum == 2) {
strWhat='max hitpoints';
truncated=parseInt(player.hp_max * parseFloat(pctGainLost));
if (strType=='Bad')
player.hp_max=player.hp_max-truncated;
else
player.hp_max=player.hp_max+truncated;
}
else if (randNum == 3) {
strWhat='forest fights';
truncated=parseInt(player.forest_fights * parseFloat(pctGainLost));
if (strType=='Bad')
player.forest_fights=player.forest_fights-truncated;
else
player.forest_fights=player.forest_fights+truncated;
}
else if (randNum == 4) {
strWhat='gold';
truncated=parseInt(player.gold * parseFloat(pctGainLost));
if (strType=='Bad')
player.gold=player.gold-truncated;
else
player.gold=player.gold+truncated;
}
else if (randNum == 5) {
strWhat='bank gold';
truncated=parseInt(player.bank * parseFloat(pctGainLost));
if (strType=='Bad')
player.bank=player.bank-truncated;
else
player.bank=player.bank+truncated;
}
else if (randNum == 6) {
strWhat='defense';
truncated=parseInt(player.def * parseFloat(pctGainLost));
if (strType=='Bad')
player.def=player.def-truncated;
else
player.def=player.def+truncated;
}
else if (randNum == 7) {
strWhat='strength';
truncated=parseInt(player.str * parseFloat(pctGainLost));
if (strType=='Bad')
player.str=player.str-truncated;
else
player.str=player.str+truncated;
}
else if (randNum == 8) {
strWhat='charm';
truncated=parseInt(player.cha * parseFloat(pctGainLost));
if (strType=='Bad')
player.cha=player.cha-truncated;
else
player.cha=player.cha+truncated;
}
else if (randNum == 9) {
strWhat='gems';
truncated=parseInt(player.gem * parseFloat(pctGainLost));
if (strType=='Bad')
player.gem=player.gem-truncated;
else
player.gem=player.gem+truncated;
}
else{
strWhat='des1';
truncated=1;
}
if (parseFloat(truncated) != 0) {
if (strType=='Good' && strWhat!='des1') {
lln(' `5This pickle is divine! Your '+strWhat+' increased by ' +truncated+'!');
truncated=parseInt(player.hp * parseFloat(pctGainLost));
}
else if (strType=='Bad' && strWhat!='des1'){
lln(' `5This pickle taste like poo! Your '+strWhat+' decreased by ' +truncated+'!');
truncated=parseInt(player.hp * parseFloat(pctGainLost));
}
else {
lln(' `5You have been marked by tattoo from the Pickle Goddess!');
player.des1='I have been tagged pwned by the Pickle Goddess!';
}
}
else
{
lln(' `5You were about to... ');
if (strType=='Good')
lw(' `5gain ');
else
lw(' `5lose ');
lln('something, but you do not have enough ' + strWhat + '!');
lln(' `5Come back later when you level up or have more stuff... ');
}
more_nomail();
exit(0);
}
// possible record changes: hp, hp_max, forest_fights, gold, bank, def, str, cha, gem, des1
menu();
......@@ -11,4 +11,5 @@ Inst: $Id: install-xtrn.ini,v 1.3 2020/04/21 04:41:44 rswindell Exp $
[prog:LORD2]
cmd = ?lord2
settings = XTRN_MULTIUSER
execution_ars = ANSI
required = true
......@@ -7,6 +7,7 @@ Inst: $Id: install-xtrn.ini,v 1.2 2020/04/17 09:22:37 rswindell Exp $
[prog:STARTREK]
cmd = ?startrek.js
settings = XTRN_MULTIUSER
required = true
!include install-json-service.ini
......
......@@ -7,5 +7,6 @@ Inst: $Id: install-xtrn.ini,v 1.1 2020/04/17 08:41:51 rswindell Exp $
[prog:TBD]
cmd = tbd%. /times=10
settings = XTRN_MULTIUSER|XTRN_NATIVE|XTRN_MODUSERDAT
execution_ars = ANSI
type = XTRN_SBBS
required = true