Вопросы по CLEO-скриптингу

Svyatogor2007

Новичок
5
0
Всех приветствую.
Возник вопрос по опкоду 0518:, есть ли возможность как-то увеличить лимит прайса? Суть в том, что если поставить стоимость дома больше $300 тыс, то сам по себе пикап работает нормально, но цена дома над пикапом отображается коряво, точнее отображается какая-то левая цифра.
 

Kristyan

Известный
165
16
Неа. У сампа с этим кодом начинаются проблемы - на сервер зайти не может, постоянные рестарты и краши.
Каким боком? Это же опкод сампа, как он не может работать в сампе? Может ты не правильно используешь !?
 

хуесос)

Известный
263
63
Всех приветствую.
Возник вопрос по опкоду 0518:, есть ли возможность как-то увеличить лимит прайса? Суть в том, что если поставить стоимость дома больше $300 тыс, то сам по себе пикап работает нормально, но цена дома над пикапом отображается коряво, точнее отображается какая-то левая цифра.
Память выделял?
 
  • Нравится
Реакции: Svyatogor2007

The Spark

Известный
653
672
20 строка, поменяй num_params 4 pop 4 на num_params 5 pop 5
и память выделяй/освобождай в цикле, а не перед ним
CLEO:
{$CLEO}
0000:
thread 'astap'

while not SAMP.Available()
    wait 0
end
0b34: samp "Rel" @rel
12@ = Render.CreateFont("Arial", 18, 5)
while true
    wait 0
    if 0ab0: 50 // pressed 1
    then
        alloc 0@ 228
        alloc 10@ 228 
        0C5A: samp textdraw 13 get_string_to 0@ // ~w~Lvl: ~y~131 ~w~Exp: ~y~228~w~/~y~113
        0AC7: 3@ = var 2@ offset
        0AC7: 4@ = var 1@ offset
        0AC7: 6@ = var 5@ offset        
        0AA5: call 0x8220AD num_params 5 pop 5 params | outcoming: 3@ 4@ 6@ | incoming: "~w~Lvl: ~y~%i ~w~Exp: ~y~%i~w~/~y~%i" 0@
        0AD3: 10@ = format "%i %i %i" 2@ 1@ 5@
        Render.DrawText(12@, 10@, 500, 400, 0xFFFFFFFF)
        free 0@
        free 10@
    end
end

:rel
end_thread
chatmsg "rtr"
0A92: create_custom_thread "1.cs"
Samp.CmdRet()
Всё сделал, не робит
 

astap_

Известный
Всефорумный модератор
626
597
CLEO:
{$CLEO}
0000:
thread 'astap'

while not SAMP.Available()
    wait 0
end
0b34: samp "Rel" @rel
12@ = Render.CreateFont("Arial", 18, 5)
while true
    wait 0
    if 0ab0: 50 // pressed 1
    then
        alloc 0@ 228
        alloc 10@ 228
        0C5A: samp textdraw 13 get_string_to 0@ // ~w~Lvl: ~y~131 ~w~Exp: ~y~228~w~/~y~113
        0AC7: 3@ = var 2@ offset
        0AC7: 4@ = var 1@ offset
        0AC7: 6@ = var 5@ offset       
        0AA5: call 0x8220AD num_params 5 pop 5 params | outcoming: 3@ 4@ 6@ | incoming: "~w~Lvl: ~y~%i ~w~Exp: ~y~%i~w~/~y~%i" 0@
        0AD3: 10@ = format "%i %i %i" 2@ 1@ 5@
        Render.DrawText(12@, 10@, 500, 400, 0xFFFFFFFF)
        free 0@
        free 10@
    end
end

:rel
end_thread
chatmsg "rtr"
0A92: create_custom_thread "1.cs"
Samp.CmdRet()
Всё сделал, не робит
регистрацию шрифта ставь ПЕРЕД регистрацией команды. а так работает, не хани.
кста активация стоит на двоечку, а не на единичку
CLEO:
{$CLEO}
0000:
thread "astap"

alloc 0@ 128
format 0@ = "gaga228gaga123gagaga45"

while true
    wait 0
    if 0ab0: 50 // pressed 2
    then
        alloc 10@ 128
        0AC7: 3@ = var 2@ offset
        0AC7: 4@ = var 1@ offset
        0AC7: 6@ = var 5@ offset       
        0AA5: call 0x8220AD num_params 5 pop 5 params | outcoming: 3@ 4@ 6@ | incoming: "gaga%igaga%igagaga%i" 0@
        0AD3: 10@ = format "%i %i %i" 5@ 1@ 2@
        chatmsg 10@ -1
        free 10@
    end
end
Koc5t0G.jpg
 

Kristyan

Известный
165
16
Привет ребята, нужен адрес к фары у т.с. , нужно для проверки если они вкл/выкл
 

AXE_CAMERON

Участник
66
0
Как сравнить такие переменные?
----------------------
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
11@ = 2231.891846
12@ = -2284.0
13@ = 14.4
...
if and
1@ == 11@
2@ == 12@
3@ == 13@
then
...
--------------------
 

Svyatogor2007

Новичок
5
0
Память выделял?
А подробней можно? Память не выделял, что конкретно в выделенную память пихать? Вот сам скрипт:
CLEO:
{$CLEO}

0A95: enable_thread_saving
thread 'HOUSE'
wait 1000
0662: printstring "автор Svyatogor2007"

:HOUSE_1
wait 1000
if
    Player.Defined($PLAYER_CHAR)
jf @HOUSE_1
$BUY_INDEX = 3
11@ = 0
for 11@ = 0 to 29
if
$PROPERTY_BOUGHT_FLAGS($BUY_INDEX,32i) == 1
then
$PROPERTY_BOUGHT_FLAGS($BUY_INDEX,32i) = 0
end
$BUY_INDEX += 1
end
$1661 = 180000
$1672 = 300000
$1675 = 100000
$1678 = 170000
$1684 = 50000
$1664 = 300000
$1666 = 100000
$1667 = 200000
$1671 = 100000
$1673 = 100000
$1674 = 210000
$1658 = 150000
$1676 = 100000
$1677 = 100000
$1657 = 100000
$1659 = 210000
$1660 = 150000
$1662 = 150000
$1669 = 30000
$1670 = 30000
$1680 = 30000
$1681 = 30000
$1682 = 50000
$1656 = 150000
$1663 = 100000
$1665 = 120000000
$1668 = 50000
$1679 = 50000
$1683 = 50000
$1653 = 210000
$1654 = 150000
$1655 = 290000
0@ = 0
1@ = 0
2@ = 0
3@ = 0
4@ = 0
5@ = 0
6@ = 0
7@ = 0
8@ = 0
9@ = 0
10@ = 0
11@ = 0
12@ = 0
13@ = 0
14@ = 0
jump @HOUSE_2

:HOUSE_2
wait 1000
if
    Player.Defined($PLAYER_CHAR)
jf @HOUSE_2
if and
$STAT_UNLOCKED_CITIES_NUMBER > 0
1@ == 0
then
    Marker.Disable($1629)
    Pickup.Destroy($BUY_ASSET_PICKUPS[8])
    Garage.Deactivate('BURBDOO')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[8] $Y_PROPERTY_TO_BUY[8] radius 10.0 bitmask 16384 flag 0 
    0518: $BUY_ASSET_PICKUPS[8] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[8] $Y_PROPERTY_TO_BUY[8] $Z_PROPERTY_TO_BUY[8] price $1661  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1629 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[8] $Y_PROPERTY_TO_BUY[8] $Z_PROPERTY_TO_BUY[8]
    018B: set_marker $1629 radar_mode 2
    Marker.Disable($1640)
    Pickup.Destroy($BUY_ASSET_PICKUPS[19])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[19] $Y_PROPERTY_TO_BUY[19] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[19] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[19] $Y_PROPERTY_TO_BUY[19] $Z_PROPERTY_TO_BUY[19] price $1672  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1640 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[19] $Y_PROPERTY_TO_BUY[19] $Z_PROPERTY_TO_BUY[19]
    018B: set_marker $1640 radar_mode 2
    Marker.Disable($1643)
    Pickup.Destroy($BUY_ASSET_PICKUPS[22])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[22] $Y_PROPERTY_TO_BUY[22] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[22] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[22] $Y_PROPERTY_TO_BUY[22] $Z_PROPERTY_TO_BUY[22] price $1675  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1643 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[22] $Y_PROPERTY_TO_BUY[22] $Z_PROPERTY_TO_BUY[22]
    018B: set_marker $1643 radar_mode 2 
    Marker.Disable($1646)
    Pickup.Destroy($BUY_ASSET_PICKUPS[25])
    Garage.Deactivate('BURBDO2') 
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[25] $Y_PROPERTY_TO_BUY[25] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[25] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[25] $Y_PROPERTY_TO_BUY[25] $Z_PROPERTY_TO_BUY[25] price $1678  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1646 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[25] $Y_PROPERTY_TO_BUY[25] $Z_PROPERTY_TO_BUY[25]
    018B: set_marker $1646 radar_mode 2
    Marker.Disable($1652)
    Pickup.Destroy($BUY_ASSET_PICKUPS[31])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[31] $Y_PROPERTY_TO_BUY[31] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[31] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[31] $Y_PROPERTY_TO_BUY[31] $Z_PROPERTY_TO_BUY[31] price $1684  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1652 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[31] $Y_PROPERTY_TO_BUY[31] $Z_PROPERTY_TO_BUY[31]
    018B: set_marker $1652 radar_mode 2
    1@ = 1
end
jump @HOUSE_3

:HOUSE_3
wait 0
if and
  $STAT_UNLOCKED_CITIES_NUMBER > 0
  2@ = 0
then
if or
  $TRUTH_TOTAL_PASSED_MISSIONS > 1
  $23 == 1
then
    Marker.Disable($1632)
    Pickup.Destroy($BUY_ASSET_PICKUPS[11])
    Garage.Deactivate('SAV1SFE')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[11] $Y_PROPERTY_TO_BUY[11] radius 10.0 bitmask 16384 flag 0 
    0518: $BUY_ASSET_PICKUPS[11] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[11] $Y_PROPERTY_TO_BUY[11] $Z_PROPERTY_TO_BUY[11] price $1664  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1632 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[11] $Y_PROPERTY_TO_BUY[11] $Z_PROPERTY_TO_BUY[11]
    018B: set_marker $1632 radar_mode 2
    Marker.Disable($1634)
    Pickup.Destroy($BUY_ASSET_PICKUPS[13])
    Garage.Deactivate('SAV1SFW')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[13] $Y_PROPERTY_TO_BUY[13] radius 10.0 bitmask 16384 flag 0 
    0518: $BUY_ASSET_PICKUPS[13] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[13] $Y_PROPERTY_TO_BUY[13] $Z_PROPERTY_TO_BUY[13] price $1666  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1634 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[13] $Y_PROPERTY_TO_BUY[13] $Z_PROPERTY_TO_BUY[13]
    018B: set_marker $1634 radar_mode 2
    Marker.Disable($1635)
    Pickup.Destroy($BUY_ASSET_PICKUPS[14])
    Garage.Deactivate('SVGSFS1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[14] $Y_PROPERTY_TO_BUY[14] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[14] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[14] $Y_PROPERTY_TO_BUY[14] $Z_PROPERTY_TO_BUY[14] price $1667  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1635 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[14] $Y_PROPERTY_TO_BUY[14] $Z_PROPERTY_TO_BUY[14]
    018B: set_marker $1635 radar_mode 2
    Marker.Disable($1639)
    Pickup.Destroy($BUY_ASSET_PICKUPS[18])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[18] $Y_PROPERTY_TO_BUY[18] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[18] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[18] $Y_PROPERTY_TO_BUY[18] $Z_PROPERTY_TO_BUY[18] price $1671  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1639 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[18] $Y_PROPERTY_TO_BUY[18] $Z_PROPERTY_TO_BUY[18]
    018B: set_marker $1639 radar_mode 2
    Marker.Disable($1641)
    Pickup.Destroy($BUY_ASSET_PICKUPS[20])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[20] $Y_PROPERTY_TO_BUY[20] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[20] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[20] $Y_PROPERTY_TO_BUY[20] $Z_PROPERTY_TO_BUY[20] price $1673  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1641 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[20] $Y_PROPERTY_TO_BUY[20] $Z_PROPERTY_TO_BUY[20]
    018B: set_marker $1641 radar_mode 2
    Marker.Disable($1642)
    Pickup.Destroy($BUY_ASSET_PICKUPS[21])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[21] $Y_PROPERTY_TO_BUY[21] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[21] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[21] $Y_PROPERTY_TO_BUY[21] $Z_PROPERTY_TO_BUY[21] price $1674  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1642 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[21] $Y_PROPERTY_TO_BUY[21] $Z_PROPERTY_TO_BUY[21]
    018B: set_marker $1642 radar_mode 2
    2@ = 1
end
end
jump @HOUSE_4

:HOUSE_4
wait 0
if and
  $STAT_UNLOCKED_CITIES_NUMBER > 1
  3@ == 0
then
    Marker.Disable($1626)
    Pickup.Destroy($BUY_ASSET_PICKUPS[5])
    Garage.Deactivate('CN2GAR1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[5] $Y_PROPERTY_TO_BUY[5] radius 10.0 bitmask 16384 flag 0 
    0518: $BUY_ASSET_PICKUPS[5] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[5] $Y_PROPERTY_TO_BUY[5] $Z_PROPERTY_TO_BUY[5] price $1658  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1626 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[5] $Y_PROPERTY_TO_BUY[5] $Z_PROPERTY_TO_BUY[5]
    018B: set_marker $1626 radar_mode 2
    Marker.Disable($1644)
    Pickup.Destroy($BUY_ASSET_PICKUPS[23])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[23] $Y_PROPERTY_TO_BUY[23] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[23] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[23] $Y_PROPERTY_TO_BUY[23] $Z_PROPERTY_TO_BUY[23] price $1676  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1644 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[23] $Y_PROPERTY_TO_BUY[23] $Z_PROPERTY_TO_BUY[23]
    018B: set_marker $1644 radar_mode 2
    Marker.Disable($1645)
    Pickup.Destroy($BUY_ASSET_PICKUPS[24])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[24] $Y_PROPERTY_TO_BUY[24] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[24] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[24] $Y_PROPERTY_TO_BUY[24] $Z_PROPERTY_TO_BUY[24] price $1677  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1645 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[24] $Y_PROPERTY_TO_BUY[24] $Z_PROPERTY_TO_BUY[24]
    018B: set_marker $1645 radar_mode 2
    3@ = 1
end
jump @HOUSE_5

:HOUSE_5
wait 0
if and
  $STAT_UNLOCKED_CITIES_NUMBER > 1
  4@ ==0
then
if or
  $1403 == 1
  $23 == 1
then
    Marker.Disable($1625)
    Pickup.Destroy($BUY_ASSET_PICKUPS[4])
    Garage.Deactivate('VESVGRG')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[4] $Y_PROPERTY_TO_BUY[4] radius 10.0 bitmask 16384 flag 0 
    0518: $BUY_ASSET_PICKUPS[4] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[4] $Y_PROPERTY_TO_BUY[4] $Z_PROPERTY_TO_BUY[4] price $1657  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1625 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[4] $Y_PROPERTY_TO_BUY[4] $Z_PROPERTY_TO_BUY[4]
    018B: set_marker $1625 radar_mode 2
    Marker.Disable($1627)
    Pickup.Destroy($BUY_ASSET_PICKUPS[6])
    Garage.Deactivate('BLOB69')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[6] $Y_PROPERTY_TO_BUY[6] radius 10.0 bitmask 16384 flag 0 
    0518: $BUY_ASSET_PICKUPS[6] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[6] $Y_PROPERTY_TO_BUY[6] $Z_PROPERTY_TO_BUY[6] price $1659  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1627 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[6] $Y_PROPERTY_TO_BUY[6] $Z_PROPERTY_TO_BUY[6]
    018B: set_marker $1627 radar_mode 2
    Marker.Disable($1628)
    Pickup.Destroy($BUY_ASSET_PICKUPS[7])
    Garage.Deactivate('BLOB7')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[7] $Y_PROPERTY_TO_BUY[7] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[7] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[7] $Y_PROPERTY_TO_BUY[7] $Z_PROPERTY_TO_BUY[7] price $1660  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1628 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[7] $Y_PROPERTY_TO_BUY[7] $Z_PROPERTY_TO_BUY[7]
    018B: set_marker $1628 radar_mode 2
    Marker.Disable($1630)
    Pickup.Destroy($BUY_ASSET_PICKUPS[9])
    Garage.Deactivate('BLOB6')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[9] $Y_PROPERTY_TO_BUY[9] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[9] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[9] $Y_PROPERTY_TO_BUY[9] $Z_PROPERTY_TO_BUY[9] price $1662  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1630 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[9] $Y_PROPERTY_TO_BUY[9] $Z_PROPERTY_TO_BUY[9]
    018B: set_marker $1630 radar_mode 2
    Marker.Disable($1637)
    Pickup.Destroy($BUY_ASSET_PICKUPS[16])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[16] $Y_PROPERTY_TO_BUY[16] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[16] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[16] $Y_PROPERTY_TO_BUY[16] $Z_PROPERTY_TO_BUY[16] price $1669  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1637 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[16] $Y_PROPERTY_TO_BUY[16] $Z_PROPERTY_TO_BUY[16]
    018B: set_marker $1637 radar_mode 2
    Marker.Disable($1638)
    Pickup.Destroy($BUY_ASSET_PICKUPS[17])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[17] $Y_PROPERTY_TO_BUY[17] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[17] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[17] $Y_PROPERTY_TO_BUY[17] $Z_PROPERTY_TO_BUY[17] price $1670  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1638 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[17] $Y_PROPERTY_TO_BUY[17] $Z_PROPERTY_TO_BUY[17]
    018B: set_marker $1638 radar_mode 2
    Marker.Disable($1648)
    Pickup.Destroy($BUY_ASSET_PICKUPS[27])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[27] $Y_PROPERTY_TO_BUY[27] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[27] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[27] $Y_PROPERTY_TO_BUY[27] $Z_PROPERTY_TO_BUY[27] price $1680  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1648 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[27] $Y_PROPERTY_TO_BUY[27] $Z_PROPERTY_TO_BUY[27]
    018B: set_marker $1648 radar_mode 2
    Marker.Disable($1649)
    Pickup.Destroy($BUY_ASSET_PICKUPS[28])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[28] $Y_PROPERTY_TO_BUY[28] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[28] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[28] $Y_PROPERTY_TO_BUY[28] $Z_PROPERTY_TO_BUY[28] price $1681  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1649 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[28] $Y_PROPERTY_TO_BUY[28] $Z_PROPERTY_TO_BUY[28]
    018B: set_marker $1649 radar_mode 2
    Marker.Disable($1650)
    Pickup.Destroy($BUY_ASSET_PICKUPS[29])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[29] $Y_PROPERTY_TO_BUY[29] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[29] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[29] $Y_PROPERTY_TO_BUY[29] $Z_PROPERTY_TO_BUY[29] price $1682  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1650 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[29] $Y_PROPERTY_TO_BUY[29] $Z_PROPERTY_TO_BUY[29]
    018B: set_marker $1650 radar_mode 2
    4@ = 1
end
end
jump @HOUSE_6

:HOUSE_6
wait 0
if
    5@ == 0
    then
    Marker.Disable($1624)
    Pickup.Destroy($BUY_ASSET_PICKUPS[3])
     Garage.Deactivate('BEACSV')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[3] $Y_PROPERTY_TO_BUY[3] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[3] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[3] $Y_PROPERTY_TO_BUY[3] $Z_PROPERTY_TO_BUY[3] price $1656  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1624 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[3] $Y_PROPERTY_TO_BUY[3] $Z_PROPERTY_TO_BUY[3]
    018B: set_marker $1624 radar_mode 2 
    5@ = 1
    end
    if
    6@ == 0
    then
    Marker.Disable($1631)
    Pickup.Destroy($BUY_ASSET_PICKUPS[10])
    Garage.Deactivate('CARLAS1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[10] $Y_PROPERTY_TO_BUY[10] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[10] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[10] $Y_PROPERTY_TO_BUY[10] $Z_PROPERTY_TO_BUY[10] price $1663  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1631 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[10] $Y_PROPERTY_TO_BUY[10] $Z_PROPERTY_TO_BUY[10]
    018B: set_marker $1631 radar_mode 2
    6@ = 1
    end
    if
    7@ == 0
    then
    Marker.Disable($1633)
    Pickup.Destroy($BUY_ASSET_PICKUPS[12])
    Garage.Deactivate('CESAFE1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[12] $Y_PROPERTY_TO_BUY[12] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[12] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[12] $Y_PROPERTY_TO_BUY[12] $Z_PROPERTY_TO_BUY[12] price $1665  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1633 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[12] $Y_PROPERTY_TO_BUY[12] $Z_PROPERTY_TO_BUY[12]
    018B: set_marker $1633 radar_mode 2
    7@ = 1
    end
    if
    8@ == 0
    then
    Marker.Disable($1636)
    Pickup.Destroy($BUY_ASSET_PICKUPS[15])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[15] $Y_PROPERTY_TO_BUY[15] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[15] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[15] $Y_PROPERTY_TO_BUY[15] $Z_PROPERTY_TO_BUY[15] price $1668  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1636 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[15] $Y_PROPERTY_TO_BUY[15] $Z_PROPERTY_TO_BUY[15]
    018B: set_marker $1636 radar_mode 2
    8@ = 1
    end
    if
    9@ == 0
    then
    Marker.Disable($1647)
    Pickup.Destroy($BUY_ASSET_PICKUPS[26])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[26] $Y_PROPERTY_TO_BUY[26] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[26] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[26] $Y_PROPERTY_TO_BUY[26] $Z_PROPERTY_TO_BUY[26] price $1679  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1647 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[26] $Y_PROPERTY_TO_BUY[26] $Z_PROPERTY_TO_BUY[26]
    018B: set_marker $1647 radar_mode 2
    9@ = 1
    end
    if
    10@ == 0
    then
    Marker.Disable($1651)
    Pickup.Destroy($BUY_ASSET_PICKUPS[30])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[30] $Y_PROPERTY_TO_BUY[30] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[30] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[30] $Y_PROPERTY_TO_BUY[30] $Z_PROPERTY_TO_BUY[30] price $1683  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1651 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[30] $Y_PROPERTY_TO_BUY[30] $Z_PROPERTY_TO_BUY[30]
    018B: set_marker $1651 radar_mode 2
    10@ = 1
    end
jump @HOUSE_7

:HOUSE_7
wait $DEFAULT_WAIT_TIME
if or
12@ == 0
13@ == 0
14@ == 0
then
if
12@ == 0
then
0AAA: 12@ = thread 'BUY1' pointer
if
not 12@ == 0
then
    wait 1000
    $1653 = 250000
    Pickup.Destroy($BUY_ASSET_PICKUPS[0])
    0518: $BUY_ASSET_PICKUPS[0] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[0] $Y_PROPERTY_TO_BUY[0] $Z_PROPERTY_TO_BUY[0] price $1653  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    12@ = 1
end
end
if
13@ == 0
then
0AAA: 13@ = thread 'BUY2' pointer
if
not 13@ == 0
then
    wait 1000
    $1654 = 150000
    Pickup.Destroy($BUY_ASSET_PICKUPS[1])
    0518: $BUY_ASSET_PICKUPS[1] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[1] $Y_PROPERTY_TO_BUY[1] $Z_PROPERTY_TO_BUY[1] price $1654  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    13@ = 1
end
end
if
14@ == 0
then
0AAA: 14@ = thread 'BUY3' pointer
if
not 14@ == 0
then
    wait 1000
    $1655 = 300000
    Pickup.Destroy($BUY_ASSET_PICKUPS[2])
    0518: $BUY_ASSET_PICKUPS[2] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[2] $Y_PROPERTY_TO_BUY[2] $Z_PROPERTY_TO_BUY[2] price $1655  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    14@ = 1
end
end
else
0A93: end_custom_thread
end
jump @HOUSE_7
 

хуесос)

Известный
263
63
А подробней можно? Память не выделял, что конкретно в выделенную память пихать? Вот сам скрипт:
CLEO:
{$CLEO}

0A95: enable_thread_saving
thread 'HOUSE'
wait 1000
0662: printstring "автор Svyatogor2007"

:HOUSE_1
wait 1000
if
    Player.Defined($PLAYER_CHAR)
jf @HOUSE_1
$BUY_INDEX = 3
11@ = 0
for 11@ = 0 to 29
if
$PROPERTY_BOUGHT_FLAGS($BUY_INDEX,32i) == 1
then
$PROPERTY_BOUGHT_FLAGS($BUY_INDEX,32i) = 0
end
$BUY_INDEX += 1
end
$1661 = 180000
$1672 = 300000
$1675 = 100000
$1678 = 170000
$1684 = 50000
$1664 = 300000
$1666 = 100000
$1667 = 200000
$1671 = 100000
$1673 = 100000
$1674 = 210000
$1658 = 150000
$1676 = 100000
$1677 = 100000
$1657 = 100000
$1659 = 210000
$1660 = 150000
$1662 = 150000
$1669 = 30000
$1670 = 30000
$1680 = 30000
$1681 = 30000
$1682 = 50000
$1656 = 150000
$1663 = 100000
$1665 = 120000000
$1668 = 50000
$1679 = 50000
$1683 = 50000
$1653 = 210000
$1654 = 150000
$1655 = 290000
0@ = 0
1@ = 0
2@ = 0
3@ = 0
4@ = 0
5@ = 0
6@ = 0
7@ = 0
8@ = 0
9@ = 0
10@ = 0
11@ = 0
12@ = 0
13@ = 0
14@ = 0
jump @HOUSE_2

:HOUSE_2
wait 1000
if
    Player.Defined($PLAYER_CHAR)
jf @HOUSE_2
if and
$STAT_UNLOCKED_CITIES_NUMBER > 0
1@ == 0
then
    Marker.Disable($1629)
    Pickup.Destroy($BUY_ASSET_PICKUPS[8])
    Garage.Deactivate('BURBDOO')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[8] $Y_PROPERTY_TO_BUY[8] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[8] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[8] $Y_PROPERTY_TO_BUY[8] $Z_PROPERTY_TO_BUY[8] price $1661  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1629 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[8] $Y_PROPERTY_TO_BUY[8] $Z_PROPERTY_TO_BUY[8]
    018B: set_marker $1629 radar_mode 2
    Marker.Disable($1640)
    Pickup.Destroy($BUY_ASSET_PICKUPS[19])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[19] $Y_PROPERTY_TO_BUY[19] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[19] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[19] $Y_PROPERTY_TO_BUY[19] $Z_PROPERTY_TO_BUY[19] price $1672  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1640 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[19] $Y_PROPERTY_TO_BUY[19] $Z_PROPERTY_TO_BUY[19]
    018B: set_marker $1640 radar_mode 2
    Marker.Disable($1643)
    Pickup.Destroy($BUY_ASSET_PICKUPS[22])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[22] $Y_PROPERTY_TO_BUY[22] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[22] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[22] $Y_PROPERTY_TO_BUY[22] $Z_PROPERTY_TO_BUY[22] price $1675  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1643 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[22] $Y_PROPERTY_TO_BUY[22] $Z_PROPERTY_TO_BUY[22]
    018B: set_marker $1643 radar_mode 2
    Marker.Disable($1646)
    Pickup.Destroy($BUY_ASSET_PICKUPS[25])
    Garage.Deactivate('BURBDO2')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[25] $Y_PROPERTY_TO_BUY[25] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[25] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[25] $Y_PROPERTY_TO_BUY[25] $Z_PROPERTY_TO_BUY[25] price $1678  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1646 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[25] $Y_PROPERTY_TO_BUY[25] $Z_PROPERTY_TO_BUY[25]
    018B: set_marker $1646 radar_mode 2
    Marker.Disable($1652)
    Pickup.Destroy($BUY_ASSET_PICKUPS[31])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[31] $Y_PROPERTY_TO_BUY[31] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[31] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[31] $Y_PROPERTY_TO_BUY[31] $Z_PROPERTY_TO_BUY[31] price $1684  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1652 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[31] $Y_PROPERTY_TO_BUY[31] $Z_PROPERTY_TO_BUY[31]
    018B: set_marker $1652 radar_mode 2
    1@ = 1
end
jump @HOUSE_3

:HOUSE_3
wait 0
if and
  $STAT_UNLOCKED_CITIES_NUMBER > 0
  2@ = 0
then
if or
  $TRUTH_TOTAL_PASSED_MISSIONS > 1
  $23 == 1
then
    Marker.Disable($1632)
    Pickup.Destroy($BUY_ASSET_PICKUPS[11])
    Garage.Deactivate('SAV1SFE')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[11] $Y_PROPERTY_TO_BUY[11] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[11] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[11] $Y_PROPERTY_TO_BUY[11] $Z_PROPERTY_TO_BUY[11] price $1664  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1632 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[11] $Y_PROPERTY_TO_BUY[11] $Z_PROPERTY_TO_BUY[11]
    018B: set_marker $1632 radar_mode 2
    Marker.Disable($1634)
    Pickup.Destroy($BUY_ASSET_PICKUPS[13])
    Garage.Deactivate('SAV1SFW')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[13] $Y_PROPERTY_TO_BUY[13] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[13] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[13] $Y_PROPERTY_TO_BUY[13] $Z_PROPERTY_TO_BUY[13] price $1666  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1634 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[13] $Y_PROPERTY_TO_BUY[13] $Z_PROPERTY_TO_BUY[13]
    018B: set_marker $1634 radar_mode 2
    Marker.Disable($1635)
    Pickup.Destroy($BUY_ASSET_PICKUPS[14])
    Garage.Deactivate('SVGSFS1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[14] $Y_PROPERTY_TO_BUY[14] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[14] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[14] $Y_PROPERTY_TO_BUY[14] $Z_PROPERTY_TO_BUY[14] price $1667  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1635 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[14] $Y_PROPERTY_TO_BUY[14] $Z_PROPERTY_TO_BUY[14]
    018B: set_marker $1635 radar_mode 2
    Marker.Disable($1639)
    Pickup.Destroy($BUY_ASSET_PICKUPS[18])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[18] $Y_PROPERTY_TO_BUY[18] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[18] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[18] $Y_PROPERTY_TO_BUY[18] $Z_PROPERTY_TO_BUY[18] price $1671  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1639 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[18] $Y_PROPERTY_TO_BUY[18] $Z_PROPERTY_TO_BUY[18]
    018B: set_marker $1639 radar_mode 2
    Marker.Disable($1641)
    Pickup.Destroy($BUY_ASSET_PICKUPS[20])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[20] $Y_PROPERTY_TO_BUY[20] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[20] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[20] $Y_PROPERTY_TO_BUY[20] $Z_PROPERTY_TO_BUY[20] price $1673  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1641 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[20] $Y_PROPERTY_TO_BUY[20] $Z_PROPERTY_TO_BUY[20]
    018B: set_marker $1641 radar_mode 2
    Marker.Disable($1642)
    Pickup.Destroy($BUY_ASSET_PICKUPS[21])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[21] $Y_PROPERTY_TO_BUY[21] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[21] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[21] $Y_PROPERTY_TO_BUY[21] $Z_PROPERTY_TO_BUY[21] price $1674  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1642 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[21] $Y_PROPERTY_TO_BUY[21] $Z_PROPERTY_TO_BUY[21]
    018B: set_marker $1642 radar_mode 2
    2@ = 1
end
end
jump @HOUSE_4

:HOUSE_4
wait 0
if and
  $STAT_UNLOCKED_CITIES_NUMBER > 1
  3@ == 0
then
    Marker.Disable($1626)
    Pickup.Destroy($BUY_ASSET_PICKUPS[5])
    Garage.Deactivate('CN2GAR1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[5] $Y_PROPERTY_TO_BUY[5] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[5] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[5] $Y_PROPERTY_TO_BUY[5] $Z_PROPERTY_TO_BUY[5] price $1658  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1626 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[5] $Y_PROPERTY_TO_BUY[5] $Z_PROPERTY_TO_BUY[5]
    018B: set_marker $1626 radar_mode 2
    Marker.Disable($1644)
    Pickup.Destroy($BUY_ASSET_PICKUPS[23])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[23] $Y_PROPERTY_TO_BUY[23] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[23] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[23] $Y_PROPERTY_TO_BUY[23] $Z_PROPERTY_TO_BUY[23] price $1676  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1644 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[23] $Y_PROPERTY_TO_BUY[23] $Z_PROPERTY_TO_BUY[23]
    018B: set_marker $1644 radar_mode 2
    Marker.Disable($1645)
    Pickup.Destroy($BUY_ASSET_PICKUPS[24])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[24] $Y_PROPERTY_TO_BUY[24] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[24] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[24] $Y_PROPERTY_TO_BUY[24] $Z_PROPERTY_TO_BUY[24] price $1677  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1645 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[24] $Y_PROPERTY_TO_BUY[24] $Z_PROPERTY_TO_BUY[24]
    018B: set_marker $1645 radar_mode 2
    3@ = 1
end
jump @HOUSE_5

:HOUSE_5
wait 0
if and
  $STAT_UNLOCKED_CITIES_NUMBER > 1
  4@ ==0
then
if or
  $1403 == 1
  $23 == 1
then
    Marker.Disable($1625)
    Pickup.Destroy($BUY_ASSET_PICKUPS[4])
    Garage.Deactivate('VESVGRG')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[4] $Y_PROPERTY_TO_BUY[4] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[4] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[4] $Y_PROPERTY_TO_BUY[4] $Z_PROPERTY_TO_BUY[4] price $1657  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1625 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[4] $Y_PROPERTY_TO_BUY[4] $Z_PROPERTY_TO_BUY[4]
    018B: set_marker $1625 radar_mode 2
    Marker.Disable($1627)
    Pickup.Destroy($BUY_ASSET_PICKUPS[6])
    Garage.Deactivate('BLOB69')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[6] $Y_PROPERTY_TO_BUY[6] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[6] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[6] $Y_PROPERTY_TO_BUY[6] $Z_PROPERTY_TO_BUY[6] price $1659  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1627 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[6] $Y_PROPERTY_TO_BUY[6] $Z_PROPERTY_TO_BUY[6]
    018B: set_marker $1627 radar_mode 2
    Marker.Disable($1628)
    Pickup.Destroy($BUY_ASSET_PICKUPS[7])
    Garage.Deactivate('BLOB7')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[7] $Y_PROPERTY_TO_BUY[7] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[7] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[7] $Y_PROPERTY_TO_BUY[7] $Z_PROPERTY_TO_BUY[7] price $1660  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1628 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[7] $Y_PROPERTY_TO_BUY[7] $Z_PROPERTY_TO_BUY[7]
    018B: set_marker $1628 radar_mode 2
    Marker.Disable($1630)
    Pickup.Destroy($BUY_ASSET_PICKUPS[9])
    Garage.Deactivate('BLOB6')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[9] $Y_PROPERTY_TO_BUY[9] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[9] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[9] $Y_PROPERTY_TO_BUY[9] $Z_PROPERTY_TO_BUY[9] price $1662  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1630 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[9] $Y_PROPERTY_TO_BUY[9] $Z_PROPERTY_TO_BUY[9]
    018B: set_marker $1630 radar_mode 2
    Marker.Disable($1637)
    Pickup.Destroy($BUY_ASSET_PICKUPS[16])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[16] $Y_PROPERTY_TO_BUY[16] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[16] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[16] $Y_PROPERTY_TO_BUY[16] $Z_PROPERTY_TO_BUY[16] price $1669  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1637 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[16] $Y_PROPERTY_TO_BUY[16] $Z_PROPERTY_TO_BUY[16]
    018B: set_marker $1637 radar_mode 2
    Marker.Disable($1638)
    Pickup.Destroy($BUY_ASSET_PICKUPS[17])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[17] $Y_PROPERTY_TO_BUY[17] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[17] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[17] $Y_PROPERTY_TO_BUY[17] $Z_PROPERTY_TO_BUY[17] price $1670  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1638 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[17] $Y_PROPERTY_TO_BUY[17] $Z_PROPERTY_TO_BUY[17]
    018B: set_marker $1638 radar_mode 2
    Marker.Disable($1648)
    Pickup.Destroy($BUY_ASSET_PICKUPS[27])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[27] $Y_PROPERTY_TO_BUY[27] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[27] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[27] $Y_PROPERTY_TO_BUY[27] $Z_PROPERTY_TO_BUY[27] price $1680  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1648 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[27] $Y_PROPERTY_TO_BUY[27] $Z_PROPERTY_TO_BUY[27]
    018B: set_marker $1648 radar_mode 2
    Marker.Disable($1649)
    Pickup.Destroy($BUY_ASSET_PICKUPS[28])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[28] $Y_PROPERTY_TO_BUY[28] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[28] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[28] $Y_PROPERTY_TO_BUY[28] $Z_PROPERTY_TO_BUY[28] price $1681  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1649 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[28] $Y_PROPERTY_TO_BUY[28] $Z_PROPERTY_TO_BUY[28]
    018B: set_marker $1649 radar_mode 2
    Marker.Disable($1650)
    Pickup.Destroy($BUY_ASSET_PICKUPS[29])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[29] $Y_PROPERTY_TO_BUY[29] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[29] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[29] $Y_PROPERTY_TO_BUY[29] $Z_PROPERTY_TO_BUY[29] price $1682  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1650 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[29] $Y_PROPERTY_TO_BUY[29] $Z_PROPERTY_TO_BUY[29]
    018B: set_marker $1650 radar_mode 2
    4@ = 1
end
end
jump @HOUSE_6

:HOUSE_6
wait 0
if
    5@ == 0
    then
    Marker.Disable($1624)
    Pickup.Destroy($BUY_ASSET_PICKUPS[3])
     Garage.Deactivate('BEACSV')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[3] $Y_PROPERTY_TO_BUY[3] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[3] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[3] $Y_PROPERTY_TO_BUY[3] $Z_PROPERTY_TO_BUY[3] price $1656  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1624 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[3] $Y_PROPERTY_TO_BUY[3] $Z_PROPERTY_TO_BUY[3]
    018B: set_marker $1624 radar_mode 2
    5@ = 1
    end
    if
    6@ == 0
    then
    Marker.Disable($1631)
    Pickup.Destroy($BUY_ASSET_PICKUPS[10])
    Garage.Deactivate('CARLAS1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[10] $Y_PROPERTY_TO_BUY[10] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[10] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[10] $Y_PROPERTY_TO_BUY[10] $Z_PROPERTY_TO_BUY[10] price $1663  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1631 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[10] $Y_PROPERTY_TO_BUY[10] $Z_PROPERTY_TO_BUY[10]
    018B: set_marker $1631 radar_mode 2
    6@ = 1
    end
    if
    7@ == 0
    then
    Marker.Disable($1633)
    Pickup.Destroy($BUY_ASSET_PICKUPS[12])
    Garage.Deactivate('CESAFE1')
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[12] $Y_PROPERTY_TO_BUY[12] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[12] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[12] $Y_PROPERTY_TO_BUY[12] $Z_PROPERTY_TO_BUY[12] price $1665  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1633 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[12] $Y_PROPERTY_TO_BUY[12] $Z_PROPERTY_TO_BUY[12]
    018B: set_marker $1633 radar_mode 2
    7@ = 1
    end
    if
    8@ == 0
    then
    Marker.Disable($1636)
    Pickup.Destroy($BUY_ASSET_PICKUPS[15])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[15] $Y_PROPERTY_TO_BUY[15] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[15] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[15] $Y_PROPERTY_TO_BUY[15] $Z_PROPERTY_TO_BUY[15] price $1668  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1636 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[15] $Y_PROPERTY_TO_BUY[15] $Z_PROPERTY_TO_BUY[15]
    018B: set_marker $1636 radar_mode 2
    8@ = 1
    end
    if
    9@ == 0
    then
    Marker.Disable($1647)
    Pickup.Destroy($BUY_ASSET_PICKUPS[26])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[26] $Y_PROPERTY_TO_BUY[26] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[26] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[26] $Y_PROPERTY_TO_BUY[26] $Z_PROPERTY_TO_BUY[26] price $1679  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1647 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[26] $Y_PROPERTY_TO_BUY[26] $Z_PROPERTY_TO_BUY[26]
    018B: set_marker $1647 radar_mode 2
    9@ = 1
    end
    if
    10@ == 0
    then
    Marker.Disable($1651)
    Pickup.Destroy($BUY_ASSET_PICKUPS[30])
    09B4: set_object_property_at $X_PROPERTY_TO_BUY[30] $Y_PROPERTY_TO_BUY[30] radius 10.0 bitmask 16384 flag 0
    0518: $BUY_ASSET_PICKUPS[30] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[30] $Y_PROPERTY_TO_BUY[30] $Z_PROPERTY_TO_BUY[30] price $1683  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    0570: $1651 = create_asset_radar_marker_with_icon 31 at $X_PROPERTY_TO_BUY[30] $Y_PROPERTY_TO_BUY[30] $Z_PROPERTY_TO_BUY[30]
    018B: set_marker $1651 radar_mode 2
    10@ = 1
    end
jump @HOUSE_7

:HOUSE_7
wait $DEFAULT_WAIT_TIME
if or
12@ == 0
13@ == 0
14@ == 0
then
if
12@ == 0
then
0AAA: 12@ = thread 'BUY1' pointer
if
not 12@ == 0
then
    wait 1000
    $1653 = 250000
    Pickup.Destroy($BUY_ASSET_PICKUPS[0])
    0518: $BUY_ASSET_PICKUPS[0] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[0] $Y_PROPERTY_TO_BUY[0] $Z_PROPERTY_TO_BUY[0] price $1653  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    12@ = 1
end
end
if
13@ == 0
then
0AAA: 13@ = thread 'BUY2' pointer
if
not 13@ == 0
then
    wait 1000
    $1654 = 150000
    Pickup.Destroy($BUY_ASSET_PICKUPS[1])
    0518: $BUY_ASSET_PICKUPS[1] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[1] $Y_PROPERTY_TO_BUY[1] $Z_PROPERTY_TO_BUY[1] price $1654  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    13@ = 1
end
end
if
14@ == 0
then
0AAA: 14@ = thread 'BUY3' pointer
if
not 14@ == 0
then
    wait 1000
    $1655 = 300000
    Pickup.Destroy($BUY_ASSET_PICKUPS[2])
    0518: $BUY_ASSET_PICKUPS[2] = create_available_asset_pickup 'PROP_3' at $X_PROPERTY_TO_BUY[2] $Y_PROPERTY_TO_BUY[2] $Z_PROPERTY_TO_BUY[2] price $1655  // a›m ~k~~PED_ANSWER_PHONE~, ™to˜« ky£t¬ ¦tot šom.
    14@ = 1
end
end
else
0A93: end_custom_thread
end
jump @HOUSE_7
Ахуеть, как ты это скомпелирован вообще? Метки смешаны с высокуструктироваными хуйнями. Нулевого оффсета нету.
Короче попробуй так
CLEO:
Alloc 1@ 567 // выделили память
1@ = 10000000 // выставляем цену
// Используем переменную вместо цифр.
Free 1@ // освобождаем память переменной

Как сравнить такие переменные?
----------------------
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
11@ = 2231.891846
12@ = -2284.0
13@ = 14.4
...
if and
1@ == 11@
2@ == 12@
3@ == 13@
then
...
--------------------
Ищи в CTRL + ALT + 2
Опркод ну вот так
@ = @, и потом вы коментарий должно быть (float) это будет нужным опкодом

00BF: 1@ = current_time_hours, 2@ = current_time_minutes
почему 2@ всегда 0 ровна?
Ты его вы сампе юзаешь?
 
  • Нравится
Реакции: Svyatogor2007

D[a]Ni

Участник
63
3
Ахуеть, как ты это скомпелирован вообще? Метки смешаны с высокуструктироваными хуйнями. Нулевого оффсета нету.
Короче попробуй так
CLEO:
Alloc 1@ 567 // выделили память
1@ = 10000000 // выставляем цену
// Используем переменную вместо цифр.
Free 1@ // освобождаем память переменной


Ищи в CTRL + ALT + 2
Опркод ну вот так
@ = @, и потом вы коментарий должно быть (float) это будет нужным опкодом


Ты его вы сампе юзаешь?
да, часы он получает, а минуты нет
 

хуесос)

Известный
263
63

D[a]Ni

Участник
63
3
Скорее всего этот опкод работает только вы сингле, я в этом уверен. Проверь вы сингле он также работает?Эсли работает коректно(вы сингле), то юзай эту штуку для сампа.
https://blast.hk/threads/897/#post-15915
спасибо, ещё немного математики))) Работа со временм 1@ = 18 (час) 2@ = 40 (минуты) и 3@ = 19 (часы) 4@ = 20 (минуты) как мне найти сколько между ними минут?)