[HlN]

Примерно так это будет выглядеть во время уроков

Завтра допишу расписание.

[Double_agent]

130 строк кода, лол

Стоп-стоп-стоп, 130 строк чтобы сравнить настоящее время со временем в массиве и сделать "ДЗЫНЬ" при совпадении чисел?

[HlN]

Стоп-стоп-стоп, 130 строк чтобы сравнить настоящее время со временем в массиве и сделать "ДЗЫНЬ" при совпадении чисел?

Не совсем :3
Добавлено через: 5 мин. 1 сек.Собственно кода 110 строк
Добавлено через: 4 мин. 53 сек.Так много строк из-за:
моего нежелания использовать RelativeTimeMs - сокращает немного, но путаница будет
проверок на индекс, ибо телефон подвешивает(не знаю, кто виноват - я или паскаль)
прочих проверок
начал для доработки
кривости кода
Добавлено через: 3 мин. 43 сек.Например здесь можно обойтись одной строкой в коде, а не процедурой:
procedure getStartPoint;
begin
  startPoint := GetCurrentTime;
  startPoint := startPoint - getSecond(startPoint);
  startPoint := startPoint - getMinute(startPoint) * 60;
  startPoint := startPoint - getHour(startPoint) * 3600;
  startPoint := startPoint + 8*3600;
end;

В одну строку:
startPoint := GetCurrentTime - getSecond(startPoint) - getMinute(startPoint) * 60 - getHour(startPoint) * 3600 + 8*3600;

Но мне удобнее именно процедура

[Double_agent]

А что считает процедура getStartPoint? Разве нельзя загрузить числа в двумерный массив(08:40 и т. п.) и сравнивать?

[HlN]

А что считает процедура getStartPoint? Разве нельзя загрузить числа в двумерный массив(08:40 и т. п.) и сравнивать?

Так неинтересно.

[Faular]

(не знаю, кто виноват - я или паскаль)

Они работают над этим :3

[HlN]

К тому же при том леденящем душу неприятности с индексом элемента больше 10, неизвестно что будет, и какой костыль надо будет дописать.
Сейчас-то все просто: если звонков 12, то последний урок идет 40 минут и можно его просто отдельной строчкой прописать.
А тут придется разбираться с несколькими величинами.
Добавлено через: 6 мин. 1 сек.Завтра буду проверять в школе
Добавлено через: 1 мин. 34 сек.ЧЕЕЕЕРТ
Эта фигня как-то ну очень хитро считывает элементы
Добавлено через: 2 мин. 19 сек.ОЧЕНЬ ХИТРО
Добавлено через: 3 мин. 58 сек.Завтра буду почти все переписывать.
Эта программа меня снова затроллела.

[Никитон]

n2: да крузис круто там графон как в крузисе!!!!!!!!!!!!!!!

[Double_agent]

ЧЕЕЕЕРТ
Эта фигня как-то ну очень хитро считывает элементы
Добавлено через: 2 мин. 19 сек.ОЧЕНЬ ХИТРО
Добавлено через: 3 мин. 58 сек.Завтра буду почти все переписывать.
Эта программа меня снова затроллела.

Эээ... Расставь брикпоинты и посмотри что происходит с переменными о_о
Добавлено через: 23 сек.А что не так с тем как оно считывает элементы?

[Faular]

А что не так с тем как оно считывает элементы?

Сраный телефон зависает при более, чем 10 сраных элементах, а у меня 11 сраных элементов

Добавлено через: 46 сек.

брикпоинты

ЧЕГО?

[Double_agent]

Стоп... Брикпоинты это мальца другое... Да?..

[HlN]

Не так то, что это MIDlet Pascal.
Я не совсем разобрался с дебагом пока. Но брейкпоинтов как в паскале нету, ибо он компилирует в jar.

ЧЕГО?

Точки кирпича, читать не умеешь штоле

[Faular]

Стоп... Брикпоинты это мальца другое... Да?..

breɪk . ну ты понел.
Добавлено через: 14 сек.

Точки кирпича, читать не умеешь штоле

лооол

[Double_agent]

breɪk . ну ты понел.

Ок, буду грамотнее, спасибо
Добавлено через: 1 мин. 19 сек.Ну замени брейкпоинт, скажем, циклами вывода значения переменной и ввода строки

[HlN]

Все интересное действие происходит в цикле.
А вывод текста тут не такой простой.

Полный вывод такой:
setColor(255, 255, 255); //установить белый цвет
fillrect(0, 0, GetWidth, GetHeight); //заполнить экран белым
setColor(0, 0, 0); //установить черный цвет
drawText('Hello world', 0, 0); //нарисовать текст в точке 0,0
repaint; //перенести все из буфера на экран

И надо будет со всем этим разбираться.