Szerző Téma: Reakció teszt  (Megtekintve 1024 alkalommal)

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Dátum: 2012. május 15. - 16:06:37 »
+1 Show voters
Találtam a hiv. fórumon egy jó kis reakció tesztet le is fordítottam csak az a baja hogyha valaki meg nyeri akkor 0 $-t és 0 pontot ad... Valaki segítene be állítani hogy adjon 50000 $-t és 10 pontot ?
Így néz ki a script:
 
#include <a_samp>
#define TIME 3
#define MINIMUM_VALUE 2000000
#define MAXIMUM_VALUE 8000000
#define MINIMUM_PRIZE 5000
#define MAXIMUM_PRIZE 20000
#define MINIMUM_SCORE 1
#define MAXIMUM_SCORE 7
new CONTEST_PRIZE;
new CONTEST_SCORE;
new ContestAnswer = -1;
forward NewContest();
forward OnPlayerWinContest(playerid);
public OnFilterScriptInit()
{
SetTimer(\"NewContest\",(1000*60*TIME),1);
return 1;
}
public OnPlayerText(playerid, text[])
{
if(strval(text) == ContestAnswer && ContestAnswer != -1)
{
OnPlayerWinContest(playerid);
}
return 1;
}
public NewContest()
{
new string [128];
ContestAnswer = MINIMUM_VALUE + random(MAXIMUM_VALUE-MINIMUM_VALUE);
format(string,sizeof string,\"Reakció teszt ! Aki elõször beírja: %d az nyer %d $-t és %d pontot !\",ContestAnswer,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
return 1;
}
public OnPlayerWinContest(playerid)
{
new pName[MAX_PLAYER_NAME],string[128];
GetPlayerName(playerid,pName,sizeof pName);
format(string,sizeof string,\"%s nyerte meg a reakció tesztet jutalma: %d $ és %d pont !\",pName,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
CONTEST_PRIZE = MINIMUM_PRIZE+random(MAXIMUM_PRIZE-MINIMUM_PRIZE);
GivePlayerMoney(playerid,CONTEST_PRIZE);
CONTEST_SCORE = MINIMUM_SCORE+random(MAXIMUM_SCORE-MINIMUM_SCORE);
SetPlayerScore(playerid, GetPlayerScore(playerid) + CONTEST_SCORE);
ContestAnswer = -1;
return 1;
}

 
A segítséget elõre is köszönöm !

skbence

  • Vendég
Reakció teszt
« Válasz #1 Dátum: 2012. május 15. - 16:09:52 »
0 Show voters
#include <a_samp>
#define TIME 3
#define MINIMUM_VALUE 2000000
#define MAXIMUM_VALUE 8000000
#define MINIMUM_PRIZE 5000
#define MAXIMUM_PRIZE 20000
#define MINIMUM_SCORE 1
#define MAXIMUM_SCORE 7
new CONTEST_PRIZE;
new CONTEST_SCORE;
new ContestAnswer = -1;
forward NewContest();
forward OnPlayerWinContest(playerid);
public OnFilterScriptInit()
{
SetTimer(\"NewContest\",(1000*60*TIME),1);
return 1;
}
public OnPlayerText(playerid, text[])
{
if(strval(text) == ContestAnswer && ContestAnswer != -1)
{
OnPlayerWinContest(playerid);
}
return 1;
}
public NewContest()
{
new string [128];
ContestAnswer = MINIMUM_VALUE + random(MAXIMUM_VALUE-MINIMUM_VALUE);
format(string,sizeof string,\"Reakció teszt ! Aki elõször beírja: %d az nyer %d $-t és %d pontot !\",ContestAnswer,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
return 1;
}
public OnPlayerWinContest(playerid)
{
new pName[MAX_PLAYER_NAME],string[128];
GetPlayerName(playerid,pName,sizeof pName);
format(string,sizeof string,\"%s nyerte meg a reakció tesztet jutalma: %d $ és %d pont !\",pName,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
CONTEST_PRIZE = MINIMUM_PRIZE+random(MAXIMUM_PRIZE-MINIMUM_PRIZE);
GivePlayerMoney(playerid, 50000);
CONTEST_SCORE = MINIMUM_SCORE+random(MAXIMUM_SCORE-MINIMUM_SCORE);
SetPlayerScore(playerid, 10);
ContestAnswer = -1;
return 1;
}

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Válasz #2 Dátum: 2012. május 15. - 16:22:01 »
+1 Show voters
Thx és nem tudom hogy ez olyan hogyha bizonyos idõn belül senki nem írja be a számokat akkor ad egy új feladatot ?

skbence

  • Vendég
Reakció teszt
« Válasz #3 Dátum: 2012. május 15. - 16:30:01 »
0 Show voters
Idézetet írta: Nátha date=1337091721\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"21497\" data-ipsquote-contentclass=\"forums_Topic
Thx és nem tudom hogy ez olyan hogyha bizonyos idõn belül senki nem írja be a számokat akkor ad egy új feladatot ?
 
ehhez a részhez már én se értek :S de gondolom timer-el

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Válasz #4 Dátum: 2012. május 15. - 16:31:38 »
+1 Show voters
Hát igen, timerrel kéne de én sem tudom hogy hogyan  :D

skbence

  • Vendég
Reakció teszt
« Válasz #5 Dátum: 2012. május 15. - 16:38:10 »
0 Show voters
Idézetet írta: Nátha date=1337092298\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"21497\" data-ipsquote-contentclass=\"forums_Topic
Hát igen, timerrel kéne de én sem tudom hogy hogyan  :D
 
talán ez segít http://fafsamp.mindenkilapja.hu/html/22163081/render/pawno-timer-keszitese

Nem elérhető Flash

  • 5726
  • (っ◕‿◕)っ
    • Profil megtekintése
Reakció teszt
« Válasz #6 Dátum: 2012. május 15. - 16:38:31 »
0 Show voters
Mód elejére:
new reaction;
forward reaction2();
Ebbe kell a timer.
 
public NewContest()
{
new string [128];
ContestAnswer = MINIMUM_VALUE + random(MAXIMUM_VALUE-MINIMUM_VALUE);
format(string,sizeof string,\"Reakció teszt ! Aki elõször beírja: %d az nyer %d $-t és %d pontot !\",ContestAnswer,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
reaction = SetTimer(\"reaction2\",120000,1); // 2 perc
return 1;
}

 
public reaction2()
{
ContestAnswer = -1;
SendClientMessageToAll(-1, \"Mivel senki sem oldotta meg a feladványt mingy ö még1 blabla..\");
KillTimer(reaction);
reaction = SetTimer(\"reaction2\",120000,1); // 2 perc
return 1;
}
Valami ilyesmi, de ezt most jól sszecsaptam, szval lehet nem jó de valami ilyesmi kell.

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Válasz #7 Dátum: 2012. május 15. - 16:56:48 »
+1 Show voters
Kösz Flash mûködik !  ;D

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Válasz #8 Dátum: 2012. május 15. - 16:06:37 »
0 Show voters
Találtam a hiv. fórumon egy jó kis reakció tesztet le is fordítottam csak az a baja hogyha valaki meg nyeri akkor 0 $-t és 0 pontot ad... Valaki segítene be állítani hogy adjon 50000 $-t és 10 pontot ?
Így néz ki a script:
 
#include <a_samp>
#define TIME 3
#define MINIMUM_VALUE 2000000
#define MAXIMUM_VALUE 8000000
#define MINIMUM_PRIZE 5000
#define MAXIMUM_PRIZE 20000
#define MINIMUM_SCORE 1
#define MAXIMUM_SCORE 7
new CONTEST_PRIZE;
new CONTEST_SCORE;
new ContestAnswer = -1;
forward NewContest();
forward OnPlayerWinContest(playerid);
public OnFilterScriptInit()
{
SetTimer(\"NewContest\",(1000*60*TIME),1);
return 1;
}
public OnPlayerText(playerid, text[])
{
if(strval(text) == ContestAnswer && ContestAnswer != -1)
{
OnPlayerWinContest(playerid);
}
return 1;
}
public NewContest()
{
new string [128];
ContestAnswer = MINIMUM_VALUE + random(MAXIMUM_VALUE-MINIMUM_VALUE);
format(string,sizeof string,\"Reakció teszt ! Aki elõször beírja: %d az nyer %d $-t és %d pontot !\",ContestAnswer,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
return 1;
}
public OnPlayerWinContest(playerid)
{
new pName[MAX_PLAYER_NAME],string[128];
GetPlayerName(playerid,pName,sizeof pName);
format(string,sizeof string,\"%s nyerte meg a reakció tesztet jutalma: %d $ és %d pont !\",pName,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
CONTEST_PRIZE = MINIMUM_PRIZE+random(MAXIMUM_PRIZE-MINIMUM_PRIZE);
GivePlayerMoney(playerid,CONTEST_PRIZE);
CONTEST_SCORE = MINIMUM_SCORE+random(MAXIMUM_SCORE-MINIMUM_SCORE);
SetPlayerScore(playerid, GetPlayerScore(playerid) + CONTEST_SCORE);
ContestAnswer = -1;
return 1;
}

 
A segítséget elõre is köszönöm !

skbence

  • Vendég
Reakció teszt
« Válasz #9 Dátum: 2012. május 15. - 16:09:52 »
0 Show voters
#include <a_samp>
#define TIME 3
#define MINIMUM_VALUE 2000000
#define MAXIMUM_VALUE 8000000
#define MINIMUM_PRIZE 5000
#define MAXIMUM_PRIZE 20000
#define MINIMUM_SCORE 1
#define MAXIMUM_SCORE 7
new CONTEST_PRIZE;
new CONTEST_SCORE;
new ContestAnswer = -1;
forward NewContest();
forward OnPlayerWinContest(playerid);
public OnFilterScriptInit()
{
SetTimer(\"NewContest\",(1000*60*TIME),1);
return 1;
}
public OnPlayerText(playerid, text[])
{
if(strval(text) == ContestAnswer && ContestAnswer != -1)
{
OnPlayerWinContest(playerid);
}
return 1;
}
public NewContest()
{
new string [128];
ContestAnswer = MINIMUM_VALUE + random(MAXIMUM_VALUE-MINIMUM_VALUE);
format(string,sizeof string,\"Reakció teszt ! Aki elõször beírja: %d az nyer %d $-t és %d pontot !\",ContestAnswer,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
return 1;
}
public OnPlayerWinContest(playerid)
{
new pName[MAX_PLAYER_NAME],string[128];
GetPlayerName(playerid,pName,sizeof pName);
format(string,sizeof string,\"%s nyerte meg a reakció tesztet jutalma: %d $ és %d pont !\",pName,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
CONTEST_PRIZE = MINIMUM_PRIZE+random(MAXIMUM_PRIZE-MINIMUM_PRIZE);
GivePlayerMoney(playerid, 50000);
CONTEST_SCORE = MINIMUM_SCORE+random(MAXIMUM_SCORE-MINIMUM_SCORE);
SetPlayerScore(playerid, 10);
ContestAnswer = -1;
return 1;
}

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Válasz #10 Dátum: 2012. május 15. - 16:22:01 »
0 Show voters
Thx és nem tudom hogy ez olyan hogyha bizonyos idõn belül senki nem írja be a számokat akkor ad egy új feladatot ?

skbence

  • Vendég
Reakció teszt
« Válasz #11 Dátum: 2012. május 15. - 16:30:01 »
0 Show voters
Idézetet írta: Nátha date=1337091721\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"21497\" data-ipsquote-contentclass=\"forums_Topic
Thx és nem tudom hogy ez olyan hogyha bizonyos idõn belül senki nem írja be a számokat akkor ad egy új feladatot ?
 
ehhez a részhez már én se értek :S de gondolom timer-el

Nem elérhető Nátha

  • 1036
    • Profil megtekintése
Reakció teszt
« Válasz #12 Dátum: 2012. május 15. - 16:31:38 »
0 Show voters
Hát igen, timerrel kéne de én sem tudom hogy hogyan  :D

skbence

  • Vendég
Reakció teszt
« Válasz #13 Dátum: 2012. május 15. - 16:38:10 »
0 Show voters
Idézetet írta: Nátha date=1337092298\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"21497\" data-ipsquote-contentclass=\"forums_Topic
Hát igen, timerrel kéne de én sem tudom hogy hogyan  :D
 
talán ez segít http://fafsamp.mindenkilapja.hu/html/22163081/render/pawno-timer-keszitese

Nem elérhető Flash

  • 5726
  • (っ◕‿◕)っ
    • Profil megtekintése
Reakció teszt
« Válasz #14 Dátum: 2012. május 15. - 16:38:31 »
0 Show voters
Mód elejére:
new reaction;
forward reaction2();
Ebbe kell a timer.
 
public NewContest()
{
new string [128];
ContestAnswer = MINIMUM_VALUE + random(MAXIMUM_VALUE-MINIMUM_VALUE);
format(string,sizeof string,\"Reakció teszt ! Aki elõször beírja: %d az nyer %d $-t és %d pontot !\",ContestAnswer,CONTEST_PRIZE,CONTEST_SCORE);
SendClientMessageToAll(0x00FFFFFF,string);
reaction = SetTimer(\"reaction2\",120000,1); // 2 perc
return 1;
}

 
public reaction2()
{
ContestAnswer = -1;
SendClientMessageToAll(-1, \"Mivel senki sem oldotta meg a feladványt mingy ö még1 blabla..\");
KillTimer(reaction);
reaction = SetTimer(\"reaction2\",120000,1); // 2 perc
return 1;
}
Valami ilyesmi, de ezt most jól sszecsaptam, szval lehet nem jó de valami ilyesmi kell.

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal