Переведите пожалуйста код в код SCM

akira19 · 15-12-2007 04:12

TestObject:
 if (KEYDOWN(VK_DELETE) && KEYDOWN(VK_U)) //INSERT + U
  {pPlayerActor->GetActorCoordOffset(0.0, 1.5, -0.5, &fX, &fY, &fZ);
   pGame->LoadModel(1792);
   pTestObj->IntObject(1792, fX, fY, fZ);
   pGame->ReleaseModel(1792);
   pTestObj->ObjLiftable(1);
  goto FreezeClock;
  } else {
   goto ToggleRiotsOn;}

В SCM Пожалуйста,
И подскажите куда писать координаты, и потом куда приклеить код.

Спасибо большое.

Agenzvell · 15-12-2007 04:22

Структуру я не понял. Это ты из ехе откопал?
Насчет SCM. Ты зачем каментишь весь код? Он будет занимать только место, удали { и }.
Чтобы вставить координаты, в SB жми Ctrl+Shift+C
"Приклей" в main.scm или CLEO
Если в main то ставь перед Mission 0
и впиши название потока туда где стоят остальные потоки.

akira19 · 15-12-2007 10:40

Этот код написал мой дружбан... но он не умеет писать на .scm
Он сказал что код рабочий.

Помогите мне а?

akira19 · 15-12-2007 21:37

Мой друг начил мне помогать.. но он не знает как закончить:
помогите кто может:

wait 0 
Actor.StorePos($PLAYER_ACTOR, 0.0, 1.5, -0.5)
Model.Load(#1792)
27@ = Object.Init(#1792, $11994, $11995, $11996)

Sanchez · 15-12-2007 22:06

{$CLEO}

:TestObject
if and
    0AB0:  key_pressed 0x2D // Insert
    0AB0:  key_pressed 0x55 // U
then
    04C4: store_coords_to 0@ 1@ 2@ from_actor $PLAYER_ACTOR with_offset 0.0 1.5 -0.5
    Model.Load(1792)
    3@ = Object.Init(1792, 0@, 1@, 2@)
    Model.Destroy(1792)
    08E9: set_object 3@ liftable 1
    gosub @FreezeClock      // ??? 
else
    gosub @ToggleRiotsOn    // ???
end
0A93: end_custom_thread

akira19 · 15-12-2007 22:55

wow... большое спасибо санчез

Сделать клео файл, и все будет работать?

Как оно работает?

Agenzvell · 16-12-2007 00:19

да. Компилируешь и кидаешь файл в директорию с CLEO.
Как оно работает? Ты должен знать смысл кода. Ты же записал координаты объекта в переменные, жми Insert+U и смотри результат.

P.S: Сообщи другу что CLEO не поддерживает глобальные переменные, кроме общеупотребительных, вроде $PLAYER_CHAR, $PLAYER_ACTOR etc.

Last edited by Agenzvell (16-12-2007 00:22)

akira19 · 16-12-2007 00:22

Ой.. Agenzvell скажи... а как сделать так чтобы объект падал на против меня?

Alexander · 16-12-2007 00:23

код FreezeClock'n'ToggleRiotsOn встудию grin

Agenzvell · 16-12-2007 00:24

04C4: store_coords_to 0@ 1@ 2@ from_actor $PLAYER_ACTOR with_offset 0.0 1.5 -0.5
меняй числа после слова offset на эти:
0.0 10.0 3.0

akira19 · 16-12-2007 00:26

код FreezeClock'n'ToggleRiotsOn встудию

А что с ними не так?

И правда... почему там вопросы на @FreezeClock
И на gosub @ToggleRiotsOn ??

Last edited by akira19 (16-12-2007 00:29)

akira19 · 16-12-2007 00:32

Я всего лишь хочу чтоб при нажатии Insert+U на против меня падал телевизор.. и чтоб я мог подойти и взять его в руки.
и чтоб таким образом я мог скинуть сколько за хочу телеков.

akira19 · 16-12-2007 00:42

Я думал ты понимаеш анг. smile

Я написал что всеволиш хочу скинуть 15 16 телевизоров..
могу ли я это сделать с этим кодом, или только один телевизор?

akira19 · 16-12-2007 00:49

какого потока? тоесть добавить 0000: NOP в начале кода после {$CLEO} ?

Agenzvell · 16-12-2007 00:51

да, но гарантированей создать поток перед Test Object и туда вписать 0000: NOP
Но вобше, я плохо шарю в CLEO, поэтому, возможно ошибаюсь.
Alexander знает точно.

akira19 · 16-12-2007 00:54

Вот что я сделал.. но он мне даже 1 телевизор не даёт :wow:

{$CLEO}

:TestObject
if and
    0AB0:  key_pressed 0x2D // Insert
    0AB0:  key_pressed 0x55 // U
then
    04C4: store_coords_to 0@ 1@ 2@ from_actor $PLAYER_ACTOR with_offset 0.0 10.0 3.0
    Model.Load(1792)
    3@ = Object.Init(1792, 0@, 1@, 2@)
    Model.Destroy(1792)
    08E9: set_object 3@ liftable 1
end
0A93: end_custom_thread

Agenzvell · 16-12-2007 00:57

Не советовал бы использовать Object.Init лучше юзай Object.Create
и вставь сразу после {$CLEO} DEFINE OBJECT 1792

akira19 · 16-12-2007 01:00

пишет ошибку Unknown directive DEFINE OBJECT 1792....

Last edited by akira19 (16-12-2007 01:01)

Agenzvell · 16-12-2007 01:06

работает, нет?

akira19 · 16-12-2007 01:09

Дай Icq.. так будет удобней

Сделал DEFINE OBJECT SWANK_TV_1 всеравно пишет ошибку

ПС. что это такое? Model.Destroy(1792)

Last edited by akira19 (16-12-2007 01:11)

akira19 · 16-12-2007 01:13

А нахрена его уничтожть?

akira19 · 16-12-2007 01:27

CLEO намного удобней sad
почемуже оно не работает

Agenzvell · 16-12-2007 01:29

Сам говоришь CLEO не хочет. У меня тоже не получается.
Ошибка где-то в коде у тебя.
Нету wait`a. Поставь сразу после строки :TestObject слово wait 3000

Last edited by Agenzvell (16-12-2007 01:31)

akira19 · 16-12-2007 01:36

не работает

Agenzvell · 16-12-2007 01:38

Тогда придется ждать Seemann`a или кого-нибудь еще.

SannyBuilder.com Forums

#1 15-12-2007 04:12

Переведите пожалуйста код в код SCM

#2 15-12-2007 04:22

Re: Переведите пожалуйста код в код SCM

#3 15-12-2007 10:40

Re: Переведите пожалуйста код в код SCM

#4 15-12-2007 21:37

Re: Переведите пожалуйста код в код SCM

#5 15-12-2007 22:06

Re: Переведите пожалуйста код в код SCM

#6 15-12-2007 22:55

Re: Переведите пожалуйста код в код SCM

#7 16-12-2007 00:19

Re: Переведите пожалуйста код в код SCM

#8 16-12-2007 00:22

Re: Переведите пожалуйста код в код SCM

#9 16-12-2007 00:23

Re: Переведите пожалуйста код в код SCM

#10 16-12-2007 00:24

Re: Переведите пожалуйста код в код SCM

#11 16-12-2007 00:26

Re: Переведите пожалуйста код в код SCM

#12 16-12-2007 00:32

Re: Переведите пожалуйста код в код SCM

#13 16-12-2007 00:42

Re: Переведите пожалуйста код в код SCM

#14 16-12-2007 00:49

Re: Переведите пожалуйста код в код SCM

#15 16-12-2007 00:51

Re: Переведите пожалуйста код в код SCM

#16 16-12-2007 00:54

Re: Переведите пожалуйста код в код SCM

#17 16-12-2007 00:57

Re: Переведите пожалуйста код в код SCM

#18 16-12-2007 01:00

Re: Переведите пожалуйста код в код SCM

#19 16-12-2007 01:06

Re: Переведите пожалуйста код в код SCM

#20 16-12-2007 01:09

Re: Переведите пожалуйста код в код SCM

#21 16-12-2007 01:13

Re: Переведите пожалуйста код в код SCM

#22 16-12-2007 01:27

Re: Переведите пожалуйста код в код SCM

#23 16-12-2007 01:29

Re: Переведите пожалуйста код в код SCM

#24 16-12-2007 01:36

Re: Переведите пожалуйста код в код SCM

#25 16-12-2007 01:38

Re: Переведите пожалуйста код в код SCM

Board footer