Üdvözlök mindenkit!
Úgy gondolom, hogy eljött az ideje annak, hogy bemutatkozzak. 15 éves vagyok, Patrik a nevem. Fejér megyében lakok, aki tudja hol az tudja, aki nem az nem. Tatabányára járok az Árpádba. Ennyit a \"formaságokról\".
A játékra 2009-ben találtam rá, ez idõ alatt csak egyszemélyes módban nyomultam, imádtam csítelni
Tavaly találtam rá a többszemélyes változatra és azonnal megtetszett. Elõször a FayRPG nevû szerveren játszottam, majd a SeeRPG-n aztán jöttek a freeroam szerverek, utána az LLRP, PDRP és megint a freeroam szerverek (fõ a változatosság).
Idén március körül kezdtem megismerkedni a Pawn nyelv rejtelmeivel. Mára már elég jól megy, bár mostanában hagytam abba az aktív scriptelést idõhiány miatt. Több szervernek is dolgoztam, pár lényegesebb: ECPS, Malibu, Nemzetközi Malibu, Foothills (csak egy script), ISRP
A fórumra idén január körül regisztráltam. Augusztus másodikán megkaptam a segítõkész rangom, majd október elsején a segítségkérés és alfórumaiba a lokális moderátor rangot.
Kedvenc: zenei mûfaj: - rap, hip-hop
                kaja: - nincs, szinte mindenevõ vagyok
                film: - nincs, mindent megnézek, de kedvenc nincs
Emberek akiket bírok/tisztelek: Olie, Fl0rian, Magic_Man, Keller, Indi, James, Szilard, Bendor, T0ny, Gabor, Dead, SnooP, Zharko, BigTics
Nagyjából ennyi, ha bármi kérdésetek van írjatok.
Üdv. JBauer

Üdv.
Az elõbb írtam egy számológépet pascal nyelven.
A kód szabadon felhasználható a készítõ (JBauer) nevének feltüntetésével!
A kódot teszteltem, mûködik.
Íme:

program Szamologep;
var melyik,szam1,szam2:integer;
begin
        writeln(\'========///\\\\\\Számológép///\\\\\\========\');
        writeln(\'Kérlek írd be, hogy melyik mûvelettel szeretnél dolgozni!\');
        writeln(\'1 = összeadás, 2 = kivonás, 3 = szorzás, 4 = osztás\');
        writeln(\'Minden mûveletnél csak 2 tagot használhatsz!\');
        readln(melyik);
        if melyik = 1 then begin
                                writeln(\'Összeadás: Írd be az elsõ tagot!\');
                                readln(szam1);
                                writeln(\'Ok‚, most írd be a második tagot!\');
                                readln(szam2);
                                writeln(\'A két szám (\' ,szam1, \', \' ,szam2,\') összege: \', szam1+szam2, \'!\');
                                szam1:=0;
                                szam2:=0;
                        end;
        if melyik = 2 then begin
                                writeln(\'Kivonás: Írd be az elsõ tagot!\');
                                readln(szam1);
                                writeln(\'Ok, most Írd be a második tagot!\');
                                readln(szam2);
                                writeln(\'A két szám (\' ,szam1, \', \' ,szam2,\') kivonata: \', szam1-szam2, \'!\');
                                szam1:=0;
                                szam2:=0;
                        end;
        if melyik = 3 then begin
                                writeln(\'Szorzás: Írd be az elsõ tagot!\');
                                readln(szam1);
                                writeln(\'Ok, most Írd be a második tagot!\');
                                readln(szam2);
                                writeln(\'A két szám (\' ,szam1, \', \' ,szam2,\') szorzata: \', szam1*szam2, \'!\');
                                szam1:=0;
                                szam2:=0;
                        end;
        if melyik = 4 then begin
                                writeln(\'Osztás: Írd be az elsõ tagot!\');
                                readln(szam1);
                                writeln(\'Ok‚ most írd be a második tagot!\');
                                readln(szam2);
                                writeln(\'A két szám (\' ,szam1, \', \' ,szam2,\') hányada: \', szam1/szam2, \'!\');
                                szam1:=0;
                                szam2:=0;
                        end;
       writeln(\'========///\\\\\\Számológép///\\\\\\========\');
       writeln(\'A scriptet JBauer készítette, szabadon felhasználható a készítõ nevének feltûntetésével!\');
end.

 
Remélem tetszeni fog!
Üdv. JBauer

Üdvözlök mindenkit.
Gondolom vannak akik tudják, hogy mi az a Megaszeró, akik nem azok olvassák el ezt és szerintem képben lesznek.
Szóval ezt szeretném én újraindítani és megpróbálkozni vele. Elõször szeretném megnézni, hogy hányan lennének akik jelentkeznek és ezek alapján dõl el, hogy a verseny elindul-e vagy sem.
Az (elõ) jelentkezéshez csak annyit kell tenned, hogy kitöltöd ezt az \"ûrlapot\":
 

Megaszeró 2012 jelentkezési ûrlap
Név:~Neved helye~
Scriptelési szint:~Válaszod helye~
Szerver név:~Válaszod helye~
Szerver IP:~Válaszod helye~

 
Várom a jelentkezõket és a reakciókat.
Üdvözlettel JBauer.

db_get_field
Ezzel a függvénnyel egy mezõ tartalmát kérheted le.
Paraméterek:
 

(DBResult:dbresult, field, result[], maxlength)

 
Dbresult: A db_query eredménye.
Field: A mezõ amibõl lekéri a nevet.
Result: Az eredmény.
Maxlength: A mezõ maximális hossza.
Visszatérés: Ez a függvény nem ad vissza semmilyen speciális értéket.
Példa script:

CMD:adminom(playerid, params[])
{
        new query[256+1],string[128+1],string2[128+1];
        new DBResult:qresult;
        format(query,sizeof(query),\"SELECT admin FROM `playereik` WHERE Username = \'Asd\'\");
        qresult = db_querypDB,query);
        if(db_num_rows(qresult) == 1)
        {
                db_get_field(qresult,0,string,128);
                format(string2,sizeof(string2),\"A te admin szinted: %s\",string);
                SendClientMessage(playerid,0xAFAFAFAA,string2);
        }
        db_free_result(qresult);
        return 1;
}

 
Eredeti link: http://wiki.sa-mp.com/wiki/Db_get_field

db_num_fields
Ezzel a függvénnyel lekérheted a mezõk számát.
Paraméterek:
 

(DBResult:dbresult)

 
Dbresult: A db_query eredménye.
Visszatérés: A mezõk száma.
Példa script:

CMD:mezok(playerid, params[])
{
  new DBResult:result;
  result = db_query(pDB, \"SELECT regid, money, score, pass, age FROM `playerek` WHERE playername = \'MarkHenry\'\");
  printf(\"%d mezõ!\", db_num_fields(result));
  db_free_result(result);
  return 1;
}

 
Eredeti link: http://wiki.sa-mp.com/wiki/Db_num_fields

db_num_rows
Ez a függvény a sorok számát mutatja meg egy db_query eljárásban.
Paraméterek:
 

(DBResult:dbresult)

 
Dbresult: Az eredmény egy db_queryben.
Visszatérés: A sorok száma.
Példa script:

CMD:regisztralva(playerid, params[])
{
  new DB:pDB, DBResult:qRESULT, string[128+1];
  pDB = db_open(\"Playerek.db\");
  qRESULT = db_query(pDB, \"SELECT * FROM `playerek`\");
  format(string, sizeof(string), \"Összesen %d játékos van regisztrálva a szerverre!\", db_num_rows(qRESULT));
  SendClientMessage(playerid, 0x33AA33AA, string);
  db_free_resutl(qRESULT);
  db_close(pDB);
  return 1;
}

 
Eredeti link: http://wiki.sa-mp.com/wiki/Db_num_rows

db_query
Ezzel a függvénnyel végrehajthatsz egy SQL lekérdezést egy, már nyitott SQLite adatbázisban.
Paraméterek:
 

(DB:db, query[])

 
DB: Annak az adatbázisnak az azonosítója amiben lekérdezést szeretnél végrehajtani.
Query: A lekérdezés amit végre szeretnél hajtani.
Visszatérés: A lekérdezés eredménye.
Példa script:

CMD:skin(playerid,params[])
{
        new id;
        new query[256+1];
        if(sscanf(params,\"i\",id)) return SendClientMessage(playerid,0xAFAFAFAA, \"/skin [skinid]\");
        format(query,sizeof(query),\"UPDATE `playerek` SET `SkinID`=\'%d\' WHERE (`Playername` = \'%s\')\",id, pName(playerid));
        db_free_result(db_query(playerdb,query));
        SetPlayerSkin(playerid,id);
        return 1;
}

 
Eredeti link: http://wiki.sa-mp.com/wiki/Db_query

db_open
Ezzel a függvénnyel megnyithatsz egy SQLite adatbázist a scriptfiles mappában.
Paraméterek:
 

(name[])

 
Name: Az adatbázis neve.
Visszatérés: A megnyitott adatbázis idje.
Példa script:

new DB:playerdb;
public OnGameModeInit()
{
  playerdb = db_open(\"playerek.db\");
  return 1;
}

 
Eredeti link: http://wiki.sa-mp.com/wiki/Db_open