#if 0
    c++ -pipe -xc++ -fpermissive -w -o "${0%.*}".exe "$0" && ./"${0%.*}.exe" ; exit $?
#endif
#include "ptsvubas.cc"

BEGINBASIC(int,main,())
10 RANDOMIZE;
20 DIM A(16);
30 FOR I=0 TO 3;
40 LET A(I)=1+RND(6);
50 NEXT I;
60 FOR I=4 TO 11;
70 LET A(I)=0;
80 NEXT I;
90 PRINT "MI A NEGY TIPP",CHR$(0);
100 INPUT A(12),A(13),A(14),A(15);
110 FOR I=4 TO 7;
120 IF A(I-4)!=A(I+8) THEN 140;
130 LET A(I)=1;
140 NEXT I;
150 FOR I=0 TO 3;
160 FOR J=12 TO 15;
170 IF (A(I)!=A(J)) OR (I+12==J) THEN 200;
180 LET A(I+8)=1-A(I+4);
190 LET J=15;
200 NEXT J;
210 NEXT I;
220 LET B=A(4)+A(5)+A(6)+A(7);
230 LET C=A(8)+A(9)+A(10)+A(11);
240 PRINT "FEKETE: ", B, ", FEHER: ", C;
250 IF B<4 THEN 60;
260 PRINT "KITALALTAD, GRATULALOK!";
270 END;
ENDBASIC