GTAMulti.com - Türkiye'nin Türkçe GTA Sitesi
02 Ocak 2026, 19:50:12

Nyks Weapon Sistemi

Başlatan Nyks, 09 Haziran 2017, 23:42:33

« önceki - sonraki »

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Nyks

Nyks Weapon Sistemi


Boş boş dururken aklıma bir market sistemi yapmak geldi forumdada mevcut olmadıgını gördüm ve yapip paylasayim dedim umarım beyenirsiniz | iyi kullanımlar.

Komutumuz : /market

Görselimiz:





Modunuzun Başına Ekleyin;

PAWN Kodu: Seç
#include <zcmd>

#define DIALOG_TengriWeapons 1
#define COLOR_LIGHTRED 0xFF6347AA


OnDialogResponse Adlı  Public e Ekleyin ;

PAWN Kodu: Seç
if(dialogid == DIALOG_TengriWeapons)
{
if(response)
{
if(listitem==0)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,24,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 1)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,26,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 2)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,27,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 3)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,28,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 4)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,29,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 5)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,30,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 6)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,32,150);
GivePlayerMoney(playerid,-2000);
}
if(listitem == 7)
{
if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid,COLOR_LIGHTRED,"Üsyünüzde 2.000$ miktar para bulunmamakta");
GivePlayerWeapon(playerid,31,150);
GivePlayerMoney(playerid,-2000);
}
return 1;
}
return 1;
}


Şimdi İse Komutumuzu Modunuzun Boş Bir Kısmına Ekleyiniz;


PAWN Kodu: Seç
CMD:market(playerid,params[])
{
ShowPlayerDialog(playerid, DIALOG_TengriWeapons, DIALOG_STYLE_TABLIST_HEADERS, "Silah Satın Alma",
"Silah\tFiyat\tMermi\n\
Deagle\t$2000\t150\n\
Sawnoff\t$2000\t150\n\
Combat\t$2000\t150\n\
Uzi\t$2000\t150\n\
MP5\t$2000\t150\n\
AK-47\t$2000\t150\n\
Tec-9\t$2000\t150\n\
M4\t$2000\t150",
"Satın Al", "Iptal");
return 1;
}



FS kullanmak İstiyenler İse Burdan indirebilirler.
Dowland;

https://www.solidfiles.com/v/VvyRVaDaKNYMG

Not : Fs kullanmanızı Tercih Etmem ufak tefek buglar oluşabilir..
Not 2; Hatalarım Varsa Affola Silah Listesine Bakmak İcin bir hp Sunucusna girip baktım.



Son düzenlenme: 20 Eylül 2018, 22:32:18 Nyks
- Loading CnR %40 -


Pawn compiler 3.2.3664 Copyright (c) 1997-2006, IT

upkeys

u p k e y s a r t z

Excision

2000$ var mı diye sorgulatıp 3500$ para kesmen yanlış olmuş. Tam 2000$ parası olanlar silah aldığında parası - lere düşecektir.
Eline sağlık  :helal:

Ayrıca silah eklemek daha pratik bunda https://www.pawnoturk.com/forum/mod-galerisi/eweapon-silah-alma-sistemi/ :D
Son düzenlenme: 10 Haziran 2017, 00:37:57 Excision

Nyks

- Loading CnR %40 -


Pawn compiler 3.2.3664 Copyright (c) 1997-2006, IT

Nyks

Alıntı yapılan: Excision - 10 Haziran 2017, 00:33:01

2000$ var mı diye sorgulatıp 3500$ para kesmen yanlış olmuş. Tam 2000$ parası olanlar silah aldığında parası - lere düşecektir.
Eline sağlık  :helal:

Ayrıca silah eklemek daha pratik bunda https://www.pawnoturk.com/forum/mod-galerisi/eweapon-silah-alma-sistemi/ :D


Güzel yorumun icin teşekkür ederim , 2000 yazıp 3500 kesme ise bir dalgınlıgıma gelmiş düzelltim söledigin icin eyw  :helal:

- Loading CnR %40 -


Pawn compiler 3.2.3664 Copyright (c) 1997-2006, IT

hex



Nyks

- Loading CnR %40 -


Pawn compiler 3.2.3664 Copyright (c) 1997-2006, IT

DracDonix

PAYLAŞIM İÇİN TEŞEKÜRLER

İmzanız forum kurallarına uymamaktadır. (daha küçük boyutta bir imza seçiniz.)

Nyks

- Loading CnR %40 -


Pawn compiler 3.2.3664 Copyright (c) 1997-2006, IT