Добро пожаловать к нам в гости! Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
Здрасте я вернулся Как зделать так что бы когда обекты между собой соприкосались выполнялся заданый код?например один из объектвов удалилсяи или переместился?
Я вечером могу дать хороший сжатый пример, но с ним вы вряд ли разберётесь... примерно в 60 строчек кода... Win7 Pro SP1 x64; NBv5.5.4rus,v5.6.2rus, v5.7.0en, Opera
Ты показывай что ты там делаешь. Пробовал... Что пробовал то? Я вот тоже сейчас гамбургер пробую, вроде и ни чего, а с другой стороны как такое дерьмо жрать можно? Не хочешь читать хелп?
Блин ну я пробывал по кардинате Х Y оно срабатывает только тогда когда обекты налаживаются полность друг на друга! а мне нужно тогда когда только начинают качаца! mishem,
Дата: Ср, 21 Сентября 2011, 23:41 | Сообщение # 10
Генератор идей
Модераторы
Сообщений: 3173
Offline
Quote (mishem)
Ты показывай что ты там делаешь. Пробовал... Что пробовал то?
Rostik, Сергей указал Вам на принцип. Если не получается, то проще получить помощь, если выложить тот фрагмент кода, где Вы пытаетесь сделать то, что требуется. mishem, Вам намекает, а Вы не пользуетесь...
Можете попробовать еще поизучать мой проект "Эмоциональный интеллект" (см. ссылку в подписи), там реализована работа с объектами - эффект прилипания, совместного сдвига объектов, "удаление" объектов и пр. Но проще Вам выложить свой код, поскольку логика построения проекта может быть очень разной и, возможно, улучшать свой пример будет Вам куда легче, чем разбираться в чужом коде. Бесплатный онлайн курс программирования в VisualNEO Win (NeoBook)
Дата: Чт, 22 Сентября 2011, 00:25 | Сообщение # 12
Эксперт форума
Модераторы
Сообщений: 5942
Offline
Quote (Rostik)
\хм я походу очень надоел со своими вопросами!
С нормальными, не очень. Так как их очень мало.
Quote (Rostik)
а мне нужно тогда когда только начинают качаца!
Ну и что это такое качаца!? Я допустим такого слова вообще не знаю. А что ты там сооружаешь в проекте, на расстоянии тоже понять не могу. Кто такой налаживаются, кто такой качаца!. Откуда мне знать? Да и кому либо другому.
Quote (Rostik)
тогда когда обекты налаживаются полность друг на друга
Аааа, это порнография? Че я дурак сразу не догадался. А зачем они друг от друга отталкиваться должны? Теперь понятно что это такое:
Quote (Rostik)
а мне нужно тогда когда только начинают качаца!
Подожди, ты меня совсем запутал. качаца! Это наверно спортсмены? Типа мышцы качают? Ааа, точно, гирю туда-сюда, туда- сюда... Да? Или не... Точно. Это они от пола отжимаются. Или на турнике? Неее. С моим скудным умишком, твои грандиозные проекты не понять. Давай ка по порядку. Ну как для первоклассника..
Quote (Вадим)
Но проще Вам выложить свой код, поскольку логика построения проекта может быть очень разной
Дата: Чт, 22 Сентября 2011, 12:55 | Сообщение # 13
Участник
Проверенные
Сообщений: 179
Offline
Quote (mishem)
Аааа, это порнография? Че я дурак сразу не догадался. А зачем они друг от друга отталкиваться должны?
Quote (mishem)
Деятельность: в Банде паркуристав
:lol: Рассмешил)) Нужно в раздел "Болталка" кинуть тему.
Я вот не могу понять, у тебя движется только 1 объект, другой стоит на месте или раздвигаются оба объекта? P.S. Не о порнографии Я, а о NB)) В каждом человеке солнце. Только дайте ему светить.(с)Сократ
Дата: Чт, 22 Сентября 2011, 13:35 | Сообщение # 14
Участник
Проверенные
Сообщений: 241
Offline
,
Quote (MicroCip)
Я вот не могу понять, у тебя движется только 1 объект, другой стоит на месте или раздвигаются оба объекта?
двигается один и как захочит, другой стоит на месте, Ребят я не могу найти исходник того проэкт уоторый проверяет кординаты, я побыстрому сделал друой,там всё кратко но вы должны понять
Я вот не могу понять, у тебя движется только 1 объект, другой стоит на месте или раздвигаются оба объекта?
двигается один и как захочит, другой стоит на месте, Ребят я не могу найти исходник того проэкт уоторый проверяет кординаты, я побыстрому сделал друой,там всё кратко но вы должны понять
Я вот не могу понять, у тебя движется только 1 объект, другой стоит на месте или раздвигаются оба объекта?
двигается один и как захочит, другой стоит на месте, Ребят я не могу найти исходник того проэкт уоторый проверяет кординаты, я побыстрому сделал друой,там всё кратко но вы должны понять
Добавлено (22 Сентябрь 2011, 13:45) --------------------------------------------- качаца-касаца, Я быстро печатаю по клавишам не потем попадаю если не сложно смотрите на клаву какая букавка подходит к слову буду вашим задачникам шучу.
Дата: Чт, 22 Сентября 2011, 14:29 | Сообщение # 16
Участник
Проверенные
Сообщений: 179
Offline
Quote (Rostik)
Прикрепления: ZIP.zip
Первое, что на глаза бросилось - это то, что у ВСЕХ таймеров - стоит интервал в 1 миллисекунду Так вы же уже все сделали - в чем проблема то? В каждом человеке солнце. Только дайте ему светить.(с)Сократ
Дата: Пт, 23 Сентября 2011, 11:36 | Сообщение # 24
Ветеран форума
Проверенные
Сообщений: 553
Offline
Quote (Rostik)
А как сделать што б в IF было так Код IF [Р]" "=" "От 10 до 50"
10<=P<=50 используй операции и(and) или(or)
Code
IfEx "([P]>=10)and([P]<=50)" Else EndIf
Добавлено (23 Сентябрь 2011, 11:36) --------------------------------------------- Мне некогда такое писать...Вот недоделанный код. Если доделаешь, то будет рабочий(Нужно дописать события 3 и 4) дерзай...
Code
SetVar "[obj1]" "Polygon1" SetVar "[obj2]" "Polygon2" .============================================= GetObjectInfo "[obj1]" "Left" "[Left_1]" GetObjectInfo "[obj1]" "Top" "[Top_1]" GetObjectInfo "[obj1]" "Width" "[Width_1]" GetObjectInfo "[obj1]" "Height" "[Height_1]" GetObjectInfo "[obj2]" "Left" "[Left_2]" GetObjectInfo "[obj2]" "Top" "[Top_2]" GetObjectInfo "[obj2]" "Width" "[Width_2]" GetObjectInfo "[obj2]" "Height" "[Height_2]" .============================================= Math "[Left_1]+[Width_1]" "0" "[L1+W1]" Math "[Left_1]+[Height_1]" "0" "[L1+H1]" Math "[Top_1]+[Width_1]" "0" "[T1+W1]" Math "[Top_1]+[Height_1]" "0" "[T1+H1]" .++++++++++++++ Math "[Left_2]+[Width_2]" "0" "[L2+W2]" Math "[Left_2]+[Height_2]" "0" "[L2+H2]" Math "[Top_2]+[Width_2]" "0" "[T2+W2]" Math "[Top_2]+[Height_2]" "0" "[T2+H2]" .============================================= .1)Слева сверху от объекта 1 IfEx "([Left_1]>=[Left_2])and([Top_1]>=[Top_2])" IfEx "([Left_1]<=[L2+W2])and([Top_1]<=[T2+H2])" SetVar "[result_1]" "1" Else SetVar "[result_1]" "0" EndIf Else SetVar "[result_1]" "" EndIf .============================================= .2)Справа сверху от объекта 1 IfEx "([L1+W1]<=[L2+W2])and([Top_1]>=[Top_2])" IfEx "([L1+W1]>=[Left_2])and([Top_1]<=[T2+H2])" SetVar "[result_2]" "1" Else SetVar "[result_2]" "0" EndIf Else SetVar "[result_2]" "" EndIf .============================================= .3)Слева снизу от объекта 1 .??????????????????????????? .============================================= .4)Справа снизу от объекта 1 .??????????????????????????? .============================================= .Вывод результатов Loop "1" "4" "[i]" If "[result_[i]]" "=" "1" SetObjectFill "Rectangle01[i]" "Blue" "Solid" "False" Else If "[result_[i]]" "=" "0" SetObjectFill "Rectangle01[i]" "Red" "Solid" "False" Else SetObjectFill "Rectangle01[i]" "Silver" "Solid" "False" EndIf EndIf EndLoop
Win7 Pro SP1 x64; NBv5.5.4rus,v5.6.2rus, v5.7.0en, Opera
Сообщение отредактировано Gorezcaid - Пт, 23 Сентября 2011, 19:39
Откуда мне знать? Да и кому либо другому. 
Первое, что на глаза бросилось - это то, что у 
