0 POKE19,1:FOR T=0TO3:PRINT"COL";T;": ";:INPUT C(T):PRINT:NEXT:POKE19,0:PRINT"[147]";
1 PRINT" [171]E)[146]AM[146]@D%[146][187][146][201][146]@[146]P[146]A[160]%[146][187][146][201][146][160]0[146]A[160]$[146][191][146]1[146][186][146]%[189][146]*[146]=[146]";
2 PRINT"@[192][146][176][146]?[201][146]A[176][146][175][201][146]B[208][146]C[204][201][146]D)[146]@E[146][190][146]%[146][189][146][202][202]0[146]GF[190][146]F[190][146][204]3D%[146]";
3 PRINT"[189][146][201][191][146]M[146][202]D$[146][191][146]1[146][186][146])@E[190][146]Q[146][186][146][206][146]@D-[146]@D[201][146][191][146][208][146]E)[146]CM[146]@D";
4 PRINT"[204][186][146]D)[146]AE[146][190][146]%[146][189][146][202][202]0[146]GF[190][146]F[190][146][204][167]D%[146][189][146][201][191][146]M[146][190]D$[146][191][146]1[146][186][146]";
5 PRINT")@E[190][146]Q[146][186][146][174][146]@D-[146]@D[201][146]D[208][146]E)[146]@M[146]@D[204][186][146]D)[146]BE[146][190][146]%[146][189][146][202][202]0[146]";
6 PRINT"GF[190][146]F[190][146][204][[146]D%[146][189][146][201][191][146]M[146]2[146]D$[146][191][146]1[146][186][146])@E[190][146]Q[146][186][146][174][146]@D-[146]@D";
7 PRINT"[201][146]D[208][146]E)[146]@M[146]@D[204][186][146]D)[146]CE[146][190][146]%[146][189][146][202][202]0[146]GF[190][146]F[190][146][204][207][146]D%[146][189][146][201][191][146]";
8 PRINT"M[146][166][146]D$[146][191][146]1[146][186][146])@E[190][146]Q[146][186][146][206][146]@D-[146]@D[201][146][191][146][208][146]E)[146]CM[146]@D-[146]@D";
9 PRINT"[176][146][212][201][146]A[176][146]8[201][146]B[176][146]\[166][146][191][146]%[146][191][146][201][146]H[208][146]Q)[146]@E[146][191][146]%[146][186][146]X[169][192]E[146][186][146]";
10 PRINT"%[146][187][146][169]AE[146][187][146][204][168]E[198][189][146][198][189][146]P[146]O)[146][192][146]E[146][189][146]%[146][186][146]X[169]HE[146][186][146]P[146]B[166][146][187][146]";
11 PRINT"[204][168]E[198][146][191][146]PQ)[146]GE[146][191][146]%[146][186][146]8[169][146][192]E[146][186][146]%[146][187][146][169][146]AE[146][187][146][204][168]EF[189][146]F[189][146]";
12 PRINT"P[146]O)[146]CE[146][189][146]%[146][186][146]8[169][146]HE[146][186][146]0[146]B[198][146][187][146][204]HD)[146]@M[146]![208][146]"CHR$(34)CHR$(34)"[157][146]";
13 PRINT"@)[146]R][146]@[196]][146]@[197]][146]@[198]][146]@[199])[146]C][146]@[216][146]][146]@[217][146]][146]@[218][146]][146]@[219][146][168][146][208][146][161][146]";
14 PRINT")[146]@E[146][186][146])[146][160]E[146][187][146] [146]@)[146]@Q[146][186][146][200][146][208][146][187][146][166][146][187][146]%[146][187][146][201][146]@[146][208][146][177][146]";
15 PRINT""CHR$(34)CHR$(34)"[157][146]@<[146][166][146]EJ[146])CY[146]@[192][146][168][146][160][146]P[208][146][178][146])[146]@E[146][188][146])[146]CE[146]";
16 PRINT"[189][146])[146]@E[146][191][146])[146] [146]E[146][186][146])[146][175]E[146][187][146])[146]V[146]M[146]@"CHR$(221)"[146])[146];M[146]Q[208][146]";
17 PRINT"-[146]V[208][146]IPM[146]V[208][146])[146]XM[146]X[208][146][160]@ABC@DHL@P 0@[192]@[146][192][146]ABC@-[146]          ";
18 POKE 1388,C(0):POKE1395,16*C(1):POKE1395,PEEK(1395)AND 240 OR C(2):POKE1408,C(3)
19 SYS 1024