archives/open-adventure
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

More retrofitting.

Browse source
This commit is contained in:
Jason S. Ninneman 2017-06-11 11:58:12 -07:00
parent 3178f5d994
commit 15ff262d17
2 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
init.c
View file

@ -5,6 +5,7 @@
#include "advent.h"
#include "database.h"
#include "newdb.h"
/*
* Initialisation
@ -183,7 +184,7 @@ void initialise(void)
for (i=1; i<=LOCSIZ; i++) {
game.abbrev[i]=0;
if (!(LTEXT[i] == 0 || KEY[i] == 0)) {
if (!(long_location_descriptions[i] == 0 || KEY[i] == 0)) {
k=KEY[i];
if(MOD(labs(TRAVEL[k]),1000) == 1)COND[i]=2;
}
@ -218,7 +219,7 @@ void initialise(void)
* not yet found, so we know when to close the cave. */
game.tally=0;
for (i=MINTRS; i<=MAXTRS; i++) {
if(PTEXT[i] != 0)
if(object_descriptions[i].inventory != 0)
game.prop[i]= -1;
game.tally=game.tally-game.prop[i];
}

5
score.c
View file

@ -1,6 +1,7 @@
#include <stdlib.h>
#include "advent.h"
#include "database.h"
#include "newdb.h"
/*
* scoring and wrap-up
@ -33,7 +34,7 @@ void score(long mode)
/* First tally up the treasures. Must be in building and not broken.
* Give the poor guy 2 points just for finding each treasure. */
for (i=MINTRS; i<=MAXTRS; i++) {
if(PTEXT[i] != 0) {
if(object_descriptions[i].inventory != 0) {
k=12;
if(i == CHEST)k=14;
if(i > CHEST)k=16;
@ -109,7 +110,7 @@ void score(long mode)
RSPEAK(262);
for (i=1; i<=CLSSES; i++) {
if(CVAL[i] >= score) {
SPEAK(CTEXT[i]);
newspeak(class_messages[i]);
i=CVAL[i]+1-score;
SETPRM(1,i,i);
RSPEAK(263);