Выбрать главу

clear_screen()

puts(1, "\nТеперь мы перешли на страницу 1\n")

if getc(0) then -- ожидание нажатия клавиши

end if

set_display_page(1) -- "Теперь мы ..." становится видимым

if getc(0) then -- ожидание нажатия клавиши

end if

set_display_page(0) -- "Это ..." становится видимым снова

set_active_page(0)

См. также:

get_active_page, set_display_page, video_config

set_display_page

Платформа:

DOS32

Синтаксис:

include image.e

set_display_page(i)

Описание:

Делает видеостраницу номер i отображаемой на экране.

Комментарии:

С несколькими видеостраницами вы можете моментально изменять содержимое всего экрана без дрожаний и мельканий. Вы можете также спрятать содержимое экрана, а затем быстро вернуть его на прежнее место.

Функция video_config() сообщит вам, сколько видеостраниц доступно в текущем видеорежиме на вашей видеоплате.

По умолчанию в качестве и активной, и отображаемой страницы используется видеостраница под номером 0.

Эта процедура работает под DOS или в полноэкранном окне DOS. В окнах, занимающих часть экрана, вы не можете манипулировать номерами видеостраниц.

Пример:

See set_active_page() example.

См. также:

get_display_page, set_active_page, video_config

set_rand

Синтаксис:

include machine.e

set_rand(i1)

Описание:

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

Комментарии:

Обычно числа, выдаваемые функцией rand(), являются непредсказуемыми и будут при каждом запуске вашей программы другими. Тем не менее, иногда необходимо иметь повторяющиеся серии квазислучайных чисел, например, для целей отладки программы или, может быть, вам необходимо генерировать один и тот же вывод (к примеру, случайное изображение) по требованию вашего пользователя.

Пример:

sequence s, t

s = repeat(0, 3)

t = s

set_rand(12345)

s[1] = rand(10)

s[2] = rand(100)

s[3] = rand(1000)

set_rand(12345) -- та же величина для set_rand()

t[1] = rand(10) -- те же аргументы для rand(), что и ранее

t[2] = rand(100)

t[3] = rand(1000)

-- в этой точке s и t будут идентичными

См. также:

rand

set_vector

Платформа:

DOS32

Синтаксис:

include machine.e

set_vector(i, s)

Описание:

Устанавливает s в качестве нового адреса для обработчика прерывания номер i. Ряд s должен содержать дальний адрес защищённого режима в форме: {16-битный сегмент, 32-битное смещение}.

Комментарии:

Перед вызовом set_vector() вы должны разместить машинный код подпрограммы обработчика прерывания в памяти по адресу s.

16-битный сегмент может быть сегментом кода, используемым Euphoria. Чтобы получить значение для этого сегмента, см. demo\dos32\hardint.ex. Смещение может быть 32-битной величиной, выдаваемой функцией allocate(). Euphoria исполняется в защищённом режиме с сегментами кода и данных, расположенными в одной и той же физической памяти, но с различными режимами доступа.

Прерывания, произошедшие в реальном режиме или в защищённом режиме, будут вызывать ваш обработчик. Прежде чем пытаться обращаться к памяти, ваш обработчик должен немедленно загрузить правильный сегмент данных.

После отработки подпрограммы прерывания ваш обработчик может вернуть управление вызвавшей прерывание программе, выполнив инструкцию iretd, или путем перехода на оригинальный обработчик. Обработчик должен сохранять и затем восстанавливать состояние всех регистров, значения которых он переписывает.

Вы должны заблокировать память, занимаемую вашим обработчиком, чтобы быть уверенным, что он никогда не будет перенесен на диск при использовании виртуальной памяти. См. lock_memory().

Настоятельно рекомендуем изучить работу файла demo\dos32\hardint.ex, прежде чем пытаться устанавливать собственный обработчик прерывания.

Вы должны хорошо знать программирование на машинном уровне, чтобы писать свои собственные обработчики прерываний.

Вы можете вызвать set_vector() с дальним адресом, выданным get_vector(), если возникла необходимость восстановить исходный оригинальный обработчик.

Пример:

set_vector(#1C, {code_segment, my_handler_address})

Пример программы:

demo\dos32\hardint.ex

См. также:

get_vector, lock_memory, allocate

sin

Синтаксис:

x2 = sin(x1)

Описание:

Выдаёт синус x1, где x1 выражено в радианах.

Комментарии:

Данная функция может быть применена к атому или ко всем элементам ряда.

Пример:

sin_x = sin({.5, .9, .11})

-- sin_x равен {.479, .783, .110}

См. также:

cos, tan

sleep

Синтаксис:

include misc.e

sleep(i)

Описание:

Приостанавливает исполнение программы на i секунд.

Комментарии:

Под WIN32 и Linux/FreeBSD операционная система будет приостанавливать вашу программу и отдавать управление другим запущенным программам. Под DOS32 ваша программа будет исполнять занятый цикл в течение i секунд, во время которых другие программы могут выполняться, но на конкурентной основе за обладание процессором.

При работе в режиме многозадачности приостанавливается вся программа, а не только текущая задача. Чтобы приостановить текущую задачу, вы можете вызвать task_schedule(task_self(), {i, i}), а затем исполнить task_yield().

Пример:

puts(1, "Остановка на 15 секунд ...\n")

sleep(15)

puts(1, "Остановка закончена.\n")

См. также:

lock_file, abort, time

sort

Синтаксис:

include sort.e

s2 = sort(s1)

Описание:

Сортирует ряд s1 в порядке возрастания, используя быстрый алгоритм сортировки. Элементы s1 могут быть любой смесью атомов или рядов. Атомы идут перед рядами, а ряды сортируются в "алфавитном" порядке, так, что сначала сортировка выполняется по первым элементам (полям), затем, если первые эквивалентны, по вторым и т.д. Выдаёт отсортированный ряд.

Пример 1:

x = 0 & sort({7,5,3,8}) & 0

-- x становится равным {0, 3, 5, 7, 8, 0}

Пример 2:

y = sort({"Smith", "Jones", "Doe", 5.5, 4, 6})

-- y равно {4, 5.5, 6, "Doe", "Jones", "Smith"}

Пример 3:

database = sort({{"Smith", 95.0, 29},

{"Jones", 77.2, 31},

{"Clinton", 88.7, 44}})

-- 3 "записи" в базе данных будут отсортированы по первому "полю",

-- т.е. по имени. Там, где первые поля (элементы) эквивалентны,

-- сортировка будет производиться по второму полю и т.д.

-- после сортировки база данных примет вид:

{{"Clinton", 88.7, 44},

{"Jones", 77.2, 31},

{"Smith", 95.0, 29}}

См. также:

custom_sort, compare, match, find