Назад

Клонер

Автор: rura: Дата: 06.20.2011

Если кому надо, нпс который дает клона на время за деньги:

//By Skorm
prontera,144,167,5 script Клонер 812,{

set .npc$, "[Клонер]";
set @price,10000;
getmapxy(.@map$,.@x,.@y,0);
if(Gclone!=0) {
goto HaveC;
} else
mes .npc$;
mes "Привет, вы хотите получить помошника для ваших путешествий?";
next;
mes .npc$;
mes "Но я продаю их только за зени. Вы хотите получить клона?";

switch(select("Да.","Нет.")) {


case 1:
next;
mes .npc$;
mes "Введи на сколько секунд вы хотите получить клона";
mes "^0000FF [1]^000000секунда стоит ^0000FF[10 000]^000000зени";
mes "^0000FF [60]^000000секунд равно ^0000FF[1]^000000минуте";
mes "^FF0000 -если вы потеряете своего клона в связи со смертью, сбоем, отключением или выходом вы не получите клона обратно.";
input .@duration;
if(.@duration!=0) goto Buy; {
mes "^FF0000 [0] это не вариант.";
close;
}
case 2:
close;
}

Buy:
set @price,@price*.@duration;
if(Zeny < @price) goto NOtEnuff;
next;
mes .npc$;
mes "Вы должны заплатить: ^FF0000" + @price;
mes "Вы согласны?";
switch(select("Да","Нет")) {
case 1:
atcommand "@effect 200";
set Zeny,Zeny-@price;
clone "" + .@map$ + "",.@x,.@y,"",getcharid(0),getcharid(0),assists,1,.@duration;
set .@duration,.@duration*1000;
set Gclone,.@duration;
close2;
callfunc "Count-b";
case 2:
mes "Ок, приходите еще.";
close;
}

NOtEnuff:
mes "Извините, но у вас нет денег.";
close;

HaveC:
set .@Tclone,Gclone/1000;
mes "Еще не истекли ваших ^0000FF[" + .@Tclone + "]^000000секунд. Возвращайтесь когда время истечет или вы перезайдете.";
close;
}

- script OnPCLoginEvent -1,{
OnPCLoginEvent:
if(Gclone!=0) {
set Gclone,0;
} else
end;
}

function script Count-b {
sleep2 Gclone;
set Gclone,0;
}

Автор: rura: Дата: 06.20.2011

не нравится не качай. выложил то что есть.

Автор: Said: Дата: 06.20.2011

Я спросил смысл от клонера фан просто?

Автор: rura: Дата: 06.20.2011

здесь видел только за деньги, там можно брать сколько влезет клонов... а здесь одного мб кому и надо.

Автор: shinefox: Дата: 06.21.2011

Спасибо.
Хорошее развлечение для игроков, если найти где применить.

Автор: Кеник: Дата: 06.21.2011

Ну вроде того. Запретить их использование на ГВ\ПВП (если это не говнохайрейт само собой ), в пвм фпаряде так помощь :D

Автор: hT1m: Дата: 06.21.2011

Демо версия сурового найма хДДД