| 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 bonus4 
31 bAutoSpellOnSkill,"CG_ARROWVULCAN","CG_TAROTCARD",5,100; 					 |