summaryrefslogtreecommitdiff
path: root/doc
diff options
context:
space:
mode:
Diffstat (limited to 'doc')
-rw-r--r--doc/script_commands.txt92
1 files changed, 71 insertions, 21 deletions
diff --git a/doc/script_commands.txt b/doc/script_commands.txt
index 6494b8a6c..a7d1167df 100644
--- a/doc/script_commands.txt
+++ b/doc/script_commands.txt
@@ -2334,28 +2334,78 @@ call remain, and you will get 5+2 members, of which the last 2 don't belong to
the new guy's party. $@partymembercount will always contain the correct number,
(5) unlike 'getarraysize()' which will return 7 in this case.
-Example:
+Example 1: list party member names
+
+ // get the party member names
+ getpartymember getcharid(1),0;
+
+ // It's a good idea to copy the global temporary $@partymember*****
+ // variables to your own scope variables because if you have pauses in this
+ // script (sleep, sleep2, next, close2, input, menu, select, or prompt),
+ // another player could click this NPC, trigger 'getpartymember', and
+ // overwrite the $@partymember***** variables.
+ set .@count, $@partymembercount;
+ copyarray .@name$[0], $@partymembername$[0], $@partymembercount;
+
+ // list the party member names
+ for (set .@i,0; .@i < .@count; set .@i, .@i+1) {
+ mes (.@i +1) + ". ^0000FF" + .@name$[.@i] + "^000000";
+ }
+ close;
+
- // get the character's party ID
- getpartymember(getcharid(1));
-
- // immediately copy $@partymembercount value to a new variable, since
- // you don't know when 'getpartymember' will get called again for someone
- // else's party, overwriting your global array.
- set @partymembercount,$@partymembercount;
-
- // copy $@partymembername array to a new array
- copyarray @partymembername$[0],$@partymembername$[0],@partymembercount;
-
- //list the party members in NPC dialog
- set @count,0;
- L_DisplayMember:
- if(@count == @partymembercount) goto L_DisplayMemberEnd;
- mes (@count + 1) + ". ^0000FF" + @partymembername$[@count] + "^000000";
- set @count,@count+1;
- goto L_DisplayMember;
- L_DisplayMemberEnd:
- close;
+Example 2: check party count (with a 'next' pause), before warping to event
+
+ set .register_num, 5; // How many party members are required?
+
+ // get the charID and accountID of character's party members
+ getpartymember getcharid(1), 1;
+ getpartymember getcharid(1), 2;
+
+ if ( $@partymembercount < .register_num ) {
+ mes "Please form a party of "+ .register_num +" to continue";
+ close;
+ }
+
+ // loop through both and use 'isloggedin' to count online party members
+ for ( set .@i, 0; .@i < $@partymembercount; set .@i, .@i +1 )
+ if ( isloggedin( $@partymemberaid[.@i], $@partymembercid[.@i] ) )
+ set .@count_online, .@count_online +1 ;
+ // We search accountID & charID because a single party can have multiple
+ // characters from the same account. Without searching through the charID,
+ // if a player has 2 characters from the same account inside the party but
+ // only 1 char online, it would count their online char twice.
+
+ if ( .@count_online != .register_num ) {
+ mes "All your party members must be online to continue";
+ close;
+ }
+
+ // copy the array to prevent players cheating the system
+ copyarray .@partymembercid, $@partymembercid, .register_num;
+
+ mes "Are you ready ?";
+ next; // careful here
+ select "Yes";
+
+ // When a script hits a next, menu, sleep or input that pauses the script,
+ // players can invite or /leave and make changes in their party. To prevent
+ // this, we call getpartymember again and compare with the original values.
+
+ getpartymember getcharid(1), 1;
+ if ( $@partymembercount != .register_num ) {
+ mes "You've made changes to your party !";
+ close;
+ }
+ for ( set .@i, 0; .@i < $@partymembercount; set .@i, .@i +1 ) {
+ if ( .@partymembercid[.@i] != $@partymembercid[.@i] ) {
+ mes "You've made changes to your party !";
+ close;
+ }
+ }
+
+ // Finally, it's safe to start the event!
+ warpparty "event_map", 0,0, getcharid(1);
---------------------------------------