İlk Olarak AcTool Programı..
Sitemize Uye Olmadan Linkleri Goremezsiniz. Lutfen Giris Yapin veya Kayit Olun..
Bu Programı Çalıştırmak İçin Xtrab'ın Disable Olması Lzm..
Tabi Her Patch de İlla Xtrap Disable Çıkıo
İşte Tek Yapmanız Gereken Hangi Kodu İstiyorsanız Programa Yapıştırıp Start a Basmaktır..
Sıra geldi macro kodlarına:
OTO ENTER MACROSU
Kod:
//OtoenterSetActiveWindow Knight Online Client Commanddelay 1 ObjVar 1 Procedure OtoEnter IsBlack 277, 463 keydown {return} .01 sec Else stop End End while 1=1 call OtoEnter end
Archer macro
Kod:
SetActiveWindow Knight OnLine ClientCommandDelay 10KeyRate 10 Constants//========== your skill slots =================////Key 1 through shot//Key 2 through shot (or other archery skills)//Key 3 //Key 4 archery (when you run out of mana pots)//Key 5 wolf//Key 6 mana pot//Key 7 hp pot//Key 8 safety//=============== Arrange your skillbar =======//WolfKey = 5 BackupHpPot = 7//=============== 1 = yes , 0 = no ============//wolff = 1 UseTown = 1safetyy = 1repair = 1//======== 1 = Right slot, 2 = Left slot ======//weaponlocation = 2//=============================================//End //======AC===========//procedure safety Every 35 secif $safetyy = 1delay 200keydown 8 100 | 100 delay 200endend //======Wolf===========//procedure wolf Every 126 secif $wolff = 1delay 1300keydown 5 100 | 100 delay 50endend //======Town===========//Procedure CheckTownIf $UseTown = 0ExitEndIsRed 190, 10ElseDelay 200Keys $BackupHpPotDelay 1500Keys $BackupHpPotDelay 300say /townDelay 3 seckeydown c 0.5stop EndEnd //======Attack=========//Procedure attack Keys z1Keys 2Keys 1Keys 2Keydown 1 100 | 100Keydown 2 100 | 100End //======Heal===========//delay 10Procedure heal IsBlack 150, 40keys 7EndEnd //======Mana===========//Procedure manaIsBlack 155, 58Keys 6EndEnd //======Repair=========//Procedure repairs every 10 min // repairs armor and weapon every 15 minutesDelay 1000If $repair = 0elseIf $weaponlocation = 0MousePos 880, 185 // Left WeaponelseMousePos 990, 185 // Right WeaponendDelay 1000LeftMouseDownDelay .5LeftMouseUpDelay .5MousePos 876, 291 // GlovesLeftMouseDownDelay .5LeftMouseUpDelay .5MousePos 931, 292 // BotsLeftMouseDownDelay .5LeftMouseUpDelay .5MousePos 931, 236 // PadsLeftMouseDownDelay .5LeftMouseUpDelay .5MousePos 925, 133 // PauldronLeftMouseDownDelay .5LeftMouseUpDelay .5MousePos 920, 85 // HelmetLeftMouseDownDelay .5LeftMouseUpEndEnd while 1 = 1ProcessMessagesdelay 50Call attackCall healcall manaCall attackCall healcall manaEnd //Stop macro on window change.Procedure StopOnSwitchedWindow On WindowChange stopEnd
Assassin Combo macro
Kod:
SetActiveWindow Knight Online ClientCommanddelay 10ObjVar 10 // Put first skill in first slot and //// second on second slot, etc... // // Note: This macro is for Assassins only // Procedure ComboItUPkeydown r .4 seckeydown 1 .4 seckeydown r .4 seckeydown r .4 seckeydown 2 .4 seckeydown r .4 seckeydown r .4 seckeydown 3 .4 seckeydown r .4 seckeydown r .4 seckeydown 4 .4 seckeydown r .4 seckeydown r .4 seckeydown 5 .4 seckeydown r .4 seckeydown r .4 seckeydown 6 .4 seckeydown r .4 seckeydown r .4 seckeydown 7 .4 secend while 1=1call ComboItUPend
Warrior macro
Kod:
SetActiveWindow Knight Online Client // Warrior Combo Macro with on-off hotkey toggling.Procedure CheckForRed IsRed 40, 116 call WarriorMacro1 delay 0.4 sec else end IsRed 40, 116 call WarriorMacro2 delay 0.4 sec else end IsRed 40, 116 call WarriorMacro3 delay 0.4 sec else end IsRed 40, 116 call WarriorMacro4 delay 0.4 sec else end IsRed 40, 116 call WarriorMacro5 delay 0.4 sec else end IsRed 40, 116 call WarriorMacro6 delay 0.4 sec else end IsRed 40, 116 call WarriorMacro7 delay 0.4 sec else end end Procedure WarriorMacro1 keydown r .36 sec keydown 1 .36 sec // You can change this to a different number that had Leg-Cut on it, your choice. keydown r .36 sec keydown r .36 sec end Procedure WarriorMacro2 keydown 1 .36 sec // Put the spammable warrior skill you want to combo with in the first slot. Hoodwink, Sworddance, etc. keydown r .36 sec keydown r .36 sec end Procedure WarriorMacro3 keydown 1 .36 sec keydown r .36 sec keydown r .36 sec end Procedure WarriorMacro4 keydown 1 .36 sec keydown r .36 sec keydown r .36 sec end Procedure WarriorMacro5 keydown 1 .36 sec keydown r .36 sec keydown r .36 sec end Procedure WarriorMacro6 keydown 1 .36 sec keydown r .36 sec keydown r .36 sec end Procedure WarriorMacro7 keydown 1 .36 sec end while 1 = 1 call CheckForRed end
Priest macro
Kod:
// works a charm, pass it around ////////// 1280x1024 Screen Size ////////// SetActiveWindow Knight OnLine Client CommandDelay 500 KeyRate 120 Constants ///////// Shortcut/Skills Keys ///////// HealKey = 1 // The healing shortcut Malice = 2 // The malice shortcut HPBuffKey = 3 // The HP buff shortcut ACBuffKey = 4 // The AC buff shortcut StrenghtKey = 5 // The Strenght Buff shortcut HealthPotKey = 7 // The shortcut where health pots are!! (just in case u're being attacked and castfails) BackupHPPotKey = 7 // Save one different hp pot here, enough to get u at least more than half hp to town ManaPotKey = 8 // The shortcut where mana pots are ////////// Macro Settings ////////// Strenghts = 1 // Strenght Buff 0 = Off, 1 = On. GroupBuff = 1 // Use Group buff or single buff (1 for Group, 0 for Single) DoHeal = 1 // Heals the party - usefull for healers only, turn buff off = 0. (0 = Off, 1 = On). DoBuff = 1 // Buffs the party - buffers, if healer in party, turn doheal off = 0. (0 = Off, 1 = On). DoDebuff = 0 // Debuff's mob. Only for malice. (0 = Off, 1 = On). HPBuffDelay = 2000 // Delay between HP buffing skill. ACBuffDelay = 2000 // Delay Between AC buffing skill. HealLevel = 1260 // Level where you want priest to heal 1000 is high IsDead = 1158 // Level where a person is dead so it wont heal dead people ////////// Dont edit ////////// PartyMembers = 0 // The script automatically calculates this, so DON'T TOUCH isBuffing = 0 // DON'T TOUCH! Rest = 0 End ////////// Strenght Buff ///////// procedure Strenght Every 10 min if $Strenghts = 1 delay 1300 keydown $Strenghtkey 100 | 100 delay 900 end end ////////// Heal Checker ////////// Procedure CheckPartyHealth If $DoHeal = 0 Exit End SetConst $Rest = 0 Call CheckPartyNumber // Are there any party members? If $PartyMembers <= 1 Exit End If $isBuffing = 1 While $isBuffing = 1 // wait for buff to end End End // Check party leader! IsBlack $HealLevel, 70 IsBlack $IsDead, 70 else MousePos 1244, 90 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End Call CheckPartyNumber // Check 2nd party member IsBlack $HealLevel, 115 IsBlack $IsDead, 115 else MousePos 1244, 135 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End Call CheckPartyNumber If $PartyMembers >= 3 // Check 3rd party member IsBlack $HealLevel, 160 IsBlack $IsDead, 160 else MousePos 1244, 180 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End End Call CheckPartyNumber If $PartyMembers >= 4 // Check 4th party member IsBlack $HealLevel, 205 IsBlack $IsDead, 205 else MousePos 1244, 225 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End End Call CheckPartyNumber If $PartyMembers >= 5 // Check 5th party member IsBlack $HealLevel, 250 IsBlack $IsDead, 250 else MousePos 1244, 270 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End End Call CheckPartyNumber If $PartyMembers >= 6 // Check 6th party member IsBlack $HealLevel, 295 IsBlack $IsDead, 295 else MousePos 1244, 315 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End End Call CheckPartyNumber If $PartyMembers >= 7 // Check 7th party member IsBlack $HealLevel, 340 IsBlack $IsDead, 340 else MousePos 1244, 360 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End End Call CheckPartyNumber If $PartyMembers >= 8 // Check 8th party member IsBlack $HealLevel, 385 IsBlack $IsDead, 385 else MousePos 1244, 405 LeftMouseDown 100 Delay 200 LeftMouseUp 100 KeyDown $HealKey 100 Delay 2600 KeyDown c 100 Delay 300 End End End SetConst $Rest = 1 Call CheckPartyNumber End ////////// Buff checker ////////// Procedure Buff every 610 sec If $DoBuff = 0 Exit End Delay 2 sec SetConst $Rest = 0 Call CheckPartyNumber // Are there any party members? If $PartyMembers <= 1 Exit End Set isBuffing = 1 If $GroupBuff = 1 Delay 200 KeyDown $HPBuffKey 100 Delay 2000 End Call CheckPartyNumber // 1st Party member (leader) MousePos 1244, 90 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay Call CheckPartyNumber // 2nd Party member MousePos 1244, 135 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay Call CheckPartyNumber If $PartyMembers >= 3 // 3rd Party member MousePos 1244, 180 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay End Call CheckPartyNumber If $PartyMembers >= 4 // 4th Party member MousePos 1244, 225 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay End Call CheckPartyNumber If $PartyMembers >= 5 // 5th Party member MousePos 1244, 270 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay End Call CheckPartyNumber If $PartyMembers >= 6 // 6th Party member MousePos 1244, 315 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay End Call CheckPartyNumber If $PartyMembers >= 7 // 7th Party member MousePos 1244, 360 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay $HPBuffDelay End KeyDown $ACBuffKey 100 Delay $ACBuffDelay End Call CheckPartyNumber If $PartyMembers = 8 // 8th Party member MousePos 1244, 405 LeftMouseDown Delay 200 LeftMouseUp If $GroupBuff = 0 KeyDown $HPBuffKey 100 Delay 1700 End KeyDown $ACBuffKey 100 Delay $ACBuffDelay End Call CheckPartyNumber KeyDown c 100 SetConst $Rest = 1 Set isBuffing = 0 End ////////// Party Checker ////////// Procedure CheckPartyNumber IsRed 1165, 70 // First Person Set PartyMembers = 1 Else // There is No Party Set PartyMembers = 0 //Exit End IsRed 1165, 115 //Second Person Set PartyMembers = 2 Else // Party request, only the leader exists, but no 2nd member yet Set PartyMembers = 1 //Exit End IsRed 1165, 160 // 3rd Person Set PartyMembers = 3 End IsRed 1165, 205 Set PartyMembers = 4 End IsRed 1165, 255 Set PartyMembers = 5 End IsRed 1165, 295 Set PartyMembers = 6 End IsRed 1165, 340 Set PartyMembers = 7 End IsRed 1165, 385 Set PartyMembers = 8 End End ////////// Mana Check ////////// Procedure CheckMana IsBlack 165, 25 // stops the temple announcemt spamming pots Keydown $ManaPotKey 100 Delay 500 End End Procedure CheckHealth IsBlack 170, 9 Keydown $HealthPotKey 100 Delay 500 End IsBlack 165, 9 Keydown $BackupHPPotKey 100 Delay 2 sec Keydown $BackupHPPotKey 100 Delay 100 Loop 2 Say /town // this is a pain when alt/tabbing Delay 100 End Delay 2 sec Keydown c 100 Exit End End ////////// DeBuff ////////// Procedure Debuff every 15 sec If $DoDebuff = 0 Exit End If $PartyMembers <= 1 Exit End KeyDown z 100 | 100 KeyDown $Malice 200 | 1500 Keydown c 100 End While 1=1 Call CheckPartyNumber ProcessMessages Delay 100 Call CheckMana Call CheckPartyHealth Call CheckHealth LoadRGB 667, 1000 If {RGBRed} = 255 AND $Rest = 1 Keydown c 300 End Delay 100 End