Code: Select all
use uo;
function CheckExp(who)
var player_exp := GetObjProperty(who, "Exp");
case( player_exp )
500:
SetObjProperty(who, "Level", 1);
SendSysMessage(who, "You have increased in experience.", color := 65 );
break;
1500:
SetObjProperty(who, "Level", 2);
SendSysMessage(who, "You have increased in experience.", color := 65 );
break;
4500:
SetObjProperty(who, "Level", 3);
SendSysMessage(who, "You have increased in experience.", color := 65 );
break;
default:
break;
endcase
endfunction