Pascal İDDAA 2.5

CorsaiR · 11 Ağu 2007

İDDAA 2.5 oyunda 3 büyüğümüzde olmak üzere toplam 27 ünlü takım var,maçları skorboard dan izleyebiliyorsunuz ve ister tek ister 2 kişilik oynayabiliyorsunuz ve ekstra olarakta şifreler var NOT OYUNU DERLERKEN XP'DE VE TURBO PASCAL 7.1 DERLEYİN
(ŞİKAYETLERİNİZİ LÜTFEN [email protected] 'a yollayın)uses crt;
var
ch:char;
ad1,ad2,pp,takim1,takim2:string;
kpara,opara,gpara,gpara2,kpara2,opara2,borc,banka1,banka2,alacak1,alacak2:longint;
t,bs,ab,as,no,ber,bb,aa,a,b,x,y,oyun,sonuc,i,sec,akat,bkat,g,oyun2,aa2,bb2:byte;
banksa1,banksa2:byte;
begin clrscr;
randomize;
gotoxy(1,1);
begin
textcolor(red);
writeln('NOT:2 kisilikte ve sifreleri yeni takimlar g”zkmeden yazin');
textcolor(yellow);
writeln('SIFRELER-=-----------ISLEVLERI------------------');
writeln('1borc2 =1. oyuncudan 2. oyuncuya borc verir');
writeln('2borc1 =2. oyuncudan 1. oyuncuya borc verir');
writeln('1exit =1. oyuncu oyundan cikar');
writeln('2exit =2. oyuncu oyundan cikar');
writeln('exit =oyundan cikar');
writeln('banka1 =1. oyuncu bankadan 5 mac sonra 5 misli');
writeln(' ”demek sartiyla borc alir');
writeln('banka2 =2. oyuncu bankadan 5 mac sonra 5 misli');
writeln(' ”demek sartiyla borc alir');
writeln('bak =oyun oynarken girildiginde sifre toblosunu');
writeln(' ekrana getirir');
end;
textcolor(yellow);
gotoxy(25,16);
writeln(' SšRšM 2.5');
gotoxy(25,17);
writeln('-----------------------');
gotoxy(25,18);
writeln(' 1)TEK KISILIK');
gotoxy(25,19);
writeln(' 2)CIFT KISILIK');
gotoxy(25,20);
writeln('-----------------------');
gotoxy(25,21);
writeln('HADI DURMA SEC SEC!!!:');
t:=0;
g:=0;
banksa1:=18;
banksa2:=32;
gotoxy(48,21);
readln(sec);
clrscr;
if sec=1 then
begin
aa2:=0;
bb2:=0;
kpara:=1000;
repeat
gotoxy(1,1);
akat:=random(4)+2;
bkat:=random(4)+2;
as:=akat*20;
bs:=bkat*20;
ber:=round((akat+bkat)/2);
a:=random(26)+1;
b:=random(26)+1;
writeln('PARANIZ=',kpara);
if a=b then
b:=27;
case a of
1:begin write('Fenerbahce (1-',akat,') vs'); takim1:='FENER BAHCE'; end;
2:begin write('Dinamo keiv (1-',akat,') vs'); takim1:='DINAMO'; end;
3:begin write('Realmadrid (1-',akat,') vs'); takim1:='REALMADRID'; end;
4:begin write('Juventus (1-',akat,') vs'); takim1:='JUVENTUS'; end;
5:begin write('Besiktas (1-',akat,') vs'); takim1:='BESIKTAS'; end;
6:begin write('Barcelona (1-',akat,') vs'); takim1:='BARCELONA'; end;
7:begin write('Shaktar (1-',akat,') vs'); takim1:='SHAKTAR'; end;
8:begin write('Ajax (1-',akat,') vs'); takim1:='AJAX'; end;
9:begin write('Chelsa (1-',akat,') vs'); takim1:='CHELSEA'; end;
10:begin write('Galatasaray (1-',akat,') vs'); takim1:='GALATASARAY'; end;
11:begin write('Lazio (1-',akat,') vs'); takim1:='LAZIO'; end;
12:begin write('R.socidead (1-',akat,') vs'); takim1:='R.SOCIDEAD'; end;
13:begin write('M.unetd (1-',akat,') vs'); takim1:='M.UNETID'; end;
14:begin write('Inter (1-',akat,') vs'); takim1:='INTER'; end;
15:begin write('A.bilbago (1-',akat,') vs'); takim1:='A.BILBAGO'; end;
16:begin write('Bayern mun. (1-',akat,') vs'); takim1:='BAYERN MUN.'; end;
17:begin write('Gen‡ler b. (1-',akat,') vs'); takim1:='GENCLER B.'; end;
18:begin write('W.bremen (1-',akat,') vs'); takim1:='W.BREMEN'; end;
19:begin write('Dordmund (1-',akat,') vs'); takim1:='DORDMUND'; end;
20:begin write('Arsenal (1-',akat,') vs'); takim1:='ARSENAL'; end;
21:begin write('Newcastle (1-',akat,') vs'); takim1:='NEWCASTLE'; end;
22:begin write('Brimghamton (1-',akat,') vs'); takim1:='BRIMGHAMTON'; end;
23:begin write('Brug (1-',akat,') vs'); takim1:='BRUG'; END;
24:begin write('S.prag (1-',akat,') vs'); takim1:='S.PRAG'; end;
25:begin write('Olimpyacos (1-',akat,') vs'); takim1:='OLIMPYACOS'; end;
26:begin write('Roma (1-',akat,') vs'); takim1:='ROMA'; end;
end;
case b of
1:begin write(' Fenerbahce (1-',bkat,')'); takim2:='FENER BAHCE'; end;
2:begin write(' Dinamo keiv (1-',bkat,')'); takim2:='DINAMO'; end;
3:begin write(' Realmadrid (1-',bkat,')'); takim2:='REALMADRID'; end;
4:begin write(' Juventus (1-',bkat,')'); takim2:='JUVENTUS'; end;
5:begin write(' Besiktas (1-',bkat,')'); takim2:='BESIKTAS'; end;
6:begin write(' Barcelona (1-',bkat,')'); takim2:='BARCELONA'; end;
7:begin write(' Shaktar (1-',bkat,')'); takim2:='SHAKTAR'; end;
8:begin write(' Ajax (1-',bkat,')'); takim2:='AJAX'; end;
9:begin write(' Chelsa (1-',bkat,')'); takim2:='CHELSEA'; end;
10:begin write(' Galatasaray (1-',bkat,')'); takim2:='GALATASARAY'; end;
11:begin write(' Lazio (1-',bkat,')'); takim2:='LAZIO'; end;
12:begin write(' R.socidead (1-',bkat,')'); takim2:='R.SOCIDEAD'; end;
13:begin write(' M.unetd (1-',bkat,')'); takim2:='M.UNETID'; end;
14:begin write(' Inter (1-',bkat,')'); takim2:='INTER'; end;
15:begin write(' A.bilbago (1-',bkat,')'); takim2:='A.BILBAGO'; end;
16:begin write(' Bayern mun. (1-',bkat,')'); takim2:='BAYERN MUN.'; end;
17:begin write(' Gen‡ler b. (1-',bkat,')'); takim2:='GENCLER B.'; end;
18:begin write(' W.bremen (1-',bkat,')'); takim2:='W.BREMEN'; end;
19:begin write(' Dordmund (1-',bkat,')'); takim2:='DORDMUND'; end;
20:begin write(' Arsenal (1-',bkat,')'); takim2:='ARSENAL'; end;
21:begin write(' Newcastle (1-',bkat,')'); takim2:='NEWCASTLE'; end;
22:begin write(' Brimghamton (1-',bkat,')'); takim2:='BRIMGHAMTON'; end;
23:begin write(' Brug (1-',bkat,')'); takim2:='BRUG'; END;
24:begin write(' S.prag (1-',bkat,')'); takim2:='S.PRAG'; end;
25:begin write(' Olimpyacos (1-',bkat,')'); takim2:='OLIMPYACOS'; end;
26:begin write(' Roma (1-',bkat,')'); takim2:='ROMA'; end;
27:begin write(' Diyarbakr (1-',bkat,')'); takim2:='DIYARBAKIR'; end;
end;
aa:=0;
bb:=0;
writeln;
writeln;
writeln('EV SAHIBI ICIN (1)');
writeln('BERABERLIK ICIN (2)');
writeln('DEPLASMAN ICIN (3)');
writeln;
write('=======(1\2\3)====>');
readln(oyun);
write('NE KADAR YATIRACAKSINIZ=>');readln(opara);
if opara>kpara then
opara:=kpara;
writeln('!!!MA€I BASLAT!!!');
readln;
kpara:=kpara-opara;
for i:=1 to 90 do
begin
clrscr;
gotoxy(33,12);
writeln('------------');
gotoxy(33,13);
writeln(aa,'----',i,'----',bb);
gotoxy(33,14);
writeln('------------');
if (aa2=1) then
begin
gotoxy(33,15);
writeln('GOOOOLLLLL');
aa2:=0;
bb2:=0;
gotoxy(33,16);
writeln(takim1);
delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);
end;
if (bb2=1) then
begin
gotoxy(33,15);
writeln('GOOOOLLLLL');
aa2:=0;
bb2:=0;
gotoxy(33,16);
writeln(takim2);
delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);
end;
delay(9000);delay(9000);delay(9000);
x:=random(as)+1;
y:=random(bs)+1;
if i=45 then
begin
gotoxy(30,15);
writeln('2.YARIYI BASLAT!!!');
readln;
end;
if x=13 then
begin
aa:=aa+1;
aa2:=1;
end;
if y=13 then
begin
bb:=bb+1;
bb2:=1;
end;
end;
gotoxy(1,1);
if aa=bb then
begin
sonuc:=2;
writeln('MAC BERABERE BITTI');
if oyun=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara:=opara*ber;
writeln('GELEN PARA=',gpara);
kpara:=kpara+gpara;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara);
end;
end;
if aa>bb then
begin
sonuc:=1;
writeln(takim1,' YENDI');
if oyun=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara:=opara*akat;
writeln('GELEN PARA=',gpara);
kpara:=kpara+gpara;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara);
end;
end;
if aa<bb then
begin
sonuc:=3;
writeln(takim2,' YENDI');
if oyun=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara:=opara*bkat;
writeln('GELEN PARA=',gpara);
kpara:=kpara+gpara;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara);
end;
end;
write('Devam etmek istiyormusunuz(e\h):');readln(ch);
clrscr;
if kpara<=0 then
begin
writeln('šZGšNšZ PARANIZ BITTI');
readln;
exit;
end;
until ch='h';
end;
if sec=2 then
begin
kpara:=1000;
kpara2:=1000;
textcolor(green);
write('1.OYUNCUNUN ADI=');readln(ad1);
textcolor(white);
write('2.OYUNCUNUN ADI=');readln(ad2);
clrscr;
repeat
banksa1:=banksa1+1;
banksa2:=banksa2+2;
gotoxy(1,1);
akat:=random(4)+2;
bkat:=random(4)+2;
as:=akat*20;
bs:=bkat*20;
ber:=round((akat+bkat)/2);
a:=random(26)+1;
b:=random(26)+1;
if a=b then
b:=27;
textcolor(yellow);
case a of
1:begin write('Fenerbahce (1-',akat,') vs'); takim1:='FENER BAHCE'; end;
2:begin write('Dinamo keiv (1-',akat,') vs'); takim1:='DINAMO'; end;
3:begin write('Realmadrid (1-',akat,') vs'); takim1:='REALMADRID'; end;
4:begin write('Juventus (1-',akat,') vs'); takim1:='JUVENTUS'; end;
5:begin write('Besiktas (1-',akat,') vs'); takim1:='BESIKTAS'; end;
6:begin write('Barcelona (1-',akat,') vs'); takim1:='BARCELONA'; end;
7:begin write('Shaktar (1-',akat,') vs'); takim1:='SHAKTAR'; end;
8:begin write('Ajax (1-',akat,') vs'); takim1:='AJAX'; end;
9:begin write('Chelsa (1-',akat,') vs'); takim1:='CHELSEA'; end;
10:begin write('Galatasaray (1-',akat,') vs'); takim1:='GALATASARAY'; end;
11:begin write('Lazio (1-',akat,') vs'); takim1:='LAZIO'; end;
12:begin write('R.socidead (1-',akat,') vs'); takim1:='R.SOCIDEAD'; end;
13:begin write('M.unetd (1-',akat,') vs'); takim1:='M.UNETID'; end;
14:begin write('Inter (1-',akat,') vs'); takim1:='INTER'; end;
15:begin write('A.bilbago (1-',akat,') vs'); takim1:='A.BILBAGO'; end;
16:begin write('Bayern mun. (1-',akat,') vs'); takim1:='BAYERN MUN.'; end;
17:begin write('Gen‡ler b. (1-',akat,') vs'); takim1:='GENCLER B.'; end;
18:begin write('W.bremen (1-',akat,') vs'); takim1:='W.BREMEN'; end;
19:begin write('Dordmund (1-',akat,') vs'); takim1:='DORDMUND'; end;
20:begin write('Arsenal (1-',akat,') vs'); takim1:='ARSENAL'; end;
21:begin write('Newcastle (1-',akat,') vs'); takim1:='NEWCASTLE'; end;
22:begin write('Brimghamton (1-',akat,') vs'); takim1:='BRIMGHAMTON'; end;
23:begin write('Brug (1-',akat,') vs'); takim1:='BRUG'; END;
24:begin write('S.prag (1-',akat,') vs'); takim1:='S.PRAG'; end;
25:begin write('Olimpyacos (1-',akat,') vs'); takim1:='OLIMPYACOS'; end;
26:begin write('Roma (1-',akat,') vs'); takim1:='ROMA'; end;
end;
case b of
1:begin write(' Fenerbahce (1-',bkat,')'); takim2:='FENER BAHCE'; end;
2:begin write(' Dinamo keiv (1-',bkat,')'); takim2:='DINAMO'; end;
3:begin write(' Realmadrid (1-',bkat,')'); takim2:='REALMADRID'; end;
4:begin write(' Juventus (1-',bkat,')'); takim2:='JUVENTUS'; end;
5:begin write(' Besiktas (1-',bkat,')'); takim2:='BESIKTAS'; end;
6:begin write(' Barcelona (1-',bkat,')'); takim2:='BARCELONA'; end;
7:begin write(' Shaktar (1-',bkat,')'); takim2:='SHAKTAR'; end;
8:begin write(' Ajax (1-',bkat,')'); takim2:='AJAX'; end;
9:begin write(' Chelsa (1-',bkat,')'); takim2:='CHELSEA'; end;
10:begin write(' Galatasaray (1-',bkat,')'); takim2:='GALATASARAY'; end;
11:begin write(' Lazio (1-',bkat,')'); takim2:='LAZIO'; end;
12:begin write(' R.socidead (1-',bkat,')'); takim2:='R.SOCIDEAD'; end;
13:begin write(' M.unetd (1-',bkat,')'); takim2:='M.UNETID'; end;
14:begin write(' Inter (1-',bkat,')'); takim2:='INTER'; end;
15:begin write(' A.bilbago (1-',bkat,')'); takim2:='A.BILBAGO'; end;
16:begin write(' Bayern mun. (1-',bkat,')'); takim2:='BAYERN MUN.'; end;
17:begin write(' Gen‡ler b. (1-',bkat,')'); takim2:='GENCLER B.'; end;
18:begin write(' W.bremen (1-',bkat,')'); takim2:='W.BREMEN'; end;
19:begin write(' Dordmund (1-',bkat,')'); takim2:='DORDMUND'; end;
20:begin write(' Arsenal (1-',bkat,')'); takim2:='ARSENAL'; end;
21:begin write(' Newcastle (1-',bkat,')'); takim2:='NEWCASTLE'; end;
22:begin write(' Brimghamton (1-',bkat,')'); takim2:='BRIMGHAMTON'; end;
23:begin write(' Brug (1-',bkat,')'); takim2:='BRUG'; END;
24:begin write(' S.prag (1-',bkat,')'); takim2:='S.PRAG'; end;
25:begin write(' Olimpyacos (1-',bkat,')'); takim2:='OLIMPYACOS'; end;
26:begin write(' Roma (1-',bkat,')'); takim2:='ROMA'; end;
27:begin write(' Diyarbakr (1-',bkat,')'); takim2:='DIYARBAKIR'; end;
end;
aa:=0;
bb:=0;
writeln;
writeln;
if banksa1=5 then
kpara:=kpara-alacak1;
if banksa2=5 then
kpara2:=kpara2-alacak2;
writeln('EV SAHIBI ICIN (1)');
writeln('BERABERLIK ICIN (2)');
writeln('DEPLASMAN ICIN (3)');
writeln;
if t<2 then
begin
textcolor(green);
writeln(ad1);
writeln('PARANIZ=',kpara);
write('=======(1\2\3)====>');
readln(oyun);
write('NE KADAR YATIRACAKSINIZ=>');readln(opara);
end;
writeln;
textcolor(white);
if g<2 then
begin
writeln(ad2);
writeln('PARANIZ=',kpara2);
write('=======(1\2\3)====>');
readln(oyun2);
write('NE KADAR YATIRACAKSINIZ=>');readln(opara2);
end;
textcolor(yellow);
if opara>kpara then
opara:=kpara;
if opara2>kpara2 then
opara2:=kpara2;
writeln('!!!MA€I BASLAT!!!');
readln;
kpara:=kpara-opara;
kpara2:=kpara2-opara2;
for i:=1 to 90 do
begin
clrscr;
gotoxy(33,12);
writeln('------------');
gotoxy(33,13);
writeln(aa,'----',i,'----',bb);
gotoxy(33,14);
writeln('------------');
if (aa2=1) then
begin
gotoxy(33,15);
writeln('GOOOOLLLLL');
aa2:=0;
bb2:=0;
gotoxy(33,16);
writeln(takim1);
delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);
end;
if (bb2=1) then
begin
gotoxy(33,15);
writeln('GOOOOLLLLL');
aa2:=0;
bb2:=0;
gotoxy(33,16);
writeln(takim2);
delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);delay(9000);
end;
delay(9000);delay(9000);delay(9000);
x:=random(as)+1;
y:=random(bs)+1;
if i=45 then
begin
gotoxy(30,15);
writeln('2.YARIYI BASLAT!!!');
readln;
end;
if x=13 then
begin
aa:=aa+1;
aa2:=1;
end;
if y=13 then
begin
bb:=bb+1;
bb2:=1;
end;
end;
gotoxy(1,1);
if aa=bb then
begin
sonuc:=2;
writeln('MAC BERABERE BITTI');
textcolor(green);
writeln('---',ad1,'---');
if oyun=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara:=opara*ber;
writeln('GELEN PARA=',gpara);
kpara:=kpara+gpara;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara);
end;
end;
if aa>bb then
begin
sonuc:=1;
writeln(takim1,' YENDI');
textcolor(green);
writeln('---',ad1,'---');
if oyun=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara:=opara*akat;
writeln('GELEN PARA=',gpara);
kpara:=kpara+gpara;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara);
end;
end;
if aa<bb then
begin
sonuc:=3;
writeln(takim2,' YENDI');
textcolor(green);
writeln('---',ad1,'---');
if oyun=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara:=opara*bkat;
writeln('GELEN PARA=',gpara);
kpara:=kpara+gpara;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara);
end;
end;
textcolor(white);
writeln;
writeln('---',ad2,'---');
if aa=bb then
begin
sonuc:=2;
if oyun2=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara2:=opara2*ber;
writeln('GELEN PARA=',gpara2);
kpara2:=kpara2+gpara2;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara2);
end;
end;
if aa>bb then
begin
sonuc:=1;
if oyun2=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara2:=opara2*akat;
writeln('GELEN PARA=',gpara2);
kpara2:=kpara2+gpara2;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara2);
end;
end;
if aa<bb then
begin
sonuc:=3;
if oyun2=sonuc then
begin
writeln(' KAZANDINIZ ');
gpara2:=opara2*bkat;
writeln('GELEN PARA=',gpara2);
kpara2:=kpara2+gpara2;
end
else
begin
writeln('|(((KAYIP ETTINIZ)))|');
writeln('KAYIP EDILEN PARA=',opara2);
end;
end;
if (kpara=0) and (kpara2=0) then
begin
readln;
clrscr;
writeln('HER ZAMAN KAZANAN BILGISAYARDIR BUNU BILMIYORMUYDUN');
writeln(' HAAA...HAAAAA.HAAAAAAAAA');
readln;
exit;
end;
if (kpara<=0) and (t<4) then
begin
readln;
clrscr;
writeln(ad1,"'nin PARASI BITTI');
writeln('!!!KAZANAN ',ad2,' !!!');
write('Tek basiniza devam etmek istiyormusunuz(e\h):');readln(ch);
if ch='e' then
begin
t:=5;
kpara:=1000;
oyun:=0;
end
else if ch='h' then
exit;
end;
if (kpara2<=0) and (g<4) then
begin
readln;
clrscr;
writeln(ad2,"'nin PARASI BITTI');
writeln('!!!KAZANAN ',ad1,' !!!');
write('Tek basiniza devam etmek istiyormusunuz(e\h):');readln(ch);
if ch='e' then
begin
g:=5;
kpara2:=1000;
oyun2:=0;
end
else if ch='h' then
exit;
end;
textcolor(yellow);
write('\');
read(pp);
write('\');
if pp='banka1' then
begin
write('ne kadar alicaksiniz:');readln(banka1);
banksa1:=1;
alacak1:=banka1*5;
end;
if pp='banka2'then
begin
write('nekadar alicaksiniz:');readln(banka2);
banksa2:=1;
alacak2:=banka2*5;
end;
if pp='1borc2'then
begin
write('1inci 2inci"ye:');readln(borc);
kpara:=kpara-borc;
kpara2:=kpara2+borc;
end;
if pp='2borc1' then
begin
write('2inci 1inci"ye:');readln(borc);
kpara2:=kpara2-borc;
kpara:=kpara+borc;
end;
if pp='1exit' then
begin
t:=5;
opara:=0;
end;
if pp='2exit' then
begin
g:=5;
opara2:=0;
end;
if pp='exit' then
exit;
if pp='bak' then
begin
clrscr;
textcolor(red);
writeln('NOT:2 kisilikte ve sifreleri yeni takimlar g”zkmeden yazin');
textcolor(yellow);
writeln('SIFRELER-=-----------ISLEVLERI------------------');
writeln('1borc2 =1. oyuncudan 2. oyuncuya borc verir');
writeln('2borc1 =2. oyuncudan 1. oyuncuya borc verir');
writeln('1exit =1. oyuncu oyundan cikar');
writeln('2exit =2. oyuncu oyundan cikar');
writeln('exit =oyundan cikar');
writeln('banka1 =1. oyuncu bankadan 5 mac sonra 5 misli');
writeln(' ”demek sartiyla borc alir');
writeln('banka2 =2. oyuncu bankadan 5 mac sonra 5 misli');
writeln(' ”demek sartiyla borc alir');
writeln('bak =oyunda oynarken kunlandiginizda sifre');
writeln(' tablosunu ekrana getirir');
readkey;
end;
clrscr;
until 1=2;
end;
end.

cezalandirilci · 25 Ağu 2010

teşekkürler. ..(üsTAD)__

Pascal İDDAA 2.5

CorsaiR

Emektar

cezalandirilci

Üye

Sosyal medya sayfalarımız