Jump to content
  • 0

VIP npc attempt - NPC doesn't launch a chat bubble

Pandee

Asked by Pandee,

 Share

Question

Pandee Poring

Pandee

Posted
  • Group:  Members
  • Topic Count:  8
  • Topics Per Day:  0.01
  • Content Count:  18
  • Reputation:   1
  • Joined:  03/18/21
  • Last Seen:  
Posted
Spoiler 

prontera,140,226,6	script	VIP System	109,{
if (getgroupid()<4) {
goto Prem;
}


Prem:
set .@day,70;
set .@week,250;
set .@month,650;
if (getgroupid()>60) {
mes "[ VIP NPC ]";
mes "Sorry,GM staff not allowed to use this feature.";
close;
}

set .@Timer, vip_status(VIP_STATUS_EXPIRE);

mes "[ VIP NPC ]";
mes "Welcome "+strcharinfo(0)+",";
mes "Please choose the menu.";
mes "^FF0000Your VIP Status will Expire at:^000000";
mes gettimestr("%Y-%m/%d %H:%M:%S",21,vip_status(VIP_STATUS_EXPIRE));
mes "^FF0000Time Left: ^000000" + callfunc("Time2Str",.@Timer);
next;

mes "[ VIP NPC ]";
mes "Purchase VIP Time.";
mes "24 hours "+.@day+" cash point";
mes "1 week "+.@week+" cash point";
mes "1 month "+.@month+" cash point";
mes "your cureent cashpoint "+#CASHPOINTS+".";
next;
switch(select("VIP 1 Day:VIP 1 Week:VIP 1 Month:No, Thanks.")) {
case 1:
if (#CASHPOINTS < .@day) {
mes "[ VIP NPC ]";
mes "Your cash points not enough,";
mes ""+.@day+" cash points needed to use this feature.";
close;
}
//set #CASHPOINTS, #CASHPOINTS - .@day;
atcommand "@vip +24h ""+strcharinfo(0)+""";
mes "[ VIP NPC ]";
mes "Enjoy your service.";
dispbottom "your current cashpoint "+#CASHPOINTS+".";
close;

case 2:
if (#CASHPOINTS < .@week) {
mes "[ VIP NPC ]";
mes "Your cash points not enough,";
mes ""+.@week+" cash points needed to use this feature.";
close;
}
//set #CASHPOINTS, #CASHPOINTS - .@week;
atcommand "@vip +7d ""+strcharinfo(0)+""";
mes "[ VIP NPC ]";
mes "Enjoy your service.";
dispbottom "your current cashpoint "+#CASHPOINTS+".";
close;

case 3:
if (#CASHPOINTS < .@month) {
mes "[ VIP NPC ]";
mes "Your cash points not enough,";
mes ""+.@month+" cash points needed to use this feature.";
close;
}
//set #CASHPOINTS, #CASHPOINTS - .@month;
atcommand "@vip +1m ""+strcharinfo(0)+""";
mes "[ VIP NPC ]";
mes "Enjoy your service.";
dispbottom "your current cashpoint "+#CASHPOINTS+".";
close;

case 4:
mes "[ VIP NPC ]";
mes "See You next time.";
close;
}

}

// --------------------------------------------------
//	Duplicates:
// --------------------------------------------------
alberta,33,240,4	duplicate(VIP System)	VIP System#alb	109
aldebaran,146,116,4	duplicate(VIP System)	VIP System#alde	109
amatsu,205,87,4	duplicate(VIP System)	VIP System#ama	109
ayothaya,212,172,6	duplicate(VIP System)	VIP System#ayo	109
comodo,191,161,4	duplicate(VIP System)	VIP System#com	109
einbech,55,36,6	duplicate(VIP System)	VIP System#einbe	109
einbroch,72,206,4	duplicate(VIP System)	VIP System#einbr	109
geffen,127,66,4	duplicate(VIP System)	VIP System#gef	109
gonryun,162,126,4	duplicate(VIP System)	VIP System#gon	109
hugel,102,148,4	duplicate(VIP System)	VIP System#hug	109
izlude,128,152,4	duplicate(VIP System)	VIP System#izl	109	//Pre-RE: (132,120)
jawaii,248,134,4	duplicate(VIP System)	VIP System#jaw	109
lighthalzen,154,104,4	duplicate(VIP System)	VIP System#lhz	109
louyang,205,105,6	duplicate(VIP System)	VIP System#lou	109
manuk,272,150,6	duplicate(VIP System)	VIP System#man	109
mid_camp,216,286,4	duplicate(VIP System)	VIP System#mid	109
morocc,146,89,4	duplicate(VIP System)	VIP System#mor	109
moscovia,226,195,4	duplicate(VIP System)	VIP System#mos	109
niflheim,199,180,4	duplicate(VIP System)	VIP System#nif	109
payon,178,109,4	duplicate(VIP System)	VIP System#pay	109
rachel,138,122,4	duplicate(VIP System)	VIP System#rac	109
splendide,198,153,4	duplicate(VIP System)	VIP System#spl	109
umbala,97,148,3	duplicate(VIP System)	VIP System#umb	109
veins,211,120,4	duplicate(VIP System)	VIP System#ve	109
xmas,142,139,6	duplicate(VIP System)	VIP System#xmas	109
yuno,164,50,4	duplicate(VIP System)	VIP System#yuno	109

// --------------------------------------------------
//	Duplicates (Renewal):
// --------------------------------------------------
brasilis,199,225,4	duplicate(VIP System)	VIP System#bra	109
dewata,202,190,6	duplicate(VIP System)	VIP System#dew	109
dicastes01,196,197,6	duplicate(VIP System)	VIP System#dic	109
malangdo,137,116,6	duplicate(VIP System)	VIP System#mal	109
malaya,228,195,4	duplicate(VIP System)	VIP System#ma	109

 

I have the above code which I tinkered from

However, Clicking on the NPC gives no chat box. I am certain i forgot or did something wrong, but the question is where. Im still very new to scripting and learning by example.

 

Thanks!

Link to comment
Share on other sites

1 answer to this question

Recommended Posts

  • 0
hendra814 Pouring

hendra814

Posted
  • Group:  Members
  • Topic Count:  55
  • Topics Per Day:  0.01
  • Content Count:  1191
  • Reputation:   161
  • Joined:  06/12/12
  • Last Seen:  
Posted (edited)
On 5/6/2021 at 8:52 PM, Pandee said:
  Hide contents 


prontera,140,226,6	script	VIP System	109,{
if (getgroupid()<4) {
goto Prem;
}


Prem:
set .@day,70;
set .@week,250;
set .@month,650;
if (getgroupid()>60) {
mes "[ VIP NPC ]";
mes "Sorry,GM staff not allowed to use this feature.";
close;
}

set .@Timer, vip_status(VIP_STATUS_EXPIRE);

mes "[ VIP NPC ]";
mes "Welcome "+strcharinfo(0)+",";
mes "Please choose the menu.";
mes "^FF0000Your VIP Status will Expire at:^000000";
mes gettimestr("%Y-%m/%d %H:%M:%S",21,vip_status(VIP_STATUS_EXPIRE));
mes "^FF0000Time Left: ^000000" + callfunc("Time2Str",.@Timer);
next;

mes "[ VIP NPC ]";
mes "Purchase VIP Time.";
mes "24 hours "+.@day+" cash point";
mes "1 week "+.@week+" cash point";
mes "1 month "+.@month+" cash point";
mes "your cureent cashpoint "+#CASHPOINTS+".";
next;
switch(select("VIP 1 Day:VIP 1 Week:VIP 1 Month:No, Thanks.")) {
case 1:
if (#CASHPOINTS < .@day) {
mes "[ VIP NPC ]";
mes "Your cash points not enough,";
mes ""+.@day+" cash points needed to use this feature.";
close;
}
//set #CASHPOINTS, #CASHPOINTS - .@day;
atcommand "@vip +24h ""+strcharinfo(0)+""";
mes "[ VIP NPC ]";
mes "Enjoy your service.";
dispbottom "your current cashpoint "+#CASHPOINTS+".";
close;

case 2:
if (#CASHPOINTS < .@week) {
mes "[ VIP NPC ]";
mes "Your cash points not enough,";
mes ""+.@week+" cash points needed to use this feature.";
close;
}
//set #CASHPOINTS, #CASHPOINTS - .@week;
atcommand "@vip +7d ""+strcharinfo(0)+""";
mes "[ VIP NPC ]";
mes "Enjoy your service.";
dispbottom "your current cashpoint "+#CASHPOINTS+".";
close;

case 3:
if (#CASHPOINTS < .@month) {
mes "[ VIP NPC ]";
mes "Your cash points not enough,";
mes ""+.@month+" cash points needed to use this feature.";
close;
}
//set #CASHPOINTS, #CASHPOINTS - .@month;
atcommand "@vip +1m ""+strcharinfo(0)+""";
mes "[ VIP NPC ]";
mes "Enjoy your service.";
dispbottom "your current cashpoint "+#CASHPOINTS+".";
close;

case 4:
mes "[ VIP NPC ]";
mes "See You next time.";
close;
}

}

// --------------------------------------------------
//	Duplicates:
// --------------------------------------------------
alberta,33,240,4	duplicate(VIP System)	VIP System#alb	109
aldebaran,146,116,4	duplicate(VIP System)	VIP System#alde	109
amatsu,205,87,4	duplicate(VIP System)	VIP System#ama	109
ayothaya,212,172,6	duplicate(VIP System)	VIP System#ayo	109
comodo,191,161,4	duplicate(VIP System)	VIP System#com	109
einbech,55,36,6	duplicate(VIP System)	VIP System#einbe	109
einbroch,72,206,4	duplicate(VIP System)	VIP System#einbr	109
geffen,127,66,4	duplicate(VIP System)	VIP System#gef	109
gonryun,162,126,4	duplicate(VIP System)	VIP System#gon	109
hugel,102,148,4	duplicate(VIP System)	VIP System#hug	109
izlude,128,152,4	duplicate(VIP System)	VIP System#izl	109	//Pre-RE: (132,120)
jawaii,248,134,4	duplicate(VIP System)	VIP System#jaw	109
lighthalzen,154,104,4	duplicate(VIP System)	VIP System#lhz	109
louyang,205,105,6	duplicate(VIP System)	VIP System#lou	109
manuk,272,150,6	duplicate(VIP System)	VIP System#man	109
mid_camp,216,286,4	duplicate(VIP System)	VIP System#mid	109
morocc,146,89,4	duplicate(VIP System)	VIP System#mor	109
moscovia,226,195,4	duplicate(VIP System)	VIP System#mos	109
niflheim,199,180,4	duplicate(VIP System)	VIP System#nif	109
payon,178,109,4	duplicate(VIP System)	VIP System#pay	109
rachel,138,122,4	duplicate(VIP System)	VIP System#rac	109
splendide,198,153,4	duplicate(VIP System)	VIP System#spl	109
umbala,97,148,3	duplicate(VIP System)	VIP System#umb	109
veins,211,120,4	duplicate(VIP System)	VIP System#ve	109
xmas,142,139,6	duplicate(VIP System)	VIP System#xmas	109
yuno,164,50,4	duplicate(VIP System)	VIP System#yuno	109

// --------------------------------------------------
//	Duplicates (Renewal):
// --------------------------------------------------
brasilis,199,225,4	duplicate(VIP System)	VIP System#bra	109
dewata,202,190,6	duplicate(VIP System)	VIP System#dew	109
dicastes01,196,197,6	duplicate(VIP System)	VIP System#dic	109
malangdo,137,116,6	duplicate(VIP System)	VIP System#mal	109
malaya,228,195,4	duplicate(VIP System)	VIP System#ma	109

 

I have the above code which I tinkered from

However, Clicking on the NPC gives no chat box. I am certain i forgot or did something wrong, but the question is where. Im still very new to scripting and learning by example.

 

Thanks!

Are you already enable VIP funtion?

by default it's disable at src\config\core.hpp

Edited by hendra814
Link to comment
Share on other sites

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.

×
 Share
Go to question listing
×
×
  • Create New...