diff options
| author | Jesusaves <cpntb1@ymail.com> | 2020-01-29 01:35:23 -0300 |
|---|---|---|
| committer | Jesusaves <cpntb1@ymail.com> | 2020-01-29 01:35:23 -0300 |
| commit | 33c5c19806afeddb9a2b649facad9fb7f794948f (patch) | |
| tree | d7a75188f7f241df6ba3fca16edab9c2870e7a6a /npc/001-11 | |
| parent | a59139db992624310d9debc5a54949af4fcd6878 (diff) | |
| download | serverdata-33c5c19806afeddb9a2b649facad9fb7f794948f.tar.gz serverdata-33c5c19806afeddb9a2b649facad9fb7f794948f.tar.bz2 serverdata-33c5c19806afeddb9a2b649facad9fb7f794948f.tar.xz serverdata-33c5c19806afeddb9a2b649facad9fb7f794948f.zip | |
Prototype untested code for Mirror Islands
Diffstat (limited to 'npc/001-11')
| -rw-r--r-- | npc/001-11/event_soulmenhir.txt | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/npc/001-11/event_soulmenhir.txt b/npc/001-11/event_soulmenhir.txt index 6516cbbd0..ebb9773da 100644 --- a/npc/001-11/event_soulmenhir.txt +++ b/npc/001-11/event_soulmenhir.txt @@ -11,6 +11,7 @@ menu l("Touch it."), L_Warp, rif(!#VALENTINE_EQUIPMENT2020 && gettime(GETTIME_YEAR) == 2020, l("Obtain event equipment")), L_EVTC2020, + rif(getusers(1) >= 6, l("Warp to a mirror island.")), L_WarpMirror, l("Leave it alone."), -; close; @@ -18,6 +19,41 @@ L_Warp: warp "Save", 0, 0; close; +// Done for multiple players +L_WarpMirror: + .@u=getusers(1); + mesn; + mes l("To which mirrored island you want to warp?"); + .@i=0; + .@dest$="Stay here"; + // Create instances as needed + while (.@i < .@u/6) { + .@i+=1; + .@dest$+=sprintf(":Mirror Island %d", .@i); + if (!(getd("$@VALENTINE_MI"+.@i) && + isinstance(getd("$@VALENTINE_MI"+.@i)))) { + debugmes "Create Mirror Island %d", .@i; + + .@tmpist = instance_create("001-11@Mirror"+.@i, 0, IOT_NONE); + instance_attachmap("001-11", .@tmpist, 0, "001-11@MI"+.@i); + instance_set_timeout(1000000, 1000000, .@tmpist); + instance_init(.@tmpist); + setd("$@VALENTINE_MI"+.@i, .@tmpist); + } + } + select .@dest$; + if (@menu == 1) + close; + @menu-=1; + warp "001-11@MI"+@menu, 38, 32; + dispbottom l("Mirror Island %d", @menu); + /* + select + rif(.@u >= 6, l("Mirror Island 1")), + */ + closeclientdialog; + close; + // Special labels L_EVTC2020: showavatar NPC_BARD_TRUMP; |