Szerző Téma: Forint "Script"  (Megtekintve 2120 alkalommal)

Nem elérhető HaGaD

Forint "Script"
« Dátum: 2014. június 19. - 19:50:48 »
0 Show voters
Sziasztok! Itt egy viszonylag egyszerû kód, amely arra szolgál, hogy a jobb felsõ sarokban a dollár helyett forint lesz kiírva.Készítõ: HaGaD. Azért tettem idézõjelbe a scriptet a címben, mert ez félig textdraw, hiszen ez egy kiírás a jobb felsõ sarokba.  RP szerókra tökéletesen megy, bár az elkészült RP módokba szoktak ilyet alapból tenni. Ha valaki RPG projectbe kezd, annak szerintem ez tökéletesen mefelel.
 

#define FILTERSCRIPT
#include <a_samp>
new Text:Box[MAX_PLAYERS];
new Text:Ft[MAX_PLAYERS];
new check;
public OnFilterScriptInit()
{
    print(\"\\n|==========================================================|\");
    print(\"\\n|                        Forint script                     |\");
    print(\"\\n|                           Betöltve                       |\");
    print(\"\\n|==========================================================|\");
    return 1;
}
public OnFilterScriptExit()
{
    print(\"\\n|==========================================================|\");
    print(\"\\n|                        Forint script                     |\");
    print(\"\\n|                         Kikapcsolva                      |\");
    print(\"\\n|==========================================================|\");
    KillTimer(check);
    return 1;
}
public OnPlayerConnect(playerid)
{
Box[playerid] = TextDrawCreate(622.000000, 79.000000, \"   \");
    TextDrawBackgroundColor(Box[playerid], 255);
    TextDrawFont(Box[playerid], 1);
    TextDrawLetterSize(Box[playerid], 0.500000, 1.000000);
    TextDrawColor(Box[playerid], -1);
    TextDrawSetOutline(Box[playerid], 0);
    TextDrawSetProportional(Box[playerid], 1);
    TextDrawSetShadow(Box[playerid], 1);
    TextDrawUseBox(Box[playerid], 1);
    TextDrawBoxColor(Box[playerid], 0x000035FF);
    TextDrawTextSize(Box[playerid], 483.000000, 49.000000);
    Ft[playerid] = TextDrawCreate(490.000000, 77.000000, \"00000000FT\"); //a forint mindenhol legelõl volt
    TextDrawBackgroundColor(Ft[playerid], 0xff0000AA);//Kûlsõ
    TextDrawFont(Ft[playerid], 1);
    TextDrawLetterSize(Ft[playerid], 0.539999, 2.299999);
    TextDrawColor(Ft[playerid], 0x585859AA);//belsõ
    TextDrawSetOutline(Ft[playerid], 1);
    TextDrawSetProportional(Ft[playerid], 1);
    SetTimerEx(\"CheckMoney\", 2000, true, \"i\", playerid);
    return 1;
}
public OnPlayerDisconnect(playerid)
{
    TextDrawHideForPlayer(playerid, Ft[playerid]);
    TextDrawHideForPlayer(playerid, Box[playerid]);
    return 1;
}
forward CheckMoney(playerid);
public CheckMoney(playerid)
{
    new string[128];
    if(GetPlayerMoney(playerid) < 10)
    {
        format(string, sizeof(string), \"0000000%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(10 <= GetPlayerMoney(playerid) < 100)
    {
        format(string, sizeof(string), \"000000%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(100 <= GetPlayerMoney(playerid) < 1000)
    {
        format(string, sizeof(string), \"00000%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(1000 <= GetPlayerMoney(playerid) < 10000)
    {
        format(string, sizeof(string), \"0000%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(10000 <= GetPlayerMoney(playerid) < 100000)
    {
        format(string, sizeof(string), \"000%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(100000 <= GetPlayerMoney(playerid) < 1000000)
    {
        format(string, sizeof(string), \"00%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(1000000 <= GetPlayerMoney(playerid) < 10000000)
    {
        format(string, sizeof(string), \"0%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    if(10000000 <= GetPlayerMoney(playerid) < 999999999)
    {
        format(string, sizeof(string), \"%iFT\", GetPlayerMoney(playerid));
        TextDrawSetString(Ft[playerid], string);
        TextDrawShowForPlayer(playerid, Ft[playerid]);
        TextDrawShowForPlayer(playerid, Box[playerid]);
    }
    return 1;
}
« Utoljára szerkesztve: 2014. június 20. - 10:38:06 írta HaGaD »

Nem elérhető Peterta12

  • 183
  • Peterta12
    • Profil megtekintése
Forint "Script"
« Válasz #1 Dátum: 2014. június 19. - 19:57:35 »
0 Show voters
Tök jó

Nem elérhető HaGaD

Forint "Script"
« Válasz #2 Dátum: 2014. június 19. - 19:58:52 »
0 Show voters
Idézetet írta: Peterta12 date=1403200655\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"48872\" data-ipsquote-contentclass=\"forums_Topic
Tök jó
 
Kösz! Gondolom vannak, akiknek jól jön ez. :)

Forint "Script"
« Válasz #3 Dátum: 2014. június 19. - 21:15:55 »
0 Show voters
E:\\cucc,server\\samp server\\filterscripts\\forint.pwn(10) : error 017: undefined symbol \"check\"
E:\\cucc,server\\samp server\\filterscripts\\forint.pwn(16) : error 017: undefined symbol \"Box\"
E:\\cucc,server\\samp server\\filterscripts\\forint.pwn(16) : warning 215: expression has no effect
E:\\cucc,server\\samp server\\filterscripts\\forint.pwn(16) : error 001: expected token: \";\", but found \"]\"
E:\\cucc,server\\samp server\\filterscripts\\forint.pwn(16) : error 029: invalid expression, assumed zero
E:\\cucc,server\\samp server\\filterscripts\\forint.pwn(16) : fatal error 107: too many error messages on one line
 
Compilation aborted.Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
5 Errors.
« Utoljára szerkesztve: 2014. június 19. - 21:40:18 írta Cappsy »

Nem elérhető Cappsy

  • Adminisztrátor
  • 2754
    • Profil megtekintése
Forint "Script"
« Válasz #4 Dátum: 2014. június 19. - 21:39:51 »
0 Show voters
[gmod]Készítõ?![/gmod]

Nem elérhető gbr333

  • 670
    • Profil megtekintése
Forint "Script"
« Válasz #5 Dátum: 2014. június 20. - 13:22:00 »
0 Show voters

Nem elérhető Cappsy

  • Adminisztrátor
  • 2754
    • Profil megtekintése
Forint "Script"
« Válasz #6 Dátum: 2014. június 20. - 15:05:31 »
0 Show voters
Idézetet írta: Peter date=1403264414\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"48872\" data-ipsquote-contentclass=\"forums_Topic
Off: Nem bírtál volna várni míg a témanyitó leírja, hogy ki készítette. Nagyon kíváncsi lettem volna rá mit válaszol. Köszi szépen :/
 
Péter, ez az én feladatom, bármennyire is kíváncsi vagy rá.
 

http://sampforum.hu/index.php?topic=6021.0
 
[/quote]
Köszönöm, bár én is tudtam ki a készítõ. Valószínû rosszul fogalmaztam, a témanyitónak  szólt.
[gmod]Mindenesetre a témanyitónak, kötelezõ, kihelyezni, vagy legalább megemlíteni, a szkript eredetét. Valamint annak se látom értelmét, hogy újra megosszuk.. Erõs a gyanúm, hogy itt, a témanyitó rosszban sántikált... De mind1. A témát zárom, a fórumon az eredeti készítõ publikálta, akinek kell az úgy is megtalálja.[/gmod]
« Utoljára szerkesztve: 2014. június 20. - 15:09:57 írta Cappsy »

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal