Игральная кость. Обработка для 1С


Простая обработка с использованием ГенераторСлучайныхЧисел() и элементов формы. Не требует внешних картинок. Подходит для платформы от 1С:Предприятие 8.2 (8.2.13.205) и выше.

Всё просто. Отнеситесь к этому как к развлечению. Иногда хочется и в серьезном деле поставить смайлик)

Добавлена вторая версия обработки. С оптимизацией кода 2012_03_04

 

27 Comments

  1. olegtymko

    чисто для фана?))) еще бы шутер на 1с-8.2 написали, было бы забавно)

    Reply
  2. haland

    (5) favorit432, (5), (6), (7) согласен) а за плюс большое спасибо!

    Reply
  3. рибак

    какое-то разнообразие, хорошо бы сделать несколько по вкусу,как в винде)

    Reply
  4. s3nsay

    спасиби, прикольная штука)

    Reply
  5. serko8547

    Привет, а можно я доработаю игрушку? сделаю второго игрока — компьютер, сделаю счет, возможность ставки, возможно цвет дорисую…

    а по поводу различных троллей, пишущих про шутер, уведомляю — на семерке дум таки написали, ходят о том упорные слухи.

    И еще: Критиковать — может — даже только что родившийся младенец, троллить — любой, не, не так, а вот так: ЛЮБОЙ кто может дотянуться до клавиатуры. А ты попробуй — напиши Фичу, придумай новую идею! напиши хотя бы пару страниц ИНТЕРЕСНОГО текста! что слабо? то-то же! А напишешь — понабежит троллей и критиков — так руки опустятся! НИЧЕГО творить не захочется!

    Автору: Респект и УВАЖУХА! за новую идею!

    Reply
  6. haland

    (11) serko8547, Спасибо за отзыв. Конечно можно дорабатывать. Буду только рад)

    Reply
  7. MaxDavid

    (11)

    По поводу дума — не об этом речь?

    Reply
  8. serko8547

    MaxDavid — Да.

    Reply
  9. echo77

    (0) Не пойму, кость выглядит как в анонсе или как на скриншотах?

    (11)на семерке дум таки написали или об этом ходят упорные слухи?

    Знаю точно что есть игра лабиринт на 1С (7.7, 8) есть и они на инфостарте

    Reply
  10. haland

    (15) echo77, Кость выглядит как на скриншотах. Целью данной обработки было показать возможность писать что то кроме БД только языком 1С, без подключения внешних компонент и флеш анимации.

    Reply
  11. serko8547

    кость выглядит как на скриншотах. Лабиринт — ссылка в этом посте есть. сообщение № 13

    Reply
  12. Tatitutu

    Я всегда за игрущки и их приветствую

    И всегда их смотрю и проверяю.

    В данном случаю ваша обработка не работает

    (сразу видно кто комментировал ее даже не скачивал, а если скачал то увы на запускал)

    Скажите номер релиза ? 1С:Предприятие 8.2 (8.2.14.537)

    Почему же не работает ?

    Потому что в процедуре ПриОткрытии()

    лишние «шевеления»

    ЭлементыФормы.Переключатель1.Доступность = Ложь;

    ЭлементыФормы.Переключатель2.Доступность = Ложь;

    ЭлементыФормы.Переключатель3.Доступность = Ложь;

    ЭлементыФормы.Переключатель4.Доступность = Ложь;

    ЭлементыФормы.Переключатель5.Доступность = Ложь;

    ЭлементыФормы.Переключатель6.Доступность = Ложь;

    ЭлементыФормы.Переключатель7.Доступность = Ложь;

    а .доступность = Истина

    не где не возвращаешь

    а реквизит Переключатель при Доступность = Ложь

    не виден на форме

    2.

    код ваш

    ЭлементыФормы.Переключатель1.Видимость = Ложь;

    ЭлементыФормы.Переключатель2.Видимость = Ложь;

    ЭлементыФормы.Переключатель3.Видимость = Ложь;

    ЭлементыФормы.Переключатель4.Видимость = Ложь;

    ЭлементыФормы.Переключатель5.Видимость = Ложь;

    ЭлементыФормы.Переключатель6.Видимость = Ложь;

    ЭлементыФормы.Переключатель7.Видимость = Ложь;

    можно заменить на

    Для Сч=1 По 7 Цикл

    ЭлементыФормы[«Переключатель»+Сч].Видимость= ложь;

    КонецЦикла;

    3.»Некрасиво» при открытии видеть пустую форму, почему сразу не бросить кубик ?

    Приложил исправленный файл

    По поводу лабиринтов

    Игра: Лабиринт для 1С (теперь и для 8.0-8.2)

    Игра: Лабиринт для 1С 7.7

    Reply
  13. Tatitutu

    сделай трехмерный вариант

    я сделал кубик рубик

    Reply
  14. popovalex

    Если бы кость 3D была бы, интереснее стало

    Reply
  15. roa4ik

    если бы еще немного над дизайном поработать…

    Reply
  16. krund

    отличный вариант скоротать время.

    Reply
  17. krund

    (21) popovalex, Это точно. Жаль автор сам не додумался. Тогда делай сам и прикалывайся

    Reply
  18. protlt

    Неплохо. Можно еще каких нибудь игрушек понаделать. Только вот обычно бухам вовсе не до них. Так что это все лишь пустая трата времени.)))))

    Reply
  19. serpisal

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

    Reply
  20. FatHer1C

    А моя демо-разработка http://infostart.ru/public/116204/ не нравится? Написана полностью на чистом 1С, но силами 1С реализовано только 10 кадров в секунду.

    Reply
  21. haland

    (27) FatHer1C, Возможно я чего то не понимаю, или обработка «Doodler» скомпилирована. Код совсем не прозрачен, это точно на чистом 1С?

    Reply
  22. Zas1402
    спасиби, прикольная штука)

    Та да прикольно

    Reply
  23. FatHer1C

    (28) я убрал код из поставки, а картинки в макетах в виде двоичных данных. Игровой цикл организуется так «ПодключитьОбработчикОжидания(«БезПараметров», 0.1, Истина)»(0.1 минимальное значение параметра для этой функции)именно по этому на чистом 1С не получается обойти ограничение в 10 кадров(в 7.7 можно было с помощью _GetPerformanceCount(), но кроме обработки больше ни к чему не было доступа во время игры!)

    Reply
  24. haland

    (24) krund, 3D без рисунков делать не получиться, а это уже совсем другая область. Кстати, подтверждаю свободное использование данной обработки в любом виде.

    Reply
  25. haland

    Для тех кого интересовал дизайн и 3D переделал данную обработку, прошу сюда: http://infostart.ru/public/120952/

    Reply
  26. haland

    (21) popovalex, вариант с 3D здесь http://infostart.ru/public/120952/

    Reply
  27. haland

    (22) roa4ik, Поработал над дизайном http://infostart.ru/public/120952/

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *