|
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 t
Length: 2162 (0x872) Types: TextFile Names: »trea.c«
└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987 └─⟦this⟧ »EUUGD18/General/Empire.V/V1.1/COMMANDS/trea.c«
#define D_UPDATE #define D_NATSTAT #define D_NEWSVERBS #define D_TRTYCLAUSE #define D_TRTSTR #define D_TCHRSTR #define D_FILES #include "empdef.h" trea() { register i, j, k; char *ctime(), *cname(); int a, b; long now; time(&now); for( i=0; gettre(i) != -1; i++ ) { if( trty.trt_cna == 0 ) continue; if( cnum != trty.trt_cna && cnum != -trty.trt_cna && cnum != trty.trt_cnb && cnum != -trty.trt_cnb && nstat != STAT_GOD ) continue; if( now > trty.trt_exp ) continue; printf("\n *** Empire Treaty #%d ***\n", i); if( trty.trt_cna < 0 || trty.trt_cnb < 0 ) { printf("(proposed)\n"); } trty.trt_cna = (trty.trt_cna < 0) ? -trty.trt_cna : trty.trt_cna; trty.trt_cnb = (trty.trt_cnb < 0) ? -trty.trt_cnb : trty.trt_cnb; printf("between %s and ", cname(trty.trt_cna)); printf("%s expires %s", cname(trty.trt_cnb), ctime(&trty.trt_exp)); printf("%10.10s terms ", cname(trty.trt_cna)); printf("%10.10s terms\n", cname(trty.trt_cnb)); j = 0; do { k = tchr[j].t_cond; b = trty.trt_bcond & k; a = trty.trt_acond & k; if( a != 0 || b != 0 ) { if( a != 0 ) { printf("%-20s", tchr[j].t_name); } else { printf("%20s", ""); } if( b != 0 ) { printf("%-20s\n", tchr[j].t_name); } else { printf("\n"); } } } while( ++j < 8 ); } return(NORM_RETURN); }