Penang Mari

14/02/2012

SetActiveWindow Knight Online Client
Commanddelay 10
ObjVar 10
// DEFINE YOUR KEY SKILL HERE!!!!
Constants
NumberOfPlayer = 8 // must change this..
GroupBuff = no // if no group buff then put "no"
HealLevel = 1000 // 950 = half hp, 975 = 3/4 hp

BigHealSkill = 1 // 1920/960 hp heal
SmallHealSkill = 2 // 480 hp heal (Great Healing Skill)
HPBuff = 3 // Default Group HP BUFF
ACBuff = 4
ManaPot = 8

End

Procedure CheckNumberPlayer // i use IsRed.. so dun go harpy macro....
IsRed 910, 120
Else
compute NumberOfPlayer = 1
End
IsRed 910, 120
IsBlue 910, 126
compute NumberOfPlayer = 2
End
End
IsRed 910, 165
IsBlue 910, 171
compute NumberOfPlayer = 3
End
End
IsRed 910, 210
IsBlue 910, 216
compute NumberOfPlayer = 4
End
End
IsRed 910, 255
IsBlue 910, 262
compute NumberOfPlayer = 5
End
End
IsRed 910, 300
IsBlue 910, 307
compute NumberOfPlayer = 6
End
End
IsRed 910, 345
IsBlue 910, 352
compute NumberOfPlayer = 7
End
End
IsRed 910, 390
IsBlue 910, 397
compute NumberOfPlayer = 8
End
End
Delay 200
End

Procedure Sit
IsBlack 538, 747
KeyDown c 200
Delay 200
End
End

Procedure LeftMouseClick
LeftMouseDown 200
Delay 200
LeftMouseUp 200
Delay 200
End

Procedure EatManaPot
IsBlack 76, 56
KeyDown $ManaPot 200
Delay 200
End
End

Procedure HealMySelf
IsBlack 233, 9 // check own HP
KeyDown z 200
Delay 200
KeyDown $SmallHealSkill 200
Delay 2500
End
End

Procedure Heal
If $NumberOfPlayer > 0
IsRed $HealLevel, 75 // check 1st person's HP
Else
MousePos 910, 75
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 1
IsRed $HealLevel, 120 // check 2nd person's HP
Else
MousePos 910, 120
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 2
IsRed $HealLevel, 165 // check 3rd person's HP
Else
MousePos 910, 165
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 3
IsRed $HealLevel, 210 // check 4th person's HP
Else
MousePos 910, 210
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 4
IsRed $HealLevel, 255 // check 5th person's HP
Else
MousePos 910, 255
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 5
IsRed $HealLevel, 300 // check 6th person's HP
Else
MousePos 910, 300
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 6
IsRed $HealLevel, 345 // check 7th person's HP
Else
MousePos 910, 345
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 7
IsRed $HealLevel, 390 // check 8th person's HP
Else
MousePos 910, 390
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

End

Procedure BuffPlayer
Call EatManaPot
If $GroupBuff = yes
Else
KeyDown $HPBuff 200
Delay 2 sec
End
KeyDown $ACBuff 200
Delay 2 sec
End

Procedure Buff Every 11 min
Call EatManaPot
Delay 2 Sec
If $GroupBuff = yes
KeyDown $HPBuff 200
Delay 2500
End

If $NumberOfPlayer > 0
MousePos 910, 75 // Buff 1st person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 1
MousePos 910, 120 // Buff 2nd person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 2
MousePos 910, 165 // Buff 3rd person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 3
MousePos 910, 210 // Buff 4th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 4
MousePos 910, 255 // Buff 5th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 5
MousePos 910, 300 // Buff 6th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 6
MousePos 910, 345 // Buff 7th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 7
MousePos 910, 390 // Buff 8th person
Call LeftMouseClick
Call BuffPlayer
End
End

while 1 = 1
ProcessMessages
Call CheckNumberPlayer
Call EatManaPot
Call HealMySelf
Call Heal
Call Sit
Delay 200
SetActiveWindow Knight Online Client
Commanddelay 10
ObjVar 10
// DEFINE YOUR KEY SKILL HERE!!!!
Constants
NumberOfPlayer = 8 // must change this..
GroupBuff = no // if no group buff then put "no"
HealLevel = 1000 // 950 = half hp, 975 = 3/4 hp

BigHealSkill = 1 // 1920/960 hp heal
SmallHealSkill = 2 // 480 hp heal (Great Healing Skill)
HPBuff = 3 // Default Group HP BUFF
ACBuff = 4
ManaPot = 8

End

Procedure CheckNumberPlayer // i use IsRed.. so dun go harpy macro....
IsRed 910, 120
Else
compute NumberOfPlayer = 1
End
IsRed 910, 120
IsBlue 910, 126
compute NumberOfPlayer = 2
End
End
IsRed 910, 165
IsBlue 910, 171
compute NumberOfPlayer = 3
End
End
IsRed 910, 210
IsBlue 910, 216
compute NumberOfPlayer = 4
End
End
IsRed 910, 255
IsBlue 910, 262
compute NumberOfPlayer = 5
End
End
IsRed 910, 300
IsBlue 910, 307
compute NumberOfPlayer = 6
End
End
IsRed 910, 345
IsBlue 910, 352
compute NumberOfPlayer = 7
End
End
IsRed 910, 390
IsBlue 910, 397
compute NumberOfPlayer = 8
End
End
Delay 200
End

Procedure Sit
IsBlack 538, 747
KeyDown c 200
Delay 200
End
End

Procedure LeftMouseClick
LeftMouseDown 200
Delay 200
LeftMouseUp 200
Delay 200
End

Procedure EatManaPot
IsBlack 76, 56
KeyDown $ManaPot 200
Delay 200
End
End

Procedure HealMySelf
IsBlack 233, 9 // check own HP
KeyDown z 200
Delay 200
KeyDown $SmallHealSkill 200
Delay 2500
End
End

Procedure Heal
If $NumberOfPlayer > 0
IsRed $HealLevel, 75 // check 1st person's HP
Else
MousePos 910, 75
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 1
IsRed $HealLevel, 120 // check 2nd person's HP
Else
MousePos 910, 120
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 2
IsRed $HealLevel, 165 // check 3rd person's HP
Else
MousePos 910, 165
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 3
IsRed $HealLevel, 210 // check 4th person's HP
Else
MousePos 910, 210
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 4
IsRed $HealLevel, 255 // check 5th person's HP
Else
MousePos 910, 255
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 5
IsRed $HealLevel, 300 // check 6th person's HP
Else
MousePos 910, 300
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 6
IsRed $HealLevel, 345 // check 7th person's HP
Else
MousePos 910, 345
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

If $NumberOfPlayer > 7
IsRed $HealLevel, 390 // check 8th person's HP
Else
MousePos 910, 390
Call LeftMouseClick
KeyDown $SmallHealSkill 200
Delay 2500
End
End

End

Procedure BuffPlayer
Call EatManaPot
If $GroupBuff = yes
Else
KeyDown $HPBuff 200
Delay 2 sec
End
KeyDown $ACBuff 200
Delay 2 sec
End

Procedure Buff Every 11 min
Call EatManaPot
Delay 2 Sec
If $GroupBuff = yes
KeyDown $HPBuff 200
Delay 2500
End

If $NumberOfPlayer > 0
MousePos 910, 75 // Buff 1st person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 1
MousePos 910, 120 // Buff 2nd person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 2
MousePos 910, 165 // Buff 3rd person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 3
MousePos 910, 210 // Buff 4th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 4
MousePos 910, 255 // Buff 5th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 5
MousePos 910, 300 // Buff 6th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 6
MousePos 910, 345 // Buff 7th person
Call LeftMouseClick
Call BuffPlayer
End

If $NumberOfPlayer > 7
MousePos 910, 390 // Buff 8th person
Call LeftMouseClick
Call BuffPlayer
End
End

while 1 = 1
ProcessMessages
Call CheckNumberPlayer
Call EatManaPot
Call HealMySelf
Call Heal
Call Sit
Delay 200
End

06/02/2012

SetActiveWindow Knight OnLine Client
Constants
/////////////////////////////////////////////////////////////////////////
//
// Attack Options //
AttackNumber = 2 // Attack On/Off or Select ( 0 1 2 3 4 ) //
Attack1 = 1// First Attack Button //
Attack2 = 2 // Second Attack Button //
Attack3 = 5 // Third Attack Button //
Attack4 = 6 // Fourth Attack Button //
AttackDelay = 0.1 // Attack Delay //
//
// Heal Options //
HealNumber = 1 // Heal On/Off ( 0 1 ) //
Heal = 8 // Heal Button //
HealDelay = 0.2 // Heal Delay //
//
// Mana Options //
ManaNumber = 1 // Mana On/Off ( 0 1 ) //
Mana = 7 // Mana Button //
ManaDelay = 0.5 // Mana Delay

// Wolf Options
Wolf = 0 // Wolf On/Off ( 0 1 )
WolfSlot = 5 // Wolf Buff Button

/////////////////////////////////////////////////////////////////////////

End
Procedure Wolf Every 125 sec
if $Wolf = 1
Keydown 2 0.1 sec
delay 1000
end
end
Procedure Attack
If $AttackNumber = 0
End
If $AttackNumber = 1
Call Attack1
End
If $AttackNumber = 2
Call Attack2
End
If $AttackNumber = 3
Call Attack3
End
If $AttackNumber = 4
Call Attack4
End
End

Procedure Attack1
KeyDown z 0.1 sec
KeyDown $Attack1 $AttackDelay sec
End

Procedure Attack2
KeyDown z 0.1 sec
KeyDown $Attack1 $AttackDelay sec
KeyDown z 0.1 sec
KeyDown $Attack2 $AttackDelay sec
End

Procedure Attack3
KeyDown z 0.1 sec
KeyDown $Attack1 $AttackDelay sec
KeyDown z 0.1 sec
KeyDown $Attack2 $AttackDelay sec
KeyDown z 0.1 sec
KeyDown $Attack3 $AttackDelay sec
End

Procedure Attack4
KeyDown b 0.1 sec
KeyDown $Attack1 $AttackDelay sec
KeyDown b 0.1 sec
KeyDown $Attack2 $AttackDelay sec
KeyDown b 0.1 sec
KeyDown $Attack3 $AttackDelay sec
KeyDown b 0.1 sec
KeyDown $Attack4 $AttackDelay sec
End

Procedure Heal
If $HealNumber = 0
End
If $HealNumber = 1
Call Heal1
End
End
Procedure Heal1
IsRed 199, 12
Else
KeyDown $Heal $HealDelay sec
delay 50
KeyDown $Heal $HealDelay sec
delay 50
KeyDown $Heal $HealDelay sec
delay 50
KeyDown $Attack2 $AttackDelay sec
End
End

Procedure Mana
If $ManaNumber = 0
End
If $ManaNumber = 1
Call Mana1
End
End
Procedure Mana1
IsBlue 177, 29
Else
KeyDown $Mana $ManaDelay sec
delay 50
KeyDown $Attack2 $AttackDelay sec
End
End
While 1 = 1
ProcessMessages
Call Attack
Call Heal
Call Mana
Delay 100
End

30/01/2012

SetActiveWindow HeroTurk
Commanddelay 10
ObjVar 10

Procedure ComboItUP
keydown s .1 sec
keydown s .1 sec

end

while 1=1
call ComboItUP
end

20/01/2012

http://www.youtube.com/watch?v=e2PbNcPiEF0

Download Link: http://www.abegunnerz.blogspot.com/2012/01/papa-i-love-you-full-movie-2011-dvdrip.html More Movies: http://www.abegunnerz.blogspot.com

07/01/2012

http://imageshack.us/photo/my-images/651/54690005.png/

Image hosted by ImageShack ImageShack, share photos, pictures, free image hosting, free video hosting, image hosting, video hosting, photo image hosting site, video hosting site

07/05/2011

Round Island !