getequipcardid.txt 928 B

123456789101112131415161718192021222324252627282930313233
  1. //===== By: ==================================================
  2. //= Lupus
  3. //= Shows your HAT's slots IDs
  4. //= Use it for some checks... e.g.
  5. //= is your EQUPPED weapon has FIRE property?
  6. //= is your EQUPPED item produced?
  7. //============================================================
  8. prontera,155,177,4 script Check My Hat 810,{
  9. mes "Checking your head...";
  10. set @ref,0;
  11. if (getequipisequiped(1)) goto L_CHECK1;
  12. mes "Nothing?";
  13. emotion e_hmm;
  14. close;
  15. L_CHECK1:
  16. set @id,getequipid(1);
  17. if(getequipisidentify(1)) goto L_CHECK2;
  18. mes "How can you wear not identified hats?";
  19. npctalk "You're a cheater!";
  20. emotion e_wah;
  21. close;
  22. L_CHECK2:
  23. set @ref,getequiprefinerycnt(1);
  24. mes "Your hat is... "+getitemname(@id)+"...";
  25. if(@ref)mes "It has been refined "+@ref+" times.";
  26. mes "Card Slot 0:"+getequipcardid(1,0)+" 1:"+getequipcardid(1,1);
  27. mes "Card Slot 2:"+getequipcardid(1,2)+" 3:"+getequipcardid(1,3);
  28. close;
  29. }