Главная Форум Файлы Статьи
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Форум » База знаний по RF Online » Готовые сервера / сборки RF Online » Скрипты NPC
Скрипты NPC
RoddericДата: Среда, 14.04.2010, 05:20 | Сообщение # 1
Генерал-майор
Группа: Администраторы
Сообщений: 451
Репутация: 0
Статус: Offline
Beby Job Change:

prontera.gat,159,193,6 script Baby Job Master 703,{
if (class == 0) goto makebaby;
if (class == 4023) goto Go1st;
if (class == 4024 || class == 4025 || class == 4026 || class == 4027 || class == 4028 || class == 4029) goto Go2nd;
if (class >= 4030) goto ur2nd;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Sorry You are not a Baby Novice or a Baby First Jobclass, please use the normal Job Changer.";
close;

ur2nd:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "What do you want from me? You have allready reached a baby secondclass job.";
close;

makebaby:
if(joblevel>1) goto Lbabyjobone;
if(baselevel>1) goto Lbabybaseone;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I'm a baby jobchanger for Titan! You want to become a baby?";
menu "Yeah, sure!",Lyes,"No!",Lno;

Lbabyjobone:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You are not Level 1/1!";
close;

Lbabybaseone:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You are not Level 1/1!";
close;

Lyes:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Ok here you go my cute Baby xD!";
jobchange 4023;// Job: Baby_Novice
close;

Lno:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes " Ok go away you Bigman! >.> ";
close;

Go1st:
if(joblevel<10) goto Lbabyjobten;
if(SkillPoint != 0) goto Lbabyskillpt;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I'm a baby jobchanger for Titan! First of all, what baby class would you like to change into?";
mes "Please choose your first job...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Pick a job, any job!";
menu "Swordsman",LbabySword,"Mage",LbabyMage,"Thief",Lb abyThief,"Merchant",LbabyMerc,"Acolyte",LbabyAco," Archer",LbabyArch,"Super Novice",LbabySupNovi,"Cancel",LCancel;

Lbabyjobten:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Ugh, you need to have at least a Job Level of 10 before changing into the first class... go kill some porings or something.. >.>'";
cutin "kafra_01",255;
close;

mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Please use up all your skill points before changing into the next job! ";
cutin "kafra_01",255;
close;

LbabySupNovi:
mes "[ ^0065DFBaby Jobra^000000 ]";
if(baselevel<35) goto LReqnovi;
mes "You dont want to be a mainstream Dude? Than Super Novice is the right choise, enyo!!!";
cutin "kafra_01",255;
jobchange 4045;// Job: Super_Novice
close;
LReqnovi:
mes "You need to be level 35,";
mes "to be a Super Novice";
close;

LbabySword:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Wow, fantastic! Doesn't all that hard work feel like its paid off? *kekeke* I see the ^B70004BLOOD of Porings^000000 on your hands! You truly are fit for the ^0005CESwordsman^000000 job! ";
cutin "kafra_01",255;
jobchange 4024;// Job: Job_BabySwordman
close;

LbabyMage:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Nice, now you can finally wield the power of ^2200DFM^7600F9A^AF00FBN^DA00DFA^000000, your spiritual energy!!!";
cutin "kafra_01",255;
jobchange 4025;// Job: Job_BabyMage
close;

LbabyThief:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Those devious hand of yours really look like they need to grab something (no comment)..... go forth and steal!!";
cutin "kafra_01",255;
jobchange 4029;// Job: Job_BabyThief
close;

LbabyMerc:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oh yeah, Mr. Moneybags, SOMEBODY here just loves the sound of coins jinglin'...";
mes "Well its not me!.. >_>..... ... bah.. ";
cutin "kafra_01",255;
jobchange 4028;// Job: Job_BabyMerchant
close;

LbabyAco:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Yay.. go read a Bible.. or whatever.. er..yeah";
cutin "kafra_01",255;
jobchange 4027;// Job: Job_BabyAcolyte
close;

LbabyArch:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I used to poke things with a stick when I was a child..";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I guess you're like me! You hurl pointed sticks at things! Kekeke...";
cutin "kafra_01",255;
jobchange 4026;// Job: Job_BabyArcher
close;

Go2nd:
if(SkillPoint != 0) goto Lbabyskillpt;
if(joblevel<40) goto Lbabyjobforty;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I'm a baby jobchanger for Titan! First of all, what baby class would you like to change into?";
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Please choose your second job...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "What would you like to be? (Please be the preliminary job)";
menu "Knight",LbabyKnight,"Wizard",LbabyWizard,"Hunter" ,LbabyHunter,"Blacksmith",LbabyBlacksmith,"Assassi n",LbabyAssassin,"Priest",LbabyPriest,"Crusader",L babyCrusader,"Sage",LbabySage,"Dancer/Bard",LbabyDancerbard,"Alchemist",LbabyAlchemist," Rogue",LbabyRogue,"Monk",LbabyMonk,"Cancel",LCance l;

Lbabyjobforty:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You must be at least Job Level 40 before even thinking about changing into the Second Job.";
cutin "kafra_01",255;
close;

LbabyHunter:
if(class != 4026) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oh goodie, you've met all the requirements... did you have fun hurling pointed sticks at monsters? Well guess what?";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Now you can hurl pointed sticks at monsters AND keep them in one place! w00t, yea! Traps are a great thing...";
jobchange 4034;// Job: Job_Hunter
close;

LbabyKnight:
if(class != 4024) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "w00t w00t! You are Job Level 40, you've been a Swordie all your life...";
mes "Alrite, you are ready to become the doer of Justice, the embodiment of Heroism, the very soul and life of Valor! ";
mes "...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Yes! You are ready to become... a Baby Knight! ";
mes "Go save a Damsel in Distress or something..";
cutin "kafra_01",255;
jobchange 4030;// Job: Job_Knight
close;

LbabyBlacksmith:
if(class != 402 goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oooo~~ Goodie goodie gumdrops! You meet allll the requirements! Guess what I'm gonna do ...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "YUP! You guessed it! I turned you into a Blacksmith! Aren't you PROUD of yourself... Go and make a few weapons! Open up shops across the nation! Yea yea yea! Go go go! w00t! Ho yeah! ";
jobchange 4033;// Job: Job_Blacksmith
close;

LbabyAssassin:
if(class != 4029) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Did you know I used to be a male Assassin? Well, I had a few things done to my hair, got a face lift, some implants here and there...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oh my, too much information, right? Kekeke, okay, go off and become the most sinister of all Jobs in this world... ^6500BFAssassin...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Poof! Kekeke... ";
jobchange 4035;// Job: Job_Assassin
close;

LbabyPriest:
if(class != 4027) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I bet you are GODDAMNED TIRED of NOT having Sp Recovery, right? Well I am tired of hearing little Jesus-Hugging Acolytes scream this every time they're low on Sp... ";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Yay! You've now reached Priesthood! It's sorta like Manhood.. but not really, see with Manhood, you get this little thingy between your legs.. WHOOPs, I am getting so off topic..";
jobchange 4031;// Job: Job_Priest
close;

LbabyWizard:
if(class != 4025) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Weeee, doesn't it feel great to finally become a Wizard? It's like a warm bath.... ahhhhhhh......";
jobchange 4032;// Job: Job_Wizard
close;

LbabyCrusader:
if(class != 4024) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Mmmmm, I always liked Crusaders.. their Broad Shoulders always turned me on....";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oooo~~~ yeah, thats it... yummy...";
jobchange 4037;// Job: Job_Crusader
close;

LbabyDancerbard:
if(class != 4026) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
if(sex==1) mes "Yay! Go play some ballads for some Dancers or something, I just can't stand your clothes... ewww.";
if(sex==1) jobchange 4042;// Job: Job_Bard
if(sex==0) mes "Uh-huh, swivel those hips girl ^_~ Dancers are sooo sexy.. too bad I'm stuck in this ugly Kafra dress.. blah, if only I could strip down to a little thong too... *sigh*";
if(sex==0) jobchange 4043;// Job: Job_Dancer
close;

LbabyAlchemist:
if(class != 402 goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Cool! Go make some potions! Open a Pharmacy! yeah yeah yeah! ";
jobchange 4041;// Job: Job_Alchem
close;

LbabyRogue:
if(class != 4029) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Wow! You.. are.. SOOOOO COOOL!! KYAAHH XD!! *drools*";
jobchange 4040;// Job: Job_Rogue
close;

LbabyMonk:
if(class != 4027) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Nice.... Monks are pretty darn cool!";
jobchange 4038;// Job: Job_Monk
close;

LbabySage:
if(class != 4025) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Ahhhh, soo cool! I'll never get tired of seeing people turn into those new 2-2 sprites.. KYAHH XD!!";
mes "Go forth Sage! Show those wizzies what a real mana-wielder can do! Mwahaha...";
jobchange 4039;// Job: Job_Sage
close;

wrong1stjob:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You have the wrong first job, so please choose a other second job.";
close;

Lbabyskillpt:
mes "[ ^0065DFJobra^000000 ]";
mes "Please use up all your skill points before changing into the next job! ";
cutin "kafra_01",255;
close;

LCancel:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Blah.. be that way.. >_>..";
cutin "kafra_01",255;
close;
}


---------------------------------------------------------------
 
RoddericДата: Среда, 14.04.2010, 05:21 | Сообщение # 2
Генерал-майор
Группа: Администраторы
Сообщений: 451
Репутация: 0
Статус: Offline
Black Market:

// Black Market
//Rein Warper
prontera.gat,148,173,5 script Black Market 880,{
mes "[Arnold]";
mes "Hello, you wants in the black market?";
next;
menu "Entering Black Market",ja, "Cancel",Cancel;
next;

ja:
mes "[Arnold]";
mes "Hope you marke good deals";
next;
warp "arena_room.gat", 100, 89;
close;

Cancel:
mes "[Arnold]";
mes "Disappear";
close;
}
//Black Market
//Raus Warper
arena_room.gat,106,94,4 script Black Market 880,{
mes "[Arnold]";
mes "Hello, you want to leave the black market?";
next;
menu "Leave Black Market",raus, "Cancel",Cancel;

raus:
mes "[Arnold]";
mes "Hope you had luk";
next;
warp "prontera.gat", 155, 107;
Close;

Cancel:
mes "[Arnold]";
mes "Disappear";
close;
}

//Black Market Seller
//Axte
arena_room.gat,107,101,4 shop 1-HandAxte2-HandAxte 63,1301:-1,1302:-1,1303:-1,1304:-1,1305:-1,1306:-1,1307:-1,1308:-1,1351:-1,1352:-1,1354:-1,1355:-1,1356:-1,1357:-1,1358:-1,1359:-1,1360:-1,1 361:-1,1362:-1,1363:-1,1364:-1,1365:-1,1366:-1,1367:-1,1368:-1,1369:-1,

//Bows & Arrow
arena_room.gat,105,101,4 shop BowandArrows 832,1701:-1,1702:-1,1703:-1,1704:-1,1705:-1,1706:-1,1707:-1,1708:-1,1709:-1,1710:-1,1711:-1,1712:-1,1713:-1,1714:-1,1715:-1,1716:-1,1718:-1, 1719:-1,1720:-1,1721:-1,1722:-1,1723:-1,1724:-1,1725:-1,1750:-1,1751:-1,1752:-1,1753:-1,1754:-1,1755:-1,1756:-1,1757:-1,1758:-1,1759:-1,1760 :-1,1761:-1,1762:-1,1763:-1,1764:-1,1765:-1,1766:-1,1767:-1,1768:-1,1769:-1,1770:-1,1771:-1,

//Fist
arena_room.gat,103,101,4 shop FistWeapen 746,1801:-1,1802:-1,1803:-1,1804:-1,1805:-1,1806:-1,1807:-1,1808:-1,1809:-1,1810:-1,1811:-1,1812:-1,1813:-1,1814:-1,1815:-1,

//Spears
arena_room.gat,101,101,4 shop SpearWeapen 767,1401:-1,1402:-1,1403:-1,1404:-1,1405:-1,1406:-1,1407:-1,1408:-1,1409:-1,1410:-1,1412:-1,1413:-1,1414:-1,1415:-1,1416:-1,1417:-1,1451:-1, 1452:-1,1453:-1,1454:-1,1455:-1,1455:-1,1456:-1,1457:-1,1458:-1,1459:-1,1460:-1,1461:-1,1462:-1,1463:-1,1464:-1,1465:-1,1466:-1,1467:-1,1468 :-1,1469:-1,1470:-1,1471:-1,1474:-1,1475:-1,

//Swords
arena_room.gat,99,101,4 shop 1-HandSword2-HandSword 852,1101:-1,1102:-1,1103:-1,1104:-1,1105:-1,1106:-1,1107:-1,1108:-1,1109:-1,1110:-1,1111:-1,1112:-1,1113:-1,1114:-1,1115:-1,1116:-1,1117:-1, 1118:-1,1119:-1,1120:-1,1121:-1,1122:-1,1123:-1,1124:-1,1125:-1,1126:-1,1127:-1,1128:-1,1129:-1,1130:-1,1131:-1,1132:-1,1134:-1,1135:-1,1136 :-1,1137:-1,1138:-1,1139:-1,1140:-1,1141:-1,1142:-1,1143:-1,1144:-1,1145:-1,1146:-1,147:-1,1148:-1,1151:-1,1152:-1,1153:-1154:-1,1155:-1,115 6:-1,1157:-1,1158:-1,1159:-1,1160:-1,1162:-1,1163:-1,1164:-1,1165:-1,1167:-1,1168:-1,1170:-1,

//Violins
arena_room.gat,97,101,4 shop MusikWeapen 73,1901:-1,1902:-1,1903:-1,1904:-1,1905:-1,1906:-1,1907:-1,1908:-1,1909:-1,1910:-1,1911:-1,1912:-1,1913:-1,1914:-1,1915:-1,1916:-1,1917:-1,1 918:-1,1950:-1,1951:-1,1952:-1,1953:-1,1954:-1,1955:-1,1956:-1,1957:-1,1958:-1,1959:-1,1960:-1,1961:-1,1962:-1,1963:-1,1964:-1,1965:-1,1966: -1,1967:-1,1968:-1,1969:-1,1970:-1,1971:-1,

//Maces & Wands
arena_room.gat,95,101,4 shop MaceandStaff 892,1501:-1,1502:-1,1503:-1,1504:-1,1505:-1,1506:-1,1507:-1,1508:-1,1509:-1,1510:-1,1511:-1,1512:-1,1513:-1,1514:-1,1515:-1,1516:-1,1517:-1, 1518:-1,1519:-1,1520:-1,1521:-1,1522:-1,1523:-1,1524:-1,1525:-1,1526:-1,1527:-1,1528:-1,1529:-1,1531:-1,1550:-1,1551:-1,1552:-1,1553:-1,1554 :-1,1555:-1,1556:-1,1557:-1,1558:-1,1559:-1,1560:-1,1561:-1,1560:-1,1599:-1,1601:-1,1602:-1,1603:-1,1604:-1,1605:-1,1606:-1,1607:-1,1608:-1, 1609:-1,1610:-1,1611:-1,1612:-1,1613:-1,1614:-1,1615:-1,1616:-1,1617:-1,1618:-1,1619:-1,1620:-1,1621:-1,1622:-1,1472:-1,1473:-1,

//Katars & Daggers
arena_room.gat,93,101,4 shop KaterandDagger 884,1201:-1,1202:-1,1203:-1,1204:-1,1205:-1,1206:-1,1207:-1,1208:-1,1209:-1,1210:-1,1211:-1,1212:-1,1213:-1,1214:-1,1215:-1,1216:-1,1217:-1, 1218:-1,1219:-1,1220:-1,1221:-1,1222:-1,1223:-1,1224:-1,1225:-1,1226:-1,1227:-1,1228:-1,1229:-1,1230:-1,1231:-1,1232:-1,1233:-1,1234:-1,1235 :-1,1236:-1,1237:-1,1238:-1,1239:-1,1240:-1,1241:-1,1242:-1,1243:-1,1244:-1,1245:-1,1246:-1,1247:-1,1248:-1,1249:-1,1250:-1,1251:-1,1252:-1, 1253:-1,1254:-1,1255:-1,1256:-1,1257:-1,1258:-1,1259:-1,1260:-1,1261:-1,1262:-1,1263:-1,1264:-1,1265:-1,

//Clips
arena_room.gat,91,101,4 shop Accessories 882,2601:-1,2602:-1,2603:-1,2604:-1,2605:-1,2607:-1,2608:-1,2609:-1,2610:-1,2611:-1,2612:-1,2613:-1,2614:-1,2615:-1,2616:-1,2617:-1,2618:-1, 2619:-1,2620:-1,2621:-1,2622:-1,2623:-1,2624:-1,2625:-1,2626:-1,2627:-1,2628:-1,2634:-1,2635:-1,2636:-1,2637:-1,2638:-1,2639:-1,2640:-1,2641 :-1,2642:-1,2643:-1,2644:-1,2645:-1,2646:-1,2647:-1,2648:-1,2649:-1,2640:-1,2641:-1,2642:-1,2643:-1,2644:-1,2645:-1,2646:-1,2647:-1,2648:-1, 2649:-1,2650:-1,2651:-1,2652:-1,2653:-1,2654:-1,2655:-1,2656:-1,2657:-1,2658:-1,2659:-1,2660:-1,2661:-1,2662:-1,2663:-1,2664:-1,2665:-1,2666 :-1,2667:-1,2669:-1,2670:-1,

//Shoes & Garmets
arena_room.gat,94,93,4 shop ShoesandGarmet 804,2401:-1,2402:-1,2403:-1,2404:-1,2405:-1,2406:-1,2407:-1,2408:-1,2409:-1,2411:-1,2412:-1,2413:-1,2414:-1,2415:-1,2416:-1,2417:-1,2418:-1, 2419:-1,2420:-1,2501:-1,2502:-1,2503:-1,2504:-1,2505:-1,2506:-1,2507:-1,2508:-1,2509:-1,2510:-1,2511:-1,2512:-1,2513:-1,2514:-1,2515:-1,2516 :-1,2517:-1,2518:-1,2519:-1,2520:-1,2521:-1,2522:-1,2523:-1,

//Shields & Amours
arena_room.gat,100,103,4 shop ShieldandAmors 809,2101:-1,2102:-1,2103:-1,2104:-1,2105:-1,2106:-1,2107:-1,2108:-1,2109:-1,2110:-1,2111:-1,2112:-1,2113:-1,2114:-1,2115:-1,2116:-1,2117:-1, 2118:-1,2119:-1,2120:-1,2199:-1,2301:-1,2302:-1,2303:-1,2304:-1,2305:-1,2305:-1,2306:-1,2307:-1,2308:-1,2309:-1,2310:-1,2311:-1,2312:-1,2313 :-1,2314:-1,2315:-1,2316:-1,2317:-1,2318:-1,2319:-1,2320:-1,2321:-1,2322:-1,2323:-1,2324:-1,2325:-1,2326:-1,2327:-1,2328:-1,2329:-1,2330:-1, 2331:-1,2332:-1,2333:-1,2334:-1,2335:-1,2336:-1,2337:-1,2338:-1,2339:-1,2340:-1,2341:-1,2342:-1,2343:-1,2344:-1,2345:-1,2346:-1,2347:-1,2348 :-1,2349:-1,2350:-1,2351:-1,2352:-1,2353:-1,2354:-1,2355:-1,2356:-1,2358:-1,

//Potion
arena_room.gat,98,104,4 shop PotionSeller 750,501:-1,503:-1,504:-1,505:-1,506:-1,645:-1,656:-1,657:-1,682:-1,683:-1,684:-1,

//Pet Seller
arena_room.gat,101,104,4 shop PetSeller 742,619:-1,620:-1,621:-1,622:-1,623:-1,624:-1,625:-1,626:-1,627:-1,628:-1,629:-1,630:-1,631:-1,632:-1,633:-1,634:-1,635:-1,636:-1,637:-1,638 :-1,639:-1,640:-1,641:-1,642:-1,643:-1,644:-1,

//Forge Items
arena_room.gat,92,95,4 shop ForgeItemSeller 869,612:-1,613:-1,614:-1,615:-1,718:-1,719:-1,720:-1,721:-1,722:-1,723:-1,724:-1,725:-1,726:-1,727:-1,728:-1,729:-1,730:-1,731:-1,732:-1,733 :-1,756:-1,757:-1,986:-1,987:-1,988:-1,989:-1,990:-1,991:-1,992:-1,993:-1,994:-1,995:-1,996:-1,997:-1,998:-1,999:-1,1000:-1,1001:-1,1002:-1, 1003:-1,1010:-1,1011:-1,

//Alchemi Shop
arena_room.gat,96,97,4 shop AlchemiShop 744,507:-1,508:-1,509:-1,510:-1,511:-1,704:-1,713:-1,921:-1,929:-1,937:-1,952:-1,950:-1,971:-1,972:-1,973:-1,974:-1,975:-1,976:-1,978:-1,979 :-1,980:-1,981:-1,982:-1,983:-1,1017:-1,905:-1,7033:-1,1093:-1,1092:-1,713:-1,1061:-1,1059:-1,7134:-1,1044:-1,1051:-1,1032:-1,7133:-1,7144:- 1,7434:-1,7132:-1,7131:-1,7128:-1,7129:-1,7130:-1,7127:-1,

//Headgear Shop
//arena_room.gat,104,98,4 shop Headgears1 803,2201:-1,2202:-1,2203:-1,2204:-1,2205:-1,2206:-1,2207:-1,2208:-1,2209:-1,2210:-1,2211:-1,2212:-1,2213:-1,2214:-1,2215:-1,2216:-1,2217:-1, 2220:-1,2221:-1,2222:-1,2223:-1,2224:-1,2225:-1,2226:-1,2227:-1,2228:-1,2229:-1,2230:-1,2231:-1,2232:-1,2233:-1,2234:-1,2235:-1,2236:-1,2237 :-1,2239:-1,2240:-1,2241:-1,2242:-1,2243:-1,2244:-1,2245:-1,2246:-1,2247:-1,2248:-1,2249:-1,2250:-1,2251:-1,2252:-1,2253:-1,2254:-1,2255:-1, 2256:-1,2257:-1,2258:-1,2259:-1,2260:-1,2261:-1,2262:-1,2263:-1,2264:-1,2265:-1,2266:-1,2267:-1,2268:-1,2269:-1,2270:-1,2271:-1,2272:-1,2273 :-1,2274:-1,2275:-1,2276:-1,2277:-1,2278:-1,2279:-1,2280:-1,2281:-1,2282:-1,2283:-1,2284:-1,2285:-1,2286:-1,2287:-1,2288:-1,2289:-1,2290:-1, 2291:-1,2292:-1,2293:-1,2294:-1,2295:-1,2296:-1,2297:-1,2298:-1,2299:-1,5001:-1,5002:-1,5003:-1,5004:-1,5005:-1,5006:-1,5007:-1,5008:-1,5009 :-1,5010:-1,5011:-1,5012:-1,5013:-1,5014:-1,5015:-1,5016:-1,5017:-1,5018:-1,5019:-1,5020:-1,5021:-1,5022:-1,5023:-1,

//Headgear Shop
//arena_room.gat,106,98,4 shop Headgears2 803,5025:-1,5024:-1,5140:-1,5141:-1,5143:-1,5144:-1,5145:-1,5086:-1,5087:-1,5088:-1,5089:-1,5090:-1,5091:-1,5092:-1,5093:-1,5094:-1,5102:-1, 5108:-1,5109:-1,5111:-1,5112:-1,5113:-1,5114:-1,5115:-1,5116:-1,5118:-1,5119:-1,5120:-1,5121:-1,5134:-1,5137:-1,5138:-1,5139:-1,5150:-1,

/ /Headgear Shop
//arena_room.gat,108,98,4 shop Headgears3 803,5026:-1,5027:-1,5028:-1,5029:-1,5030:-1,5031:-1,5032:-1,5033:-1,5034:-1,5035:-1,5036:-1,5037:-1,5038:-1,5039:-1,5040:-1,5041:-1,5042:-1, 5043:-1,5045:-1,5046:-1,5047:-1,5048:-1,5049:-1,5050:-1,5052:-1,5053:-1,5055:-1,5057:-1,5058:-1,5059:-1,5060:-1,5061:-1,5062:-1,5063:-1,5064 :-1,5065:-1,5066:-1,5067:-1,5068:-1,5069:-1,5070:-1,5071:-1,5072:-1,5073:-1,5074:-1,5075:-1,5076:-1,5077:-1,5078:-1,5079:-1,5080:-1,5081:-1, 5082:-1,5083:-1,5084:-1,5085:-1,

//Black Maket Gunslinger Bullets
arena_room.gat,107,83,3 shop Gunslinger Bullets 868,13200:-1,13201:-1,13202:-1,13203:-1,13204:-1,13205:-1,13206:-1,13207:-1,

//Black Maket Gunslinger Weapens
arena_room.gat,104,80,3 shop Gunslinger Weapen 868,13100:-1,13101:-1,13102:-1,13103:-1,13104:-1,13105:-1,13106:-1,13150:-1,13151:-1,13152:-1,13153:-1,13154:-1,13155:-1,13156:-1,13157:-1,1 3158:-1,13159:-1,13160:-1,13161:-1,13162:-1,

//Black Maket Ninja Fuuma Shurikens
arena_room.gat,95,80,3 shop Fuuma Shurikens Stones 866,13300:-1,13301:-1,13302:-1,13303:-1,7521:-1,7522:-1,7523:-1,7524:-1,

//Black Maket Ninja Weapen
arena_room.gat,92,83,3 shop Ninja Weapens 866,13006:-1,13007:-1,13008:-1,13009:-1,13010:-1,13011:-1,13012:-1,13013:-1,13014:-1,13015:-1

//Black Maket Shurikens & Kunais
arena_room.gat,92,80,3 shop Shurikens & Kunais 866,13250:-1,13251:-1,13252:-1,13253:-1,13254:-1,13255:-1,13256:-1,13257:-1,13258:-1,13259:-1,

Lord Keris добавил 10.06.2007 в 17:55
Stat/Skill Seller:

prontera.gat,148,195,5 script Stats/Skill 65,{
mes "[Stats/Skill]";
mes "Hello! I sell and I buy stats and skill points (translated by Mro users,Gm Miktheassassin and Eve).";
mes "What can i help you with?";
next;
menu "Yes i want",L_ys,"No thx",L_no;

L_ys:
mes "[^0000CDstat&skill^000000]";
mes "Which one?";
next;
menu "Buy/sell Stat Points",L_stat,"Buy/sell Skill Points",L_skil,"I dont want to buy or sell points",L_no;

L_stat:
mes "[^0000CDstat&skill^000000]";
mes "You want to buy or sell?";
next;
menu "Buy",L_b1,"Sell",L_s1;

L_skil:
mes "[^0000CDstat&skill^000000]";
mes "You want to buy or sell?";
next;
menu "Buy",L_b2,"Sell",L_s2;

//========= |:BUY:| ===========================================
L_b1:
mes "[^0000CDstat&skill^000000]";
mes "I sell each stat points at ^00FF0010k^000000 zeny.";
mes "Ok...how many stat poinst would you like?";
input @stat;
if (@stat < 1) goto L_no;
if (@stat > 2000) goto L_many;
if (Zeny < @stat * 10000) goto L_zen;
set Zeny, Zeny - (10000 * @stat);
set statuspoint, statuspoint + @stat;
emotion 21;
close;

L_b2:
mes "[^0000CDstat&skill^000000]";
mes "I sell each skill points at ^00FF0040K^000000 zeny.";
mes "Ok...how many would you like?";
input @skill;
if (@skill < 1) goto L_no;
if (@skill > 2000) goto L_many;
if (Zeny < @skill * 40000) goto L_zen;
set Zeny, Zeny - (40000 * @skill);
set skillpoint, skillpoint + @skill;
emotion 21;
close;

//========= |:SELL:| ==========================================
L_s1:
mes "[^0000CDstat&skill^000000]";
mes "Ill pay you ^00FF005k^000000 zeny for each stat point that you sell me";
mes "So...How many stats points you want to sell?";
input @stats;
if (@stats < 1) goto L_no;
if (@stats > 2000) goto L_many;
if (@stats > statuspoint) goto L_AvSp;
set Zeny, Zeny + (5000 * @stats);
set statuspoint, statuspoint - @stats;
emotion 21;
close;

L_s2:
mes "[^0000CDstat&skill^000000]";
mes "Ill pay you ^00FF0015k^000000 zeny for each skill point you sell me";
mes "So...How many skillpoint you want to sell?";
input @skills;
if (@skills < 1) goto L_no;
if (@skills > 2000) goto L_many;
if (@skills > skillpoint) goto L_AvSk;
set Zeny, Zeny + (15000 * @skills);
set skillpoint, skillpoint - @skills;
emotion 21;
close;

//========= |:CLOSE:| ==========================================
L_no:
emotion 45;
close;

L_AvSk:
next;
mes "[^0000CDstat&skill^000000]";
mes "You dont have that many stats points! dont waste my time...";
emotion 29;
close;

L_AvSp:
next;
mes "[^0000CDstat&skill^000000]";
mes "you dont have that many skill points! dont waste my time...";
emotion 29;
close;

L_zen:
next;
mes "[^0000CDstat&skill^000000]";
mes "You dont seem to have that kind of money";
mes "Come back again next time.";
emotion 40;
close;

L_many:
next;
mes "[^0000CDstat&skill^000000]";
mes "I have forgatten to tell you that i can only sell you ^FFD7002000points^000000 every hour";
close;
}


---------------------------------------------------------------
 
RoddericДата: Среда, 14.04.2010, 05:21 | Сообщение # 3
Генерал-майор
Группа: Администраторы
Сообщений: 451
Репутация: 0
Статус: Offline
DB Arena:

//===== eAthena Script =======================================
//= Dead Branch (+Bloody Branch) Quest
//===== By: ==================================================
//= GM-Yevon Перевод By: S1r
//===== Current Version: =====================================
//= 1.1
//===== Compatible With: =====================================
//= eAthena 0.5.2 +
//===== Description: =========================================
// Simple item trade-in quest, a person can get a Dead Branch
// by simply providing the items: Log x3 (7201), Wooden Heart x1 (7189),
// Trunk x5 (1019), and Wooden Gnarl x1 (7222).
//===== Additional Comments: =================================
//= Fully working.
//= 1.1 Optimized, added Bloody Branch with 0.01% chance [Lupus]
//================================================== ==========

niflheim.gat,204,179,3 script Господин Мобря 121,{

mes "[Господин Мобря]";
mes "Деревья обладают Духами, которые Вы знаете...";
next;

mes "[Господин Мобря]";
mes "Я знаю секрет об этих Духах, помоч Вам чтоли...";
next;

mes "[Господин Мобря]";
mes "Я могу вам создать живую ветку(branch)... То есть, если вы обеспечите меня нужным материалом...";
next;
goto L_MENU;

L_MENU:
menu "Что я должен делать?",-,"Где я могу найти Это Говно???",M_FIND,"Сделайте мне Мертвую Ветку(Dead Branch)!",M_CREATE,"Забудьте это...",M_END;

mes "[Господин Мобря]";
mes "Тхе-тхе-тхе... Я вижу Вы хотели управлять деревом в котором живут духи, не так-ли? Хорошо... Мне нужно:";
mes "^1354453 Logs^000000";
mes "^1354451 Wooden Heart^000000";
mes "^1354455 Trunk^000000";
mes "^1354451 Wooden Gnarl^000000";
next;
goto L_MENU;

M_FIND:
mes "[Господин Мобря]";
mes "Вы можете найти эти предметы из определенных монстров...хи-хи-хи";
mes "^135445Бревна(Logs) могуб быть обнаружены в Tree Golems.^000000";
mes "^135445Деревянные сердца(Wooden Hearts) могут быть обнаружены в Tree Golems.^000000";
mes "^135445Транки(Tranks)? Ну подумайте сами, Вы же в лесу...^000000";
mes "^135445Lthtdzyysq Cexjr(Wooden Gnarl)... Gibbet...^000000";
next;
goto L_MENU;

L_NOLOG:
mes "[Господин Мобря]";
mes "^135445Logs^000000 - Мне нужно больше их.";
mes "Get me three logs and I'll make you the spirit...";
close;

L_NOHEART:
mes "[Господин Мобря]";
mes "^135445Wooden Heart^000000 - Сущность духа.";
mes "Дайте мне одно деревянное сердце Wooden Heart и Я все сделаю...";
close;

L_NOTRUNK:
mes "[Господин Мобря]";
mes "ЧТО? Вы не можете найти^1354455 Trunks^000000?";
mes "Убейте Elder Willows.";
close;

L_NOGNARL:
mes "[Господин Мобря]";
mes "Как я могу сделать Мертвый Сучок без ^135445Wooden Gnarl^000000?";
mes "Я сказал Gibbet... они тут повсюду...Убейте их...";
close;

M_CREATE:
mes "[Господин Мобря]";
mes "Хорошо...Давайте посмотрим что вы мне там принесли...";
next;
if(countitem(7201)<3) goto L_NOLOG;
if(countitem(7189)<1) goto L_NOHEART;
if(countitem(1019)<5) goto L_NOTRUNK;
if(countitem(7222)<1) goto L_NOGNARL;
delitem 7201,3;
delitem 7189,1;
delitem 1019,5;
delitem 7222,1;
mes "[Господин Мобря]";
mes "Хех... Забавляйтесь с это штукой поокуратнее...";
mes "Хех... Просто забочусь о вас... чтобы вы себе не навредили...Ничего личного.";
if(rand(1000)==0) goto L_GIVE2;
getitem 604,1; //Dead Branch
close;
L_GIVE2:
getitem 12103,1; //Bloody Branch
close;

M_END:
mes "[Господин Мобря]";
mes "Досвидание!";
close;
}

Lord Keris добавил 10.06.2007 в 18:04
Арендатор Повозок/Птицы/Курицы
//===== eAthena Script =======================================
//= Custom Free Breeder aka Universal Renter (not reccomended)
//===== By: Перевод By: S1r=============================================== ===
//= eAthena Team
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= eAthena 1.0 Final +
//===== Description: =========================================
//= A Free PecoPeco and Falcon Breeder
//===== Additional Comments: =================================
//FIXED checkriding/cart/falcon funcs [Lupus]
//Added Rebirth/Advanced Class support [Mass Zero]
//Simplified the checks of job [Silentdragon]
//================================================== ==========

prontera.gat,127,197,5 script Арендатор 726,{
mes "[Арендатор]";
mes "Привет, здесь Вы можете арендовать Повозки, Соколов или Пеко-пеко.";
next;

L_Menu:
menu "Аренда Повозки",L_Cart,"Аренда Сокола",L_Falcon,"Аренда Пеко-пеко",L_Peco,"Выход",L_Quit;
close;

L_Cart:
if((BaseClass == Job_Merchant || BaseJob == Job_SuperNovice) && checkcart() == 0) goto L_Cart_Ok;
if(getskilllv(39)<1) goto L_Need_Skill;

mes "[Арендатор]";
mes "Извините " + strcharinfo(0) + ", но Я арендую повозки только Продовцам, которые имеют достаточно навыков.";
close;

L_Cart_Ok:
setcart;
goto L_Quit2;

L_Need_Skill:
mes "[Арендатор]";
mes "Извините Вы не имеете необходимое количество умени, чтобы арендовать повозку.";
close;

L_Falcon:
if(BaseJob != Job_Archer && BaseClass == Job_Archer && checkfalcon() == 0) goto L_Falc;
if(getskilllv(127)<1) goto L_Need_Skill2;

mes "[Арендатор]";
mes "Извините " + strcharinfo(0) + ", но Я арендую соколов только Охотникам и Снайперам, которые имеют достаточно навыков.";
close;

L_Falc:
setfalcon;
goto L_Quit2;

L_Need_Skill2:
mes "[Арендатор]";
mes "Извините,но у вас нет необходимых умений для аренды Сокола.";
close;

L_Peco:
if (BaseJob != Job_Swordman && BaseClass == Job_Swordman && checkriding() == 0) goto L_Peco_Ok;
if(getskilllv(63)<1) goto L_Need_Skill3;

mes "[Арендатор]";
mes "Извините " + strcharinfo(0) + ", но Я арендую Пеко-пеко только Рыцарям и Крусайдерам, которые имеют достаточно навыков.";
close;

L_Peco_Ok:
setriding;
goto L_Quit2;

L_Need_Skill3:
mes "[Арендатор]";
mes "Извините, но у вас нет необходимых умений, чтобы ездить на Пеко-пеко.";
close;

L_Quit:
mes "[Арендатор]";
mes strcharinfo(0) + ", пожалуйста возвращайте тогда, когда Вы будете готорвы что-либо арендовать.";
close;

L_Quit2:
mes "[Арендатор]";
mes strcharinfo(0) + ", пожалуйста приходите снова, если вам что-нибудь пондобиться... .";
close;
}

Lord Keris добавил 10.06.2007 в 18:06
Квест на 99 лвл:

//===== eAthena Script =======================================
//= Quest for 99 Base Level Players
//===== By: ==================================================
//= Lupus Перевод By: S1r
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= Any eAthena Version
//===== Description: =========================================
//= It makes players stay longer at 99th level and get a
//= Jewel Case as a reward
//===== Additional Comments: =================================
//=
//================================================== ==========

lighthalzen.gat,108,229,2 script Ла Фен 766,{
mes "[Ла Фен]";
if(BaseLevel<99) {
if(Q_99LVL) {
mes "Вы стали Опытнее, но Вы еще не доконца опытный";
mes "Я сомневаюсь что Вы способны выполнить свое услвоие...";
emotion e_hmm;
next;
mes "[Ла Фен]";
mes "Вот ваша премия.Это - ваше навсегда";
set Q_99LVL,0;
getitem 12106,1; //Jewel Case
emotion e_grat;
} else {
mes callfunc("F_Hi");
mes "...";
emotion e_yawn;
next;
mes "[Ла Фен]";
mes "У меня есть загадка для вас и для всех классов 2 уровня и 99 Бозового Уровня.";
mes "Если Вы встретите кого-нибудь, то сообшите обо мне и о моей награде.";
}
close;
}
if(BaseLevel==99 && Upper==0) {
if(Q_99LVL) {
mes "Теперь ступайте и становитесь снова Молодым!";
mes "Если Вы решите мою загадку, Тогда Я дам Вам магический Jewel Case. Это очень Редкий аксессуар.";
} else {
mes callfunc("F_Hi")+" ГЕРОЙ!!!";
if(BaseExp<1000000) {
mes "Теперь Вы прочны.";
mes "Но... совсем не прочный для моей загадки.";
if(rand(2)) {
mes "Kill "+((1000000-BaseExp)/3765+1)+" больше Seals и возвращайтесь.";
} else {
mes "Kill "+((1000000-BaseExp)/81+1)+" больше Poporings и приходите ко мне.";
}
} else {
mes "Теперь Вы ДЕЙСТВИТЕЛЬНО прочны.";
mes "Если вы станите моложе то Я дам Вам мое сокровище.";
set Q_99LVL,1;
emotion e_no1;
}
}
close;
}
emotion e_hmm;
mes "...";
close;
}


---------------------------------------------------------------
 
RoddericДата: Среда, 14.04.2010, 05:21 | Сообщение # 4
Генерал-майор
Группа: Администраторы
Сообщений: 451
Репутация: 0
Статус: Offline
prontera.gat,150,184,5scriptHeal & Buffer~::Heal & Buffer~977,{
// -o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o- \\
// Header - Please include this header in your Walk Enabled NPCs to control distance errors
// Set the status to "In Use" (multiplayer)
set .inUse, .inUse + 1;
// Reset the current lock time while the user talk with the NPC
set .curLockT,0;
// -o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o-o- \\
mes "[Heal & Buffer]";
mes "Healing...";
percentheal 100,100;
misceffect 408;
skilleffect 28,32000;
next;
mes "[Heal & Buffer]";
mes "Buffing...";
sc_start 32,240000,10;//Increase AGI
sc_start 30,240000,10;//Blessing
sc_start 35,240000,10;//Impositio
skilleffect 74,0; //Effect Magnificat
sc_start 40,240000,10;//Magnificat
sc_end SC_Poison;
sc_end SC_Silence;
sc_end SC_Blind;
sc_end SC_Confusion;
sc_end SC_Curse;
sc_end SC_Hallucination;
emotion e_no1;
set .inUse, .inUse - 1;
close;
end;
R_No:
mes "[Heal & Buffer]";
mes "Alright, come back if you need help";
close2;
set .inUse, .inUse - 1;
end;
OnInit:
// Define the coordinates for this NPC (you can use 0,400/0,400 for a full map movement)
// Horizontal coordinates
set .minX,148;
set .maxX,163;
// Vertical coordinates
set .minY,184;
set .maxY,164;
// Define the min/max distance for each movement
set .minD,0;
set .maxD,10;
// Define stopped steps before change the status back to "Free to walk"
set .maxLock,30;
// Set the speed for this NPC (50=Faster / 250=Slower)
npcspeed 200;

// Start the movements
initnpctimer;
end;

// Set here the time for the next movement (ms)
OnTimer3000:
if (.inUse) {
set .curLockT, .curLockT + 1;
if (.curLockT > .maxLock) set .inUse, 0;
} else {
getmapxy .map$,.x,.y,1;
set .curX, callfunc("NPCWalk",.minX, .maxX,.minD,.maxD,.x);
set .curY, callfunc("NPCWalk",.minY, .maxY,.minD,.maxD,.y);
npcwalkto .curX, .curY;
}
stopnpctimer;
initnpctimer;
end;
onTouch:
npctalk "Do you need a Heal young adventurer?";
emotion e_hmm;
end;

}
// Function to calculate one single coordinate
functionscriptNPCWalk{
set .CP, getarg(4);
set .DST, rand(getarg(2),getarg(3));
if (rand(2))
set .CP, .CP + .DST;
else
set .CP, .CP - .DST;
if (.CP < getarg(0)) set .CP, .CP + .DST;
if (.CP > getarg(1)) set .CP, .CP - .DST;
return .CP;
}


---------------------------------------------------------------
 
Форум » База знаний по RF Online » Готовые сервера / сборки RF Online » Скрипты NPC
  • Страница 1 из 1
  • 1
Поиск:
Создать бесплатный сайт с uCoz