30 for j=0 to 1:n=joy(j):m=fire(j):k=pot(j)
40 if n and 1 then print j;"left"
50 if n and 2 then print j;"right"
60 if n and 4 then print j;"up"
70 if n and 8 then print j;"down"
80 print j;"fire=";m
90 print j;"pot=";k
100 next
110 goto 30
