|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T e
Length: 2207 (0x89f) Types: TextFile Names: »end.c«
└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987 └─⟦this⟧ »EUUGD18/X/Xmille/end.c«
# include "mille.h" /* * @(#)end.c 1.1 (Berkeley) 4/1/82 */ /* * print out the score as if it was final, and add the totals for * the end-of-games points to the user who deserves it (if any). */ finalscore(pp) reg PLAY *pp; { reg int temp, tot, num; num = pp - Player; for (tot = 4; tot <= 8; tot++) { InScore (tot, num, " 0 "); } if (pp->mileage == End) { InScore (4, num, " 400 "); tot = SC_TRIP; if (pp->nummiles[C_200] == 0) { InScore (5, num, " 300 "); tot = SC_TRIP + SC_SAFE; } if (Topcard <= Deck) { InScore (6, num, " 300 "); tot += SC_DELAY; } if (End == 1000) { InScore (7, num, " 200 "); tot += SC_EXTENSION; } if (Player[other(num)].mileage == 0) { InScore (8, num, " 500 "); tot += SC_SHUT_OUT; } pp->total += tot; pp->hand_tot += tot; } } # ifdef EXTRAP static int Last_tot[2]; /* last tot used for extrapolate */ /* * print out the score as if it was final, and add the totals for * the end-of-games points to the user who deserves it (if any). */ extrapolate(pp) reg PLAY *pp; { reg int x, num, tot, count; #ifdef NOTYET num = pp - Player; tot += SC_TRIP + SC_DELAY + SC_EXT; x = num * 6 + 21 + 3; for (tot = 5; tot <= 9; tot++) mvaddch(tot, x, '0'); x -= 2; pp = &Player[other(num)]; for (count = 0, tot = 0; tot < NUM_SAFE; tot++) if (pp->safety[tot] != S_PLAYED) count += SC_SAFE; mvprintw(3, x, "%3d", count); tot += count; if (count == 400) { mvaddstr(4, x, "30"); tot += SC_ALL_SAFE; } pp = &Player[num]; for (count = 0, tot = 0; tot < NUM_SAFE; tot++) if (pp->safety[tot] != S_PLAYED) count += SC_COUP / 10; mvprintw(4, x - 1, "%3d", count); tot += count; tot += 1000 - pp->mileage; mvaddstr(5, x, "40"); mvaddstr(7, x, "30"); mvaddstr(8, x, "20"); if (pp->nummiles[C_200] == 0) { mvaddstr(6, x, "30"); tot = SC_TRIP + SC_SAFE; } if (Player[other(num)].mileage == 0) { mvaddstr(9, x, "50"); tot += SC_SHUT_OUT; } pp->total += tot; pp->hand_tot += tot; Last_tot[num] = tot; #endif } undoex() { reg PLAY *pp; reg int i; i = 0; for (pp = Player; pp < &Player[2]; pp++) { pp->total -= Last_tot[i]; pp->hand_tot -= Last_tot[i++]; } } # endif