CLEO Help SignText: Can't create font Arial

CLEO related
Status
Not open for further replies.

cheetahftw1

Active member
Joined
Aug 31, 2018
Messages
39
Reaction score
0
Hello. I made a mod for the server I am playing on and one person said that he get this errors after 40-45 minutes of playing.
I have this problem too but I don't know from what mods, I have like 20 in my cleo and I don't know from what wrongs in script this appears. If someone know please let me know.
Source:
{$CLEO}
{$INCLUDE SF}
0000:

repeat
wait 0
until SAMP.Available()

chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff} has loaded! Use [{66ccff}/autocmd{FFFFFF}] & [{66ccff}/autocmds{FFFFFF}]." 5877479

//0b34: "auto" @restart
0b34: "autocmd" @AutoCmd
0b34: "autocmds" @AutoCmds

alloc 29@ 256
0BE3: raknet setup_incoming_rpc_hook @auto_chat

Model.Load(19605) // red
038B: load_requested_models
if Model.Available(19605)
then
wait 0
18@ = Object.Create(19605, 2777.96, -1610.75 , 10.22) // Arms Dealer LS
18@ = Object.Create(19605, 1687.45, 921.48, 10.06) // Arms Dealer LV
18@ = Object.Create(19605, -2097.77, -25.16, 34.62) // Arms Dealer SF
18@ = Object.Create(19605, -2552.73, 52.48, 15.72) // Drugs Dealer SF
18@ = Object.Create(19605, 2141.59, 2835.07, 10.12) // Drugs Dealer LV
18@ = Object.Create(19605, 2170.67, -1676.25, 14.38) // Drugs Dealer LS
END

Model.Load(19606) // green
038B: load_requested_models
if Model.Available(19606)
then
wait 0
17@ = Object.Create(19606, 2245.9053, 548.0956, 7.0802) // Fisherman 2
17@ = Object.Create(19606, 2277.3752, 547.9898, 7.0813) // Fisherman 1
17@ = Object.Create(19606, 2524.1543, 2803.1843, 10.1203) // Curier
17@ = Object.Create(19606, -2676.5894, -44.8385, 3.6359) // Bus Driver SF
17@ = Object.Create(19606, 1788.5756, -1907.9957, 12.6956) // Bus Driver LS
17@ = Object.Create(19606, 71.9709, -255.2579, 0.8781) // Trucker
17@ = Object.Create(19606, 1380.7104, 1164.2830, 10.1124) // Gunoier LV
17@ = Object.Create(19606, 2107.0986, -2088.1978, 12.8469) // Gunoier LS
17@ = Object.Create(19606, -1853.4103, -1577.0845, 21.0500) // Miner
17@ = Object.Create(19606, -2116.8286, -228.0265, 34.6203) // Lumberjack
17@ = Object.Create(19606, 875.8744, 856.6222, 12.6516) // Cariera
END


/*
Functii folosite:
0@ 1@ 6@ - Auto /getjob
2@ 3@ 4@ - Auto /fill
5@ 7@ - Auto work
8@ - Auto fish
29@ 30@ 31@ - Auto chat
17@ 18@ - Model Load
21@ - labele
14@ 15@ - butoane dialoguri
11@ - dialog /buy si fisherman help
12@ - fisherman help

// ini info
19@ - .ini Auto Engine & Lights Status
20@ - .ini Auto Trucker Status
10@ - .ini cursa trucker
9@ - .ini autofill
13@ - .ini autofisherman
16@ - .ini autolumber
Mod By Nic.eXe
*/


11@ = 0
12@ = 0

while true
wait 0
// Dialog AutoCmd
if
0B3C: samp is_dialog_responded id 5330 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AB1: call @autoengine 0
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AB1: call @autofisherman 0
end

if and
14@ == 1 // Pressed = 1
15@ == 2 // List item number
then
0AB1: call @autotrucker 0
end

if and
14@ == 1 // Pressed = 1
15@ == 3 // List item number
then
0AB1: call @autofill 0
end

if and
14@ == 1 // Pressed = 1
15@ == 4 // List item number
then
0AB1: call @worksound 0
end
end

// Dialog Auto Engine & Lights
if
0B3C: samp is_dialog_responded id 5331 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "enginelights"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Engine & Lights a fost pornit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "enginelights"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Engine & Lights a fost oprit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 3 // List item number
then
0AB1: call @autoengine 0
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Aceasta functie da automat [/engine] si [/lights] cand urci intr-un vehicul" -1
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: care nu are motorul pornit." -1
SAMP.CmdRet()
end
end


// Dialog Auto Trucker
if
0B3C: samp is_dialog_responded id 5332 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "status"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Trucker a fost pornit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "status"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Trucker a fost oprit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 2 // List item number
then
0AB1: call @trucker 0
end

if and
14@ == 1 // Pressed = 1
15@ == 4 // List item number
then
0AB1: call @autotrucker 0
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Aceasta functie iti alege automat cursa dorita de tine la jobul Trucker." -1
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: (Cursa Default = Random)" -1
SAMP.CmdRet()
end
end

// Dialog Curse trucker
if
0B3C: samp is_dialog_responded id 3333 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Optiunea {ffdb4d}Random{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Creek (LV) - 12.6km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 2 // List item number
then
0AF1: write_int 2 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Pilson Intersection (LV){ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 3 // List item number
then
0AF1: write_int 3 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Battery Point (SF) - 10.4km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 4 // List item number
then
0AF1: write_int 4 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Ocean Docks (LS) - 11.4km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 5 // List item number
then
0AF1: write_int 5 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Whetstone (SF) - 9.7km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 6 // List item number
then
0AF1: write_int 6 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Flint County (SF) - 7.8km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 7 // List item number
then
0AF1: write_int 7 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Doherty (SF) - 7.2km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 8 // List item number
then
0AF1: write_int 8 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Palisades (SF) - 10.2km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 9 // List item number
then
0AF1: write_int 9 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Bayside (SF) - 11.8km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 10 // List item number
then
0AF1: write_int 10 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Commerce (LS) - 7.2km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 11 // List item number
then
0AF1: write_int 11 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Las Payasadas (LV) - 9.6km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 12 // List item number
then
0AF1: write_int 12 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Las Venturas Airport (LV){ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 13 // List item number
then
0AF1: write_int 13 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}East Los Santos (LS) - 8.9km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 14 // List item number
then
0AF1: write_int 14 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Linden Side (LV) - 9.8km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 15 // List item number
then
0AF1: write_int 15 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa {ffdb4d}Angel Pine (SF) - 10.3km{ffffff} a fost setata cu succes!" -1
SAMP.CmdRet()
end

// Cursa actuala
if and
14@ == 1 // Pressed = 1
15@ == 16 // List item number
then
if 10@ == 0
then
//0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Optiunea {ffdb4d}Random{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 1
then
//0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Creek (LV) - 12.6km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 2
then
//0AF1: write_int 2 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Pilson Intersection (LV){FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 3
then
//0AF1: write_int 3 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Battery Point (SF) - 10.4km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 4
then
//0AF1: write_int 4 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Ocean Docks (LS) - 11.4km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 5
then
//0AF1: write_int 5 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Whetstone (SF) - 9.7km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 6
then
//0AF1: write_int 6 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Flint County (SF) - 7.8km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 7
then
//0AF1: write_int 7 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Doherty (SF) - 7.2km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 8
then
//0AF1: write_int 8 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Palisades (SF) - 10.2km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 9
then
//0AF1: write_int 9 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Bayside (SF) - 11.8km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 10
then
//0AF1: write_int 10 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Commerce (LS) - 7.2km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 11
then
//0AF1: write_int 11 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Las Payasadas (LV) - 9.6km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 12
then
//0AF1: write_int 12 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Las Venturas Airport (LV){FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 13
then
//0AF1: write_int 13 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}East Los Santos (LS) - 8.9km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 14
then
//0AF1: write_int 14 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Linden Side (LV) - 9.8km{FFFFFF}." -1
SAMP.CmdRet()
end

if 10@ == 15
then
//0AF1: write_int 15 to_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Cursa selectata automat este {ffdb4d}Angel Pine (SF) - 10.3km{FFFFFF}." -1
SAMP.CmdRet()
end


end
end

// Dialog Auto Fill
if
0B3C: samp is_dialog_responded id 5333 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autofill"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Fill a fost pornit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autofill"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Fill a fost oprit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 3 // List item number
then
0AB1: call @autofill 0
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Functia Auto Fill da automat /engine, /fill, /fillgascan la o benzinarie," -1
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: iar dupa ce (nu) ai facut plinul iti porneste automat motorul vehiculului." -1
SAMP.CmdRet()
end
end

// Dialog Auto Fisherman
if
0B3C: samp is_dialog_responded id 5334 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autobuyfish"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Fisherman a fost pornit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autobuyfish"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Auto Fisherman a fost oprit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 3 // List item number
then
0AB1: call @autofisherman 0
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Functia Auto Fisherman cumpara automat o momeala pentru peste in momentul " -1
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: in care vindeti un peste in 24/7." -1
SAMP.CmdRet()
end
end

// Dialog Work Sound
if
0B3C: samp is_dialog_responded id 5335 button 14@ list_item 15@ input_text 0
then

if and
14@ == 1 // Pressed = 1
15@ == 0 // List item number
then
0AF1: write_int 1 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "worksound"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Ready to Work Sound a fost pornit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 1 // List item number
then
0AF1: write_int 0 to_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "worksound"
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Ready to Work Sound a fost oprit!" -1
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 3 // List item number
then
0AB1: call @worksound 0
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Daca nu ai auzit sunetul verifica daca ai „worksound.mp3” in" -1
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: libraria CLEO sau daca nu cumva ai volumul calculatorului la 0." -1
Audiostream.PerformAction(22@, PLAY)
SAMP.CmdRet()
end

if and
14@ == 1 // Pressed = 1
15@ == 4 // List item number
then
0AB1: call @worksound 0
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: Functia Ready to Work Sound va anunta cand puteti munci din nou" -1
chatmsg "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff}: la un job, modul detectand textul de mai jos in Romana sau Engleza:" -1
chatmsg "{ffcc66}Timpul tau de asteptare la job s-a incheiat. Acum poti munci din nou." -1
SAMP.CmdRet()
end
end

// ini inifiles iniloop

0AF0: 19@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "enginelights"
0AF0: 9@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autofill"
0AF0: 13@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autobuyfish"
0AF0: 20@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "status"
0AF0: 10@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "cursa"
0AF0: 23@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "worksound"
22@ = Audiostream.Load("CLEO\worksound.mp3")





if or
00ED: actor $PLAYER_ACTOR sphere 0 near_point 816.7230 856.8032 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point -2129.2744 -188.1958 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point -1849.0289 -1603.9692 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2076.5391 -2001.9285 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1753.4260 -1894.0184 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2283.5281 556.8372 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 125.3188 -285.4846 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1352.0809 348.3976 radius 2.0 2.0 on_foot
then
if 0@ == 1
then
say "/getjob"
print "~W~JOB ~R~CHANGED" 3000

0@ = 0
end
else
0@ = 1
end

if or
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2502.8862 2778.8430 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point -2532.2329 52.8123 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2498.4268 2321.2959 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1658.2581 2199.9185 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2766.5500 -1615.0758 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point -2187.9648 695.5502 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 358.5851 163.1003 radius 2.2 2.2 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 358.9149 186.1566 radius 2.2 2.2 on_foot
then
if 1@ == 1
then
say "/getjob"
print "~W~JOB ~R~CHANGED" 3000

1@ = 0
end
else
1@ = 1
end

if or
00ED: actor $PLAYER_ACTOR sphere 0 near_point -2664.4175 -9.0100 radius 2.0 2.0 on_foot
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1353.1666 1162.4060 radius 2.0 2.0 on_foot
then
if 6@ == 1
then
say "/getjob"
print "~W~JOB ~R~CHANGED" 3000

6@ = 2
end
else
6@ = 1
end

if or
00EE: actor $PLAYER_ACTOR sphere 0 near_point 1943.3950 -1772.4888 radius 5.0 5.0 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 1382.7135 460.9126 radius 5.0 5.0 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 655.4982 -565.0677 radius 5.0 5.0 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 1003.7731 -934.9677 radius 5.0 5.0 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 2202.3267 2475.0889 radius 8.0 8.0 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 615.7755 1689.3870 radius 8.5 8.5 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 622.2806 1680.6251 radius 4.3 4.3 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 606.8770 1702.0751 radius 5.0 5.0 in_car
then
if and
2@ == 1
9@ == 1
then
say "/engine"
say "/fill"
wait 1000
say "/fillgascan"

2@ = 2
end
else
2@ = 1
end

if or
00EE: actor $PLAYER_ACTOR sphere 0 near_point -1329.1956 2677.3901 radius 6.4 6.4 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 70.5402 1218.0083 radius 4.4 4.4 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 2115.1423 920.0687 radius 8.0 8.0 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 2640.3547 1105.9662 radius 7.7 7.7 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 1595.7229 2198.9976 radius 7.2 7.2 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point -1471.5558 1864.1368 radius 7.2 7.2 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point -91.2960 -1169.2394 radius 7.2 7.2 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point -1608.1508 -2715.9832 radius 5.3 5.3 in_car
then
if and
9@ == 1
3@ == 1
then
say "/engine"
say "/fill"
wait 1000
say "/fillgascan"

3@ = 2
end
else
3@ = 1
end

if or
00EE: actor $PLAYER_ACTOR sphere 0 near_point -2028.2133 156.9904 radius 3.8 3.8 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point -2410.8401 976.5464 radius 6.3 6.3 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point -2244.1934 -2560.7622 radius 3.4 3.4 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point -1675.8877 413.1417 radius 6.2 6.2 in_car
00EE: actor $PLAYER_ACTOR sphere 0 near_point 2145.9258 2747.7734 radius 7.5 7.5 in_car
then
if and
4@ == 1
9@ == 1
then
say "/engine"
say "/fill"
wait 1000
say "/fillgascan"

4@ = 2
end
else
4@ = 1
end

if or
00EC: actor $PLAYER_ACTOR sphere 0 near_point 2777.9661 -1610.7565 radius 7.8 7.8 on_foot //Arms Dealer LS
00EC: actor $PLAYER_ACTOR sphere 0 near_point 1687.4510 921.4866 radius 8.0 8.0 on_foot // Arms Dealer LV
00EC: actor $PLAYER_ACTOR sphere 0 near_point -2097.7756 -25.1648 radius 8.0 8.0 on_foot // Arms Dealer SF
00EC: actor $PLAYER_ACTOR sphere 0 near_point -2552.73 52.48 radius 8.0 8.0 on_foot // Drugs Dealer SF
00EC: actor $PLAYER_ACTOR sphere 0 near_point 2141.59 2835.07 radius 8.0 8.0 on_foot // Drugs Dealer LV
00EC: actor $PLAYER_ACTOR sphere 0 near_point 2170.6799 -1676.2516 radius 8.0 8.0 on_foot // Drugs Dealer LS
00ED: actor $PLAYER_ACTOR sphere 0 near_point 71.9709 -255.2579 radius 20.0 20.0 on_foot // Trucker Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2524.1543 2803.1843 radius 9.0 9.0 on_foot // Curier Work
then
if and
0AB0: key_pressed 0x5A
5@ == 1
then
wait 200
say "/work"

5@ = 2
end
else
5@ = 1
end

if 5@ == 2
then
print "~R~AutoCmd ~G~Enabled!" 1000
end

if or
00ED: actor $PLAYER_ACTOR sphere 0 near_point 875.8744 856.6222 radius 9.8 9.8 on_foot // Cariera Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point -2116.8286 -228.0265 radius 20.0 20.0 on_foot // LumberJack Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point -1841.2954 -1570.6793 radius 18.0 18.0 on_foot // Miner Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2107.0986 -2088.1978 radius 15.0 15.0 on_foot // Gunoier LS Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1380.7104 1164.2830 radius 12.9 12.9 on_foot // Gunoier LV Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1788.5756 -1907.9957 radius 8.0 8.0 on_foot // Bus Driver LS Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point -2676.5894 -44.8385 radius 8.0 8.0 on_foot // Bus Driver SF Work
00ED: actor $PLAYER_ACTOR sphere 0 near_point 1352.0376 348.3018 radius 2.0 2.0 on_foot // Chemist Work
then
if and
0AB0: key_pressed 0x5A
7@ == 1
then
say "/work"

7@ = 2
end
else
7@ = 1
end

if
00ED: actor $PLAYER_ACTOR sphere 0 near_point 2262.3982 546.3759 radius 15.4 2.5 on_foot // Fisherman /fish
then
if and
0AB0: key_pressed 0x5A
8@ == 1
then
say "/fish"

8@ = 2
end
else
8@ = 1
end


//Script cursa trucker
if SAMP.IsDialogActive(75)
then
if 20@ == 1
then
0B49: samp set_current_dialog_list_item 10@
0B47: samp close_current_dialog_with_button 1
end
end

// Auto Buy Fisherman Bait
if 12@ == 1
then
wait 50
say "/buy"
12@ = 0
end

/* if and
SAMP.isDialogActive(9) // Dialog /buy
11@ == 1
then
SAMP.SetDialogListItem(11)
0B47: samp close_current_dialog_with_button 1 // Buy button
end

*/
if and
SAMP.isDialogActive(9) // Dialog /buy
11@ == 1
then
0ab1: call @setDialogIndex _params 1 _item 12
0B47: samp close_current_dialog_with_button 1 // Buy button
end

if and
11@ == 1
SAMP.IsDialogActive(151) // Dialog /buy -> Fish Bait
then
SAMP.SetDialogInputBoxText("1")
0B47: samp close_current_dialog_with_button 1 // Buy button
wait 50
11@ = 0
end




END

:setDialogIndex
{
0ab1: call @setDialogIndex 1 _item 2
}
0BB0: samp 31@ = get_dialog_info_ptr
31@ += 0x20
0A8D: 31@ = read_memory 31@ size 4 virtual_protect 0
31@ += 0x143
0@ -= 1
0A8C: write_memory 31@ size 1 value 0@ virtual_protect 0
ret 0

:auto_chat
0BE5: raknet 31@ = get_hook_param PARAM_PACKETID
if 31@ == RPC_ScrClientMessage
then
0C11: memset destination 29@ value 0 size 256

0BE5: raknet 31@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 30@ = bit_stream_read 31@ type BS_TYPE_INT //color
0BE7: raknet 30@ = bit_stream_read 31@ type BS_TYPE_INT //lenght
0BE8: raknet bit_stream 31@ read_array 29@ size 30@ //string
0C0D: struct 29@ offset 30@ size 1 = 0

if or
0C29: $NUL_STIRNG = stristr string1 29@ string2 "* Vehicle filled up for"
0C29: $NUL_STIRNG = stristr string1 29@ string2 "* Rezervorul a fost umplut pentru"
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Your car has enough fuel."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Masina ta are suficient combustibil."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Eroare: Nu mai poti adauga benzina in rezervor."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Error: You can't fill the fuel tank with more gas."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "You filled your vehicle with 20% fuel from your Gas Can."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Ai umplut 20% din rezervor cu combustibilul din canistra de benzina."
then
if and
2@ = 2
3@ = 2
4@ = 2
9@ == 1
Actor.Driving($PLAYER_ACTOR)
then
say "/engine"
end
end

if or
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Timpul tau de asteptare la job s-a incheiat. Acum poti munci din nou."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Your job waiting time is over. You can now start working again."
then
if 5@ == 2
then
say "/work"
end
end

if or
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Error: You need a personal car."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Eroare: Ai nevoie de o masina personala."
then
if 5@ == 2
then
5@ = 1
end
end

if or
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Timpul tau de asteptare la job s-a incheiat. Acum poti munci din nou."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Your job waiting time is over. You can now start working again."
then
if 23@ == 1
then
//018C: play_sound 1147 at 0.0 0.0 0.0
Audiostream.PerformAction(22@, PLAY)
end
end


if or
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Use /engine or press 2 to turn on the engine."
0C29: $NUL_STIRNG = stristr string1 29@ string2 "Scrie /engine sau apasa 2 pentru a porni motorul."
then
if and
19@ == 1
Actor.Driving($PLAYER_ACTOR)
then
say "/engine"
say "/lights"
end
end

if or
0C29: $NUL_STIRNG = stristr string1 29@ string2 "* You sold the"
0C29: $NUL_STIRNG = stristr string1 29@ string2 "* Ai vandut un"
then
077E: get_active_interior_to $ACTIVE_INTERIOR
if and
$ACTIVE_INTERIOR >= 1
not Actor.Driving($PLAYER_ACTOR)
13@ == 1
then
11@ = 1
12@ = 1
end
end


end
0BE0: raknet hook_ret true


:AutoCmds
chatmsg "{FFFFFF}|______{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d status:{FFFFFF}______|" -1
if 19@ == 1
then
chatmsg "{6699ff}Auto Engine & Lights{FFFFFF} - ON" -1
else
chatmsg "{6699ff}Auto Engine & Lights{FFFFFF} - OFF" -1
end

if 13@ == 1
then
chatmsg "{6699ff}Auto Fisherman{FFFFFF} - ON" -1
else
chatmsg "{6699ff}Auto Fisherman{FFFFFF} - OFF" -1
end

if 20@ == 1
then
chatmsg "{6699ff}Auto Trucker{FFFFFF} - ON" -1
else
chatmsg "{6699ff}Auto Trucker{FFFFFF} - OFF" -1
end

if 9@ == 1
then
chatmsg "{6699ff}Auto Fill{FFFFFF} - ON" -1
else
chatmsg "{6699ff}Auto Fill{FFFFFF} - OFF" -1
end

if 23@ == 1
then
chatmsg "{6699ff}Ready to Work Sound{FFFFFF} - ON" -1
else
chatmsg "{6699ff}Ready to Work Sound{FFFFFF} - OFF" -1
end

chatmsg "{FFFFFF}* {ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff} developer is AT Nic." -1
SAMP.CmdRet

:AutoCmd
SAMP.IsCommandTyped(0@)
0AC6: 21@ = label @toatecomenzile offset
SAMP.ShowDialog(5330, "{ff0000}Au{FFA500}to{FFFF00}Cm{00ff00}d{ffffff} settings", 21@, "Select", "Close", 2)
SAMP.CmdRet


:toatecomenzile
HEX
"Auto Engine & Lights" A
"Auto Fisherman" A
"Auto Trucker" A
"Auto Fill" A
"Ready to Work Sound" 0
END
ret 0

:autoengine
0AF0: 19@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "enginelights"
if 19@ == 1
then
0AC6: 21@ = label @autoenginelist offset
SAMP.ShowDialog(5331, "{ffffff}Auto Engine & Lights - ON", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
if 19@ == 0
then
0AC6: 21@ = label @autoenginelist offset
SAMP.ShowDialog(5331, "{ffffff}Auto Engine & Lights - OFF", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
SAMP.CmdRet()

:autoenginelist
HEX
"{99ff66}Porneste functia" A
"{ff5050}Opreste functia" A
" " A
"Despre" 0
END
ret 0

:autotrucker
0AF0: 20@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoTrucker" key "status"
if 20@ == 1
then
0AC6: 21@ = label @autotruckerlist offset
SAMP.ShowDialog(5332, "{ffffff}Auto Trucker - ON", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
if 20@ == 0
then
0AC6: 21@ = label @autotruckerlist offset
SAMP.ShowDialog(5332, "{ffffff}Auto Trucker - OFF", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
SAMP.CmdRet()

:autotruckerlist
HEX
"{99ff66}Porneste functia" A
"{ff5050}Opreste functia" A
"{6699ff}Seteaza cursa" A
" " A
"Despre" 0
END
ret 0



:trucker
0AC6: 21@ = label @cursetrucker offset
SAMP.ShowDialog(3333, "{ffffff}Auto Trucker - Seteaza Cursa", 21@, "Select", "Close", 2)
SAMP.CmdRet()
ret 0


:cursetrucker
HEX
"Random" A
"Creek (LV) - 12.6km" A
"Pilson Intersection (LV) - 9.4km" A
"Battery Point (SF) - 10.4km" A
"Ocean Docks (LS) - 11.4km" A
"Whetstone (SF) - 9.7km" A
"Flint County (SF) - 7.8km" A
"Doherty (SF) - 7.2km" A
"Palisades (SF) - 10.2km" A
"Bayside (SF) - 11.8km" A
"Commerce (LS) - 7.2km" A
"Las Payasadas (LV) - 9.6km" A
"Las Venturas Airport (LV) - 8.6km" A
"East Los Santos (LS) - 8.9km" A
"Linden Side (LV) - 9.8km" A
"Angel Pine (SF) - 10.3km" A
"{ffdb4d}Cursa actuala" 0
end
ret 0

:autofill
0AF0: 9@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autofill"
if 9@ == 1
then
0AC6: 21@ = label @autofilllist offset
SAMP.ShowDialog(5333, "{ffffff}Auto Fill - ON", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
if 9@ == 0
then
0AC6: 21@ = label @autofilllist offset
SAMP.ShowDialog(5333, "{ffffff}Auto Fill - OFF", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
SAMP.CmdRet()

:autofilllist
HEX
"{99ff66}Porneste functia" A
"{ff5050}Opreste functia" A
" " A
"Despre" 0
END
ret 0

:autofisherman
0AF0: 13@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "autobuyfish"
if 13@ == 1
then
0AC6: 21@ = label @autofishermanlist offset
SAMP.ShowDialog(5334, "{ffffff}Auto Fisherman - ON", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
if 13@ == 0
then
0AC6: 21@ = label @autofishermanlist offset
SAMP.ShowDialog(5334, "{ffffff}Auto Fisherman - OFF", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
SAMP.CmdRet()

:autofishermanlist
HEX
"{99ff66}Porneste functia" A
"{ff5050}Opreste functia" A
" " A
"Despre" 0
END
ret 0

:worksound
0AF0: 23@ = get_int_from_ini_file "CLEO\autocmd.ini" section "AutoCmd" key "worksound"
if 23@ == 1
then
0AC6: 21@ = label @worksoundlist offset
SAMP.ShowDialog(5335, "{ffffff}Ready to Work Sound - ON", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
if 23@ == 0
then
0AC6: 21@ = label @worksoundlist offset
SAMP.ShowDialog(5335, "{ffffff}Ready to Work Sound - OFF", 21@, "Select", "Close", 2)
SAMP.CmdRet
ret 0
end
SAMP.CmdRet()

:worksoundlist
HEX
"{99ff66}Porneste functia" A
"{ff5050}Opreste functia" A
" " A
"Sound Test" A
"Despre" 0
END
ret 0



/*
:restart
0A92: create_custom_thread "AutoCmd.cs"
0A93: end_custom_thread
SAMP.CmdRet()
*/

@Parazitas
@Opcode.eXe
@springfield
etc..
 

Attachments

  • AutoCmd.zip
    51.3 KB · Views: 17
Status
Not open for further replies.
Top