Автор: San: Дата: 11.26.2009
Вот написал обменника TCG на Cash Point, за 1 TCG можно получить 50 Cash points, и за 50 Cash points можно получить 1 TCG .
Вот, мб кому пригодится:
//=========eAthena Script===================
//= Обменник ТЦГ на поинты
//==========================================
//= 1 TCG Card : 50 Cash Points
//============ By:==========================
//= S@N10K for MeowRO
//==========================================
prontera,135,177,5 script Обменник 832,{
mes "[Обменник]";
mes "Привет ^FF0000"+strcharinfo(0)+"^000000.";
mes "Я могу поменять твои ТЦГ карты на Кеш поинты и наоборот";
mes "За 1 TCG вы можете получить 50 Cash Points";
mes "За 50 Cash Points вы можете получить 1 TCG";
next;
mes "[Обменник]";
mes "^FF0000Вводите только правильное количество поинтов которые хотите обменять, иначе у вас просто отнимут кафра поинты и вы не получите ТЦГ!^000000";
mes "Что ты хочешь поменять?";
next;
switch( select( "TCG на Cash Points","Cash Points на TCG","Ничего не хочу") ){
case 1:
mes "[Обменник]";
mes "Введите количество тцг карт, которые вы хотите поменять";
input @tcg;
mes "Вы хотите поменять ^FF0000"+ @tcg +"^000000 TCG Card?";
switch( select( "Да!","Нет,я ошибся") ){
case 1:
if(countitem(7227)<@tcg) goto no;
delitem 7227,@tcg;
set #CASHPOINTS,#CASHPOINTS+(@tcg*50);
dispbottom "У вас "+#cashpoints+" Cash Points.";
close;
case 2:
goto buy;
}
case 2:
mes "[Обменник]";
mes "Введите количество Cash Points, которые вы хотите поменять";
input @cash;
mes "Вы хотите поменять ^FF0000"+ @cash +"^000000 Cash Points?";
switch( select( "Да!","Нет,я ошибся") ){
case 1:
if(#CASHPOINTS<@cash || #CASHPOINTS< 50) goto nou;
set #CASHPOINTS,#CASHPOINTS-@cash;
getitem 7227,@cash/50;
dispbottom "У вас осталось "+#cashpoints+" Cash Points.";
close;
case 2:
goto buy;
}
case 3:
goto buy;
}
buy:
mes "[Обменник]";
mes "Пока! Приходите когда будет что менять";
close;
no:
mes "[Обменник]";
mes "У вас недостаточно TCG Card";
close;
nou:
mes "[Обменник]";
mes "У вас очень мало Cash Points";
close;
end;
}
Автор: NoOn: Дата: 11.29.2009
А Можно ли Нпц что б у него покупать весчи за КешПоинты?
Автор: Flex: Дата: 11.29.2009
можно
Автор: San: Дата: 11.29.2009
Цитата NoOn;15760:
А Можно ли Нпц что б у него покупать весчи за КешПоинты?
Автор: MaxxWell: Дата: 01.11.2010
Вещь полезная, но не разбираюсь в кешпоинтах=))