Právě je čtv 24. kvě 2012 0:21:47
Hosting WEDOS.cz
SLEVA 25% (slevový kód:PAWNO25)

Nejnovější témata:
[otázka] Kde spraviť mod ? od D4n09
[Ms 2012] NHL 2009 Remake od SweS
[HELP] stock & undefined symbol od WilliamKrizak
asus k8v-x od 7.Host
[HELP] Pickupy ! od AvestX

Vyzkoušejte antivirus ESET Smart Security 5

Vyhledat témata bez odpovědí | Zobrazit aktivní témata Zobrazit nové příspěvky | Zobrazit vaše příspěvky


Všechny časy jsou v UTC + 1 hodina [ Letní čas ]





Odeslat nové téma Odpovědět na téma  [ Příspěvků: 39 ]  Přejít na stránku Předchozí  1, 2
Autor Zpráva
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: pát 16. zář 2011 15:32:04 
Moderátor
Moderátor
Registrován: čtv 28. dub 2011 18:53:54
Příspěvky: 1461

Kód:
stock TDString(string[])
{
    new
        len 
= strlen(string);
    for(new i;i<len;i++)
    {
        switch(string[ i ])
        {
            case 'ě':
            {
                string[ i ] = 'e';
            }
            case 'š':
            {
                string[ i ] = 's';
            }
            case 'č':
            {
                string[ i ] = 'c';
            }
            case 'ř':
            {
                string[ i ] = 'r';
            }
            case 'ž':
            {
                string[ i ] = 'z';
            }
            case 'ý':
            {
                string[ i ] = 'y';
            }
            case 'á':
            {
                string[ i ] = 'a';
            }
            case 'í':
            {
                string[ i ] = 'i';
            }
            case 'é':
            {
                string[ i ] = 'e';
            }
            default:
                continue;
        }
    }
    return true;
}


Co to dělá:
Převede diaktriku na normální písmena (dá se dobře využít při textdrawech)
Jak to použít:
Kód:
new string1[128];
format(string1,sizeof(string1),"bláblábléblí");
TDString(string1);
print(string1);

A v konzoli se vám ukáže:
Citace:
blablablebli


Kdyby jste si chtěli zajistit další písmena tak to snad zjistíte, a kdyby ne tak mi napiště do soukromé zprávy nebo sem

Mort


-------------------------------

To QWER: použil bych k tomu pojistku - fexist


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: ned 18. zář 2011 9:19:52 
Carl Johnson "CJ"
Carl Johnson "CJ"
Uživatelský avatar
Registrován: čtv 29. led 2009 20:03:51
Příspěvky: 4559
Bydliště: Blava ne ?

Čaute, spravil som funkciu "StrChange" ktorá nahradí slovo slovom... napríklad máte text
"ahojte vy moji pupuskovia"
a slovo "pupuskovia" nahradíte slovom "chlapi"

Kód:
stock StrChange(str[], find[], change[],bool:caps = true,maxlenght=sizeof(change))
{
    new i,b = strlen(find);
    warp:
    i = strfind(str, find, caps);
    if(i != -1)
    {
        strdel(str, i, i + b);
        strins(str, change, i,maxlenght);
        goto warp;
    }
    return str;
}

str = text v ktorom budeme hladať výraz(y) ktoré zmeníme
find = text ktorý budeme nahrádzať
change = text ktorým budeme nahrádzať
caps = je rozdiel medzi "Ahojte" a "AHOJTE" (ak je false, ak je true, je to rovnaké)
maxlenght = dĺžka textu ktorým budeme nahrádzať...

Example Usage
Kód:
new f[128] = "QWER je king! QWER je king! QWER je king! QWER je king! ";
StrChange(f,"king","lama");
printf("%s",f);

a v serverlogu nájdete "QWER je lama! QWER je lama! QWER je lama! QWER je lama!"
a ak dáte parameter "caps" na hodnotu false

Kód:
new f[128] = "QWER je KING! QWER je KING! QWER je KING! QWER je KING! ");
StrChange(f,"king","lama",false);
printf("%s",f);

tak v serverlogu najdete "QWER je KING! QWERT je KING! QWERT je KING! QWERT je KING! "

For Mort
Kód:
#define Cenzura(%0,%1,%2) StrChange(%0,%1,%2)

Je to užitočné môžete urobiť anti nadavky... no možností je nekonečno

QWER

_________________
Moja tvorba http://pastebin.com/u/PatchwerkQWER
Ak chceš byť lepší ako ja, a budeš sa snažiť budeš lepší ! Už len pri pomyslení na to, že si lepší než ja, ťa posunie dopredu. Ale nezabudni ! Musíš sa snažiť. A potom zistíš to, čo vie pár ľudí - že som lama a moje scripty sú nič oproti tomu, čo môžeš vytvoriť ty.
"Pravda je ze ja jsem zacal delat pawn od 0.3a, ale ja jsem se neucil pawn podle wiki ale sam... " by Ceeker


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: sob 08. říj 2011 9:48:01 
Carl Johnson "CJ"
Carl Johnson "CJ"
Uživatelský avatar
Registrován: čtv 29. led 2009 20:03:51
Příspěvky: 4559
Bydliště: Blava ne ?

Čaute, spravil som ďalšie funkcie

/*
Function name
FindChar
Params
str[],chars
str = string
chars = znak
Return
true = našiel sa
false = nenašiel sa (string neobsahuje znak)
Example Usage
if(FindChar("Ahojte ja som QWER :P",'P')) SCM(playerid,-1,"String obsahuje 'P'");

*/
Kód:
stock FindChar(str[],chars)
{
new len = strlen(str);
for(new i;i < len+1;i++) if(str[i] == chars) return true;
return false;
}


/*
Function name
DeleteChar
Params
string[],chars
string = string
chars = znak
Return
-
Example Usage
DeleteChar(":D :D :D :D ",':');

*/
Kód:
stock DeleteChar(string[],chars)
{
new len = strlen(string);
for(new i; i<len+1; i++) if(string[i] == chars) string[i] = string[i+1];
}

_________________
Moja tvorba http://pastebin.com/u/PatchwerkQWER
Ak chceš byť lepší ako ja, a budeš sa snažiť budeš lepší ! Už len pri pomyslení na to, že si lepší než ja, ťa posunie dopredu. Ale nezabudni ! Musíš sa snažiť. A potom zistíš to, čo vie pár ľudí - že som lama a moje scripty sú nič oproti tomu, čo môžeš vytvoriť ty.
"Pravda je ze ja jsem zacal delat pawn od 0.3a, ale ja jsem se neucil pawn podle wiki ale sam... " by Ceeker


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: ned 25. bře 2012 19:42:54 
Moderátor
Moderátor
Registrován: čtv 28. dub 2011 18:53:54
Příspěvky: 1461

IsFloat (jako float bere i normánlí čísla (17 = 17.000000000000000 ...))

Kód:
stock IsFloat_str_[] )
{
    new
        
_len_ strlen_str_ ) ,
        
_dots_ 0
    
;
    
    for( new 
_i_ _i_ _len_ _i_++ )
    {
        if( 
_str__i_ ] > '9' || _str__i_ ] < '0' )
        {
            if( 
_str__i_ ] == '.' )
            {
                
_dots_++;
            }
            else
            {
                return 
false;
            }
        }
    }
    
    if( 
_dots_ ) { return false; }
    return 
true;


Kód:
if(IsFloat("13.15696146")) print("Číslo je float");

_________________
Používejte mozek! Snadněji tak vyřešíte záhadu Schrödingerovy kočky.


Obrázek


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: sob 21. dub 2012 15:45:36 
Moderátor
Moderátor
Registrován: čtv 28. dub 2011 18:53:54
Příspěvky: 1461

CreateRandomizePassword

Vytvoří náhodné heslo

Parametry:

max_chars=6 - maximum písmen/čísel

Použití:

Kód:
printf("%s",CreateRandomizePassword(128)); 


A printne napřiklad:

Kód:
9uYY0y1lb87tQPE9v6q0a9I7Sj6Z960BdFVC808iE74Cy234k9n5P9Mt26bA8lD1037680B85S8vb9a970JCJ2276Zx1hQ0SA36779z9lVF1sx8c4305jel7ld5R68C


Code:

Spoiler:
Kód:
stock CreateRandomizePassword(max_chars=6)
{
    new random1[][52] = { "a","A","b","B","c","C","d","D","e","E","f","F","g","G","h","H","i","I","j","J","k","K","l","L","m","M","n","N","o","O","p","P","q","Q","r","R","s","S","t","T","u","U","v","V","w","W","x","X","y","Y","z","Z" };
    new random2[][10] = { "0","1","2","3","4","5","6","7","8","9" };
    new returnstring[128],ch[10];
    for(new p;p<max_chars;p++)
    {
        switch(random(2))
        {
            case 0:
            {
                format(ch,sizeof(ch),"%s",random1[random(sizeof(random1))]);
                strcat(returnstring,ch);
                ch[0] = EOS;
            }
            case 1:
            {
                format(ch,sizeof(ch),"%s",random2[random(sizeof(random2))]);
                strcat(returnstring,ch);
                ch[0] = EOS;
            }
        }
    }
    return returnstring;
}
 

_________________
Používejte mozek! Snadněji tak vyřešíte záhadu Schrödingerovy kočky.


Obrázek


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: sob 21. dub 2012 17:14:44 
T - Bone Mendez
T - Bone Mendez
Uživatelský avatar
Registrován: čtv 28. dub 2011 13:31:50
Příspěvky: 112

Tady je zmražení hráče na čas:
Kód:
stock Timedfreeze(playerid, time)
{
    TogglePlayerControllable(playerid, 0);
    SetTimerEx("odmrazeni", time*1000, false, "i", playerid);
}
forward odmrazeni(playerid);
public odmrazeni(playerid)
{
    TogglePlayerControllable(playerid, 1);
    SendClientMessage(playerid,B_MODR,"Byl jsi odmražen!");
}


Čas zmražení zadávejte ve vteřinách ;)

_________________
Obrázek
ZDE máte ke stažení pár mých scriptů na kterých se učím pawn ;)
Pokud budete chtít s nějakým poradit nebo udělat drobné změny,pište SZ


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: sob 21. dub 2012 17:17:01 
Barry Thorne "Big Bear"
Barry Thorne "Big Bear"
Uživatelský avatar
Registrován: pon 31. led 2011 22:41:49
Příspěvky: 242

jenkings píše:
Tady je zmražení hráče na čas:
Kód:
stock Timedfreeze(playerid, time)
{
    TogglePlayerControllable(playerid, 0);
    SetTimerEx("odmrazeni", time*1000, false, "i", playerid);
}
forward odmrazeni(playerid);
public odmrazeni(playerid)
{
    TogglePlayerControllable(playerid, 1);
    SendClientMessage(playerid,B_MODR,"Byl jsi odmražen!");
}


Čas zmražení zadávejte ve vteřinách ;)

mal by si tam dat ale premennu na timer a KillTimer potom, lebo mozu nastat problemy ;)

_________________
Obrázek

Prison Sector 47:
rsgame.cz:4747

[GM] Prison Sector 47 v3.0
[GM] StreeT Life
[FS] LYRIcS ATTACH OBJECT STUDIO
[FS] LYRIcS's Alcatraz
[FS] Lyrics Free Camera Mode
[FS] Animation Reader (pwn)
[FS/MAP] Alcatraz (887 objektov!!!)
[INC] Lyrics Text Pointer
[SCREENY] Obrázky + ID všetkých SAMP 0.3e objektov

Môj skype: alphamew98


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: sob 21. dub 2012 17:18:14 
T - Bone Mendez
T - Bone Mendez
Uživatelský avatar
Registrován: čtv 28. dub 2011 13:31:50
Příspěvky: 112

lyrics911 píše:
jenkings píše:
Tady je zmražení hráče na čas:
Kód:
stock Timedfreeze(playerid, time)
{
    TogglePlayerControllable(playerid, 0);
    SetTimerEx("odmrazeni", time*1000, false, "i", playerid);
}
forward odmrazeni(playerid);
public odmrazeni(playerid)
{
    TogglePlayerControllable(playerid, 1);
    SendClientMessage(playerid,B_MODR,"Byl jsi odmražen!");
}


Čas zmražení zadávejte ve vteřinách ;)

mal by si tam dat ale premennu na timer a KillTimer potom, lebo mozu nastat problemy ;)


Já to mám v módu a žádný problémy jsem s tím neměl

_________________
Obrázek
ZDE máte ke stažení pár mých scriptů na kterých se učím pawn ;)
Pokud budete chtít s nějakým poradit nebo udělat drobné změny,pište SZ


Offline
 Profil  
 Předmět příspěvku: Re: [TUT] Užitečné funkce
PříspěvekNapsal: sob 21. dub 2012 17:20:01 
Moderátor
Moderátor
Registrován: čtv 28. dub 2011 18:53:54
Příspěvky: 1461

jenkings píše:
Tady je zmražení hráče na čas:
Kód:
stock Timedfreeze(playerid, time)
{
    TogglePlayerControllable(playerid, 0);
    SetTimerEx("odmrazeni", time*1000, false, "i", playerid);
}
forward odmrazeni(playerid);
public odmrazeni(playerid)
{
    TogglePlayerControllable(playerid, 1);
    SendClientMessage(playerid,B_MODR,"Byl jsi odmražen!");
}


Čas zmražení zadávejte ve vteřinách ;)


Každý callback musí mít return.







Pro snadné tvoření callbacků:

Kód:
#define PUBLIC:%0(%1)\
                        forward %0(%1); \
                        public %0(%1)


Použití:

Kód:
PUBLIC:ZabijuTe(playerid,kohoZabije,Float:minusHp)
{
new 
s[128];
format(s,sizeof(s),"Hráč %s tě chce zabít a ubral ti %f hp",PlayerName(playerid),minusHp);
SendClientMessage(kohoZabije,-1,s);
new 
Float:hp;
GetPlayerHealth(kohoZabije,hp);
SetPlayerHealth(kohoZabije,hp minusHp);
return 
1;

_________________
Používejte mozek! Snadněji tak vyřešíte záhadu Schrödingerovy kočky.


Obrázek


Offline
 Profil  
Zobrazit příspěvky za předchozí:  Seřadit podle  
Odeslat nové téma Odpovědět na téma  [ Příspěvků: 39 ]  Přejít na stránku Předchozí  1, 2

Všechny časy jsou v UTC + 1 hodina [ Letní čas ]


 Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé


Nemůžete zakládat nová témata v tomto fóru
Nemůžete odpovídat v tomto fóru
Nemůžete upravovat své příspěvky v tomto fóru
Nemůžete mazat své příspěvky v tomto fóru
Nemůžete přikládat soubory v tomto fóru

Hledat:
Přejít na: