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

Remove disused labels.

Browse source
This commit is contained in:
Jason S. Ninneman 2017-05-20 16:25:31 -07:00
parent 24988e250f
commit 45969e629a
6 changed files with 75 additions and 75 deletions
Download patch file Download diff file Expand all files Collapse all files

10
score.c
View file

@ -29,7 +29,7 @@ void score(long MODE) {
* POINTS CAN ALSO BE DEDUCTED FOR USING HINTS OR TOO MANY TURNS, OR FOR
* SAVING INTERMEDIATE POSITIONS. */
L20000: SCORE=0;
SCORE=0;
MXSCOR=0;
/* FIRST TALLY UP THE TREASURES. MUST BE IN BUILDING AND NOT BROKEN.
@ -80,8 +80,8 @@ L20020: MXSCOR=MXSCOR+45;
/* DEDUCT FOR HINTS/TURNS/SAVES. HINTS < 4 ARE SPECIAL; SEE DATABASE DESC. */
/* 20030 */ for (I=1; I<=HNTMAX; I++) {
L20030: if(HINTED[I])SCORE=SCORE-HINTS[I][2];
for (I=1; I<=HNTMAX; I++) {
if(HINTED[I])SCORE=SCORE-HINTS[I][2];
} /* end loop */
if(NOVICE)SCORE=SCORE-5;
if(CLSHNT)SCORE=SCORE-10;
@ -98,9 +98,9 @@ L20030: if(HINTED[I])SCORE=SCORE-HINTS[I][2];
SETPRM(1,SCORE,MXSCOR);
SETPRM(3,TURNS,TURNS);
RSPEAK(262);
/* 20200 */ for (I=1; I<=CLSSES; I++) {
for (I=1; I<=CLSSES; I++) {
if(CVAL[I] >= SCORE) goto L20210;
L20200: /*etc*/ ;
/*etc*/ ;
} /* end loop */
SPK=265;
goto L25000;