viewing paste enchanter + 0 card + translate fail | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98
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";
        closeend;
}
if (zeny < 300000)   {
        next;
        mes "???????????????????";
        mes "^0000FF- Bonus Card ["+countitem(20017)+"/1]^000000";
        mes "^0000FF- Zeny ["+zeny+"/300000]^000000";
        close;
}
set .@card_count,getequipcardcnt( .@equip );
for( set .@i,0; .@i < .@card_count; set .@i,.@i + 1 ){
        set .@card_id,getequipcardid( .@equip,.@i );
        if( .@card_id > 4000 && .@card_id <= 4453 ){
                mes "Your equip have a "+getitemname( .@card_id )+" inside. You cant use this service if there are any cards inside it.";
                close;
        }
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:
mes "??????????????????????";
mes "????? [ ^0000FF"+getequipname( .@equip )+" ^000000 ]";
mes "?????????????????????????????????????";
mes "???????????????????????? ?????????????????????????????????";
                                if(select("???????????????:????????????????") - 1) {
                                        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;
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;
}
}
Viewed 700 times, submitted by Emistry.