blackHat
Expert
- Joined
- Jul 28, 2013
- Messages
- 930
- Reaction score
- 2
Hello people , here it is what you were waiting for :
this is the beta version video , The one in the attachment is better and there is more stuff with it ,believe stuff i didn't think i am capable of
www.youtube.com/watch?v=AmSkvPPSyBM
SO WHAT'S NEW ?
well AS V5 contain 4 different mods :
1)FULL MODE - this will give you full protection
2)LAGCOMP - this will protect you from hits (some servers using lag shoot) , watch the video to understand:
3) BLACKHAT - this will give you protection while moving , this is fully customizable , you can control what you want to get immunity for , and plus how much time you want it to active and deactivate . - very pro
4)health recovery - this will recover your health with the amount you want
the four modes keys are fully customizable from the .ini
PS: put everything in CLEO FOLDER except " README " file
this is how .ini look like
DEFAULT VALUES:
NOW PLAY AND ENJOY !
EDIT: THE PROBLEMS FIXED , THE CRYPT WAS THE PROBLEM
I REMOVED THE CRYPT , SO IT SHOULD WORK NOW AND YOU CAN LEARN![Smile :) :)](data:image/gif;base64,R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7)
HERE IS THE FULL SOURCE CODE:
PS: the code here give a wrong jumps @ , better view it in sannybuilder
PS: any thing you want to know how , please ask in help section not here
this is the beta version video , The one in the attachment is better and there is more stuff with it ,believe stuff i didn't think i am capable of
www.youtube.com/watch?v=AmSkvPPSyBM
SO WHAT'S NEW ?
well AS V5 contain 4 different mods :
1)FULL MODE - this will give you full protection
2)LAGCOMP - this will protect you from hits (some servers using lag shoot) , watch the video to understand:
www.youtube.com/watch?v=sy2h-kQe_W4
4)health recovery - this will recover your health with the amount you want
the four modes keys are fully customizable from the .ini
PS: put everything in CLEO FOLDER except " README " file
this is how .ini look like
Code:
;------------------------------------------------------------;
; A-SHIELD V5! 2014 !! ;
; Made by BLACKHAT! ;
; FROM THE GREAT ugbase.eu ;
;------------------------------------------------------------;
;Scroll down the page to see the key ids! ;
;--------- WHICH KEY(S) TO ACTIVE FULL MODE WITH ? ----------;
[FULL]
Key1=71
Key2=72
;GIVE YOU SHIELD FOR Full protection ;
;----------- WHICH KEY(S) TO ACTIVE LAGCOMP WITH ? ----------;
[LAGCOMP]
key1=74
key2=76
;give you shield to protect you from lag shoots ;
;-- WHICH KEY(S) TO ACTIVE full&Lagcomp INVISIBILITY WITH? --;
[ONANDOFF]
onkey=49
offkey=48
;turn INVISIBILITY on and off with ;
;---------- WHICH KEY(S) TO ACTIVE BLACKHAT WITH ? ----------;
[BLACKHAT]
key1=66
key2=72
offkey=48
;the following is immunity control when moving: ;
;
;how much time to deactive the immunity while moving (activation time) ;
wait=1000
;
;how much to active the immunity while moving (deactivation time) ;
wait2=300
;
;the following is on&off , just add 1 for ON, and 0 for OFF ;
bullets=1
fire=0
explosion=0
car=0
melee=1
;this will give you Immunities for bullets and melee attacks in default;
;when you move it will active and stop , you adjust the time (wait) & (wait2) ;
;when you stop it will deactivate ;
;key1&key2 will activate, offkey will deactivate ;
;------- WHICH KEY(S) TO ACTIVE SMART RECOVERY WITH ? -------;
[SM]
key1=45
health=-1
;This will recover your health 1H WHILE holding the key ;
;better use health as integer , do not add "." ;
;and i recormanded to keep it to "-1" ;
; -1 means +1 , just add " - " before number or it won't work ;
;------------------------------------------------------------;
;--------------------------KEY LIST--------------------------;
Left click 1
Right click 2
Backspace 8
Tab 9
Enter 13
Shift (both) 16
Left Shift 160
Right Shift 161
Ctrl (both) 17
Left Ctrl 162
Right Ctrl 163
Alt 18
Left Alt 164
Right Alt 165
Pause 19
Caps Lock 20
Esc 27
Spacebar 32
Page Up 33
Page Down 34
End 35
Home 36
(left arrow) 37
(up arrow) 38
(right arrow) 39
(down arrow) 40
PrintScrn 44
Insert 45
Delete 46
0 48
1 49
2 50
3 51
4 52
5 53
6 54
7 55
8 56
9 57
A or a 65
B or b 66
C or c 67
D or d 68
E or e 69
F or f 70
G or g 71
H or h 72
I or i 73
J or j 74
K or k 75
L or l 76
M or m 77
N or n 78
O or o 79
P or p 80
Q or q 81
R or r 82
S or s 83
T or t 84
U or u 85
V or v 86
W or w 87
X or x 88
Y or y 89
Z or z 90
(left Windows key) 91
(right Windows key) 92
(application key) 93
0 (numpad with Num Lock on) 96
1 (numpad with Num Lock on) 97
2 (numpad with Num Lock on) 98
3 (numpad with Num Lock on) 99
4 (numpad with Num Lock on) 100
5 (numpad with Num Lock on) 101
6 (numpad with Num Lock on) 102
7 (numpad with Num Lock on) 103
8 (numpad with Num Lock on) 104
9 (numpad with Num Lock on) 105
* (numpad) 106
+ (numpad) 107
- (numpad) 109
. (numpad) 110
/ (numpad) 111
F1 112
F2 113
F3 114
F4 115
F5 116
F6 117
F7 118
F8 119
F9 120
F10 121
F11 122
F12 123
Num Lock 144
Scroll Lock 145
; 186
= 187
, 188
- 189
. 190
/ 191
` 192
[ 219
\ 220
] 221
' 222
;------------------------------------------------------------;
DEFAULT VALUES:
FULL: active with G+H , invisibility control are " 1 " to make it invisible and " 0 " to make it visible
PS: THIS WILL BE INVISIBLE TO EVERYONE EVEN IF YOU MAKE IT VISIBLE
THE VISIBLE CONTROL IS FOR YOU , MEANS NO ONE SEE ANYTHING !
============================================================
LAGCOMP: active with J+L , , invisibility control are " 1 " to make it invisible and " 0 " to make it visible
PS: THIS WILL BE INVISIBLE TO EVERYONE EVEN IF YOU MAKE IT VISIBLE
THE VISIBLE CONTROL IS FOR YOU , MEANS NO ONE SEE ANYTHING !
============================================================
BLACKHAT: active with B+H , and to stop just stop moving then press " 0 " and move while holding it
activation time > " wait=1000 " , how much BLACKHAT will be ON ?, you change it as you like .
deactivation time > " wait2=300 " ,how much BLACKHAT will be OFF ? you change it as you like .
the following is on&off immunity , just add 1 for ON, and 0 for OFF
bullets=1
fire=0
explosion=0
car=0
melee=1
this will give you Immunities for bullets and melee attacks in default;
when you move it will active and stop , you adjust the time (wait) & (wait2)
when you stop it will deactivate
============================================================
SM: This will recover your health while holding "INSERT" key by 1H
This will recover your health 1H WHILE holding the key
better use "health" as integer , do not add "."
and i recommended to keep it to "-1"
-1 means +1 , just add " - " before number or it will work wrongly
============================================================
PS: THIS WILL BE INVISIBLE TO EVERYONE EVEN IF YOU MAKE IT VISIBLE
THE VISIBLE CONTROL IS FOR YOU , MEANS NO ONE SEE ANYTHING !
============================================================
LAGCOMP: active with J+L , , invisibility control are " 1 " to make it invisible and " 0 " to make it visible
PS: THIS WILL BE INVISIBLE TO EVERYONE EVEN IF YOU MAKE IT VISIBLE
THE VISIBLE CONTROL IS FOR YOU , MEANS NO ONE SEE ANYTHING !
============================================================
BLACKHAT: active with B+H , and to stop just stop moving then press " 0 " and move while holding it
activation time > " wait=1000 " , how much BLACKHAT will be ON ?, you change it as you like .
deactivation time > " wait2=300 " ,how much BLACKHAT will be OFF ? you change it as you like .
the following is on&off immunity , just add 1 for ON, and 0 for OFF
bullets=1
fire=0
explosion=0
car=0
melee=1
this will give you Immunities for bullets and melee attacks in default;
when you move it will active and stop , you adjust the time (wait) & (wait2)
when you stop it will deactivate
============================================================
SM: This will recover your health while holding "INSERT" key by 1H
This will recover your health 1H WHILE holding the key
better use "health" as integer , do not add "."
and i recommended to keep it to "-1"
-1 means +1 , just add " - " before number or it will work wrongly
============================================================
NOW PLAY AND ENJOY !
EDIT: THE PROBLEMS FIXED , THE CRYPT WAS THE PROBLEM
I REMOVED THE CRYPT , SO IT SHOULD WORK NOW AND YOU CAN LEARN
HERE IS THE FULL SOURCE CODE:
Code:
{$CLEO}
0000: NOP
wait 2000
0AF8: samp add_message_to_chat ":-:A-SHIELD BY BLACKHAT FROM UGBASE.EU:-:" color 0xFF0000
0AF8: samp add_message_to_chat ":-:A-S HAS BEEN LOADED!:-:" color 0x00FF00
Model.Load(19358) // wall without hole
Model.Load(19388) // wall with big hole {DOOR}
038B: load_requested_models
//20@ - 33@ are free
//6 keys are needed
//from 20@ - 29@
:ini_msg_first_start_only
wait 0
if
0AAB: file_exists "CLEO\AS-V5.ini"
then
0AF8: samp add_message_to_chat ":-:AS-V5.ini HAS BEEN LOADED!:-:" color 0x00FF00
0AF8: samp add_message_to_chat ":-:BLACKHATS4EVER!:-:" color 0xFF0000
end
jump @INI
:INI
wait 0
if
0AAB: file_exists "CLEO\AS-V5.ini"
jf [member=5120]Error[/member]
////////////////////////////
0AF0: 20@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "FULL" key "key1" //71 // G
0AF0: 21@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "FULL" key "key2" //72 // H
////////////////////////////
0AF0: 22@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "LAGCOMP" key "key1" //74 // J
0AF0: 23@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "LAGCOMP" key "key2" //76 // L
////////////////////////////
0AF0: 24@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "ONANDOFF" key "onkey" //49 // 1
0AF0: 25@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "ONANDOFF" key "offkey" //48 // 0
/////////////////////////////
0AF0: 29@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "SM" key "key1" //45 // INSERT
0AF0: $29 = get_int_from_ini_file "CLEO\AS-V5.ini" section "SM" key "health" //45 // INSERT
////////////////////////////
0AF0: 26@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "key1" //66 // b
0AF0: 27@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "key2" //72 // H
0AF0: 28@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "offkey" //48 // 0
//---------more stuff------------\\\
0AF0: 18@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "wait" //integer no float
0AF0: $18 = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "wait2" //integer no float
0AF0: 19@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "bullets" //integer no float 1 or 0
0AF0: 30@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "fire" //integer no float 1 or 0
0AF0: 31@ = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "explosion" //integer no float 1 or 0
0AF0: $32 = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "car" //integer no float 1 or 0
0AF0: $33 = get_int_from_ini_file "CLEO\AS-V5.ini" section "BLACKHAT" key "melee" //integer no float 1 or 0
//---------meh-------------------\\\
///////////////////////////
jump @FULL
:FULL //g - h
wait 0
if and
056D: actor $PLAYER_ACTOR defined
0AB0: key_pressed 20@ //71 // G
0AB0: key_pressed 21@ //72 /// H
model.Available(19358)
model.Available(19388)
0184: actor $PLAYER_ACTOR health <> 0
then
0B12: 0@ = 0@ XOR 1
if
0@ == 1
then
0AD1: show_formatted_text_highpriority "A-Shield-FULL-ON!" time 1000 0x0AD1
if
03CA: object 14@ exists
then
0108: destroy_object 14@
0108: destroy_object 15@
0108: destroy_object 16@
0108: destroy_object 17@
end
018C: play_sound 1083 at 0.0 0.0 0.0
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 3.0 0.0
//-----------------------------2 with big holes in front and above front----------------\\\
0107: 4@ = create_object 19388 at 1@ 2@ 3@ //with hole
069B: attach_object 4@ to_actor $PLAYER_ACTOR with_offset 0.0 1.7 0.0 rotation 0.0 200.0 90.0 //with hole //y infront very front
0107: 10@ = create_object 19388 at 1@ 2@ 3@ //with hole
069B: attach_object 10@ to_actor $PLAYER_ACTOR with_offset 0.0 1.7 2.0 rotation 0.0 -30.0 90.0 //y front above front
//---------------------------the above back cover----------------\\\
0107: 8@ = create_object 19358 at 1@ 2@ 3@
069B: attach_object 8@ to_actor $PLAYER_ACTOR with_offset 0.0 -0.7 3.4 rotation 0.0 -55.0 -90.0 // above back like this " \" with more carvey
//------------custom ends-------------------------------------\\
0107: 5@ = create_object 19358 at 1@ 2@ 3@ //the rest are without holes
0107: 6@ = create_object 19358 at 1@ 2@ 3@
0107: 7@ = create_object 19358 at 1@ 2@ 3@
0107: 9@ = create_object 19358 at 1@ 2@ 3@
069B: attach_object 5@ to_actor $PLAYER_ACTOR with_offset 0.0 -1.7 0.0 rotation 0.0 0.0 90.0 //y back
069B: attach_object 6@ to_actor $PLAYER_ACTOR with_offset 1.7 0.0 0.0 rotation 0.0 0.0 0.0 //x right
069B: attach_object 7@ to_actor $PLAYER_ACTOR with_offset -1.7 0.0 0.0 rotation 0.0 0.0 0.0 // x left
069B: attach_object 9@ to_actor $PLAYER_ACTOR with_offset 0.0 0.0 -1.7 rotation 0.0 90.0 0.0 //down
WAIT 1000
0AD1: show_formatted_text_highpriority "BLACKHAT - UGBASE.EU" time 1000 0x0AD1
ELSE
if
03CA: object 4@ exists
then
0AD1: show_formatted_text_highpriority "A-Shield-FULL-OFF!" time 1000 0x0AD1
0108: destroy_object 4@
0108: destroy_object 5@
0108: destroy_object 6@
0108: destroy_object 7@
0108: destroy_object 8@
0108: destroy_object 9@
0108: destroy_object 10@
018C: play_sound 1083 at 0.0 0.0 0.0
wait 1000
0AD1: show_formatted_text_highpriority "BLACKHAT - UGBASE.EU" time 1000 0x0AD1
end
end
end
jump @FULL_INVIS
:FULL_INVIS //1
wait 0
if and
03CA: object 4@ exists
0AB0: key_pressed 24@ //1
then
018C: play_sound 1083 at 0.0 0.0 0.0
0AD1: show_formatted_text_highpriority "A-Shield-FULL_Invisibility-ON!" time 1000 0x0AD1
0750: set_object 4@ visibility 0
0750: set_object 5@ visibility 0
0750: set_object 6@ visibility 0
0750: set_object 7@ visibility 0
0750: set_object 8@ visibility 0
0750: set_object 9@ visibility 0
0750: set_object 10@ visibility 0
end
jump @FULL_VIS
:FULL_VIS //0
wait 0
if and
0AB0: key_pressed 25@ // 0
03CA: object 4@ exists
then
018C: play_sound 1083 at 0.0 0.0 0.0
0AD1: show_formatted_text_highpriority "A-Shield-FULL_Invisibility-OFF!" time 1000 0x0AD1
0750: set_object 4@ visibility 1
0750: set_object 5@ visibility 1
0750: set_object 6@ visibility 1
0750: set_object 7@ visibility 1
0750: set_object 8@ visibility 1
0750: set_object 9@ visibility 1
0750: set_object 10@ visibility 1
end
jump @LAG_COMP
:LAG_COMP //j - L
wait 0
if and
056D: actor $PLAYER_ACTOR defined
0AB0: key_pressed 22@ //74 // J
0AB0: key_pressed 23@ //76 // L
model.Available(19358)
model.Available(19388)
0184: actor $PLAYER_ACTOR health <> 0
then
0B12: 0@ = 0@ XOR 1
if
0@ == 1
then
018C: play_sound 1083 at 0.0 0.0 0.0
0AD1: show_formatted_text_highpriority "A-Shield-LAGCOMP-ON!" time 1000 0x0AD1
//-----get rid of the old shit-----\\
if
03CA: object 4@ exists
then
0108: destroy_object 4@
0108: destroy_object 5@
0108: destroy_object 6@
0108: destroy_object 7@
0108: destroy_object 8@
0108: destroy_object 9@
0108: destroy_object 10@
end
//------------\\
if
03CA: object 14@ exists
then
0108: destroy_object 14@
0108: destroy_object 15@
0108: destroy_object 16@
0108: destroy_object 17@
end
//------------\\
//-----get rid of the old shit-----\\
04C4: store_coords_to 11@ 12@ 13@ from_actor $PLAYER_ACTOR with_offset 0.0 3.0 0.0
0107: 14@ = create_object 19358 at 11@ 12@ 13@ //the rest are without holes
0107: 15@ = create_object 19358 at 11@ 12@ 13@
0107: 16@ = create_object 19358 at 11@ 12@ 13@
0107: 17@ = create_object 19358 at 11@ 12@ 13@
069B: attach_object 14@ to_actor $PLAYER_ACTOR with_offset 1.5 2.0 0.0 rotation 0.0 0.0 0.0
069B: attach_object 15@ to_actor $PLAYER_ACTOR with_offset -1.5 2.0 0.0 rotation 0.0 0.0 0.0
069B: attach_object 16@ to_actor $PLAYER_ACTOR with_offset 1.5 -2.0 0.0 rotation 0.0 0.0 0.0
069B: attach_object 17@ to_actor $PLAYER_ACTOR with_offset -1.5 -2.0 0.0 rotation 0.0 0.0 0.0
wait 1000
0AD1: show_formatted_text_highpriority "BLACKHAT - UGBASE.EU" time 1000 0x0AD1
ELSE
if
03CA: object 14@ exists
then
018C: play_sound 1083 at 0.0 0.0 0.0
0AD1: show_formatted_text_highpriority "A-Shield-LAGCOMP-OFF!" time 1000 0x0AD1
0108: destroy_object 14@
0108: destroy_object 15@
0108: destroy_object 16@
0108: destroy_object 17@
wait 1000
0AD1: show_formatted_text_highpriority "BLACKHAT - UGBASE.EU" time 1000 0x0AD1
end
end
end
jump @LAG_COMP_INVIS
:LAG_COMP_INVIS //1
wait 0
if and
03CA: object 14@ exists
0AB0: key_pressed 24@ //1
then
018C: play_sound 1083 at 0.0 0.0 0.0
0AD1: show_formatted_text_highpriority "AS-LAGCOMP_Invisibility-ON!" time 1000 0x0AD1
0750: set_object 14@ visibility 0
0750: set_object 15@ visibility 0
0750: set_object 16@ visibility 0
0750: set_object 17@ visibility 0
end
jump @LAG_COMP_VIS
:LAG_COMP_VIS //0
wait 0
if and
03CA: object 14@ exists
0AB0: key_pressed 25@ //0
then
018C: play_sound 1083 at 0.0 0.0 0.0
0AD1: show_formatted_text_highpriority "AS-LAGCOMP_Invisibility-OFF!" time 1000 0x0AD1
0750: set_object 14@ visibility 1
0750: set_object 15@ visibility 1
0750: set_object 16@ visibility 1
0750: set_object 17@ visibility 1
end
jump [member=4125]BlackHat[/member]START
:BLACKHATSTART
wait 0
if and
0AB0: key_pressed 26@ //1
0AB0: key_pressed 27@ //b
0184: actor $PLAYER_ACTOR health <> 0
jf @SM
0ACD: show_text_highpriority "AS-BlackHat-ON-By-BlackHat - ugbase.eu" time 1500 // aouther MESSAGE
018C: play_sound 1083 at 0.0 0.0 0.0
jump [member=4125]BlackHat[/member]
:BLACKHAT
wait 0
// STUFF IN THIS WILL BE LOOPED
REPEAT
wait 0
WHILE NOT Actor.stopped($PLAYER_ACTOR)
wait 0
0ACD: show_text_highpriority "BlackHated!" time 18@ // aouther MESSAGE
actor.SetImmunities($PLAYER_ACTOR, 1 , 0 , 0 ,0 ,1) // bullet , fire , explosion , car , mele
actor.SetImmunities($PLAYER_ACTOR, 19@ , 30@ , 31@ ,$32 ,$33) // bullet , fire , explosion , car , mele
WAIT 18@
0ACD: show_text_highpriority "BlackHat Holding!" time $18
actor.SetImmunities($PLAYER_ACTOR, 0 , 0 , 0 , 0 , 0) // bullet , fire , explosion , car , mele
WAIT $18
end
WHILE Actor.Stopped($PLAYER_ACTOR)
wait 0
0ACD: show_text_highpriority "BlackHat On Hold!" time 1500
actor.SetImmunities($PLAYER_ACTOR, 0 , 0 , 0 , 0 , 0) // bullet , fire , explosion , car , mele
end
UNTIL key_down 28@ // 0
0ACD: show_text_highpriority "AS-BlackHat-OFF-By BlackHat - ugbase.eu" time 1500
actor.SetImmunities($PLAYER_ACTOR, 0 , 0 , 0 , 0 , 0) // bullet , fire , explosion , car , mele
jump @SM
:SM
wait 0
if
0184: actor $PLAYER_ACTOR health <> 0
jf [member=10485]dead[/member]
WHILE 0AB0: key_pressed 29@ //insert
wait 0
0851: set_actor $PLAYER_ACTOR decrease_health_by $29 affect_armour 0 // decrease by -1 = increase by 1
0ACD: show_text_highpriority "AS-SM-Rec 1H/ONHOLD - BY BlackHat" time 1500
END
jump @INI
:dead
wait 0
0ACD: show_text_highpriority "AS-You're DEAD ...!" time 1500
jump @INI
:error
wait 0
0AD1: show_formatted_text_highpriority "AS-V5.ini NOT FOUND IN YOUR CLEO FOLDER" time 2000 0x0AD1
jump @INI
PS: the code here give a wrong jumps @ , better view it in sannybuilder
PS: any thing you want to know how , please ask in help section not here