Программирование MidletPascal

randomizeprocedure randomize;

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

ordfunction ord(c: char): integer;

Возвращает код ASCII для указанного символа.

oddfunction odd(n: integer): boolean;

Возвращает 'true', если указанное число нечётное или 'false' в другом случае.

isMidletPausedfunction isMidletPaused: boolean;

Возвращает 'true', если мидлет находится в состоянии паузы или 'false' в другом случае.

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

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

...
repeat
{ обрабатываем клавиатурный ввод и читаем таймер }

{ если мидлет в состоянии паузы, ждём, пока он будет возвращён в активное состояние }

while isMidletPaused do
begin
delay(100);
end;

until gameOver;
...

haltprocedure halt;

Прерывает выполнение мидлета.

getPropertyfunction getProperty(propertyName: string): string;

Эта процедура используется для получения информации о Java. Для того, чтобы получить информацию о доступных свойствах, вы можете ознакомиться с документацией по Java.

begin
debug(getProperty('microedition.locale'));
end.

debugprocedure debug(s: string);

Выводит данную строку, используя стандартный отладочный поток эмулятора. На мобильном устройстве эта функция никак себя не проявляет (разве что, мидлет будет иметь немного больший размер). Если вы используете встроенный эмулятор, запускаемый через браузер, отладочный поток будет в окне консоли Java. Чтобы увидеть окно консоли Java, в Проводнике необходимо выбрать пункт меню "Сервис -> Sun Java Console" ("Tools -> Sun Java Console"). В случае использования прочих эмуляторов, отладочный поток будет передаваться в окно консоли DOS, открывающееся вместе с запуском эмулятора.

chrfunction chr(n: integer): char;

Возвращает символ указанного кода ASCII. Поведение функции не определено, если параметр имеет значение, большее 127.

assertprocedure assert(cond: boolean);

Проверяет, истинно ли данное условие. Если условие ложно (не истинно), утверждающее сообщение будет записано в стандартный отладочный поток. В описании процедуры debug можно найти более развёрнутую аннотацию отладочного потока. Утверждающее сообщение может выглядеть так:

Assertion failed at: Tetris.mpsrc:162

resourceAvailablefunction resourceAvailable(res: resource):boolean;

Возвращает 'true', если указанный ресурс доступен (т.е. открыт корректно).