Scrpt Wellcome

Sacul71 · June 28, 2018

Hello, I would like a Script that activates as soon as the person enters with a NOVATO character. 1/1. to talk about the server. I'm trying this script but it displays error in console.

Spoiler

- script Onlogplayer -1,{

OnPCLoginEvent:
if(#Newbie != 0)end;
mes "[ Boas vindas ]";
mes "Olá "+strcharinfo(0)+", seja bem vindo ao -----RO!";
mes "Vejo que voçê é novo por aqui !";
mes "Irei lhe ajudar, pegue algum itens, para começar sua Jornada";
mes "Obrigado por jogar -----RO, estamos muito felizes com sua presença. :D";
getitem 7539,10;
set #Newbie,1;
close;
}

I don't know anything about script. so I don't know what to do. :S

image.png.94a936ffa540af62f98dc943d71a4b79.png

maken06 · June 28, 2018

just.

script<TAB>Onlogplayer<TAB>-1,{

Sacul71 · June 28, 2018

1 hour ago, maken06 said:

just.

script<TAB>Onlogplayer<TAB>-1,{

worked. thx... but I have to create a new account every time I test.

how do I show every time a novice enters?

maken06 · June 28, 2018

After getitem 7539,10;

use something like this

announce (Sex?"Bem-vindo":"Bem-vindo")+" "+strcharinfo(0)+" a SERVERNAME!",bc_all|bc_blue;

Edited June 28, 2018 by maken06

Sacul71 · June 28, 2018

8 minutes ago, maken06 said:
After getitem 7539,10;

use something like this
announce (Sex?"Bem-vindo":"Bem-vindo")+" "+strcharinfo(0)+" a SERVERNAME!",bc_all|bc_blue;
If it worked for you, remember to react to the post

this did not work. but I've changed my mind.

I want this to be displayed whenever a new character is created.
so those who will not be attentive. can read again by creating another character.

maken06 · June 28, 2018

Then, better use this.

prontera,150,150,4	script	freebies	443,{

set .@n$, "[freebies]";
setarray .@rwd[0],512,1; // Rewards: <item id>,<item amount>

query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`=" + getcharid(3) + "", .@lip$);

if ( getd("$" + .@lip$ + "_NG") > 0 || #NewbieGift > 0)
{
mes .@n$;
mes "Sorry, the rewards are exclusive for new players.";
close;
}

mes .@n$;
mes "¡Welcome! ^0099CC"+ strcharinfo(0) +"^000000! Here are some free gifts."; 
mes "for newcomers:";

for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )
mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);
announce (Sex?"Welcome":"Welcome")+" "+strcharinfo(0)+" to SERVERNAME!",bc_all|bc_blue;
npctalk "["+strcharinfo(0)+"] just got a ["+getitemname(.@rwd)+"] to start the adventure.",0;

close2;
set #NewbieGift, 1;
setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;

for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )
getitem .@rwd[.@i], .@rwd[.@i+1];

end;

OnInit:

waitingroom "Newbie Gift!",0;
end;

}

Sacul71 · June 28, 2018

Spoiler

17 minutes ago, maken06 said:

Then, better use this.



prontera,150,150,4	script	freebies	443,{

set .@n$, "[freebies]";
setarray .@rwd[0],512,1; // Rewards: <item id>,<item amount>

query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`=" + getcharid(3) + "", .@lip$);

if ( getd("$" + .@lip$ + "_NG") > 0 || #NewbieGift > 0)
{
mes .@n$;
mes "Sorry, the rewards are exclusive for new players.";
close;
}

mes .@n$;
mes "¡Welcome! ^0099CC"+ strcharinfo(0) +"^000000! Here are some free gifts."; 
mes "for newcomers:";

for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )
mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);
announce (Sex?"Welcome":"Welcome")+" "+strcharinfo(0)+" to SERVERNAME!",bc_all|bc_blue;
npctalk "["+strcharinfo(0)+"] just got a ["+getitemname(.@rwd)+"] to start the adventure.",0;

close2;
set #NewbieGift, 1;
setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;

for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 )
getitem .@rwd[.@i], .@rwd[.@i+1];

end;

OnInit:

waitingroom "Newbie Gift!",0;
end;

}

please. Forget that part of items ....
I'll just use msg boxes and photos with "cutin". and I want to always appear for NOVICE. 1/1.

maken06 · June 28, 2018

Here

new_1-1,53,111,5	script	Welcome::start1	-1,4,4,{

OnTouch:
	if (welcome == 0) {
		cutin "aeon_01",2;
		mes "Hi "+(Sex?"Boy":"Girl")+",";
		mes "It's the first time I've seen you around here.";
		mes "What's your name? my duty is to announce you...";
		next;
		mes "[^0080FF"+strcharinfo(0)+"^000000]";
		mes "My name is "+strcharinfo(0)+"!";
		mes "I come from very distant lands...";
		next;
		announce (Sex?"Welcome":"Welcome")+" "+strcharinfo(0)+" to SERVERNAME!",bc_all|bc_blue;
		mes "So ^0080FF"+strcharinfo(0)+"^000000, eh?";
		next;
		mes "Be careful out there,";
		mes "There are very terrible creatures!";
		mes "But I know you can handle everything...";
		cutin "",255;
		close2;
		cutin "",255;
		specialeffect2 910;
		sleep2 500;
		specialeffect2 757;
		sleep2 2500;
		specialeffect2 304;
		sleep2 500;
		savepoint "prontera",155,181;
		warp "prontera",155,276;
		end;
	} else {
		end;
	}
}

Edited June 28, 2018 by maken06

Sacul71 · June 28, 2018

2 hours ago, maken06 said:

Be kind and do not forget to react if it helped you


new_1-1,53,111,5	script	Welcome::start1	-1,4,4,{

OnTouch:
	if (welcome == 0) {
		cutin "aeon_01",2;
		mes "Hi "+(Sex?"Boy":"Girl")+",";
		mes "It's the first time I've seen you around here.";
		mes "What's your name? my duty is to announce you...";
		next;
		mes "[^0080FF"+strcharinfo(0)+"^000000]";
		mes "My name is "+strcharinfo(0)+"!";
		mes "I come from very distant lands...";
		next;
		announce (Sex?"Welcome":"Welcome")+" "+strcharinfo(0)+" to SERVERNAME!",bc_all|bc_blue;
		mes "So ^0080FF"+strcharinfo(0)+"^000000, eh?";
		next;
		mes "Be careful out there,";
		mes "There are very terrible creatures!";
		mes "But I know you can handle everything...";
		cutin "",255;
		close2;
		cutin "",255;
		specialeffect2 910;
		sleep2 500;
		specialeffect2 757;
		sleep2 2500;
		specialeffect2 304;
		sleep2 500;
		savepoint "prontera",155,181;
		warp "prontera",155,276;
		end;
	} else {
		end;
	}
}

@edit

@maken06
is almost perfect. but I'm going to change where the script starts. and I realized that if I get closer to the place the script starts again ..

I'll put it in the middle of the prontera and remove the teleportation part. so I'd like you to only do it once per new character.

it would only trigger again if the person creates another novice

Edited June 28, 2018 by Sacul71

maken06 · June 28, 2018

1 hour ago, Sacul71 said:

@edit

@maken06
is almost perfect. but I'm going to change where the script starts. and I realized that if I get closer to the place the script starts again ..

I'll put it in the middle of the prontera and remove the teleportation part. so I'd like you to only do it once per new character.

it would only trigger again if the person creates another novice

new_1-1,53,111,5	script	Welcome::start1	-1,4,4,{

OnTouch:
	if ( Class < 1 ) {
	if (welcome == 0) {
	if ( talk_w ) end;
		cutin "aeon_01",2;
		mes "Hi "+(Sex?"Boy":"Girl")+",";
		mes "It's the first time I've seen you around here.";
		mes "What's your name? my duty is to announce you...";
		next;
		mes "[^0080FF"+strcharinfo(0)+"^000000]";
		mes "My name is "+strcharinfo(0)+"!";
		mes "I come from very distant lands...";
		next;
		announce (Sex?"Welcome":"Welcome")+" "+strcharinfo(0)+" to SERVERNAME!",bc_all|bc_blue;
		set talk_w, 1;
		mes "So ^0080FF"+strcharinfo(0)+"^000000, eh?";
		next;
		mes "Be careful out there,";
		mes "There are very terrible creatures!";
		mes "But I know you can handle everything...";
		cutin "",255;
		close2;
		cutin "",255;
		specialeffect2 910;
		sleep2 500;
		specialeffect2 757;
		sleep2 2500;
		specialeffect2 310;
		sleep2 500;
		end;
	} else {
		end;
	}
}
}

It is not very polite to remove reputation, after receiving help...

Edited June 28, 2018 by maken06

Sacul71 · June 28, 2018

24 minutes ago, maken06 said:


new_1-1,53,111,5	script	Welcome::start1	-1,4,4,{

OnTouch:
	if ( Class < 1 ) {
	if (welcome == 0) {
	if ( talk_w ) end;
		cutin "aeon_01",2;
		mes "Hi "+(Sex?"Boy":"Girl")+",";
		mes "It's the first time I've seen you around here.";
		mes "What's your name? my duty is to announce you...";
		next;
		mes "[^0080FF"+strcharinfo(0)+"^000000]";
		mes "My name is "+strcharinfo(0)+"!";
		mes "I come from very distant lands...";
		next;
		announce (Sex?"Welcome":"Welcome")+" "+strcharinfo(0)+" to SERVERNAME!",bc_all|bc_blue;
		set talk_w, 1;
		mes "So ^0080FF"+strcharinfo(0)+"^000000, eh?";
		next;
		mes "Be careful out there,";
		mes "There are very terrible creatures!";
		mes "But I know you can handle everything...";
		cutin "",255;
		close2;
		cutin "",255;
		specialeffect2 910;
		sleep2 500;
		specialeffect2 757;
		sleep2 2500;
		specialeffect2 310;
		sleep2 500;
		end;
	} else {
		end;
	}
}
}

It is not very polite to remove reputation, after receiving help...

please.. Do not get me wrong, I did not mean to be rude.
I would put the reputation in your next post. which would probably be the definitive one. xD

if for some reason I did not get more answers I would restore ^^.

but unfortunately there was an error

Spoiler

image.png.266c26c222eb4eb4461ebd7da4963e47.png

Edited June 28, 2018 by Sacul71

maken06 · June 28, 2018

Just eliminate those rare signs that appear after: if ( talk_w ) end;

Check my script again, I did not write them... and the second error, it is due to a modification of yours, not mine.

Edited June 28, 2018 by maken06

Sacul71 · June 28, 2018

7 minutes ago, maken06 said:

Just eliminate those rare signs that appear after: if ( talk_w ) end;

Check my script again, I did not write them...

perfect. ^^
again I apologize if I was rude.

Many thanks for the help ^^

Solved^^

Sign In

Scrpt Wellcome

Question

Link to comment

Share on other sites

12 answers to this question

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Recently Browsing 0 members