Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- if (#biggayhearts==3)
- {
- //if 1 party member online and same map
- getpartymember(getcharid(1));
- if ($@partymembercount == 2)
- {
- set .@partner$,$@partymembername$[1]; // party member's name
- set .@partner,$@partymembercid[1]; // party member's char id
- set .@charid, getcharid(1);
- mes "Ah, is this the object of your affections? Such a lovely couple you make.";
- next;
- if (getpartnerid())
- {
- mes "["+strnpcinfo(1)+"]";
- mes "It looks like you're married already. Whether it's to this fine thing or not I don't care. Your vows will be set anew.";
- next;
- mes "["+strnpcinfo(1)+"]";
- mes "Are you sure you want to do this?";
- next;
- switch(select("No, I want to stay married to my sweetheart.","Yes, I want to renew my vows."))
- {
- case 1:
- mes "["+strnpcinfo(1)+"]";
- mes "Why are you wasting my time?";
- close2;
- misceffect 262;
- misceffect 267;
- percentheal -100,0;
- npctalk "Get out of here.";
- end;
- case 2: // Divorces character if they are already married.
- mes "[Willow]";
- mes "First we must break the old bonds and give you a brief divorce.";
- next;
- divorce;
- mes "[Willow]";
- mes "There you go. Now the wedding can be set in motion.";
- }
- }
- close2;
- if (!attachrid(.@partner))
- {
- npctalk "Seems your partner has run off. You better take care of that.";
- }
- else
- {
- set .@partnersex, readparam(Sex);
- if (getpartnerid()) // Partner already married
- {
- mes "["+strnpcinfo(1)+"]";
- mes "It looks like you're married already. Whether it's to this fine thing or not I don't care. Your vows will be set anew.";
- next;
- mes "["+strnpcinfo(1)+"]";
- mes "Are you sure you want to do this?";
- next;
- switch(select("No, I want to stay married to my sweetheart.","Yes, I want to renew my vows."))
- {
- case 1:
- mes "["+strnpcinfo(1)+"]";
- mes "Why are you wasting my time?";
- close2;
- misceffect 262;
- misceffect 267;
- percentheal -100,0;
- npctalk "Get out of here.";
- end;
- case 2: // Divorces character if they are already married.
- mes "[Willow]";
- mes "First we must break the old bonds and give you a brief divorce.";
- next;
- divorce;
- mes "[Willow]";
- mes "There you go. Now the wedding can be set in motion.";
- }
- }
- close2;
- {
- if (!attachrid (.@charid)) // Attach back to original player
- { // Char couldn't be attached
- npctalk "Someone is going to be lonely this Valentine's Day...";
- }
- else
- {
- mes "["+strnpcinfo(1)+"]";
- mes "Let's get on with it then. Step forward and hold each other's hands, if you please.";
- close2;
- npctalk "Dearly beloved, we are gathered here today to witness as "+strcharinfo(0)+" and "+.@partner$+" join together in the bonds of matrimony.";
- sleep2 6000;
- npctalk "Marriage is the truest ceremony where two people can commit to each other and express their undying love.";
- sleep2 5000;
- npctalk "As such, it is my honor to bless this holiest and most natural of unions.";
- sleep2 5000;
- npctalk "Whatever the future hold, these two are here now and will enjoy each other's affections as time permits.";
- sleep2 7000;
- npctalk ""+strcharinfo(0)+", you have gone through strenuous challenges to earn the love of your sweetheart.";
- sleep2 5000;
- npctalk "And "+.@partner$+", you are lucky to have someone who loves you so much.";
- sleep2 6000;
- npctalk "As you would have it so, by the grand powers vested in me...";
- sleep2 7000;
- announce "May the bonds of love shared by "+strcharinfo(0)+" and "+.@partner$+" last forever.", bc_all, 0xFD79A1;
- marriage .@partner$; // Marry the character to the party member
- getitem 22230,1; // Seasonal Event Token
- set #biggayhearts,4;
- wedding;
- misceffect 172;
- misceffect 487;
- misceffect 244;
- end;
- }
- }
- }
- }
- else if ($@partymembercount > 2)
- {
- mes "You've got too many guests. This is an intimate ceremony between two people to express your sole devotion to each other's soul.";
- next;
- mes "["+strnpcinfo(1)+"]";
- mes "Get rid of these voyeurs.";
- close;
- }
- else
- {
- mes "Your imaginary friend doesn't count as a spouse I'm afraid.";
- next;
- mes "["+strnpcinfo(1)+"]";
- mes "If you're serious about this you need to ^FF0000bring your loved one here in your party^000000.";
- close;
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement