Arjey, Mana ichkarida o'yinining bir qismi. Taxminan 6 dan 1 qismi. Qani endi salbiy fikrlaganlar.
0 DIM X%(3)
1 X%(0)=10
2 X%(1)=83
3 X%(2)=156
10 DIM Y%(3)
11 Y%(0)=10
12 Y%(1)=83
13 Y%(2)=156
20 DIM QORARUYXAT%(9)
21 GELLOAD "g","file:///c:/predefgallery/predeffilereceived/basic/j/asl.jpg"
22 Z%=1
23 GELLOAD "g"+STR$(Z%),"file:///c:/predefgallery/predeffilereceived/basic/j/"+STR$(Z%)+".jpg"
24 Z%=Z%+1
25 IF Z%<10 THEN GOTO 23
83 QR%=0
84 QORARUYXAT%(QR%)=0
85 QR%=QR%+1
86 IF QR%<8 THEN GOTO 84
101 QORARUYXAT%(8)=9
103 N%=0
105 T%=ABS(RND(0))
110 A%=1+MOD(T%,8)
111 IFQ%=0
112 IF A%=QORARUYXAT%(IFQ%) THEN GOTO 105
113 IF A%=QORARUYXAT%(2) THEN GOTO 105
114 IFQ%=IFQ%+1
115 IF IFQ%<8 THEN GOTO 112
265 QORARUYXAT%(N%)=A%
270 N%=N%+1
280 IF N%<8 THEN GOTO 105
281 DIM M%(9)
285 GOTO 720
286 DRAWGEL "g"+STR$(QORARUYXAT%(0)),X%(0),Y%(0)
287 M%(0)=QORARUYXAT%(0)
300 DRAWGEL "g"+STR$(QORARUYXAT%(1)),X%(1),Y%(0)
305 M%(1)=QORARUYXAT%(1)
310 DRAWGEL "g"+STR$(QORARUYXAT%(2)),X%(2),Y%(0)
315 M%(2)=QORARUYXAT%(2)
320 DRAWGEL "g"+STR$(QORARUYXAT%(3)),X%(0),Y%(1)
325 M%(3)=QORARUYXAT%(3)
330 DRAWGEL