Jump to content

Utility: VIP System

hendra814

By hendra814
in Utility Script Releases

 Share

Recommended Posts

hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
Posted
VIP System

View File

VIP System

This is for get VIP status with cash point

can edit at this point

Quote
set .@day,1000;
set .@week,5000;
set .@month,20000;

don't forget to enable VIP system at

src\config\core.h

Quote

/// Uncomment to enable VIP system.
#define VIP_ENABLE

to add bonus for VIP edit this file

rathena\conf\battle\player.conf

Quote

//===================================
// VIP system
//===================================
// Storage slot increase. Setting to 0 will disable.
// Give more storage slots above the MIN_STORAGE limit.
// Note: MIN_STORAGE + vip_storage_increase cannot exceed MAX_STORAGE.
// Default: 300
vip_storage_increase: 300

// Base experience rate increase. Setting to 0 will disable. (Note 2)
// Default: 50
vip_base_exp_increase: 50

// Job experience rate increase. Setting to 0 will disable. (Note 2)
// Default: 50
vip_job_exp_increase: 50

// Experience penalty rate multiplier for VIP accounts.
// Default: 100 (100 = 1% penalty)
vip_exp_penalty_base: 0
vip_exp_penalty_job: 0

// Zeny penalty for VIP accounts.
// Zeny loss only happens if the player dies from another player.
// Default: 0 (100 = 1% penalty)
vip_zeny_penalty: 0

// Battle Manual experience increase. Setting to 0 will disable.
// - Regular/Thick Battle Manual: 50+(50/X) = 75%
// - HE Battle Manual: 100+(100/X) = 150%
// - Battle Manual x3: 200+(200/X) = 300%
// Note: X is the config value.
// Default: 2
vip_bm_increase: 2

// Item drop increase. Setting to 0 will disable.
// Note: 50 = 50% item_drop increase.
// For item_rate = 200: 200 * 50 / 100 = 100 bonus rate added to the 200 base giving total rate of 300.
// Default: 50
vip_drop_increase: 50

// Gemstone requirement.
// Can the VIP Group ignore Gemstone requirement for skills?
// 0 = Disable
// 1 = Behave like Mistress Card
// 2 = Remove all gemstone requirements (default)
vip_gemstone: 2

// Will display rate information (EXP, Drop, and Death penalty message)? (Note 1)
vip_disp_rate: yes

 

  • Submitter
    hendra814
  • Submitted
    05/19/2017
  • Category
    Utilities
  • Video
  • Content Author
    hendra814

 

  • Upvote 1
Link to comment
Share on other sites
hadie Drops

hadie

Posted
  • Group:  Members
  • Topic Count:  30
  • Topics Per Day:  0.01
  • Content Count:  86
  • Reputation:   1
  • Joined:  03/11/12
  • Last Seen:  
Posted
On 5/19/2017 at 11:41 PM, hendra814 said:

VIP System

This is for get VIP status with cash point

can edit at this point

don't forget to enable VIP system at

src\config\core.h

to add bonus for VIP edit this file

rathena\conf\battle\player.conf

 

 

thanks

Link to comment
Share on other sites
Yonko Poring

Yonko

Posted
  • Group:  Members
  • Topic Count:  166
  • Topics Per Day:  0.04
  • Content Count:  789
  • Reputation:   50
  • Joined:  04/16/12
  • Last Seen:  
Posted

thanks for this but one thing. This VIP tier level possible? for example

VIP Level 1 = 20% increase exp and drop
VIP Level 2 = 30% increase exp and drop
and so forth.


 

Link to comment
Share on other sites
dikapramantya Drops

dikapramantya

Posted
  • Group:  Members
  • Topic Count:  55
  • Topics Per Day:  0.01
  • Content Count:  216
  • Reputation:   9
  • Joined:  07/12/12
  • Last Seen:  
Posted

Hi hendra.

Can you help me about this ?

 

thanks if you can help me hihihih

 

 

Link to comment
Share on other sites
Deleted User Poring

Deleted User

Posted
  • Group:  Members
  • Topic Count:  22
  • Topics Per Day:  0.00
  • Content Count:  235
  • Reputation:   55
  • Joined:  12/02/11
  • Last Seen:  
Posted (edited)
On 5/23/2017 at 5:48 AM, Yonko said:

thanks for this but one thing. This VIP tier level possible? for example

VIP Level 1 = 20% increase exp and drop
VIP Level 2 = 30% increase exp and drop
and so forth.


 

 
 

I might able to write ths however if we have an existing commmand like this.
it's gonna be easy.

But we can use an alternative way :D

Edited by Kaze
Link to comment
Share on other sites
  • 2 months later...
zangelmi Poring

zangelmi

Posted
  • Group:  Members
  • Topic Count:  0
  • Topics Per Day:  0
  • Content Count:  2
  • Reputation:   0
  • Joined:  08/07/17
  • Last Seen:  
Posted

please help every time when I load script appears load error, why?

Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
6 hours ago, zangelmi said:

please help every time when I load script appears load error, why?

Can you show the screen capture so i could check it.

Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
On 5/28/2017 at 2:15 AM, dikapramantya said:

Hi hendra.

Can you help me about this ?

 

thanks if you can help me hihihih

 

 

i'm post reply on your thread, sorry for late reply.

Link to comment
Share on other sites
zangelmi Poring

zangelmi

Posted
  • Group:  Members
  • Topic Count:  0
  • Topics Per Day:  0
  • Content Count:  2
  • Reputation:   0
  • Joined:  08/07/17
  • Last Seen:  
Posted

Its was my fault sorry I was typed invalid name in scrpit_custom now its ok

Link to comment
Share on other sites
  • 4 weeks later...
Xiao Poring

Xiao

Posted
  • Group:  Members
  • Topic Count:  10
  • Topics Per Day:  0.00
  • Content Count:  65
  • Reputation:   0
  • Joined:  12/10/14
  • Last Seen:  
Posted

@hendra814   Thanks!

Link to comment
Share on other sites
  • 4 weeks later...
Haganezuka Poring

Haganezuka

Posted
  • Group:  Members
  • Topic Count:  23
  • Topics Per Day:  0.01
  • Content Count:  116
  • Reputation:   4
  • Joined:  08/14/16
  • Last Seen:  
Posted

Can i use different method for availing the vip system? instead of cash points like pods a.k.a proof of donation?

Link to comment
Share on other sites
  • 3 weeks later...
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted (edited)
On 9/30/2017 at 7:46 AM, wakefield21 said:

Can i use different method for availing the vip system? instead of cash points like pods a.k.a proof of donation?

Here 

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

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;
switch(select("Buy items:Get buffs:No, thanks.")) {
	case 1:
		mes "Choose items do you wants.";
		goto item_list;

		item_list:
		menu "Universal Catalog Gold 20000 Zeny",Catalog,"Unlimited Flywing Box 20000 zeny",unli,"HP Pil 10000 Zeny",HP_PILL,"SP Pil 10000 Zeny",SP_PILL,"Authoritative Badge 10000 Zeny",Authoritative;

		Catalog:
		set .@amount, countitem(12581);
		if (zeny < 20000) mes "Sorry,Your zeny not enough,";
		else if (.@amount >= 1) mes "You still have the item.";
		else{
		getitem 12581,10;
		set zeny,zeny-20000;
		}
		close;
		
		unli:
		set .@amount, countitem(17229);
		if (zeny < 20000) mes "Sorry,Your zeny not enough,";
		else if (.@amount >= 1) mes "You still have the item.";
		else{
		getitem 17229,1;
		set zeny,zeny-20000;
		}
		close;

		HP_PILL:
		set .@amount, countitem(12274);
		if (zeny < 10000) mes "Sorry,Your zeny not enough,";
		else if (.@amount >= 1) mes "You still have the item.";
		else{
		getitem 12274,10;
		set zeny,zeny-10000;
		}
		close;

		SP_PILL:
		set .@amount, countitem(12275);
		if (zeny < 10000) mes "Sorry,Your zeny not enough,";
		else if (.@amount >= 1) mes "You still have the item.";
		else{
		getitem 12275,10;
		set zeny,zeny-10000;
		}
		close;

		Authoritative:
		set .@amount, countitem(662);
		if (zeny < 10000) mes "Sorry,Your zeny not enough,";
		else if (.@amount >= 1) mes "You still have the item.";
		else{
		getitem 662,10;
		set zeny,zeny-10000;
		}
		close;

	case 2:
		mes "Choose which one do you wants.";
		mes "First Buff ^FF0000STR +8, AGI +6, DEX +4, ATK +32^000000";
		mes "Second Buffs ^FF0000INT +8, DEX +6, VIT +4, MATK +40^000000";
		next;
		mes "Third Buffs ^FF0000Dex +8, AGI +6, LUK +4, ATK +24, MATK +24^000000";
		mes "Fourth Buffs ^FF0000all stat +6, ATK +24, MATK +24^000000";
		goto buff;

		buff:
		menu "First Buffs",First,"Second Buffs",Second,"Third Buffs",Third,"Fourth Buffs",Fourth;

First:
sc_start SC_STRFOOD,3600000,8;
sc_start SC_AGIFOOD,3600000,6;
sc_start SC_DEXFOOD,3600000,4;
sc_start SC_ATKPOTION,3600000,32;
percentheal 100,100;
close;

Second:
sc_start SC_INTFOOD,3600000,8;
sc_start SC_DEXFOOD,3600000,6;
sc_start SC_VITFOOD,3600000,4;
sc_start SC_MATKPOTION,3600000,40;
percentheal 100,100;
close;

Third:
sc_start SC_DEXFOOD,3600000,8;
sc_start SC_AGIFOOD,3600000,6;
sc_start SC_LUKFOOD,3600000,4;
sc_start SC_ATKPOTION,3600000,24;
sc_start SC_MATKPOTION,3600000,24;
percentheal 100,100;
close;

Fourth:
sc_start SC_STRFOOD,3600000,6;
sc_start SC_AGIFOOD,3600000,6;
sc_start SC_VITFOOD,3600000,6;
sc_start SC_INTFOOD,3600000,6;
sc_start SC_DEXFOOD,3600000,6;
sc_start SC_LUKFOOD,3600000,6;
sc_start SC_ATKPOTION,3600000,24;
sc_start SC_MATKPOTION,3600000,24;
percentheal 100,100;
close;

	case 3:
	mes "See you next time.";
	close;
	}

Prem:
set .@day,10;
set .@week,20;
set .@month,30;
set .required,7179;
if (getgroupid()>60) {
mes "[ VIP NPC ]";
mes "Sorry, GM Staff can't use this feature.";
close;
}

mes "[ VIP NPC ]";
mes "Here requirement to get VIP Status.";
mes "24 hours require "+.@day+" "+getitemname(.required)+"";
mes "1 week require "+.@week+" "+getitemname(.required)+"";
mes "1 month require "+.@month+" "+getitemname(.required)+"";
next;
switch(select("Register 24 hours:Register 1 Week:Register 1 Month:No, Thanks.")) {
case 1:
if( countitem(.required) < 10 ) {
mes "[ VIP NPC ]";
mes "You don't have item requirement or the item not enough";
mes ""+.@day+" "+getitemname(.required)+" to get VIP status.";
close;
}
delitem .required, .@day;
atcommand "@vip +24h "+strcharinfo(0)+"";
mes "[ VIP NPC ]";
mes "Enjoy your VIP status.";
close;

case 2:
if( countitem(.required) < 20 ) {
mes "[ VIP NPC ]";
mes "You don't have item requirement or the item not enough";
mes ""+.@week+" "+getitemname(.required)+" to get VIP status.";
close;
}
delitem .required, .@week;
atcommand "@vip +7d "+strcharinfo(0)+"";
mes "[ VIP NPC ]";
mes "Enjoy your VIP status.";
close;

case 3:
if( countitem(.required) < 30 ) {
mes "[ VIP NPC ]";
mes "You don't have item requirement or the item not enough";
mes ""+.@month+" "+getitemname(.required)+" to get VIP status.";
close;
}
delitem .required, .@month;
atcommand "@vip +1m "+strcharinfo(0)+"";
mes "[ VIP NPC ]";
mes "Enjoy your VIP status.";
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

 

Edited by hendra814
Link to comment
Share on other sites
  • 5 months later...
brunoshp Drops

brunoshp

Posted
  • Group:  Members
  • Topic Count:  64
  • Topics Per Day:  0.01
  • Content Count:  180
  • Reputation:   7
  • Joined:  12/19/12
  • Last Seen:  
Posted

Man I have problem in Script

Quote

mes gettimestr("%Y-%m/%d %H:%M:%S",21,vip_status(VIP_STATUS_EXPIRE));

in this line.

  • Upvote 1
Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
8 hours ago, brunoshp said:

Man I have problem in Script

in this line.

could you share screen shoot error in map server or in game.

Link to comment
Share on other sites
  • 1 year later...
ittiphol Poring

ittiphol

Posted
  • Group:  Members
  • Topic Count:  27
  • Topics Per Day:  0.01
  • Content Count:  115
  • Reputation:   7
  • Joined:  05/09/19
  • Last Seen:  
Posted

How to set account user to vip

 

thank you.

Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
On 6/11/2019 at 1:05 PM, ittiphol said:

How to set account user to vip

 

thank you.

please read at first post, and then apply the script in your server

Then register using your char into the NPC

Link to comment
Share on other sites
  • 3 months later...
mathlister Poring

mathlister

Posted
  • Group:  Members
  • Topic Count:  2
  • Topics Per Day:  0.00
  • Content Count:  17
  • Reputation:   2
  • Joined:  06/10/16
  • Last Seen:  
Posted

please Help me!

script is ok!

but when i click on ( BUY ITEM )

its Show error... 

 

errro1.png

errro1.png

Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
On 9/27/2019 at 4:55 PM, mathlister said:

please Help me!

script is ok!

but when i click on ( BUY ITEM )

its Show error... 

 

errro1.png

errro1.png

Please check your database, are the item already have in your database

universal catalog gold item ID 12571

Unlimited fly wing item ID 17229

HP Pill item ID 12274

SP PIll item ID 12275

Authoritative Badge item ID 622

Unlimited concentration item ID 17226

Unlimited Awakening Item ID 17227

Unlimited Berserk item ID 17228

Unlimited Giant Fly Wing item ID 17314

Link to comment
Share on other sites
  • 1 month later...
admagnus Poring

admagnus

Posted
  • Group:  Members
  • Topic Count:  14
  • Topics Per Day:  0.00
  • Content Count:  33
  • Reputation:   2
  • Joined:  11/22/16
  • Last Seen:  
Posted
On 4/11/2018 at 3:48 PM, brunoshp said:

Man I have problem in Script

in this line.

mes gettimestr("%Y-%m/%d %H:%M:%S",21,vip_status(VIP_STATUS_EXPIRE));

i have the same trouble!

error.png

Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
19 hours ago, admagnus said:

i have the same trouble!

error.png

Are you using lastest rathena, because on mine work well

image.png.b1a15a27daf456cf6a2c0551a59749e4.png

Link to comment
Share on other sites
  • 2 years later...
iFox Magmaring

iFox

Posted
  • Group:  Members
  • Topic Count:  23
  • Topics Per Day:  0.02
  • Content Count:  55
  • Reputation:   0
  • Joined:  05/30/22
  • Last Seen:  
Posted
On 11/22/2019 at 2:26 AM, hendra814 said:

Are you using lastest rathena, because on mine work well

image.png.b1a15a27daf456cf6a2c0551a59749e4.png

good day sir. The script itself was working. But everytime i registered using normal account. It doesnt change the chat bubbles. stay the same on registering the VIP. And cant use vip service. Same goes to my account. Belong to group 0 even though i regsiter? Thank you in advance

Link to comment
Share on other sites
  • 2 weeks later...
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted
On 7/21/2022 at 5:23 AM, iFox said:

good day sir. The script itself was working. But everytime i registered using normal account. It doesnt change the chat bubbles. stay the same on registering the VIP. And cant use vip service. Same goes to my account. Belong to group 0 even though i regsiter? Thank you in advance

Ok i will test it and will inform you later.

 

sorry for late reply, already tried at my rathena server and i didn't found issue like yours.
can you show to me SS in the game.

Link to comment
Share on other sites
  • 9 months later...
WATAFAK Drops

WATAFAK

Posted
  • Group:  Members
  • Topic Count:  2
  • Topics Per Day:  0.00
  • Content Count:  18
  • Reputation:   0
  • Joined:  11/03/13
  • Last Seen:  
Posted

where is npc config?

Link to comment
Share on other sites
hendra814 Ghostring

hendra814

Posted
  • Group:  Members
  • Topic Count:  59
  • Topics Per Day:  0.01
  • Content Count:  1278
  • Reputation:   170
  • Joined:  06/12/12
  • Last Seen:  
  • Author
Posted (edited)
2 hours ago, WATAFAK said:

where is npc config?

at line 185 until 187 for premium cashpoint price.

Edited by hendra814
Link to comment
Share on other sites
WATAFAK Drops

WATAFAK

Posted
  • Group:  Members
  • Topic Count:  2
  • Topics Per Day:  0.00
  • Content Count:  18
  • Reputation:   0
  • Joined:  11/03/13
  • Last Seen:  
Posted (edited)

Whats name 7179 for item_cash.yml?? I use Proof_of_Donation, Proof_Of_Donation and id, but have error

image.png.3cd75a1644de0583d5ffd65e4a06f617.png

 

Solved: 7179 = Donation_Card

Edited by WATAFAK
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
Reply to this topic...

×   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 topic listing
×
×
  • Create New...