69 PRINTD1$"[153]WIEVIELE WOLLEN SIE BESTELLEN ?":PRINT"==> ";:ZA=0:GOSUB216:ME=VAL(A$):GOSUB17:ON-(ME=0)GOTO66:PR=P(Y2)*ME:IFKR(SP)+PR>5E5THENGOSUB18:GOTO68
70 PRINTD1$"[159]SIE HABEN EINEN KREDIT AUFGENOMMEN.":PRINT"H]HE:"PR"[157].-":KR(SP)=KR(SP)+PR:GOSUB299:BB%(Y2,SP)=ME:GOSUB14:DB%(Y2,SP)=3*(Y2+2)*ME:GOSUB17:GOTO66
190 GW=-3000-G2*8:PRINT"SIE VERLOREN BEI AKTIENSPEKULATIONEN... [159]"Z$(0);-GW"[157].-":GOTO209
191 ONABS(HE%(SP)<>1)GOTO192:PRINT"SIE LIESSEN SICH SCHEIDEN UND M^SSEN":PRINT"MONATLICH ALIMENTE ZAHLEN !":HE%(SP)=2:GOTO209
192 ON-(HE%(SP)=1)GOTO194:PRINT"WOLLEN SIE IN EINE REICHE FAMILIE EIN- HEIRATEN ? ";:GOSUB206:IFA$="J"THENGW=50*INT(G2/2):HE%(SP)=1:PRINT"[159]IHR MITGIFT BETR[GT:"GW"[157].-"
193 T%(SP)=0:GOTO209
194 PRINT"GRATULATION, SIE UND IHR EHEPARTNER":T%(SP)=T%(SP)+1:PRINT"SIND STOLZE ELTERN EINES KINDES.":GOTO209
195 PRINT"SIE FINDEN EINEN 10-MARK-SCHEIN !":KA(SP)=KA(SP)+10:GOTO209:PRINT"EIN FAHRKARTENGESCH[FT MUSSTE EINER FA- BRIK WEICHEN. [159]ENTSCH[DIGUNG:";:GW=G*500+1000:PRINTGW"[157].-":FG%(SP)=FG%(SP)-1:GOTO209
196 GW=G*500:PRINT"SIE WAREN BEIM PFERDERENNEN.[159]":PRINTZ$(1)GW"[157].-":GOTO209
197 GW=-(180000+G2*6)-(CX-15)*110000:PRINT"WOLLEN SIE EINEN "B$(CX-15)"N BUS F^R":PRINT"[157]";-GW"[157].- KAUFEN ? ";:GOSUB206:IFA$="N"THENGW=0:GOTO209
199 PRINT"BEI EINEM [160]UNWETTER WURDEN IHRE BUSSE":PRINT"SCHWER BESCH[DIGT.":FORA=0TO1:ZS%(A,SP)=ZS%(A,SP)-(G+5)*3:NEXTA:GOTO209
200 ON-(SH%(G,SP)=0)GOTO209:SH%(G,SP)=0:PRINT"ROWDIES ZERST]RTEN ALLE STATIONSH[USER AUF DER STRECKE "HA$(G):GOTO209
201 GW=8000*G:PRINT"SIE ZOGEN DEN HAUPT"Z$(1)"[157] IM LOTTO.":PRINT"[159]"Z$(1)GW"[157].-":GOTO209
202 IFGS%(0,SP)<4ORWD%(SP)<>0GOTO209
203 PRINT"EINE FIRMA BIETET IHNEN EINEN WERBEVER- TRAG AN. DAZU WERDEN ZWEI ";:D=INT(G/3)+1:PRINT"KURZE BUSSE BEN]TIGT. DAUER:"D"MONATE":PRINT"NEHMEN SIE AN ? ";:GOSUB206:IFA$="N"GOTO209
357 PRINT"[151]IHR"A$"[157][157]SKANDAL WURDE ENTDECKT !":PRINT"NACHZAHLUNG:"KO"[157].-":KA(SP)=KA(SP)-KO:AS%(SP)=AS%(SP)-SK%(SP)*7:IFAS%(SP)<0THENAS%(SP)=0