9 lines
252 B
Text
9 lines
252 B
Text
10 A = 768:L = 7
|
|
20 DATA 165,157,240,3
|
|
30 DATA 32,149,217,96
|
|
40 FOR I = A TO A + L
|
|
50 READ B: POKE I,B: NEXT
|
|
60 H = 256: POKE 12,A / H
|
|
70 POKE 11,A - PEEK (12) * H
|
|
80 DEF FN FA(N) = USR (N < 2) + N * FN FA(N - 1)
|
|
90 PRINT FN FA(4)
|