Advertisement
Guest User

Untitled

a guest
Aug 12th, 2013
229
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.81 KB | None | 0 0
  1. {$CLEO .cs}
  2. 0662: NOP "CLEO : SF Dialog lesson"
  3. 0662: NOP "mgmoldova : gcode : 2013"
  4. thread "lessondialog"
  5.  
  6. if
  7. 8AF7: get_samp_base_to 33@
  8. then
  9. 0A93: end_custom_thread
  10. end
  11. repeat
  12. wait 400
  13. until 0AFA: is_samp_structures_available
  14. 0B34: samp register_client_command "lesson" to_label @lesson
  15. 26@ = 0
  16. Dialog.Create(29@,"Test Dialog")
  17. 0B5A: get_screen_resolution 0@ 28@
  18. 28@ /= 2
  19.  
  20. 0B91: samp dialog 26@ add_static id 0x01 text "текст1" pos_XY 0 0 size 160 24
  21. 0B91: samp dialog 28@ add_static id 0x01 text "текст2" pos_XY 0 3 size 160 24
  22. 0B91: samp dialog 29@ add_static id 0x01 text "текст3" pos_XY 0 6 size 160 24
  23.  
  24. while true
  25. wait 0
  26. end
  27.  
  28. :lesson
  29. if
  30. 26@ == 0
  31. then
  32. 26@ = 1
  33. 0B86: samp dialog 29@ set_visible true
  34. else
  35. 26@ = 0
  36. 0B86: samp dialog 29@ set_visible false
  37. end
  38. 0B43: samp cmd_ret
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement