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ókRandomText
 Segítségével egy véletlenszerû szöveget hozhatsz létre.
Paraméterek: ()
  
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)
  
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)
  
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)
  
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: ()
  
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)
  
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: ()
  
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  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;
}