Puanlama

[Kral__]

Arkadaşlar mesela Labelde "Puan:" yazıyo her butona tıkladığımızda +10 vermesini istiyorum çok uğraştım ama yapadım lütfen yardım edin.

[Bitmap]

[b][color="#FF0000"]Global Function :[/color][/b]
[code]
nPuan = "0";

function Arttir(label,miktar)
nPuan = nPuan+miktar;
Label.SetText(label,nPuan);
end
function Azalt(label,miktar)
if nPuan ~= 0 then
nPuan = nPuan-miktar;
Label.SetText(label,nPuan);
end
end
function Sifirla(label)
nPuan = "0";
Label.SetText(label,nPuan);
end
[/code]

[b][color="#FF0000"]Arttır Butonu[/color][/b]

[code]Arttir("Label1","10")[/code]
[b][color="#FF0000"]
Azalt Butonu[/color][/b]

[code]Azalt("Label1","10")[/code]

[b][color="#FF0000"]Sıfırla Butonu[/color][/b]

[code]Sifirla("Label1")[/code]

Edited October 2, 2011 by Kazım

[Kral__]

saol ama bi sorun var arttır butonuna tıkladığımda Puan:10 olmasını istiyorum ama sadece 10 yazıo dediğim gibi yapabilirmiyiz?

Edited October 2, 2011 by Kral__

[abdullahTR]

[color=#445563][font=verdana, tahoma, sans-serif]Azalt("Label1","puan:","10")

böle dene olcakmı bakalım[/font][/color]

[Kral__]

hayır olmuyo hata verio

[MostWanted]

Aslında biraz aklını kullanıp yanına Puan: yazan bi label oluşturabilirdin değil mi?

Böyle dene;

nPuan = "0";



function Arttir(label,miktar)

nPuan = nPuan+miktar;

Label.SetText(label,"Puan:"..nPuan);

end

function Azalt(label,miktar)

if nPuan ~= 0 then

nPuan = nPuan-miktar;

Label.SetText(label,"Puan:"..nPuan);

end

end

function Sifirla(label)

nPuan = "0";

Label.SetText(label,"Puan:"..nPuan);

end

Edited October 2, 2011 by MostWanted

[Bitmap]

[b][color="#FF0000"]Global Function :[/color][/b]
[code]
nPuan = "0";

function Arttir(label,miktar)
nPuan = nPuan+miktar;
Label.SetText(label,"Puan: "..nPuan);
end
function Azalt(label,miktar)
if nPuan ~= "0" then
nPuan = nPuan-miktar;
Label.SetText(label,"Puan: "..nPuan);
end
end
function Sifirla(label)
nPuan = "0";
Label.SetText(label,"Puan: "..nPuan);
end
[/code]

edit: görrmedim talha..

Edited October 2, 2011 by Kazım

[abdullahTR]

puanı tanımla öle dene birde

[blackman12]

Off ya hani diyorum bırak takılsınlar ama bu kadarda hazırcılık olmaz ki arkadaş!

function Arttir(label,miktar)
nPuan = nPuan+miktar;
Label.SetText(label,"Puan: " .. nPuan);
end

şunu kendin akıl edemiyor musun yahu.

Edit: Hepimizin aynı anda yazması ayrı bi güzel olmuş tabi