на счет видео (цитата из старого форума):
Видео проигрывается следующим обрзом:
;устанавливаем графический режим и выставляем текущим невидимый банк памяти
Graphics 640,480
SetBuffer BackBuffer()
;грузим наш фильм (путь ессно можно указать и без диска)
movie=OpenMovie("1.avi")
;запускаем цикл до нажатия ESC
Repeat
;выводим очередной кадр нашего видео
DrawMovie movie,100,100,MovieWidth(movie),MovieHeight(movie)
;переключаем банки видеопамяти, чтоб увидеть что туда нарисовала DrawMovie
Flip
Until KeyHit(1)
;закрываем видео
CloseMovie (movie)
;конец программы
end
некоторые замечания:
В функцию DrawMovie передаются пять параметров:
1. Идентификатор фильма (возвращается функцией OpenMovie)
2. X Координата левого верхнего угла просматриваемого видео
3. Y Координата левого верхнего угла просматриваемого видео
4. Ширина видео, можно установить в ручную тогда оно будет сжато или растянуто или-же можно использовать функцию MovieWidth для определения ширины видео.
5. Высота видео, точно так-же как и в ширине только функция соответственно по другому называется MovieHeight
Особенность: если в нашем случае попробовать затормозить главный цикл (написать в нем пустой цикл например), то получится отставание видео от звука... получается так, что при первом вызове функции DrawMovie она нарисует нам первый кадр нашего видео и запустит звук... звук будет воспроизводиться так, как он записан в файле а видео, по кадрам, в соответствии со следующим вызовом функции. Это нужно учитывать... 
|
надеюсь тебе поможет...
что насчет меню, то попробуй выложить свои наработки, мы к сожалению не можем представить что там и как не видя кода...