| Item Use Script | 
		
							 1 bonus2 
2 bAddRace,RC_DemiHuman,95; 
3 bonus2 
4 bAddRace,RC_Player_Human,95; 
5 bonus2 
6 bIgnoreDefRaceRate,RC_DemiHuman,20; 
7 bonus2 
8 bIgnoreDefRaceRate,RC_Player_Human,20; 
9 bonus 
10 bUnbreakableWeapon; 
11 .@r 
12 = 
13 getrefine(); 
14 if 
15 (.@r 
16 5) 
17 { 
18 bonus2 
19 bAddRace,RC_DemiHuman,pow(min(14,.@r)-4,2); 
20 bonus2 
21 bAddRace,RC_Player_Human,pow(min(14,.@r)-4,2); 
22 bonus2 
23 bIgnoreDefRaceRate,RC_DemiHuman,5; 
24 bonus2 
25 bIgnoreDefRaceRate,RC_Player_Human,5; 
26 } 
27 if 
28 (.@r 
29 8) 
30 { 
31 bonus3 
32 bAutoSpell,"MO_INVESTIGATE",5,(.@r*10-50); 
33 bonus3 
34 bAutoSpell,"AL_DECAGI",1,(.@r*10-50); 
35 } 					 |