TILEMASTER2004 DATA V1
LIST: 1
T:
MOVEONLY
P: 12 20
SCRIPT: 35
0 M "The ravine here is very deep, the ice tinted blue by the light playing off of the strange arctic sky high above.  There is a strange sense here, calm and yet extremely powerful."
0 Pause
0 PartyIterator -INIT
1 PartyIterator -CHECKSPLIT -ETAG N2 -PNAME
0 GivePCMB 4 15 15
0 GOTO P1
2 NOOP
0 CheckFlag 31 1 10
0 SetFlag 31
0 Give XP 7500 -SHOW
0 Pause
0 Party -ACHARTOTARGET -GETPPC -SETACHAR -PNAME
0 CM "The strange feeling leaves you quite invigorated" -NL "You gain 1 point in all attributes!" -NL
0 Give STR 1
0 Give AGI 1
0 Give STA 1
0 Give INT 1
0 Give WIS 1
0 Give CHA 1
0 Party -TARGETTOACHAR
10 PartyIterator -INIT
1 PartyIterator -CHECKSPLIT -ETAG N20
0 CheckItem 258 1 11
0 CheckItem 257 1 12
0 GOTO P1
11 Pause
0 TakeItem 258
0 GiveItem 257
0 GOTO N15
12 Pause
0 SetItem INV 257 -CHARGES MAX
15 Party -PNAME
0 M "Something in your inventory glows briefly!"
0 GOTO P1
20 Script 701
END
