eASU - Show script n.3135 (by Ivion)
english italiano pt-br german polish | Click on those flags to change language
Description No descriptions for this script
Information Created by Ivion, at 18:24, 8 June 2008; See: 115
eASU Home | Download
Advertising
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
 39
40
41
42
43
44
45
46
47
48
 49
50
51
52
53
//
// [==================================================]
// [                 Battle Refiner                   ]
// [==================================================]
// [ Version 2                                        ]
// [==================================================]
// [ Description:                                     ]
// [--------------------------------------------------]
// [                                                  ]
// [ - Everytime when you kill a monster, it adds a   ]
// [ very little chance to successfully refine an     ]
// [ equiped item.                                    ]
// [                                                  ]
// [==================================================]
// [ Changelog:                                       ]
// [--------------------------------------------------]
// [                                                  ]
// [ v1: [Ivion]                                      ]
// [                                                  ]
// [ v2: [Ivion]                                      ]
// [ - Bugfix: Non monster enemies causes errors.     ]
// [ - It won't check non refinable slots (7 -> 10).  ]
// [ - Decreased the default chance by 50%.           ]
// [==================================================]

-	script	Battle Refiner	-1,{
OnInit:

// [==================================================]
// [ Configuration:                                   ]
// [--------------------------------------------------]

	set .r1,100;	// Rate. (%)

// [--------------------------------------------------]
// [ End of configuration.                            ]
// [==================================================]

end;

OnNPCKillEvent:
	set .@a,rand(1,6);
	if(getequipisequiped(.@a) && getequipisenableref(.@a)) {
		set .@c,getequiprefinerycnt(.@a);
		if(.@c < 10) {
			if((.@a == 3) || (.@a == 4)) set .@b,getequipweaponlv(.@a);
			else set .@b,3;
			set .@d,strmobinfo(3,killedrid);
			if(!.@d) end;
			if(!rand(pow(2,.@b + .@c) * 400 * pow(BaseLevel,2) / (pow(.@d * 2,2) * .r1))) successrefitem .@a;
		}
	}
}
» Show Debug
Code & Graphic by Rocklion | Skin idea from Php-Q.

Ragnarok Online eAthena Freya Aegis RO File Hosting free Script Hosting Script Highlighter MMORPG MMOG Online Games Ragnarok2 Play