la2enigma
-
Posts
9 -
Credits
0 -
Joined
-
Last visited
-
Feedback
0%
Content Type
Articles
Profiles
Forums
Store
Posts posted by la2enigma
-
-
Auto Agument
var L2Skill: TL2Skill; skill1: TL2Skill; skill2: TL2Skill; skill3: TL2Skill; skill4: TL2Skill; NovObj: TL2Skill; NovEngine: TL2Control; buff: TL2Buff; function keybd_event (bVk, bScan: byte; dwFlags, dwExtraInfo: integer): integer ; stdcall; external 'user32.dll'; function SetCursorPos (x, y: integer): boolean; stdcall; external 'user32.dll'; function mouse_event (dwFlags, dx, dy, dwData: byte; dwExtraInfo: integer): void; stdcall; external 'user32.dll'; function GetSkill (const Control: String; const ID: Cardinal): TL2Skill; begin NovEngine: = GetControl (control); if Assigned (NovEngine) and NovEngine.GetSkillList.ByID (ID, NovObj) then Result : = NovObj; delay (10000) end; procedure pressKey (hexCode: BYTE); begin keybd_event (hexCode, 45, 1, 0); delay (200); end; procedure mouseClick (x, y, _delay: integer); begin SetCursorPos (x, y); mouse_event ($ 2, 0, 0, 0, 0); delay (_delay); mouse_event ($ 4, 0, 0, 0, 0); end; procedure mouseDown (x, y, _delay: integer ); begin SetCursorPos (x, y); mouse_event ($ 2, 0, 0, 0, 0); // delay (_delay); // mouse_event ($ 4, 0, 0, 0, 0); end; procedure mouseUp ( x, y, _delay: integer); begin SetCursorPos (x, y); // mouse_event ($ 2, 0, 0, 0, 0); // delay (_delay); mouse_event ($ 4, 0, 0, 0, 0 ); end; // coordinate of the higher edge of the box augmentation \\ \\ 486 144 // coordinate of the higher edge of the box cancel \\ \\ 485 413 // coordinate of the higher edge of the box inventory \\ 203 \\ 1072 // active REFRESH 3199 // Reflect active 3204 // virgin 3158 // active PvP Mait 3134 // Passive Reflect 3259 // active refresh2 3202 // weight limit 3251 // Passive pvp Mait 3243 begin delay (10,000); while 1 <> 2 do begin if (not SkillList.ByID (3243, skill1)) then begin // remove augment mouseDown (884, 1010, 1000); // click on the feathers (coordinate location puhi. it must necessarily be in the hands of) delay (300); mouseUp (486, 700, 1000); // Fluff drag the window aukmenta cancellation and release delay (300); mouseClick (445, 829, 200); // Confirm cancellation augment (augment cancel confirmation button) delay (3000); // Waiting for the augmentation mouseClick (445, 829, 200); // Push for the next augmentation (after HP pulled out) delay (300); // insert the new augment mouseDown (884, 1010, 1000); // click on the feathers (coordinate location puhi. it must necessarily be in the hands of) delay (300); mouseUp (446, 390, 1000); // Aukmenta drag the window and release delay (300); mouseDown (1156 897 1000); // click on the LAN delay (300); mouseUp (526, 392, 1000); // Aukmenta drag the window and release delay (300); mouseDown (1197, 897, 1000); // click on gemston delay (300); mouseUp (485, 432, 1000); // Aukmenta drag the window and release delay (300); mouseClick (440, 562, 200); // Confirm augment delay (4300); // Waiting for the augmentation mouseClick (440, 562, 200); // Push for the next augmentation delay (100); end; if (SkillList.ByID (3243, skill2)) then begin PlaySound (exepath + '\ sounds \' + 'dc' + '.wav', False); delay ( 5000); end; end; end.
Auto SOS charging
const SOS_ID = 789;//Spirit of Shilen POS_ID = 788;//Pain of Shilen TRIGGER_ID = 5564;//Pain of Shilen trigger ATTACK_PET = false; var sosSkill,posSkill: TL2skill; sosBuff,triggerBuff: TL2buff; begin while true do begin if not user.buffs.byid(SOS_ID,sosBuff) then begin if (skilllist.byid(SOS_ID,sosSkill) and (sosSkill.endtime = 0)) and (skilllist.byid(POS_ID,posSkill) and (posSkill.endtime = 0)) then begin engine.useskill(posSkill); delay(500); print('Triggering lvl3 of '+posSkill.name); while user.buffs.byid(TRIGGER_ID,triggerBuff) and not (triggerBuff.level >= 3) do begin if ATTACK_PET and (petlist.count > 0) then begin if (user.target.name = '') then engine.settarget(petlist.items(0)); engine.attack(true); end; delay(150); end; if (triggerBuff.level >= 3) then begin print('Using '+sosSkill.name); engine.useskill(sosSkill); end; end; end; delay(500); end; end.
Anti Disarm
var item: TL2Item; begin while true do begin delay(500); if inventory.user.byid(10771, item) and not (Item.Equipped) then begin Delay(500); Engine.UseItem(10771); <<< Replace with ur weapon id Delay(800); end;
Imperial Tomb Auto Farm LS
uses sysutils; Procedure shotaipotai; var potion,shotuS,spirit,shotuB: tl2item; begin while true do begin delay(100000); if inventory.user.byid(3031,spirit) and ((spirit.count)< 1000) then engine.say(inttostr(spirit.count)+' spirit orie',3,'nick'); if not inventory.user.byid(3031,spirit) then engine.say('spirit ore end!',3,'nick'); if inventory.user.byid(728,potion) and ((potion.count)< 100) then engine.say(inttostr(potion.count)+' manos',3,'nick'); if not inventory.user.byid(728,potion) then engine.say('mana end!!',3,'nick'); if inventory.user.byid(3952,shotuS) and ((shotuS.count)< 1100) then engine.say(inttostr(shotuS.count)+' S shots',3,'nick'); if not inventory.user.byid(3952,shotuS) then engine.say('S shots ended',3,'nick'); end; end; procedure bufai; var buff1: TL2Effect; item: TL2Item; function CheckBuff: Boolean; begin if not user.buffs.byid(1204, buff1) then begin / wind walk Result:=false; Print('Buffs are needed. Buffing...'); engine.bypasstoserver('custom_dobuff ProfBuffs MAGE'); // change mage to your scheme name Print('Buffed.'); exit; end; Result:=true; end; function CheckStatus: Boolean; begin Result:=true; if User.Dead then begin Print('Dead. Pressing to village.'); Delay(1000); Engine.FaceControl(0,false); Engine.GoHome; Delay(10000); end; Result:=false; end; begin while true do begin delay(150); CheckStatus; if user.inrange(146272, -58176, -2976, 450) then begin Engine.MoveTo(147593, -58103, -3007); Engine.MoveTo(147727, -57141, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(145264, -57680, -2976, 450) then begin Engine.MoveTo(145588, -56926, -3007); Engine.MoveTo(146673, -56095, -2807); Engine.MoveTo(147543, -56054, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(145696, -57696, -2976, 450) then begin Engine.MoveTo(145510, -56930, -3007); Engine.MoveTo(146499, -56202, -2807); Engine.MoveTo(147481, -56031, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(144944, -55392, -2976, 450) then begin Engine.MoveTo(145153, -56813, -3007); Engine.MoveTo(145569, -56855, -3007); Engine.MoveTo(146467, -56271, -2807); Engine.MoveTo(147566, -56034, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(144752, -56752, -2976, 450) then begin Engine.MoveTo(145534, -56884, -3007); Engine.MoveTo(146265, -56418, -2807); Engine.MoveTo(147407, -56063, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(149120, -58064, -2976, 450) then begin Engine.MoveTo(147706, -58107, -3007); Engine.MoveTo(147751, -56737, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(150400, -56752, -2976, 450) then begin Engine.MoveTo(149935, -56870, -3007); Engine.MoveTo(149139, -56390, -2807); Engine.MoveTo(147929, -56063, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(150704, -55744, -2976, 450) then begin Engine.MoveTo(149935, -56870, -3007); Engine.MoveTo(149139, -56390, -2807); Engine.MoveTo(147929, -56063, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(147680, -58208, -2976, 450) then begin Engine.MoveTo(147727, -57141, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(148288, -58304, -2976, 450) then begin Engine.MoveTo(147738, -58050, -3007); Engine.MoveTo(147727, -57141, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(147232, -58480, -2976, 450) then begin Engine.MoveTo(147677, -58063, -3007); Engine.MoveTo(147727, -57141, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(149088, -56256, -2776, 450) then begin Engine.MoveTo(147854, -56054, -2807); Engine.MoveTo(147934, -55354, -2760); end; if user.inrange(146832, -55904, -2776, 450) then begin Engine.MoveTo(147529, -56046, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(146368, -56256, -2776, 450) then begin Engine.MoveTo(147529, -56046, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(147664, -56464, -2776, 450) then begin Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(147680, -56928, -2776, 450) then begin Engine.MoveTo(147810, -56110, -2807); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(148560, -55904, -2776, 450) then begin Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(149872, -57424, -2976, 450) then begin Engine.MoveTo(149897, -56910, -2979); Engine.MoveTo(149230, -56412, -2779); Engine.MoveTo(147939, -55999, -2772); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(144960, -56224, -2976, 450) then begin Engine.MoveTo(145458, -56853, -2979); Engine.MoveTo(146343, -56326, -2779); Engine.MoveTo(147625, -55995, -2772); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(144496, -55088, -2976, 450) then begin Engine.MoveTo(145327, -56873, -2979); Engine.MoveTo(146337, -56445, -2779); Engine.MoveTo(147533, -55963, -2766); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(145392, -56960, -2976, 450) then begin Engine.MoveTo(146347, -56305, -2779); Engine.MoveTo(147514, -56003, -2772); Engine.MoveTo(147936, -55368, -2760); end; if user.inrange(147936, -55368, -2760, 350) then begin CheckBuff; end; if user.inrange(147932, -55213, -2735, 3000) and User.Buffs.ByID(1204, Buff1) then begin Print('Going back to spot.'); Engine.SetTarget(31275); Engine.DlgOpen; Delay(2111); Engine.DlgSel('I want to use the Noblesse Only: Teleport'); Delay(2111); engine.bypasstoserver('npc_268467360_Chat 2'); //must change npc numbers by your server Delay(2111); engine.bypasstoserver('npc_268467360_goto 9067'); //must change npc numbers by your server Delay(5000); end; if user.inrange(178113, -84441, -7211, 500) then begin Print('Varka Silenos Village. Moving to exping place.'); Engine.MoveTo(178284, -83352, -7245); Engine.MoveTo(177850, -83240, -7246); Engine.MoveTo(178035, -82322, -7246); Engine.MoveTo(181003, -82492, -6621); Engine.MoveTo(181306, -83988, -6621); Engine.MoveTo(183715, -83856, -5993); Engine.MoveTo(183715, -81567, -5360); Engine.MoveTo(183657, -81287, -5320); Print('Exp mode: ON'); Delay(500); Engine.FaceControl(0, true); end; end; end; begin //start of main body Script.NewThread(@shotaipotai); delay(60); Script.NewThread(@bufai); end. //end of main body
Auto Mana Burn Enemys Healer
procedure burn (p: pointer); var P1, P2 : pointer; Actor: TL2Live; begin try while Engine.Status = lsOnline do begin Engine.WaitAction([laCast], P1, P2); Actor := TL2Live(P1); if (not (Actor.IsMember) and (Actor.Cast.ID = 123) and (User.DistTo(Actor)<900)) then begin if Engine.SetTarget(Actor.Name) then Engine.UseSkill(3110); //mana burn end; end; except print ('ProtectCaster error'); end; end; begin Script.NewThread(@burn); end.
enjoy :not bad:
-
RATES:
Rate Xp = x15
Rate Sp = x15
Drop Rate = x5
Raidboss Drop = x5
Safe Enchant: +4
Max Enchant: +16
Success rate - Normal: 66%
Success rate - Blessed: 75%
Features:
- Fully working Gracia Epilogue
- GmShop up to A grade, Scheme Buffer
- 24 Buff slots
- Custom Nobless System (can be bought)
- Subclass without quest
- 1 Hours buffs
-= Soon =-
CUSTOM ZONES:
- Farm Zone
- Raid Boss Area
MORE INFO:
Active Gm Team and Devs will provide any help you might need.
Fully operational castle and fortress sieges.
Auto learn skills.
Class master
Auto subclass (no quest required).
Max subclasses 3
Max subclass level 85
Max Attribute lvl is 9 (300 Weapon and 120 Armor)
Friendly donations, agathions hats only !
Server Site: www.la2enigma.com.pl
-
its l2j ; d
Fix topic title.
Its is not l2j, l2jfree, or l2j whatever. its written by rusian developers extened by us.
little update done.
Updated Kamael trap behaviorFixed Charm of Corner AI
Fix on summon ai ( http://www.l2v.webd.pl/enigma/index.php?topic=351.0 )
Balanced raidboss stats on players demand
More correction in Geo TOI Z
Fix in Fates Whisper fabric problem
Fixed Benom AI on rune siege
More fixes on 4 Sep ( Should work flawless now )
Added missing special boss Dr.Chaos
Removed all Premium Clanhalls from donation and added them back to Siege type
Hot Springs Clanhall
Bandits Stronghold
Wild Beast Farm
Added missing quest How to Oppose Evil
Fix on underground coliseum ( http://www.l2v.webd.pl/enigma/index.php?topic=326.0 )
Added new Fantasy Isle event Handy's Block Checker
Added the Fishing Championship with custom rewards
Added new custom world event ( More info soon )
Added new auto event Russian Roulette
Added Gracia Seed of Destruction Dungeon ( Min players set to 18 retail is 36 ) Guide here http://www.lineage2media.com/seed%20of%20destruction%20walkthrough.html
Added packet support for Gracia Epilogue ( Next update we will move to Gracia Epilogue!
Added all Delusion Chambers 100% ( Will be available when we move to EPI ! )
Fixed Sigils http://www.l2v.webd.pl/enigma/index.php?topic=322.0
Fixes on Krateis Cube Thx michoros for testing the instance
Added own ai for following mobs
BladeOtis
BodyDestroyer
FollowerOfAbigore
FollowerOfAllosce
FollowerOfAriosh
FollowerOfBilette
FollowerOfFlouros
FollowerOfOtis
FollowerOfStorace
HatuOtis
KaimAbigore
KelBilette
LostAssistantGuard
LostBeholder
LostWatcher
OlAriosh
SeerFlouros
VenomousStorace
WeirdBunei
WhiteAllosce
Improved Laba with proper AI ( If you kill the mobs before the raidboss in the instance, the boss will lose pdef patack or mdef depanding on wich of them you killed )
Fixed castle instance dungeon teleporting to bad backcords
Correction on Aura of Hate (+ pDef enchant effect).
And over 700 more changesets wich are not much important to mortals
Also sub and noble donation removed, server has only hats and agathions in store!
-
up to 500 players atm, come and play :)
-
server is growing, up to 320 players after 3 weeks online. Still we have free castles and many chs to buy. If you guys lf a server without major bugs and international community this is somethink for you :)
Regards
Maniac
-
Exp 15x
Sp 15x
Adena 15x
Drop 15x
Spoil 10x
Raid Drop 4x
Epic Drop 1x
Vitality Boost 4x
= Features =
-No l2j crap
-Source has never been synchronized and was NOT developed by l2j
- Friendly Donation system - No enchants recipes or full items!
-Class Master for first and second class change
- Boosted Quests for Ketra/Varka Ally
- Boosted Quests for S Grade Weapons - Armors
- Dedicated 24 slots for Buff Skills
- Dedicated 12 slots for Dance/Song Skills
- 5000 slots for players
- Custom Offline trade system with auto restore on log out - log out when empty function
- Retail like Random Spawn system
- TOP Quality Geodata and Pathfinding
- All Epic bosses working 100%
- Combo buffs
- Skill Certification System
- Olimpiad up to Gracia
- s80 items by quest
- Siegable Clan Halls
- Fortress of the Dead
- Rainbow Springs Clan Hall
- Devastated Castle
- Bandit Stronghold
- Wild Beast Reserve
- Kamaloka
- Hall of Abyss
- Icarus items by quest
- Hellbound System
- Full Fortress Sige with Dungeons
- Talisman system
- Accesory Agumentation
- Primeval island
- Hero - Noble skills
- Server side Bot Detector
- Many Hardcoded Events to make every class and level happy
- Example up to 15 TvT Events at one time! For levels 20 - 30 30 - 40 ETC
- Newbie Buffs for max lvl 80
- Auto skill learn
Lineage 2 Enigma Team
PunisherTheOne(Owner and Head Developer)
Maniac (Owner and Head Admin)
=HGM=Petq (Head Game Master)
Pheonix(Head GameMaster)
=GM=Cerberus (GameMaster)
=SGM=Xell (SupportGameMaster)
http://www.la2enigma.com.pl Visit us!
-
After the beta,the server will be wiped?
yes there will be a wipe
baah ... i hate npcs buffers and gm shops on x7-x15
Gl with your server
GM Shop with up to B grade items Npc Buffer with basic PP Buffs
-
on open beta full npc buffer and gm shop, after beta gm shop up to B grade and some basic buffs come and test
-
Following Server Rates have been decided.
Exp 15x
Sp 15x
Adena 15x
Drop 15x
Spoil 10x
Raid Drop 5x
Epic Drop 1x
Vitality Boost 4x
Rates may change by vote.
= Features =
- Custom Software not based on L2j
- Friendly Donation system - No enchants recipes or full items!
-Class Master for first and second class change
- Boosted Quests for Ketra/Varka Ally
- Boosted Quests for S Grade Weapons - Armors
- Dedicated 24 slots for Buff Skills
- Dedicated 12 slots for Dance/Song Skills
- 5000 slots for players
- Custom Offline trade system with auto restore on log out - log out when empty function
- Retail like Random Spawn system
- TOP Quality Geodata and Pathfinding
- Party Matching System
- All Epic bosses working 100%
- Combo buffs
- Retail Damage Zones
- Skill Certification System
- Olimpiad up to Gracia
- s80 items by quest
- Siegable Clan Halls
- Fortress of the Dead
- Rainbow Springs Clan Hall
- Devastated Castle
- Bandit Stronghold
- Wild Beast Reserve
- Kamaloka
- Hall of Abyss
- Icarus items by quest
- Hellbound System
- Full Fortress Sige with Dungeons
- Talisman system
- Accesory Agumentation
- Primeval island
- Underground Coliseum
- Hero - Noble skills
- Server side Bot Detector
- Many Hardcoded Events to make every class and level happy
- Example up to 15 TvT Events at one time! For levels 20 - 30 30 - 40 ETC
Lineage 2 Enigma Team
PunisherTheOne(Owner and Head Developer)
Maniac (Owner and Head Admin)
=HGM=Petq (Head Game Master)
Pheonix(Head GameMaster)
=GM=Cerberus (GameMaster)
=SGM=Xell (SupportGameMaster)
Website: www.la2enigma.com.pl
[Report] Scammers
in Report Section
Posted
hi ady
http://share.pho.to/9fKOi
http://pastebin.com/1rruGRt9
http://prntscr.com/732atc