From 1b59175d8d0a8a5392da8b183e0c603b0cd10865 Mon Sep 17 00:00:00 2001 From: "Eric S. Raymond" Date: Wed, 7 Jun 2017 15:00:16 -0400 Subject: [PATCH] Scoring code is fully translated to C. --- score.c | 22 ++++++++++------------ 1 file changed, 10 insertions(+), 12 deletions(-) diff --git a/score.c b/score.c index 3bf3ae0..f97cd46 100644 --- a/score.c +++ b/score.c @@ -110,18 +110,16 @@ void score(long mode) SETPRM(3,game.turns,game.turns); RSPEAK(262); for (i=1; i<=CLSSES; i++) { - if(CVAL[i] >= score) goto L20210; - } /* end loop */ - SPK=265; - goto L25000; - -L20210: SPEAK(CTEXT[i]); - SPK=264; - if(i >= CLSSES) goto L25000; - i=CVAL[i]+1-score; - SETPRM(1,i,i); - SPK=263; -L25000: RSPEAK(SPK); + if(CVAL[i] >= score) { + SPEAK(CTEXT[i]); + i=CVAL[i]+1-score; + SETPRM(1,i,i); + RSPEAK(263); + exit(0); + } + } + RSPEAK(265); + RSPEAK(264); exit(0); } -- 2.31.1