X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=init.c;h=ba49245aeaa6521a060eab0a93dacc9dd04cc642;hb=67b8d38f5359ddee281289c7c6f3e4267f18985d;hp=b821a88b6f44d3574bb678c59a0355e58c916263;hpb=f89f63c6d1a6bc786febc8f22c3ecd8cd3f1f6ae;p=open-adventure.git diff --git a/init.c b/init.c index b821a88..ba49245 100644 --- a/init.c +++ b/init.c @@ -173,7 +173,8 @@ static int finish_init(void); static void quick_io(void); void initialise(void) { - printf("Initialising...\n"); + if (oldstyle) + printf("Initialising...\n"); if(!quick_init()){raw_init(); report(); quick_save();} finish_init(); } @@ -237,7 +238,7 @@ L1005: LINUSE=KK; if(LNLENG < LNPOSN)BUG(1); L1006: KK=KK+1; if(KK >= LINSIZ)BUG(2); - LINES[KK]=GETTXT(false,false,false,KK); + LINES[KK]=GETTXT(false,false,false); if(LINES[KK] != -1) goto L1006; LINES[LINUSE]=KK; if(LOC == OLDLOC) goto L1005; @@ -299,17 +300,14 @@ L1039: TRVS--; TRAVEL[TRVS]= -TRAVEL[TRVS]; TRVS++; /* Here we read in the vocabulary. KTAB(N) is the word number, ATAB(N) is * the corresponding word. The -1 at the end of section 4 is left in KTAB - * as an end-marker. The words are given a minimal hash to make deciphering - * the core-image harder. (We don't use gettxt's hash since that would force - * us to hash each input line to make comparisons work, and that in turn - * would make it harder to detect particular input words.) */ + * as an end-marker. */ L1040: J=10000; for (TABNDX=1; TABNDX<=TABSIZ; TABNDX++) { KTAB[TABNDX]=GETNUM(OPENED); if(KTAB[TABNDX] == -1) goto L1002; J=J+7; - ATAB[TABNDX]=GETTXT(true,true,true,0)+J*J; + ATAB[TABNDX]=GETTXT(true,true,true); } /* end loop */ BUG(4);