URL http://paste-bin.com/view/b598c568

View Raw


P1BNPC

By David[Aeshathos], 4 Months ago, written in php.
  1. mapname,x,y,4   script  Mad Beret       ID,{
  2.  
  3.         mes "[Mad Beret]";
  4.         mes "I can trade in your feather berets for any colour of choice!";
  5.         mes "All it takes is the requirements and the beret."
  6.         mes "Choose";
  7.         switch(select("Black:Brown:Gold:Green:Light Blue:Orange:Pink:Purple:Red:Silver:White:Close NPC")) {
  8.  
  9.                 case 1:
  10.                         if(countitem(5170)<1) goto L_Beret;
  11.                         if(zeny < 500000) goto L_Beret;
  12.                         set zeny,zeny-500000;
  13.                         delitem 5170,1;
  14.                         getitem 21064,1;
  15.                         end;
  16.                         close;
  17.                
  18.                 case 2:
  19.                         if(countitem(5170)<1) goto L_Beret;
  20.                         if(zeny < 500000) goto L_Beret;
  21.                         set zeny,zeny-500000;
  22.                         delitem 5170,1;
  23.                         getitem 21065,1;
  24.                         end;
  25.                         close;
  26.  
  27.                 case 3:
  28.                         if(countitem(5170)<1) goto L_Beret;
  29.                         if(zeny < 500000) goto L_Beret;
  30.                         set zeny,zeny-500000;
  31.                         delitem 5170,1;
  32.                         getitem 21066,1;
  33.                         end;
  34.                         close;
  35.  
  36.                 case 4:
  37.                         if(countitem(5170)<1) goto L_Beret;
  38.                         if(zeny < 500000) goto L_Beret;
  39.                         set zeny,zeny-500000;
  40.                         delitem 5170,1;
  41.                         getitem 21067,1;
  42.                         end;
  43.                         close;
  44.  
  45.                 case 5:
  46.                         if(countitem(5170)<1) goto L_Beret;
  47.                         if(zeny < 500000) goto L_Beret;
  48.                         set zeny,zeny-500000;
  49.                         delitem 5170,1;
  50.                         getitem 21068,1;
  51.                         end;
  52.                         close;
  53.  
  54.                 case 6:
  55.                         if(countitem(5170)<1) goto L_Beret;
  56.                         if(zeny < 500000) goto L_Beret;
  57.                         set zeny,zeny-500000;
  58.                         delitem 5170,1;
  59.                         getitem 21069,1;
  60.                         end;
  61.                         close;
  62.  
  63.                 case 7:
  64.                         if(countitem(5170)<1) goto L_Beret;
  65.                         if(zeny < 500000) goto L_Beret;
  66.                         set zeny,zeny-500000;
  67.                         delitem 5170,1;
  68.                         getitem 21070,1;
  69.                         end;
  70.                         close;
  71.                 case 8:
  72.                         if(countitem(5170)<1) goto L_Beret;
  73.                         if(zeny < 500000) goto L_Beret;
  74.                         set zeny,zeny-500000;
  75.                         delitem 5170,1;
  76.                         getitem 21071,1;
  77.                         end;
  78.                         close;
  79.                 case 9:
  80.                         if(countitem(5170)<1) goto L_Beret;
  81.                         if(zeny < 500000) goto L_Beret;
  82.                         set zeny,zeny-500000;
  83.                         delitem 5170,1;
  84.                         getitem 21072,1;
  85.                         end;
  86.                         close;
  87.                 case 10:
  88.                         if(countitem(5170)<1) goto L_Beret;
  89.                         if(zeny < 500000) goto L_Beret;
  90.                         set zeny,zeny-500000;
  91.                         delitem 5170,1;
  92.                         getitem 21073,1;
  93.                         end;
  94.                         close;
  95.                 case 11:
  96.                         if(countitem(5170)<1) goto L_Beret;
  97.                         if(zeny < 500000) goto L_Beret;
  98.                         set zeny,zeny-500000;
  99.                         delitem 5170,1;
  100.                         getitem 21074,1;
  101.                         end;
  102.                         close;
  103.                 case 12:
  104.                         close;
  105. }
  106. }
  107.  
Powered By Stikked created by Ben McRedmond