e780ab2f51
* Deleted doc\pccommand_list.txt, it's outdated and its contents are already (better) explained in doc\script_commands.txt * Other misc cleaning... git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@16453 54d463be-8e91-2dee-dedb-b68131a5f0ec
34 lines
928 B
Plaintext
34 lines
928 B
Plaintext
//===== By: ==================================================
|
|
//= Lupus
|
|
//= Shows your HAT's slots IDs
|
|
//= Use it for some checks... e.g.
|
|
//= is your EQUPPED weapon has FIRE property?
|
|
//= is your EQUPPED item produced?
|
|
//============================================================
|
|
|
|
prontera,155,177,4 script Check My Hat 810,{
|
|
mes "Checking your head...";
|
|
set @ref,0;
|
|
|
|
if (getequipisequiped(1)) goto L_CHECK1;
|
|
mes "Nothing?";
|
|
emotion e_hmm;
|
|
close;
|
|
|
|
L_CHECK1:
|
|
set @id,getequipid(1);
|
|
if(getequipisidentify(1)) goto L_CHECK2;
|
|
mes "How can you wear not identified hats?";
|
|
npctalk "You're a cheater!";
|
|
emotion e_wah;
|
|
close;
|
|
|
|
L_CHECK2:
|
|
set @ref,getequiprefinerycnt(1);
|
|
mes "Your hat is... "+getitemname(@id)+"...";
|
|
if(@ref)mes "It has been refined "+@ref+" times.";
|
|
mes "Card Slot 0:"+getequipcardid(1,0)+" 1:"+getequipcardid(1,1);
|
|
mes "Card Slot 2:"+getequipcardid(1,2)+" 3:"+getequipcardid(1,3);
|
|
close;
|
|
}
|