Dome Dweller (re-porting)

[mssmsoft]

Ciao a tutti.
A pagina 89 del libro "Giochiamo con Commodore 64" l'autore cita il suo programma "Dome Dweller" scritto per BBC Micro.
Cercando in giro una versione per C64 mi sono imbattuto nel video su youtube in cui @1001avventura mostrava su emulatore la versione per BBC Micro.
Curioso, mi sono scaricato l'emulatore, l'immagine con il software e alla fine ho "dovuto" portare il gioco sul commodore 64. Ho cercato di portarlo il più fedelmente possibile, compatibilmente con le differenze dei due sistemi, specialmente per quanto riguarda l'audio.
Nel .d64 allegato trovate sia la versione originale in inglese che quella tradotta in italiano.
Istruzioni incluse.

[eregil]

Molto interessante. Faccio notare però che l'articolo che parla di Dome Dweller costituisce un'appendice al libro e non è a firma dello stesso autore del libro e dei suoi giochi. Lo stesso testo compare in appendice anche al successivo "Altri giochi per il Commodore 64" nella stessa collana.

L'ho voluto provare, ma credo che ci sia qualche bug: ad un certo punto ho tentato di acquistare 1000 unità di cibo a 2 dollari l'una ma dopo l'operazione mi sono ritrovato con 2000 unità in più. Il bug era presente nell'originale? Considera di ricontrollare il codice che gestisce ogni transazione, non si sa mai.

Grazie per il contributo.

[mssmsoft]

Hai ragione, l'autore del gioco è Tim Hartnell, il curatore dell'edizione inglese.
Cercando in rete ho trovato lo stesso testo di Tim Hartnell anche su un libro di programmi per VIC-20.

Per l'errore: io ho copiato il codice originale, quindi non so se è tutto corretto.
Di sicuro il programma non era esente da bug. Uno l'ho corretto perchè era macroscopico: quando la cupola viene attaccata si perde ossigeno e viene indicata la quantità fuoriuscita. Peccato che non veniva sottratta da quella stoccata.

Adesso controllo anche il resto 

[mssmsoft]

Confermo il bug. Ecco la funzione originale. Il problema è la riga 780 in cui viene sommato al cibo FOOD non la quantità acquistata C ma il prodotto tra la quantità acquistata e il prezzo FOODCOST.

Codice: [Seleziona]


700 DEF PROCfood
 710 PRINT CHR$(132);"Food costs $";FOODCOST;" per unit"
 720 PRINT CHR$(132);"Each dweller needs ";FOODNEED;" units a year."'
 730 PRINT CHR$(129);"($";FOODCOST*FOODNEED;" each, $";FOLK*FOODCOST*FOODNEED;" for dome)"
 732 f=INT(FOOD/(FOODNEED*FOLK))
 735 PRINTCHR$(129);"This will last ";f;
 737 PRINT" year";:IF f>1 PRINT"s" ELSE PRINT
 740 PRINT CHR$(129);"at the present population of ";FOLK
 750 PRINT' CHR$(130);"How many food units will you buy?"
 755 *FX15,0
 760 PRINTCHR$(130);:INPUT C
 765 IF C<0 THEN VDU7:GOTO 760
 770 IF C*FOODCOST>CASH PRINT CHR$(129);"You do not have enough money":VDU7:GOTO760
 780 FOOD=FOOD+C*FOODCOST
 790 CASH=CASH-C*FOODCOST
 800 PROCdrawline
 810 ENDPROC

Per i più curiosi ho allegato il listato completo di Dome Dweller in BBC BASIC.

[mssmsoft]

Ecco la versione con la correzione.
Nel basic ho evidenziato i due bug corretti rispetto alla versione originale.

[orion70]

Che meraviglia! "...giocando la sera tardi, da soli, resterete talmente presi da iniziare quasi a credere che là fuori ci sia una vera cupola la cui sopravvivenza dipende solo da voi..."

QUESTO è lo spirito di quei tempi, ragazzi