Jump to content
  • 0

adding auto warp when freebies are recived


Question

Posted

Here is my script

core1,156,123,3	script	Freebies NPC	4_GEFFEN_10,{
	soundeffect "freebies.wav",0; 	
	cutin "igu03",2;

	set .@n$, "[Freebies NPC]";
	
	setarray .@rwd[0],22808,1,7037,200,13973,100,40105,1,4399,1,4302,1,4407,1,4419,1,4441,1,4128,1,4330,1,4047,2,4174,2,4302 ,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 "I'm sorry, the rewards are exclusively for new players.";
    close2;
    cutin "",255;
    end;
	}

	mes .@n$;
	mes "Welcome! Here are some free gifts"; 
	mes "For newcomers:";
	announce "Ragnarok : Please welcome [ "+strcharinfo(0)+" ] !!",0;

	for ( 
	set .@i, 0;
	.@i < getarraysize(.@rwd);
	set .@i, .@i + 2 
	)
	
	mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);
	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];
	cutin "",255;
	end;

	OnInit:
	waitingroom "Freebies v2",0;
	end;

}

thankyou in advance

2 answers to this question

Recommended Posts

  • 0
Posted
core1,156,123,3	script	Freebies NPC	4_GEFFEN_10,{
	soundeffect "freebies.wav",0; 	
	cutin "igu03",2;

	set .@n$, "[Freebies NPC]";
	
	setarray .@rwd[0],22808,1,7037,200,13973,100,40105,1,4399,1,4302,1,4407,1,4419,1,4441,1,4128,1,4330,1,4047,2,4174,2,4302 ,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 "I'm sorry, the rewards are exclusively for new players.";
   		close2;
    		cutin "",255;
   		end;
	}

	mes .@n$;
	mes "Welcome! Here are some free gifts"; 
	mes "For newcomers:";
	announce "Ragnarok : Please welcome [ "+strcharinfo(0)+" ] !!",0;

	for ( set .@size, getarraysize(.@rwd); .@i < .@size;set .@i, .@i + 2 )
		mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);

	close2;
	set #NewbieGift, 1;
	setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;
	for ( set .@size, getarraysize(.@rwd); .@i < .@size;set .@i, .@i + 2 )
		getitem .@rwd[.@i], .@rwd[.@i+1];
	cutin "",255;
	save "prontera",156,161,2,2;
	warp "prontera",156,161;
	end;

OnInit:
	waitingroom "Freebies v2",0;
	end;

}

 

  • Upvote 1
  • 0
Posted
2 hours ago, n0tttt said:

core1,156,123,3	script	Freebies NPC	4_GEFFEN_10,{
	soundeffect "freebies.wav",0; 	
	cutin "igu03",2;

	set .@n$, "[Freebies NPC]";
	
	setarray .@rwd[0],22808,1,7037,200,13973,100,40105,1,4399,1,4302,1,4407,1,4419,1,4441,1,4128,1,4330,1,4047,2,4174,2,4302 ,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 "I'm sorry, the rewards are exclusively for new players.";
   		close2;
    		cutin "",255;
   		end;
	}

	mes .@n$;
	mes "Welcome! Here are some free gifts"; 
	mes "For newcomers:";
	announce "Ragnarok : Please welcome [ "+strcharinfo(0)+" ] !!",0;

	for ( set .@size, getarraysize(.@rwd); .@i < .@size;set .@i, .@i + 2 )
		mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]);

	close2;
	set #NewbieGift, 1;
	setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1;
	for ( set .@size, getarraysize(.@rwd); .@i < .@size;set .@i, .@i + 2 )
		getitem .@rwd[.@i], .@rwd[.@i+1];
	cutin "",255;
	save "prontera",156,161,2,2;
	warp "prontera",156,161;
	end;

OnInit:
	waitingroom "Freebies v2",0;
	end;

}

 

thankyou sir notttt

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...