Автор: hmka: Дата: 01.15.2010

Сильно не ругайте мой 1-ый написанный нпс! очень лёгкий и может комуто Пригадиться !
Появляеться Нпс Справо от Центра пронты!
Игрок Должен Дать 1.5кк за 50 берь!
Может комуто понадобиться на фанах серверах!(У меня такой стоит):

prontera,164,192,0 script Yggdrasil Berry 742,{
set $@npc$,"[Berry]";
mes $@npc$;
mes "Хочешь я тебе дам 50 берек?";
mes "Всего за 1.5кк зени!";
next;
mes $@npc$;
mes "Нужны или нет?";
menu "Ну давай",-,"Нет",No;
if (zeny < 1500000) goto NoZeny;
set Zeny,Zeny-1500000;
getitem 607,50;
mes $@npc$;
mes "Забирай свои ягодки =)";
close;
NoZeny:
mes $@npc$;
mes "Нехватает зеней!";
close;
No:
mes $@npc$;
mes"Ну тогда шлепай отсюда!";
close;
}

Автор: hmka: Дата: 01.15.2010

Очень Хороший НПС"Магазин!Отправляет В сппециальную Локу где стоят НПСы и У них Продаються вещи/оружие/реги:

prontera.gat,164,162,4 script Магазин 790,{
mes"[Асистент]";
mes"^FF0000Ты хочеш попасть в магазин?^000000.";
next;
menu "Да, конечно хочу",M_ENTER,"Нет",-;
close2;
end;

M_ENTER:
warp "poring_w02",99,82;
end;
}

//====================Exiter============================

poring_w02,99,99,5 script Асистент Магазина 756,{
mes "[Асистент]";
mes "Ты хочеш выйти из этого магазина?";
next;
menu "Да, я хочу уйти от сюда.",L_yes,"Нет, я ещё тут поброжу.",L_no;

L_yes:
warp "prontera",155,175;

L_no:
mes "Удачной вам покупки !";
close;
}

//======================Shops=D=============================
poring_w02,110,79,0 shop Shoes Dealer 766,2406:15000,2415:15000,2409:15000,2402:15000,2404:15000,2418:15000,2420:15000,2407:15000
poring_w02,113,76,0 shop Armor Dealer 752,2315:30000,2310:20000,2320:25000,2319:100000,2373:30000,2342:45000,2345:15000000,2357:15000000,2338:90000
poring_w02,116,75,0 shop Shield Dealer 734,2118:100000,2104:10000,2108:30000,2113:35000,2123:25000000,2111:120000,2114:150000,2115:12000000
poring_w02,120,75,0 shop Garment Dealer 735,2507:75000,2521:5000,2529:1000000,2513:3000000,2502:20000,2506:30000,2504:2000000,2512:5000,2514:50000,2522:50000,2524:15000000
poring_w02,124,79,1 shop Accessory Dealer 747,2627:15000,2655:45000,2619:2000000,2625:1000000,2607:20000,2703:6000000,2624:300000,2701:9000000,2702:100000000,2678:200000000,2679:200000000,2626:150000
poring_w02,124,83,1 shop Headgear Dealer 743,5275:1000000,5086:50000000,2254:1000000,2237:20000000,5012:500000,5060:5000000,2202:10000000,5137:100000000,2254:2000000,5074:5000000,5132:100000000,2285:3000000,5254:5000000,5147:5000000,5102:5000000,5236:3000000,5349:3000000,5150:3000000,2214:1000000,5175:5000000,5026:3000000,5107:5000000,5038:5000000,5068:5000000,5170:25000000,5025:5000000,5181:5000001,5323:5000000,5151:5000000,5325:5000000,5243:5000000,5188:10000000,5421:70000000
poring_w02,123,87,3 shop Dagger Dealer 882,13010:100000,1232:15000,1235:30000,1231:45000,1228:5000000,1242:2500000,1233:1000000,1237:500000,1230:20000000,1208:9000
poring_w02,121,89,3 shop Two Handed Sword Dealer 733,1156:20000,1175:5000000,1160:60000,1163:70000,1169:200000,1117:20000,1165:2000000,1167:1000000,1153:15000,1159:50000,1168:2000000
poring_w02,114,90,3 shop One Handed Spear Dealer 780,1421:50000,1422:150000,1402:2500,1420:5000000,1408:10000,1417:1500000,1405:1700
poring_w02,118,90,3 shop One Handed Axe Dealer 813,1302:1000,1304:5000,1307:4000000,1306:250000
poring_w02,110,87,3 shop Two Handed Axe Dealer 751,1375:200000,1352:54000,1363:250000,1358:20000,1370:35000,1364:50000,1369:75000000,1354:15000,1376:10000000,1377:85000000,1365:3000000,1367:265000,1368:75000000,1361:50000
poring_w02,88,79,4 shop Mace Dealer 899,1521:23000,1502:1200,1512:15000,1539:3000000,1528:3000000,1535:75000000,1529:100000,1525:15000,1505:16000,1514:40000,1527:500000,1526:2500000,1508:19000,1523:15000000
poring_w02,88,87,3 shop Rod & Staff Dealer 792,1611:45000,1615:1500,1602:5000,1472:350000,1608:25000,2000:250000000,1624:1500000,1626:1500000,1625:2500000,1617:100000,1619:100000,1605:25000,1616:1000000,1614:30000000,1473:9000000
poring_w02,86,90,3 shop Bow Dealer 732,1715:60000,1727:250000,1702:5000,1730:500000,1705:25000,1711:300000,1724:15000000,1731:10000000,1716:2000000,1733:20000000,1708:15000,1726:75000,1723:20000000,1720:20000000
poring_w02,83,91,3 shop Knuckle Dealer 753,1822:2000000,1814:5000000,1809:200000,1811:175000,1819:750000,1818:200000,1802:500000
poring_w02,80,91,3 shop Musical Instrument Dealer 51,1919:200000,1914:50000,1917:150000,1916:250000,1907:47000,1911:54000,1909:62000,1915:150000,1906:55000,1903:18000,1902:40000
poring_w02,77,90,3 shop Whip Dealer 72,1969:75000,1974:25000,1964:45000,1972:750000,1971:59000,1951:25000,1952:12000
poring_w02,73,86,6 shop Book Dealer 833,1562:15000,1551:60000,1550:25000,1556:35000,1554:35000,1557:60000,1555:35000,1565:350000000,1564:35000,1558:1500,1561:3500,1559:3500
poring_w02,73,83,6 shop Katar Dealer 884,1271:1500000,1265:5000000,1270:10000000,1261:10000000,1269:500000,1255:350000,1251:20000,1253:35000,1256:45000,1259:45000,1257:45000,1258:45000,1262:195000,1264:25000,1263:150000
poring_w02,73,79,6 shop Gun Dealer 907,13155:32000,13150:30000,13159:1500000,13152:35000,13161:1100000,13157:800000,13153:24000,13105:55000,13156:56000,13167:15000000,13106:1000000,13162:245000,13166:250000,13170:35000
poring_w02,76,76,1 shop Fuuma Shuriken Dealer stone 823,13300:110000,13302:120000,13303:20000,13304:50000000,7521:75,7522:75,7523:75,7524:75
poring_w02,79,75,1 shop Arrow Dealer 795,1750:1,1755:3,1754:3,1761:3,1752:3,1760:10,1759:10,1772:3,1757:3,1770:3,1769:10,1765:30,1763:10,1762:3,1767:3,1764:20,1751:3,1768:10,1753:4,1756:3,1758:10,12012:5000,12008:5000,12183:5000,12014:5000,12005:5000,12007:10000,12004:2500,12010:5000,12011:5000,12009:5000,12006:5000
poring_w02,82,75,1 shop Grenade & Kunai, Bullet Dealer 928,13206:80,13203:80,13207:80,13204:80,13205:80,13256:10,13259:10,13258:10,13255:10,13257:10,13200:1,13202:30,13201:15,1771:50
poring_w02,85,76,1 shop Alchemist assasin TCG 749,1040:232,7434:100000,7142:500000,713:5,1093:10,1092:3,7133:1200000,545:150,547:1650,546:600,7129:100000,7127:1000000,7128:100000,7434:100000,7131:100000,7130:100000,7144:100000,7136:1000,7135:1000,678:100000,7139:5000

Автор: hmka: Дата: 01.15.2010

Если комуто нужно могу еще кинуть что есть! Спрашивайте!

Автор: JaneAir: Дата: 01.15.2010

Спасибо...но наверно ж нужно для начала написать нпц у которых будут эти итемы продаваться?Оо

Автор: MaxxWell: Дата: 01.15.2010

Благодарю, последнее нпц наверное больше всех пригодится, только таб расставлять лень=) но всеравно спасибо

Автор: hmka: Дата: 01.15.2010

НПС ненадо писать они есть внизу уже..!! там идет например Shoes Dealer дальше идет ид(вещи),цена: и так дальше! меняйте и т.д !! ПОВТОРЯЮ Каждую строку над писать с poring_w02,110,79,0 + и так до след.!

Автор: hmka: Дата: 01.15.2010

Если уже есть на форуме Удаляйте! Но у меня есть еще 1 хороший пвп рейтинг!(Сам пользуюсь этим)
Повторяю:Для работы скрипта c SQL сервером, заугрузите в вашу бд следующий дамп:

- script OnPCKillEvent -1,{
OnPCKillEvent:
function Rating_Winner;
function Rating_Loser;
set .@disable_gms, 60; // Проверка на Гм уровень. С какого уровня не считать рейтинг (100-отключить)
set .@pkvalue_scale,100; // делитель зависимости от разницы рейтингов
set .@lvvalue_scale,100; // делитель зависимости от разницы уровней
set .@PvP_Point, 1; // начальный расчетный рейтинг за убийство

if ( getcharid(0) == killedrid ) end; // самоубийство не в счет
if ( killedrid == 0 || getcharid(0) == 0 ) end; // на всякий случай

if ( getgmlevel() >= .@disable_gms ) end;

set PvP_Kills,PvP_Kills+1;
set .@KillerName$, strcharinfo(0);
set .@KilledName$, rid2name( killedrid );
set .@Kill_base, BaseLevel;
if ( Sex )
set .@kill_msg$, "убил";
else
set .@kill_msg$, "убилa";

//set .@rid_looser, killedrid;
//set .@rid_killer, getcharid(0);
attachrid( killedrid );

if ( getgmlevel() >= .@disable_gms ) end; // проверка на ГМство на убитой стороне

set PvP_Death, PvP_Death+1;
set .@Dead_base, BaseLevel;

// расчет поинтов

cleararray .@pvp_loser[0],0,1;
cleararray .@pvp_killer[0],0,1;
query_sql "SELECT pvprat FROM `char` WHERE name='"+.@KilledName$+"'", .@pvp_loser;
query_sql "SELECT pvprat FROM `char` WHERE name='"+.@KillerName$+"'", .@pvp_killer;

if ( .@pvp_killer[0] < .@pvp_loser[0] )
set .@PvP_Point, .@PvP_Point + ( .@pvp_loser[0] - .@pvp_killer[0] ) / .@pkvalue_scale;

if ( .@Kill_base > .@Dead_base )
set .@PvP_Point, .@PvP_Point * .
/ ( .@Kill_base - .@Dead_base + .@lvvalue_scale);

if ( .@Kill_base < .@Dead_base )
set .@PvP_Point, .@PvP_Point * ( .@Dead_base - .@Kill_base + .@lvvalue_scale ) / .@lvvalue_scale;

if ( .@PvP_Point < 1 ) set .@PvP_Point, 1;

set .@new_pvp_killer, .@pvp_killer[0] + .@PvP_Point;
set .@new_pvp_loser, .@pvp_loser[0] - .@PvP_Point;
set .@PvP_Point_tmp,.@PvP_Point;
if ( .@new_pvp_loser < 0 ){
set .@PvP_Point_tmp,.@PvP_Point_tmp+.@new_pvp_loser;
set .@new_pvp_loser, 0;
}

// запись поинтов

query_sql "UPDATE `char` SET pvprat="+.@new_pvp_killer+" WHERE name='"+.@KillerName$+"'";
query_sql "UPDATE `char` SET pvprat="+.@new_pvp_loser+" WHERE name='"+.@KilledName$+"'";

// анноунс

announce "[ "+.@KillerName$+" ] "+.@kill_msg$+" [ "+.@KilledName$+" ]. Рейтинг +/- ["+.@PvP_Point+" / "+.@PvP_Point_tmp+"]",bc_map;
end;
}

prontera,162,194,3 script Таблица 857,{
mes "[ Таблица ]";
mes "Время сервера: "+gettime(3)+" : "+gettime(2)+" : "+gettime(1)+" .";
mes "Дата сервера: "+gettime(5)+" / "+gettime(6)+" / "+gettime(7)+" .";
mes "Игроков в Online: "+getusers(1)+" .";
mes "Здесь вы можете увидеть:";
mes "1. Лидеров PvP.";
mes "2. Cвой PvP Статус.";
next;

switch(select("Лидеры PvP","Мой статус","Выход")) {
case 1:
set @topcount, 10;
cleararray @pvpboard1$[0],"",@topcount;
cleararray @pvpboard2[0],0,@topcount;
query_sql "SELECT name, pvprat FROM `char` ORDER BY pvprat DESC LIMIT "+@topcount+";", @pvpboard1$, @pvpboard2;
mes "[ ^ff0000Топ "+@topcount+"^000000 ]";
for (set @i,0; @i<@topcount; set @i,@i+1) {
if(@pvpboard2[@i] != 0)
mes "["+(@i+1)+"] ^0000FF[ "+@pvpboard1$[@i]+" ]^000000 - ^FF0000"+@pvpboard2[@i]+"^000000.";
else
mes "["+(@i+1)+"] ^0000FF[ Nobody ]^000000 - ^FF0000"+@pvpboard2[@i]+"^000000.";
}
close2;
break;
case 2:
cleararray @pvp_points[0],0,1;
query_sql "SELECT pvprat FROM `char` WHERE name='"+strcharinfo(0)+"'", @pvp_points;
mes "[ PvP Статус ^0000ff"+strcharinfo(0)+"^000000 ]";
mes "Убийств: ^0000FF"+PvP_Kills+"^000000";
mes "Сметрей: ^0000FF"+PvP_Death+"^000000";
mes " ";
mes "PvP рейтинг: ^0000FF"+@pvp_points[0]+"^000000";
close2;
break;
case 3:
close2;
break;
}
end;
}

Автор: hmka: Дата: 01.15.2010

Вот еще один нпс из моей группы НПС "Оратор" За определеную сумму будет отправлено всем Сообщение!Может комуто понадобиться!

prontera,147,196,5 script Оратор 833,{
set @cost, 1000000;
set @NPCNAME$, "[^0055AAГлобальное сообщение^000000]";
set @color$, "0xCC0033";
mes @NPCNAME$;
mes "Я могу послать ^008800глобальное сообщение^000000 для тебя! Его увидят ^888800ВСЕ^000000 игроки.";
next;
mes @NPCNAME$;
mes "Это будет стоить ^008800"+@cost+" зени^000000.";
next;
menu "Нет, спасибо!",-,"Отлично!",L_Send;
mes @NPCNAME$;
mes "Возвращайся скорее!";
close;

L_Send:
if (Zeny < @cost) {
mes @NPCNAME$;
mes "Эй! Да у тебя же не хватает денег!";
close;
} else {
mes @NPCNAME$;
mes "Отлично, введи послание:";
next;
input @mesga$;
set Zeny,Zeny-@cost;
announce strcharinfo(0)+": "+@mesga$ ,0,@color$;
mes "[" + strcharinfo(0) + "]";
mes @brdcast$;
close;
}
}

Автор: DiS[IP]: Дата: 01.15.2010

[FONT=Lucida Console]Автор,ты дико уныл.Смотреть даже тошно.Где соблюдение копирайтов скриптов?Ладно еще могу поверить что оратора и берьки ты написал сам,но зачем стирать копирайты с пвп рейтинга,который писал Empty.Да и остальные скрипты на этом форуме лежат.ИМХО тема УГ.:mellow:[/FONT]

Автор: JaneAir: Дата: 01.15.2010

Внизу есть , но на локе их нету

Автор: DiS[IP]: Дата: 01.15.2010

[FONT=Lucida Console]To JaneAir:Табы ставить не пробывал?:mellow:[/FONT]

Автор: hmka: Дата: 01.15.2010

Я неговорю что они мои"! Я даю что у мня есть!(Dis[IP])
Хочу заметить что в у меня в скриптах,не написан автар"(Скриптов)

Автор: MaHapX: Дата: 02.04.2010

Цитата hmka;18567:
Если уже есть на форуме Удаляйте! Но у меня есть еще 1 хороший пвп рейтинг!(Сам пользуюсь этим)
Повторяю:Для работы скрипта c SQL сервером, заугрузите в вашу бд следующий дамп:

Автор: Хитрюга Джэк: Дата: 02.04.2010

в студию оратора который пишет мессаги игроков с задержкой- чтоб не флудили

Автор: Respect: Дата: 02.04.2010

dis поддерживаю копирайты hmka ставь и точто выше ты выдал эт уже давно валяется