Returns an integer array with the vnum locations of all the peristrata.
Notes: * Peristrata order is always the same.
1 - Healing
2 - Enhancement
3 - Channeling
4 - Necromancy
5 - Mental
6 - Summoning
7 - Shaping
Example:
setpr cool-item 1 on_peristrata-test
set_attr('tmpPeri','1'),
foreach(peristrata(),%1,
(
switch(get_attr('tmpPeri'),
'1',msg_character(%a,'healing: '+%1),
'2',msg_character(%a,'enhancement: '+%1),
'3',msg_character(%a,'channeling: '+%1),
'4',msg_character(%a,'necromancy: '+%1),
'5',msg_character(%a,'mental: '+%1),
'6',msg_character(%a,'summoning: '+%1),
'7',msg_character(%a,'shaping: '+%1)
),
set_attr('tmpPeri',''+simple_math(integer(get_attr('tmpPeri')),1))
)
),
return(true)
@
setpr cool-item 1 on_peristrata-enhancement
msg_character(%a,'The `Enhancement` Peri is in room #'+peristrata()[2]),
return(true)
@
Result:
> peristrata-test
Healing: 11012
Enhancement: 54025
Channeling: 54300
Necromancy: 88011
Mental: 75141
Summoning: 12123
Shaping: 60025
> peristrata-enhancement
The `Enhancement` Peri is in room #54025