Reakció teszt

Indította Sramm, 2012. július 03. - 15:35:48

Előző téma - Következő téma

Sramm

Reakció teszt
 
Köszöntõ
Üdv! Szeretném publikálni a legfrissebb szkriptem, a reakció tesztet.

Lényege, hogy lehet reakciótesztet küldeni könnyedén.

Funkciók
RandomText


 
Segítségével egy véletlenszerû szöveget hozhatsz létre.
Paraméterek:
 
()

 

  • Nincs paraméter.

 

CMD:randomstring(playerid,params[])
{
new str[128];
format(str,128,\"%s\",RandomText()); // Átformázzuk egy véletlenszerû szöveggé.
SendClientMessageToAll(-1,str); //Majd kiírjuk.
return 1;
}

 


CreatedTest


 
Leellenõrizhetõ, hogy az adott teszt létre van -e hozva.
Paraméterek:
 
(testid)

 

  • testid - A teszt id-je.

 

CMD:testcreated(playerid,params[])
{
if(CreatedTest(1)) return 1; // Ha létre van hozva az 1-es számú teszt, igazzal térünk vissza.
return 1;
}

 


AutoTest


 
Leellenõrizhetõ, hogy az adott teszt autómata-e.
Paraméterek:
 
(testid)

 

  • testid - A teszt id-je.

 

CMD:testauto(playerid,params[])
{
if(AutoTest(1)) return 1; // Ha  az 1-es számú teszt autómatikus, igazzal térünk vissza.
return 1;
}

 


DeleteTest


 
Törölhetsz vele egy adott tesztet.
Paraméterek:
 
(testid)

 

  • testid - A teszt id-je.

 

CMD:deletetest(playerid,params[])
{
DeleteTest(1); // Töröljük az 1-es számú tesztet.
return 1;
}

 


DeleteAllTest


 
Törölheted vele az összes tesztet.
Paraméterek:
 
()

 

  • Nincs paraméter

 

CMD:deletealltest(playerid,params[])
{
DeleteAllTest(); // Töröljük a teszteket
return 1;
}

 


SendTest


 
Elküldhetsz vele egy tesztet.
Paraméterek:
 
(color,msg[],reward)

 

  • color - A szöveg színe.

  • msg[] - A kód, amit a játékosnak be kell írnia, hogy nyerjen.

  • reward - Mennyi pénzt adjon, ha megnyeri a reakciótesztet.


 

CMD:sendtest(playerid,params[])
{
SendTest(-1,RandomText(),20000); //Elküldünk egy tesztet fehéren, véletlenszerû szöveggel, és 20000$-t kap, ha megnyeri a tesztet.
return 1;
}

 


SendAutomaticTest


 
Elküldhetsz vele egy tesztet, ami folyamatosan ismétli magát.
Paraméterek:
 
(color,msg[],reward,time)

 

  • color - A szöveg színe.

  • msg[] - A kód, amit a játékosnak be kell írnia, hogy nyerjen.

  • reward - Mennyi pénzt adjon, ha megnyeri a reakciótesztet.

  • time - Az idõ, amennyiszer ismétlõdjön. (1000 = 1mp)


 

CMD:sendautotest(playerid,params[])
{
SendAutomaticTest(-1,RandomText(),20000,1000*60); //Elküldünk egy tesztet fehéren, véletlenszerû szöveggel, és 20000$-t kap, ha megnyeri a tesztet,60 másodpercenkét jön elõ újra.
return 1;
}

 


StopAutomaticTest


 
Megállíthatunk vele egy ismétlõdõ tesztet.
Paraméterek:
 
(testid)

 

  • testid - A teszt id-je.

 

CMD:stopautotest(playerid,params[])
{
StopAutomaticTest(1); //Megállítjuk az 1-es számú autómatikus tesztet.
return 1;
}

 


StopAllAutomaticTest


 
Megállíthatunk vele az összes ismétlõdõ tesztet.
Paraméterek:
 
()

 

  • Nincs paraméter

 

CMD:stopallautotest(playerid,params[])
{
StopAllAutomaticTest(); //Megállítjuk az összes autómatikus tesztet.
return 1;
}

 


Fontos:
Include verzió esetén a te OnPlayerText-ed alá rakd be: test_OnPlayerText(playerid,text[]);

A te OnGameModeInit-ed vagy OnFilterScriptInited alá pedig: test_Init

Így:
 
public OnPlayerText(playerid,text[])
{
        test_OnPlayerText(playerid,text); //Elejére kell minden elõtt.
        return 1;
}

 

public OnGameModeInit() //Vagy onfilterscriptinit
{
        test_Init(); //Elejére kell minden elõtt.
        return 1;
}

 
Frissítések:
1.1
 
  • Autómata tesztek hozzáadva

  • Include verzió hozzáadva

  • Továbbfejlesztett RandomText()


1.0
 
  • Megjelenés

Példascript:
 

#include <a_samp>
#include <test>
 
public OnFilterScriptInit()
{
test_Init();
SendAutomaticTest(-1,RandomText(),30000,1000*60);
return 1;
}
public OnPlayerText(playerid,text[])
{
test_OnPlayerText(playerid,text);
return 1;
}
public OnFilterScriptExit()
{
return 1;
}

 

Letöltés
 


http://www.solidfiles.com/d/245e86cf40/\" rel=\"external nofollow\">Include verzió [test.inc] | http://www.solidfiles.com/d/ecab8a833f/\" rel=\"external nofollow\">ADD-ON Verzió [test.pwn/test.amx]

instant


Olie

Jó lett :)
Ahogy nézem Flóri is rakott hozzá ;)
Csak így tovább skacok :)

JBauer

Szokásos minõségi munka Srammtól :)


Sramm

Új verzió elérhetõ  :thumbsup: