prontera,165,203,4	script	Super-Enchanter	100,{
setarray .@blacklist[0],5391,1267,1173,13401,13021,13022,1817,1623,1372,1728,1563,1174,1373,1374,1729,13403,13024,13025,13026,1534,13407,1424,1628,1537,1378,1273,1567,13408,13409,1274,2741,2535,5326,2710;
setarray .option[0], 23011,23012,23013,23014,23015,23017,23018,23019,23020
,23021,23022,23013,23024,23025,23026,23027,23028,23029
,23031,23032,23033,23034,23035,23036,23037,23039,23040
,23041,23042,23043,23044,23045,23046,23047,23048,23049,23050
,23051,23052,23053,23054,23055,23056,23057,23058,23059,23060
,23061,23062,23063,23064,23065,23066,23067,23068,23069,23070
,23071,23072,23073,23074,23075,23076,23077,23078,23079,23080
,23081,23082,23083,23084,23085,23086,23087,23088,23089,23090
,23091,23092,23093,23094;
set .@slot_num, 0;
set .@option, 0;
mes "การสุ่มออฟจะใช้รายการดังต่อไปนี้";
mes "^0000FF- Bonus Card ["+countitem(20017)+"/1]^000000";
mes "^0000FF- Zeny ["+zeny+"/300000]^000000";
.@equip = select( "หมวก-บน","เกราะ","โล่ห์","อาวุธ","ผ้าคลุม","รองเท้า","ประดับ-ซ้าย","ประดับ-ขวา","หมวก-กลาง","หมวก-ล่าง" );
if ( !getequipisequiped( .@equip ) ) {
next;
mes "ท่านไม่ได้ส่วมใส่ไอเทมที่ท่านเลือก";
close;
}
for (.@i = 0; .@i < getarraysize(.@blacklist); .@i++) {
	if (countitem(.@blacklist[.@i])) {
		message strcharinfo(0), getitemname(.@blacklist[.@i]) +" ไอเทมเช่าใช้บริการไม่ได้กรุณานำไปเก็บใน Storage ก่อน";
		end;
	}
}
	if (countitem(20017)) < 1  {
next;
mes "ท่านขาดบางอย่างไปนะ";
mes "^0000FF- Bonus Card ["+countitem(20017)+"/1]^000000";
mes "^0000FF- Zeny ["+zeny+"/300000]^000000";
		close;	end;
	}
	if (zeny < 300000)   {
next;
mes "ท่านขาดบางอย่างไปนะ";
mes "^0000FF- Bonus Card ["+countitem(20017)+"/1]^000000";
mes "^0000FF- Zeny ["+zeny+"/300000]^000000";
		close;	end;
	}
next;
if ( !getequipisequiped( .@equip ) ) {
mes "ท่านไม่ได้ส่วมใส่ไอเทมที่ท่านเลือก";
close;
}
mes "^0000FFเลือกช่อง Slot ที่ต้องการจะออฟ^000000"; 
menu "->^0000FF ซ้าย^000000",L_LEFT,"->^0000FF กลาง^000000",L_MID,"->^0000FF ขวา^000000",L_RIGHT;

L_LEFT:
set .@slot_num, 1;
goto L_Complete;
L_MID:
set .@slot_num, 2;
goto L_Complete;
L_RIGHT:
set .@slot_num, 3;
goto L_Complete;

L_Complete:
.@id = getequipid( .@equip );
.@ref = getequiprefinerycnt( .@equip );
.@card1 = getequipcardid( .@equip, 0 );
.@card2 = getequipcardid( .@equip, 1 );
.@card3 = getequipcardid( .@equip, 2 );
.@card4 = getequipcardid( .@equip, 3 );
getinventorylist;
while( .@i < @inventorylist_count ){
	if((( @inventorylist_card1[.@i] >= 4001 || @inventorylist_card1[.@i] <= 4453 ) ||
		( @inventorylist_card2[.@i] >= 4001 || @inventorylist_card2[.@i] <= 4453 ) ||
		( @inventorylist_card3[.@i] >= 4001 || @inventorylist_card3[.@i] <= 4453 ) ||
		( @inventorylist_card4[.@i] >= 4001 || @inventorylist_card4[.@i] <= 4453 )) &&
		@inventorylist_equip[.@i]
	)
		.@count++;
	.@i++;
}
if( .@count ){
	mes "หากใส่การ์ดจะใช้งานไม่ได้ ( แต่ออฟทับได้ปกตินะ)";
	close;
}
next;
mes "คุณกำลังจะเสริมออฟชั่น";
mes "ไอเทม [ ^0000FF"+getequipname( .@equip )+" ^000000 ]";
mes "แน่ใจแล้วนะว่าจะทำมันกรุณาตรวจสอบด้วย";
mes "เราจะไม่รับผิดชอบทุกกรณี หากท่านออฟชั่นทับการ์ดเก่าของท่าน";
				if(select("ใช่จัดการได้เลย:ข้าขอทำใจสักครู่") - 1) {
next;
					mes "^55AA88โอเคแล้วหวังว่าจะได้พบกันอีกนะ^000000";
					close;
				} else {
 set .Random, getarraysize( .option );
delitem 20017,1;
set Zeny,zeny-300000;
//getitem2 .@id, 1,1, .@ref, 0, .@card1, .@option1, .@option2, .@option3;
//getitem2 .@id, 1,1, .@ref, 0, .@option1, .@card2, .@card3, 0;
next;
mes "เยี่ยมเลยเจ้าได้รับออฟชั่น";
mes "[ ^0000FF"+getitemname(.option[ rand( .Random ) ])+" ^000000 ]";
mes "หวังว่าเจ้าจะพอใจกับสิ่งที่ได้นะ";
delitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, .@card3, .@card4;
				if (.@slot_num == 1)
					getitem2 .@id, 1,1, .@ref, 0, .@card1, .option[ rand( .Random ) ], .@card3, .@card4;
				else if (.@slot_num == 2)
					getitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, .option[ rand( .Random ) ], .@card4;
				else if (.@slot_num == 3)
					getitem2 .@id, 1,1, .@ref, 0, .@card1, .@card2, .@card3, .option[ rand( .Random ) ];
				equip .@id;
close;
}
}