Advertisement
J16D

example const-end

May 18th, 2014
410
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.73 KB | None | 0 0
  1. {
  2. example const-end
  3. http://j16d.blogspot.com
  4. }
  5.  
  6. const
  7. NEW_ACTOR = 15@
  8. end
  9.  
  10. {$CLEO}
  11. 0000:
  12. while true
  13. if 0AB0: key_pressed 8 // backspace
  14. then
  15. 0ACA: show_text_box "actor created"
  16. 04C4: store_coords_to 2@ 3@ 4@ from_actor 215@ with_offset 1.0 3.0 1.0
  17. 02CE: 4@ = ground_z_at 2@ 3@ 4@
  18. 009A: NEW_ACTOR = create_actor_pedtype 4 model #MALE01 at 2@ 3@ 4@
  19.  
  20. wait 500 /// prevent key looping
  21.  
  22. repeat
  23. wait 0
  24. until 0AB0: key_pressed 8 // backspace
  25.  
  26. 0223: set_actor NEW_ACTOR health_to 0
  27. 01C2: remove_references_to_actor NEW_ACTOR // Like turning an actor into a random pedestrian
  28. 0ACA: show_text_box "actor killed"
  29. wait 500 /// prevent key looping
  30. end
  31. wait 0
  32. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement