Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2013-10-01, 20:44


AgentParuwka







Wiek: 26
Na forum: 4789 dni
Posty: 9
Nick w MP: TheRafi

Piwa: 35

Respekt: 50

Wi?c mam problem, jestem nowy w PWN i si? ucz? ale dobra do rzeczy

chc? zrobi? wypo?yczalnie ?odzi w FC, skrypt pisz? bez systemu
pr?buje zrobi? by komenda i dzia?a?a tylko przy Pickupie

Skrypt z wypo?yczalnia:
Pawn

#include <a_samp>

#define COLOR_WHITE FFFFFFFF
#define COLOR_RED FF0000FF

public OnPlayerCommandText(playeridcmdtext[])
{
    if(!strcmp(cmdtext"/wypozyczalnia"))
    {
        ShowPlayerDialog(playerid1DIALOG_STYLE_LIST"Wypo?yczalnia ?odzi""Dinghy - 500$\nCoastguard - 1.000$\nTropic - 9.000$\nMarquis - 10.000$""Wynajmni""Anuluj");
        return 1;
    }
    return 0;
}
public OnDialogResponse(playeriddialogidresponselistiteminputtext[])
{
    if(dialogid == 1)
    {
        if(!response)
            return 1;
        switch(listitem)
        {
            case 0:
            {
                if(GetPlayerMoney(playerid) < 500)
                    return SendClientMessage(playerid0"B??d: Brak pieni?dzy.");
                GivePlayerMoney(playerid, -500);
                CreateVehicle(4735785.01160.3820, -0.253891.899413999999);
            }
            case 1:
            {
                if(GetPlayerMoney(playerid) < 1000)
                    return SendClientMessage(playerid0"B??d: Brak pieni?dzy.");
                GivePlayerMoney(playerid, -1000);
                CreateVehicle(4725785.01160.3820, -0.253891.899413999999);
            }
            case 2:
            {
                if(GetPlayerMoney(playerid) < 9000)
                    return SendClientMessage(playerid0"B??d: Brak pieni?dzy.");
                GivePlayerMoney(playerid, -9000);
                CreateVehicle(4545785.01160.3820, -0.253891.899413999999);
            }
            case 3:
            {
                if(GetPlayerMoney(playerid) < 10000)
                    return SendClientMessage(playerid0"B??d: Brak pieni?dzy.");
                GivePlayerMoney(playerid, -10000);
                CreateVehicle(4845785.01160.3820, -0.253891.899413999999);
            }
        }
    }
    return 1;
}


Skrpt z pickupem:

Pawn

new Wypo?yczalnia;
public OnFilterSciptInit()
{
    Test CreatePickup(1111.011.011.0, -1);
}
public OnPlayerPickUpPickup(playeridpickupid)
{
    if(pickupid == Wypo?yczalnia)
        return SendClientMessage(playerid0"/Wypo?yczalnia");
    return 1;
}


chc? doda? ?eby komenda dzia?a?a przy pickupie tylko a nie wsz?dzie.
r?wnie? chc? doda? by pojazd znika? po 1h.

za pomoc daje PIWO...

pozdro

Podpis
Postaw piwo autorowi tego posta
 

 
Wysłany: 2013-10-04, 07:31


ToxiC.







Wiek: 28
Na forum: 5246 dni
Posty: 3792

Piwa: 8590

Respekt: 1143,8
Respekt: 1143,8

[prze]

Postaw piwo autorowi tego posta
 

 
Wysłany: 2013-10-04, 07:32


ToxiC.







Wiek: 28
Na forum: 5246 dni
Posty: 3792

Piwa: 8590

Respekt: 1143,8
Respekt: 1143,8

[prze]

Postaw piwo autorowi tego posta
 

 
Wysłany: 2013-10-04, 10:01


IgrexolonO







Wiek: 34
Na forum: 6809 dni
Posty: 1386

Piwa: 1062

Respekt: 651,8
Respekt: 651,8Respekt: 651,8

AGENT PARUWA W NATARCIU

Kod:

#include <a_samp>

new Wypozyczalnia;

public OnFilterScriptInit()
{
Wypozyczalnia = CreatePickup(1, 1, 11.0, 11.0, 11.0, -1);
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
if(pickupid == Wypozyczalnia) return SendClientMessage(playerid, 0, "/Wypozyczalnia");
return true;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
if(!strcmp(cmdtext, "/wypozyczalnia"))
{
if(IsPlayerInRangeOfPoint(playerid, 5.0, 11.0, 11.0, 11.0)) return ShowPlayerDialog(playerid, 1, DIALOG_STYLE_LIST, "Wypo?yczalnia ?odzi", "Dinghy - 500$\nCoastguard - 1.000$\nTropic - 9.000$\nMarquis - 10.000$", "Wynajmni", "Anuluj"), true;
SendClientMessage(playerid, 0, "Nie znajdujesz si? obok wypo?yczalni!");
return true;
}
return false;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 1 && response)
{
if(GetPlayerMoney(playerid) < 500) return SendClientMessage(playerid, 0, "B??d: Brak pieni?dzy."), true;
switch(listitem)
{
case 0:
{
GivePlayerMoney(playerid, -500);
CreateVehicle(473, 5785.0, 1160.3820, -0.2538, 91.8994, 1, 3, 999999);
}
case 1:
{
if(GetPlayerMoney(playerid) < 1000) return SendClientMessage(playerid, 0, "B??d: Brak pieni?dzy.");
GivePlayerMoney(playerid, -1000);
CreateVehicle(472, 5785.0, 1160.3820, -0.2538, 91.8994, 1, 3, 999999);
}
case 2:
{
if(GetPlayerMoney(playerid) < 9000) return SendClientMessage(playerid, 0, "B??d: Brak pieni?dzy.");
GivePlayerMoney(playerid, -9000);
CreateVehicle(454, 5785.0, 1160.3820, -0.2538, 91.8994, 1, 3, 999999);
}
case 3:
{
if(GetPlayerMoney(playerid) < 10000) return SendClientMessage(playerid, 0, "B??d: Brak pieni?dzy.");
GivePlayerMoney(playerid, -10000);
CreateVehicle(484, 5785.0, 1160.3820, -0.2538, 91.8994, 1, 3, 999999);
}
}
return true;
}
return true;
}


Postaw piwo autorowi tego posta
 

 
Tagi: wypożyczalnia :: łodzi
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » PAWN Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku