4 mucchi di 20 stelle appariranno all'inizio della partita ed ogni giocatore può prendere tante stelle quante ne desidera; ma questo in un solo mucchio per volta. Quello che prende l'ultima stella perde.
20 screen 1: color 8,15: cls: key off
30 for i=1 to 4
40 locate 0,2*i: print i;" ********************"
45 rem graph e z
50 next i
60 t=0
70 dim f(4)
80 b=1
90 locate 0,12: print "giocatore ";b
100 print:input "linea :";l
110 print:imput "caselle :";c
120 if l>4 then 90
130 if c+f(l)>20 then 90
140 f(l)=f(l)+c
150 t=t+c
160 for j=f(l)-c to f(l)
170 locate 25-j,2*l: print " ": play "l64n70"
180 next j
190 b=b+1
200 if b=3 then b=1
210 if t<80 then 90
220 print"il giocatore";b;" VINCE":play "cge"