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

Wysłany: 2012-11-10, 21:24


sirgutbert






Wiek: 32
Na forum: 5492 dni
Posty: 62
Nick w MP: kored
Piwa: 20

Respekt: 64

Ostrzeżeń: 20%
Cze?? mam pytanie czy m?g?by mi kto? przerobic to
na strcmd oczywi?cie nagroda nie ominie :arrow: :arrow: :+: :piwo: :piwo:

Kod:


#include <a_samp>
#include <zcmd>

new Text:FigurkaTD,PFigurka;

public OnFilterScriptInit()
{
FigurkaTD = TextDrawCreate(142.000000, 368.000000, "_");
TextDrawBackgroundColor(FigurkaTD, 255);
TextDrawFont(FigurkaTD, 1);
TextDrawLetterSize(FigurkaTD, 0.200000, 1.000000);
TextDrawColor(FigurkaTD, -1);
TextDrawSetOutline(FigurkaTD, 1);
TextDrawSetProportional(FigurkaTD, 1);
TextDrawUseBox(FigurkaTD, 1);
TextDrawBoxColor(FigurkaTD, 64);
TextDrawTextSize(FigurkaTD, 300.000000, -130.000000);
return 1;
}

CMD:figurka(playerid, cmdtext[])
{
if(GetPVarInt(playerid, "FigurkaWyjeb") != 0)
return SendClientMessage(playerid, -1, "** Utworzy?e?(a?) ju? figurke !! ! **");

if(isnull(cmdtext))
return SendClientMessage(playerid, 0x33AA33AA, "** Wpisz /figurka [podpowiedz] **");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");

new Float:X[3];
GetPlayerPos(playerid, X[0], X[1], X[2]);
TextDrawShowForAll(FigurkaTD);
new StringF[128];
SendClientMessage(playerid, 0xFF0000AA, "########################################");
format(StringF,128,"** Figurka jest na mapie podpowied?: %s **", cmdtext);
SendClientMessageToAll(0x33AA33AA, StringF);
SendClientMessage(playerid, 0xFF0000AA, "########################################");
SetPVarInt(playerid, "FigurkaWyjeb", 1);
PFigurka = CreatePickup(1276, 3, X[0]+2, X[1]+1, X[2], -1);
format(StringF,128,"Figurka jest na mapie podpowiedz:~b~~h~ %s", cmdtext);
TextDrawSetString(FigurkaTD, StringF);
return 1;
}

CMD:usunfigurke(playerid, cmdtext[])
{
if(GetPVarInt(playerid, "FigurkaWyjeb") != 1)
return SendClientMessage(playerid, -1, "** Figurka nie zostala utworzona ;) ");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");
DestroyPickup(PFigurka);
SendClientMessage(playerid, -1,"** Figurka usuni?ta poprawnie :) ");
DeletePVar(playerid, "FigurkaWyjeb");
TextDrawHideForAll(FigurkaTD);
return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
if(pickupid == PFigurka)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
new str[128];
GivePlayerMoney(playerid, 100000);
format(str,128,"** Gracz: %d znalaz? figurke i dosta? 100000 $ **", name);
SendClientMessageToAll(0x1EFF1EFF, str);
TextDrawHideForAll(FigurkaTD);
DeletePVar(playerid, "FigurkaWyjeb");
return 1;
}
return 1;
}


Podpis
Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-11-10, 23:25


ToxiC.






Wiek: 28
Na forum: 5246 dni
Posty: 3792

Piwa: 8590

Respekt: 1143,8
Respekt: 1143,8
Kod:


#include <a_samp>

new Text:FigurkaTD,PFigurka;

public OnFilterScriptInit()
{
FigurkaTD = TextDrawCreate(142.000000, 368.000000, "_");
TextDrawBackgroundColor(FigurkaTD, 255);
TextDrawFont(FigurkaTD, 1);
TextDrawLetterSize(FigurkaTD, 0.200000, 1.000000);
TextDrawColor(FigurkaTD, -1);
TextDrawSetOutline(FigurkaTD, 1);
TextDrawSetProportional(FigurkaTD, 1);
TextDrawUseBox(FigurkaTD, 1);
TextDrawBoxColor(FigurkaTD, 64);
TextDrawTextSize(FigurkaTD, 300.000000, -130.000000);
return 1;
}

if(strcmp(cmdtext, "/figurka", true) == 0)
{
if(GetPVarInt(playerid, "********") != 0)
return SendClientMessage(playerid, -1, "** Utworzy?e?(a?) ju? figurke ! **");

if(isnull(cmdtext))
return SendClientMessage(playerid, 0x33AA33AA, "** Wpisz /figurka [podpowiedz] **");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");

new Float:X[3];
GetPlayerPos(playerid, X[0], X[1], X[2]);
TextDrawShowForAll(FigurkaTD);
new StringF[128];
SendClientMessage(playerid, 0xFF0000AA, "########################################");
format(StringF,128,"** Figurka jest na mapie podpowied?: %s **", cmdtext);
SendClientMessageToAll(0x33AA33AA, StringF);
SendClientMessage(playerid, 0xFF0000AA, "########################################");
SetPVarInt(playerid, "********", 1);
PFigurka = CreatePickup(1276, 3, X[0]+2, X[1]+1, X[2], -1);
format(StringF,128,"Figurka jest na mapie podpowiedz:~b~~h~ %s", cmdtext);
TextDrawSetString(FigurkaTD, StringF);
return 1;
}

if(strcmp(cmdtext, "/usunfigurke", true) == 0)
{
if(GetPVarInt(playerid, "********") != 1)
return SendClientMessage(playerid, -1, "** Figurka nie zostala utworzona ");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");
DestroyPickup(PFigurka);
SendClientMessage(playerid, -1,"** Figurka usuni?ta poprawnie ");
DeletePVar(playerid, "********");
TextDrawHideForAll(FigurkaTD);
return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
if(pickupid == PFigurka)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
new str[128];
GivePlayerMoney(playerid, 100000);
format(str,128,"** Gracz: %d znalaz? figurke i dosta? 100000 $ **", name);
SendClientMessageToAll(0x1EFF1EFF, str);
TextDrawHideForAll(FigurkaTD);
DeletePVar(playerid, "********");
return 1;
}
return 1;
}


Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-11-11, 08:53


sirgutbert






Wiek: 32
Na forum: 5492 dni
Posty: 62
Nick w MP: kored
Piwa: 20

Respekt: 64

Ostrzeżeń: 20%
Kod:


C:\Users\delta6583\Desktop\figurkaprzer.pwn(20) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(22) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(23) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(25) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(26) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(28) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(29) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(32) : error 021: symbol already defined: "GetPlayerPos"
C:\Users\delta6583\Desktop\figurkaprzer.pwn(35) : error 021: symbol already defined: "SendClientMessage"
C:\Users\delta6583\Desktop\figurkaprzer.pwn(43) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(46) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(48) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(49) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(51) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(52) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(57) : error 010: invalid function or declaration
C:\Users\delta6583\Desktop\figurkaprzer.pwn(76) : warning 203: symbol is never used: "StringF"
C:\Users\delta6583\Desktop\figurkaprzer.pwn(76) : warning 203: symbol is never used: "X"
Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase


16 Errors.



Podpis
Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-11-11, 10:43


Combacior






Wiek: 29
Na forum: 5796 dni
Posty: 1516

Piwa: 2161

Respekt: 1060
Respekt: 1060

Ostrzeżeń: 20%
Oldschool, chyba zapomnia?e? o callbacku OnPlayerCommandText, kt?ry w strcmp jest niezb?dny :P

Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-11-11, 11:24


ToxiC.






Wiek: 28
Na forum: 5246 dni
Posty: 3792

Piwa: 8590

Respekt: 1143,8
Respekt: 1143,8
O, dzi?ki za poprawke, tak to jest jak si? nie robi w tym systemie ;P

Kod:


#include <a_samp>

new Text:FigurkaTD,PFigurka;

public OnFilterScriptInit()
{
FigurkaTD = TextDrawCreate(142.000000, 368.000000, "_");
TextDrawBackgroundColor(FigurkaTD, 255);
TextDrawFont(FigurkaTD, 1);
TextDrawLetterSize(FigurkaTD, 0.200000, 1.000000);
TextDrawColor(FigurkaTD, -1);
TextDrawSetOutline(FigurkaTD, 1);
TextDrawSetProportional(FigurkaTD, 1);
TextDrawUseBox(FigurkaTD, 1);
TextDrawBoxColor(FigurkaTD, 64);
TextDrawTextSize(FigurkaTD, 300.000000, -130.000000);
return 1;
}


public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, "/figurka", true) == 0)
{
if(GetPVarInt(playerid, "********") != 0)
return SendClientMessage(playerid, -1, "** Utworzy?e?(a?) ju? figurke ! **");

if(isnull(cmdtext))
return SendClientMessage(playerid, 0x33AA33AA, "** Wpisz /figurka [podpowiedz] **");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");

new Float:X[3];
GetPlayerPos(playerid, X[0], X[1], X[2]);
TextDrawShowForAll(FigurkaTD);
new StringF[128];
SendClientMessage(playerid, 0xFF0000AA, "########################################");
format(StringF,128,"** Figurka jest na mapie podpowied?: %s **", cmdtext);
SendClientMessageToAll(0x33AA33AA, StringF);
SendClientMessage(playerid, 0xFF0000AA, "########################################");
SetPVarInt(playerid, "********", 1);
PFigurka = CreatePickup(1276, 3, X[0]+2, X[1]+1, X[2], -1);
format(StringF,128,"Figurka jest na mapie podpowiedz:~b~~h~ %s", cmdtext);
TextDrawSetString(FigurkaTD, StringF);
return 1;
}

if(strcmp(cmdtext, "/usunfigurke", true) == 0)
{
if(GetPVarInt(playerid, "********") != 1)
return SendClientMessage(playerid, -1, "** Figurka nie zostala utworzona ");

if(!IsPlayerAdmin(playerid))
return SendClientMessage(playerid, -1, "** Nie jeste? Adminem ! **");
DestroyPickup(PFigurka);
SendClientMessage(playerid, -1,"** Figurka usuni?ta poprawnie ");
DeletePVar(playerid, "********");
TextDrawHideForAll(FigurkaTD);
return 1;
}
return 0;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
if(pickupid == PFigurka)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
new str[128];
GivePlayerMoney(playerid, 100000);
format(str,128,"** Gracz: %d znalaz? figurke i dosta? 100000 $ **", name);
SendClientMessageToAll(0x1EFF1EFF, str);
TextDrawHideForAll(FigurkaTD);
DeletePVar(playerid, "********");
return 1;
}
return 1;
}


?ap poprawk?
Postaw piwo autorowi tego posta
 

 
Tagi: prośba :: przerobienie
Anonymous





Na forum: 245 dni
Posty: 1
Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » PAWN » [INNE] Prośba o przerobienie 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