SannyBuilder.com Forums

{$CLEO}
0A95: enable_thread_saving

if
    0@ == 0
then
    014B: 1@ = init_parked_car_generator #ADMIRAL color -1 -1 1 alarm 0 door_lock 0 0 10000 at -2035.194 170.770 28.462 angle 90.0
    014C: set_parked_car_generator 1@ cars_to_generate_to 101
    
    014B: 2@ = init_parked_car_generator #BULLET color -1 -1 1 alarm 0 door_lock 0 0 10000 at -2035.194 170.770 28.462 angle 90.0
    014C: set_parked_car_generator 2@ cars_to_generate_to 101
    
    // ...
    
    014B: 31@ = init_parked_car_generator #NRG500 color -1 -1 1 alarm 0 door_lock 0 0 10000 at -2035.194 170.770 28.462 angle 90.0
    014C: set_parked_car_generator 31@ cars_to_generate_to 101     
    
    0@ = 1
end
0A93: end_custom_thread

{$CLEO}

const
    i = 12@
    playerCar = 13@
end

var
    0@: Array 6 of Integer
    6@: Array 6 of Integer
end

0@ = 0x68
1@ = 0x62
2@ = 0x67
3@ = 0x69
4@ = 0x61
5@ = 0x63

{
for i = 0 to 5
    6@[i] = 0
end
}

while true
    wait 0
    if
        Player.Defined($PLAYER_CHAR)
    then
        if
            Actor.Driving($PLAYER_ACTOR)
        then
            03C0: playerCar = actor $PLAYER_ACTOR car 
            gosub @Proc
        end
    end
end

:Proc
for i = 0 to 5
    if and
        0AB0:  key_pressed 0x11
        0AB0:  key_pressed 0@[i]
    then
        {
        if
            88A7:   not car playerCar componentA i opened_or_not_present
        then
            0657: car playerCar open_componentA i
        else
            068A: set_car playerCar repair_componentA i 
        end
        }
        if
            6@[i] == 0    
        then
            6@[i] = 1
            0657: car playerCar open_componentA i
            wait 100
            return
        end
        if
            6@[i] == 1   
        then
            6@[i] = 0
            068A: set_car playerCar repair_componentA i
            wait 100
            return
        end 
    end
end
return

Открывает капот, багажник и двери. Клавиши: Ctrl + Num123789. Можешь поменять на свои.

Как вариант использовать опкод:

068A: set_car $RYDER_CAR repair_componentA 2

@cooler21 - добавь проверку еще на это событие:

EVENT_KNOCK_OFF_BIKE 8

Здоровье машины и время целые, а не дробные величины.

Для прверки жизней существует опкод:

0185:   car 73@ health >= 700
8185:   not car $SWEET_CAR health >= 250

{$CLEO}

0000:

while true
    wait 0
    if
        Player.Defined($PLAYER_CHAR)
    then
        if
            Actor.Driving($PLAYER_ACTOR)
        then
            03C0: 0@ = actor $PLAYER_ACTOR car
            while true
                wait 0
                if
                   not Actor.InCar($PLAYER_ACTOR, 0@)
                then
                    Car.RemoveReferences(0@) 
                    Break
                end
                if
                    8185:   not car 0@ health >= 500
                then
                    0209: 1@ = random_int_in_ranges 1000 5000
                    wait 1@ 
                    02D4: car 0@ turn_off_engine
                    Car.RemoveReferences(0@) 
                end 
            end 
        end
    end
end

ИМХО из всего вышеперечисленного нужно только RSS, хотя можно установить, но только как форум, для сайта лучше какую-нибудь CMS выбрать.

В оригинальной миссии короны создаться вот здесь (KICKSTA_7904):

:KICKSTA_8084
024F: create_corona_with_radius 249@ type 0 lensflares 0 with_color 250@ 251@ 252@ at 50@(253@,33f) 83@(253@,33f) 116@(253@,33f) 
if 
00FE:   actor $PLAYER_ACTOR sphere 0 in_sphere 50@(253@,33f) 83@(253@,33f) 116@(253@,33f) radius 1.5 1.5 1.5 
else_jump @KICKSTA_8425

тут сразу идет проверка, находиться ли игрок около короны или нет.

У меня все работает и короны создаються.

Попробуй опкодом 06D5 с типами 3 или 4.

06D5: 449@ = create_racing_checkpoint_at $TEMPVAR_FLOAT_1 $TEMPVAR_FLOAT_2 $TEMPVAR_FLOAT_3 point_to $TEMPVAR_FLOAT_1 $TEMPVAR_FLOAT_2 $TEMPVAR_FLOAT_3 type 205@ radius 6.0

Первый элемент массивы должен быть с индексом 0:

$corona_X[0] = -1388.63
$corona_Y[0] = 1486.48
$corona_Z[0] = 305.919
$corona_X[1] = -1437.12
$corona_Y[1] = 1434.81
$corona_Z[1] = 315.836
$corona_X[2] = -1417.71
$corona_Y[2] = 1544.8
$corona_Z[2] = 302.693

BOOL APIENTRY DllMain( HANDLE hModule, 
                       DWORD  ul_reason_for_call, 
                       LPVOID lpReserved
					 )
{
    switch (ul_reason_for_call)
	{
		case DLL_PROCESS_ATTACH:
		case DLL_THREAD_ATTACH:
		case DLL_THREAD_DETACH:
		case DLL_PROCESS_DETACH:
			break;
    }
    return TRUE;
}

0893: put_trailer 37@ on_cab 34@ 
07AC: detach_trailer 37@ from_cab 34@

А команды такой и нет, все придется делать вручную.

Проверяй на целостность машины в потоке NONAME_301:

00D6: if
8119:   not car $10289 wrecked 
004D: jump_if_false @NONAME_394

Должно все быть нормально. Какую ошибку выдает компилятор?

Читай ФАК: http://sannybuilder.com/forums/viewtopic.php?id=90

if
    00EC:   actor $PLAYER_ACTOR 0 near_point 1812.369 -1929.922 radius 80.0 80.0
then
    020C: create_explosion_with_radius 0 at 72@ 73@ 74@ 
end

p.s.
Топик в Общие вопросы

Печать боле менее круглая, а спидометр овальный.