SannyBuilder.com Forums

Вот написал на досуге
Что типа телепортера
При нажатии "Home" выводиться карта СА и с помощью стрелок двигаем указатель по карте. "Пробел" - выбрать точку и телепортироваться туда "Enter" - отменить и забрать карту

// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007

{$VERSION 3.1.0027}
{$CLEO .CS}

//-------------MAIN---------------
0000: NOP 
wait 3000 

:NONAME_7
wait 0 
if 
   Player.Defined($PLAYER_CHAR)
else_jump @NONAME_7 
0AB0:   key_pressed 36 
else_jump @NONAME_7 
0391: release_txd_dictionary 
0390: load_txd_dictionary "MAP" 
038F: load_texture "MAP" as 1 // Load dictionary with 0390 first 
038F: load_texture "MARKER" as 2 // Load dictionary with 0390 first 
15@ = 250 
1@ = 320.0 
2@ = 224.0 
3@ = 10.0 
4@ = 7.0 
038D: draw_texture 1 position 320.0 224.0 size 640.0 448.0 RGBA 255 255 255 15@ 
038D: draw_texture 2 position 1@ 2@ size 10.0 7.0 RGBA 255 255 255 15@ 

:NONAME_205
wait 0 
if and
0AB0:   key_pressed 38 
  2@ > 0.0 
else_jump @NONAME_314 
0063: 2@ -= 4@ // (float) 
03F0: enable_text_draw 0 
038D: draw_texture 1 position 320.0 224.0 size 640.0 448.0 RGBA 255 255 255 15@ 
038D: draw_texture 2 position 1@ 2@ size 10.0 7.0 RGBA 255 255 255 15@ 

:NONAME_314
wait 0 
if and
0AB0:   key_pressed 40 
  448.0 > 2@ 
else_jump @NONAME_423 
005B: 2@ += 4@ // (float) 
03F0: enable_text_draw 0 
038D: draw_texture 1 position 320.0 224.0 size 640.0 448.0 RGBA 255 255 255 15@ 
038D: draw_texture 2 position 1@ 2@ size 10.0 7.0 RGBA 255 255 255 15@ 

:NONAME_423
wait 0 
if and
0AB0:   key_pressed 37 
  1@ > 0.0 
else_jump @NONAME_532 
0063: 1@ -= 3@ // (float) 
03F0: enable_text_draw 0 
038D: draw_texture 1 position 320.0 224.0 size 640.0 448.0 RGBA 255 255 255 15@ 
038D: draw_texture 2 position 1@ 2@ size 10.0 7.0 RGBA 255 255 255 15@ 

:NONAME_532
wait 0 
if and
  640.0 > 1@ 
0AB0:   key_pressed 39 
else_jump @NONAME_641 
005B: 1@ += 3@ // (float) 
03F0: enable_text_draw 0 
038D: draw_texture 1 position 320.0 224.0 size 640.0 448.0 RGBA 255 255 255 15@ 
038D: draw_texture 2 position 1@ 2@ size 10.0 7.0 RGBA 255 255 255 15@ 

:NONAME_641
wait 0 
0AB0:   key_pressed 32 
else_jump @NONAME_1054 
  1@ >= 320.0 
else_jump @NONAME_718 
1@ -= 320.0 
11@ = 3000.0 
11@ /= 320.0 
0013: 1@ *= 11@  // Note: the incorrect math opcode was used here
jump @NONAME_784 

:NONAME_718
wait 0 
  320.0 > 1@ 
else_jump @NONAME_1054 
1@ -= 320.0 
11@ = 3000.0 
11@ /= 320.0 
0013: 1@ *= 11@  // Note: the incorrect math opcode was used here
jump @NONAME_784 

:NONAME_784
wait 0 
  2@ >= 224.0 
else_jump @NONAME_860 
2@ -= 224.0 
12@ = 3000.0 
12@ /= 224.0 
0013: 2@ *= 12@  // Note: the incorrect math opcode was used here
2@ *= -1.0 
jump @NONAME_936 

:NONAME_860
wait 0 
  224.0 > 2@ 
else_jump @NONAME_1054 
2@ -= 224.0 
12@ = 3000.0 
12@ /= 224.0 
0013: 2@ *= 12@  // Note: the incorrect math opcode was used here
2@ *= -1.0 
jump @NONAME_936 

:NONAME_936
02CE: 23@ = ground_z_at 1@ 2@ 0.0 
23@ *= -1.0 
23@ += 10 
03F0: enable_text_draw 0 
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, -500.0)
jump @NONAME_7 

:NONAME_1054
wait 0 
0AB0:   key_pressed 13 
else_jump @NONAME_205 
03F0: enable_text_draw 0 
0000: NOP 
jump @NONAME_7

+ текстурки