Скрипты на 1профы.
Помощь в написании скриптов для l2walker.
Страница: 1
Сообщений 1 страница 2 из 2
Поделиться22009-03-30 15:02:48
nintendo написал(а):
Скрипты на 1профы.
Код:
//Level 19 Rogue Quest//
//Created by Onycho//
//Начинаем около глудинского ГК
//настройки валкера: автоюз сосок и хп-потов
//На себе - Top NG Armor,//
//При себе - Healing Pots, //
//2000 NGSS //
//2 SOEs //
//Start - Near Gludin GK//
//..::...::...::...::...::...::...::...::...::...::...::..//
//Start the quest//
LABEL(Start)
SET(L2Walker,Enable)
POSOUTRANGE(-80745,149796,-3040,1000)
{
EXIT(No more fun for you)
}
MOVETO(-80812,150269,-3040)
CALL(Buffs)
//..::...::...::...::...::...::...::...::...::...::...::..//
//Time for Captain Bezique//
MOVETO(-83076,152726,-3120)
MOVETO(-84997,152882,-3168)
NPCDLG(Bezique[ID=30379])
DELAY(1000)
DLGSEL(Quest)
STRNOTINDLG(Say you will take the task)
{
SAY(Damn it! I must be too low level for this quest!)
EXIT(No more fun for you)
}
DELAY(1000)
DLGSEL(Say you will take the task)
DELAY(1000)
DLGSEL(Ask about the bandits)
DELAY(2000)
//..::...::...::...::...::...::...::...::...::...::...::..//
//Moving on to Neti//
MOVETO(-83076,152726,-3120)
MOVETO(-83069,152049,-3120)
MOVETO(-83397,151929,-3120)
NPCDLG(Neti[ID=30425])
DELAY(1000)
DLGSEL(Quest)
DELAY(1000)
DLGSEL(Say you understand)
DELAY(1000)
DLGSEL(Take the test)
DELAY(2000)
USEITEM(Neti's Dagger[ID=1182])
//..::...::...::...::...::...::...::...::...::...::...::..//
////Time to kill the Undead////
LABEL(ToAgony)
CALL(Port)
MOVETO(-49153,146176,-2768)
MOVETO(-48286,143733,-2920)
MOVETO(-46741,140666,-2912)
CALL(AggroShaker)
MOVETO(-45072,138536,-2888)
MOVETO(-44689,135669,-2856)
MOVETO(-45639,128278,-2848)
CALL(AggroShaker)
MOVETO(-44434,123715,-2624)
CALL(AggroShaker)
LABEL(FightSkellies)
SET(RangeType,DefPos,-46086,122947,-2840,3000)
SET(MON,NOATTACK,Ratman Warrior[ID=20359])
SET(MON,NOATTACK,Ruin Zombie Leader[ID=20029])
SET(MON,NOATTACK,Arachnid Predator[ID=20050])
SET(FIGHTSTART)
LABEL(BoneCheck)
ITEMCOUNT(Spartoi's Bones[ID=1183],==,10)
{
CALL(ReturnToNeti)
}
DELAY(20000)
CALL(BoneCheck)
//..::...::...::...::...::...::...::...::...::...::...::..//
//Return to Neti//
LABEL(ReturnToNeti)
SET(FIGHTSTOP)
CALL(AggroShaker)
MOVETO(-44434,123715,-2624)
CALL(AggroShaker)
MOVETO(-45639,128278,-2848)
CALL(AggroShaker)
UseItem(Scroll of Escape[ID=736])
DELAY(22000)
CALL(GludinPort)
MOVETO(-83069,152049,-3120)
MOVETO(-83397,151929,-3120)
NPCDLG(Neti[ID=30425])
DELAY(1000)
DLGSEL(Quest)
//..::...::...::...::...::...::...::...::...::...::...::..//
//Return to Captain Bezique//
MOVETO(-83076,152726,-3120)
MOVETO(-84997,152882,-3168)
NPCDLG(Bezique[ID=30379])
DELAY(1000)
DLGSEL(Quest)
DELAY(2000)
//..::...::...::...::...::...::...::...::...::...::...::..//
//Time to Kill Bandits//
LABEL(Bandits)
MOVETO(-83076,152726,-3120)
CALL(Buffs)
CALL(Port)
MOVETO(-48612,146219,-2784)
CALL(AggroShaker)
SET(RangeType,DefPos,-46937,146580,-2976,3000)
SET(MON,NOATTACK,Ol Mahum Patrol[ID=20053])
SET(MON,NOATTACK,Ol Mahum Guard[ID=20058])
SET(MON,NOATTACK,Ol Mahum Recruit[ID=20437])
SET(MON,NOATTACK,Ol Mahum Officer[ID=20493])
SET(FIGHTSTART)
CALL(LootCheck)
SET(FIGHTSTOP)
CALL(AggroShaker)
MOVETO(-48612,146219,-2784)
MOVETO(-49853,147089,-8784)
CALL(AggroShaker)
UseItem(Scroll of Escape[ID=736])
DELAY(22000)
//..::...::...::...::...::...::...::...::...::...::...::..//
//Finish the Quest//
LABEL(Endgame)
CALL(GludinPort)
MOVETO(-83076,152726,-3120)
MOVETO(-84997,152882,-3168)
NPCDLG(Bezique[ID=30379])
DELAY(1000)
DLGSEL(Quest)
DELAY(2000)
MOVETO(-83076,152726,-3120)
MOVETO(-82989,150858,-3120)
MOVETO(-82256,150161,-3120)
MOVETO(-81963,149452,-3120)
MOVETO(-81702,149353,-3120)
NPCDLG(Ramos[ID=30373])
DELAY(1000)
DLGSEL("Tell me about the first class transfer.")
DELAY(1000)
DLGSEL(Rogue)
DELAY(1000)
DLGSEL(Change occupation to a Rogue)
SAY(YAY! I'm a Rogue now!!!!)
SET(L2Walker,Disable)
EXIT()
//..::...::...::...::...::...::...::...::...::...::...::..//
//Gludin's SOE locations to Gatekeeper by vDragon (Modified)//
LABEL(GludinPort)
POSINRANGE(-82897,150175,-3128,2000)
{
MOVETO(-83043,150888,-3128)
RETURN()
}
POSINRANGE(-81814,152796,-3176,500)
{
MOVETO(-81797,152748,-3204)
MOVETO(-82947,152665,-3144)
}
POSINRANGE(-80074,154601,-3176,1350)
{
MOVETO(-80092,154270,-3204)
MOVETO(-80849,152812,-3204)
MOVETO(-82947,152665,-3144)
}
RETURN()
//..::...::...::...::...::...::...::...::...::...::...::..//
//Porting to Abandoned Camp)
LABEL(Port)
MOVETO(-80995,150067,-3120)
MOVETO(-80769,149798,-3040)
NPCDLG(Richlin[ID=30320])
DLGSEL( Teleport )
DELAY(1000)
STRINDLG(Abandoned Camp - 600 Adena )
{
DLGSEL(Abandoned Camp - 600 Adena )
}
STRINDLG(Abandoned Camp - 1200 Adena )
{
DLGSEL(Abandoned Camp - 1200 Adena )
}
DELAY(10000)
MOVETO(-49853,147089,-8784)
CALL(AggroShaker)
RETURN()
//..::...::...::...::...::...::...::...::...::...::...::..//
//Getting Newbie buffs//
LABEL(Buffs)
MOVETO(-83100,150864,-3120)
NPCDLG(Newbie Guide[ID=31076])
DELAY(1000)
STRINDLG(Get help with supporting magic.)
{
DLGSEL(Get help with supporting magic.)
DELAY(7500)
}
RETURN()
//..::...::...::...::...::...::...::...::...::...::...::..//
////Loot Check for Quest Part 2////
LABEL(LootCheck)
ITEMCOUNT(Stolen Jewelry[ID=1186],==,1)
{
JMP(Loot2)
}
DELAY(15000)
JMP(LootCheck)
LABEL(Loot2)
ITEMCOUNT(Stolen Tomes[ID=1187],==,1)
{
JMP(Loot3)
}
DELAY(15000)
JMP(Loot2)
LABEL(Loot3)
ITEMCOUNT(Stolen Ring[ID=1188],==,1)
{
JMP(Loot4)
}
DELAY(15000)
JMP(Loot3)
LABEL(Loot4)
ITEMCOUNT(Stolen Necklace[ID=1189],==,1)
{
RETURN()
}
DELAY(15000)
JMP(Loot4)
//..::...::...::...::...::...::...::...::...::...::...::..//
////[Aggro Shaker by stoopid]////
LABEL(AggroShaker)
Delay(5000)
SET(RANGETYPE,STARTPOS,1)
SET(FIGHTSTART)
LABEL(CheckStatus)
CharStatus(HP,<,100)
{
Jmp(CheckStatus)
}
SET(FIGHTSTOP)
Return()Страница: 1