Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.03.28;
Скачать: [xml.tar.bz2];

Вниз

Алгоритм случайного блуждания по менюшке   Найти похожие ветки 

 
olookin ©   (2004-03-05 20:41) [0]

Собственно (как тут любят писать) сабж (правильно выразился?). Есть меню (MainMenu). Погулять по меню как в случайном порядке? Впрочем не совсем в случайном.... Что то типа если пользователь заскучал и просто просматривает пункты меню... Начало по генерации нажатия F10 и далее Left Rigth Up and Down. Господа алгоритмисты - подскажите...


 
TButton ©   (2004-03-05 21:44) [1]

case random(4) of
0:<двигаешь вверх>;
1:<двигаешь вправо>;
2:<двигаешь влево>;
3:<двигаешь вниз>;
end;


 
olookin ©   (2004-03-05 21:58) [2]

[1] TButton ©   (05.03.04 21:44)

Алгоритм случайного но ОСМЫСЛЕННОГО блуждания


 
TButton ©   (2004-03-05 22:11) [3]

насколько осмысленного?


...
var
 dir: integer;
 stps: integer;
...
procedure tic;
begin
 if steps=0 then
 begin  
   dir:=random(4);
   stps:=random(5)+1;
 end;
 case dir of
   0:<двигаешь вверх>;
   1:<двигаешь вправо>;
   2:<двигаешь влево>;
   3:<двигаешь вниз>;
 end;
 Dec(stps);
end;

вроде бы как осмысленно...


 
Gero ©   (2004-03-05 22:18) [4]

> Алгоритм случайного но ОСМЫСЛЕННОГО блуждания

Это как понимать?


 
TButton ©   (2004-03-05 22:28) [5]

ну, первый алгоритм приведенный мной это совсем от балды. а второй это от балды, но с некоторой долей осмышления, т.е. не просто "дернуться в такую-то сторону" а "пройтись в такую-то сторону на такое-то количество шагов". т.е. в первом случае тупой расколбас, во втором - вечерний моцион.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.03.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.032 c
1-1078775266
xobbit
2004-03-08 22:47
2004.03.28
Окно в качестве фона


6-1073819730
PInokio
2004-01-11 14:15
2004.03.28
Цикл для ClientSocket plz Help


14-1077640095
}|{yk
2004-02-24 19:28
2004.03.28
Чем лучше?


4-1073753680
WithOut Any ...
2004-01-10 19:54
2004.03.28
Заблокировать клавишу "Windows"


1-1078338345
Pavel
2004-03-03 21:25
2004.03.28
события





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский