viewing paste Unknown #27964 | Text

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
prontera,150,149,4  script  範例  80,{
 
//以下拿箭矢桶作範例 因為不知道拿什麼來做
//這邊都是採用暫時NPC變量
 
    mes "[範例]";
    mes "製作 ^0000FF箭矢筒^000000 所需材料如下:";
    mes "材料 ^FF0000箭矢 500^000000 個";
    mes " 和 ^FF0000金錢 500^000000 z";
    mes "請輸入^FF00001~100^000000為限";
    next;
    switch(select("製作 ^0000FF箭矢筒^000000","製作 ^0000FF鐵箭矢筒^000000",
            "製作 ^0000FF鋼鐵箭矢筒^000000","製作 ^0000FF神之金屬箭矢筒^000000",
            "製作 ^0000FF火箭矢筒^000000","製作 ^0000FF銀箭矢筒^000000",
            "製作 ^0000FF風靈箭矢筒^000000","製作 ^0000FF地靈箭矢筒^000000",
            "製作 ^0000FF水靈箭矢筒^000000","製作 ^0000FF影子箭矢筒^000000",
            "製作 ^0000FF無形箭矢筒^000000","製作 ^0000FF鐵銹箭矢筒^000000")) {
    case 1:
        set .@DelItem,1750;
        set .@GetItem,12004;
        break;
    case 2:
        set .@DelItem,1770;
        set .@GetItem,12005;
        break;
    case 3:
        set .@DelItem,1753;
        set .@GetItem,12006;
        break;
    case 4:
        set .@DelItem,1765;
        set .@GetItem,12007;
        break;
    case 5:
        set .@DelItem,1752;
        set .@GetItem,12008;
        break;
    case 6:
        set .@DelItem,1751;
        set .@GetItem,12009;
        break;
    case 7:
        set .@DelItem,1755;
        set .@GetItem,12010;
        break;
    case 8:
        set .@DelItem,1756;
        set .@GetItem,12011;
        break;
    case 9:
        set .@DelItem,1754;
        set .@GetItem,12012;
        break;
    case 10:
        set .@DelItem,1767;
        set .@GetItem,12013;
        break;
    case 11:
        set .@DelItem,1757;
        set .@GetItem,12014;
        break;
    case 12:
        set .@DelItem,1762;
        set .@GetItem,12015;
        break;
    }
    input .@itemport;
    if ( .@itemport < 1  || .@itemport > 100 ) {
        dispbottom "您輸入的數量不正確。";
        close;
    }
    if ( countitem(.@DelItem) < .@itemport * 500 || Zeny < .@itemport * 500 ) {
        dispbottom "無法替您兌換,請檢查物品跟金錢是否足夠!";
        close;
    }
    set Zeny, Zeny - .@itemport * 500;
    delitem .@DelItem,.@itemport * 500;
    getitem .@GetItem,.@itemport;
    close;
}
Viewed 777 times, submitted by Guest.