這才是好用的商店製造機!(ea/ja)

PAIYINTA

3QQQQQQQQQQQQQ謝謝大大^^

love2110390

感謝大大無私的分享^^

sujongsheen

＠＠∼∼！！感謝大大拉

pig671080

感謝大大的分享
商店編輯程式
真的對每個私服都蠻重要的
所以 謝謝大大的分享

key309227

感謝大大分享囉

a821114v2000

謝謝大大分享摟 用這個做可以省下不少時間

kiim

感謝大大的無私奉獻
真的是太棒了

kasler

感謝大大的分享
下載下來來試試看~

千里尋

聽起來好像很方便啊

來看看怎樣

Andrew8052

真的有這麼好用的東西呀

DIE空

我先來下載看看嚕~~!!

hungko

謝謝大大無私分享
我先來下載看看嚕~~!!

A0989979903

//?????????????????
//??腳本製作?????破滅????
//?????????????????
//??腳本名稱????商城系統???
//?????????????????
//??腳本版本????2.7 BETA???
//?????????????????
//??更新日期???2008年5月6日??
//?????????????????
//?最佳執行環境?EAthena 12336 UP?
//?????????????????
-        script        Cash_OnInit        -1,{

//銜接系統，舊版本用戶要更新版本請開啟該功能
//新使用者:請將銜接系統內文前面都加上 // 關閉他 或著將銜接系統刪除
//該功能不影響正常功能運作，新用戶開啟也沒有關西.只是不建議

//以下為銜接系統
OnPCLoginEvent:
        if(#CASHPOINTS2>0){set #CASHSAVE,#CASHSAVE+#CASHPOINTS2; set #CASHPOINTS2,0;}
        if(#BONUSPOINTS2>0){set #BONUSSAVE,#BONUSSAVE+#BONUSPOINTS2; set #BONUSPOINTS2,0;}
//以上為銜接系統

OnInit:

        setarray $@Cash[0],
        //設定項目的數值請不要把他任意刪除，或是減少任何表點符號，否則會造成整體系統錯亂。
        //商城點數(P)每點價格設定
        20000,

        //是否開啟累積系統(1開啟/0關閉)
        1,

        //紅利點數(B)贈送比率設定(設定0代表關閉該功能)
        //規則：購買量(P)/設定值=贈送紅利(B)
        //規則：買幾點(P)送1點(B){買X送1的意思}
        //範例：設定20;購買100P,贈送紅利5B
        10,

        //商城點數(P)購買量設定
        //設定負數或天文數字可能出現錯誤
        //單次最大購買量(無限制請輸入987654321)
        50000,
        //單次最低購買量(無限制請輸入0)
        10,

        //紅利獎勵開關設定(以下皆為 1開啟/0關閉)
        //是否開放物品兌換獎勵項目
        1,

        //是否開放抽獎活動獎勵項目
        1,

        //抽獎消耗紅利設定
        //順序【F E D C B A S】等級
        10,30,80,100,300,800,1500,

        //抽獎獎品取得數量設定
        //順序【F E D C B A S】等級
        3,10,30,20,5,3,1,

        //抽獎獎勵獎品設定
        //物品總數設定 - 分別代表F,E,D,C,B,A,S等級
        //起始值,抽獎獎品如果種類超過10種則須修改該值
        0,10,20,30,40,50,60,
        //結束值,同上
        9,19,29,39,49,59,69;

        //起始結束值說明:下面從F級第一個物品到S級最後一個物品,
        //起始結束值為0~69,如果F級減少一個物品,則F級起始結束值變[0~8]
        //E級變成[9~18] S級變成[59~68] 全部的值都要減少1,
        //相對如果F級增加一個獎品,則所有值都要增加1(起始值0不需要更改)
        //變成:F[0~10] [61~70]
        //假設一：D級獎品增加一個,則D級結束值+1,CBAS結束和起始值各+1
        //假設二：C級獎品減少一個,則C級結束值-1,BAS結束和起始值各-1
        //假設三：S級獎品增加一個,則S級結束值+1,其他值不變動
        //假設四：S級獎品減少兩個,則S級結束值-2,其他值不變動
        //假設五：F級獎品增加一個,C級獎品減少一個,
        //假設五起始結束值表:
        //F級起始結束值:0~10
        //E級起始結束值:11~20
        //D級起始結束值:21~30
        //C級起始結束值:31~39
        //B級起始結束值:40~49
        //A級起始結束值:50~59
        //S級起始結束值:60~69

        //強烈建議改成自己想要的物品比較好
        //【F】級抽獎獎品設定，後面編號代表item_db (起始值0,結束值9)
        setarray $@Cashitem[0],504,503,522,545,546,607,608,610,505,526,

        //【E】級抽獎獎品設定 (起始值10,結束值19)
        504,503,522,545,546,607,608,610,505,526,

        //【D】級抽獎獎品設定 (起始值20,結束值29)
        504,503,522,545,546,607,608,610,505,526,

        //【C】級抽獎獎品設定 (起始值30,結束值39)
        505,522,526,547,599,607,608,610,546,598,

        //【B】級抽獎獎品設定 (起始值40,結束值49)
        607,12996,12995,12202,12203,12204,12205,12206,12207,11501,

        //【A】級抽獎獎品設定 (起始值50,結束值59)
        13517,13534,13536,13716,13718,13720,13751,13757,13721,13533,

        //【S】級抽獎獎品設定 (起始值60,結束值69)
        13636,13637,13638,13639,13640,13641,13642,13643,13644,13645;

        //物品兌換獎勵設定
        setarray $@Bonusitemb[0],
        //第一樣物品 物品編號,所需紅利,取得數量
        505,20,20,
        //第二樣物品
        11501,20,20,
        //第三樣物品
        12996,60,10,
        //第四樣物品
        13517,80,10,
        //第五樣物品
        13517,150,20;        }

prontera.gat,152,139,4        script        商城系統處理人員        124,{

        mes "您好，我是負責商城系統的管理員，";
        mes "提供^FF0000購買,販賣,紅利,查詢^000000等服務，";
        mes "請選擇您想使用的服務!";
        announce "商城點數販售價格：【每 1 點(P) 售價 "+$@Cash[0]+" Zeny】",bc_self,0x00FFFF;
        if ($@Cash[2]>0){announce "紅利點數贈送比率：【買 "+$@Cash[2]+" 點(P) 贈送 1 點紅利(B)】",bc_self,0x00FFFF;}
        next;
        switch(select("點數系統:紅利系統:說明系統:查詢系統:結束對話")){
        case 1:       
                switch(select("購買點數:點數說明:結束對話")){
                case 1:       
                        mes "[商城點數系統]";
                        mes "點數售價『1P："+$@Cash[0]+"Zeny』";
                        if ($@Cash[2]>0){mes "紅利回饋『買"+$@Cash[2]+"P送1B』";}
                        mes "請輸入要購買的點數(P)數量，";
                        if ($@Cash[4]>0){mes "單次最少購買:"+$@Cash[4]+"P";}
                        if ($@Cash[3]<987654321){mes "單次最多購買:"+$@Cash[3]+"P";}
                        mes "不想購買請輸入數字:0";
                        input @Cash;
                        if (@Cash==0){announce "【需要點數的時候在來找我吧!】",bc_self,0x00FF00;close;}
                        if (@Cash<$@Cash[4] || @Cash>$@Cash[3]){announce "【最少購買"+$@Cash[4]+"點:最多購買"+$@Cash[3]+"點】",bc_self,0x00FF00;close;}
                        next;
                        mes "[商城點數系統]";
                        mes "您購買的點數(P)： "+@Cash+" P";
                        if ($@Cash[2]>0){mes "贈送紅利： "+@Cash/$@Cash[2]+" B";}
                        mes "需要金錢： "+@Cash*$@Cash[0]+" Zeny";
                        mes "您確定要購買嗎?";
                        if (select("確定購買:不要購買")==1){
                        if (Zeny<(@Cash*$@Cash[0])){announce "【您的金錢不足喔!】",bc_self,0xFFFF00;close;}
                        set Zeny,Zeny-(@Cash*$@Cash[0]);
                        set #CASHPOINTS,#CASHPOINTS+@Cash;

QQWW

好像還不錯!又是中文的~~
先謝謝大大分享喔~

onlyqp1213

謝謝分享
大家都很缺這東西呢