Go Fish/Locomotive Basic: Difference between revisions
m
Fixed syntax highlighting.
(improved dealing and AI) |
m (Fixed syntax highlighting.) |
||
Line 1:
<
20 dim play(13),compu(13),deck(13),guess(13),poss(13),asked(13)
30 card$="A234567890JQK"
Line 128:
1280 sc=sc-deck(k)
1290 if sc<=0 then return
1300 next</
Note: 10's are called 0's here to get single-letter rank names.
|