HiAsm

Вверх ↑

Форумы Между делом Помогите вставить JavaScript в схему Hiasm плз ← Ctrl1 234 5Ctrl →

Ответов: 16884

Рейтинг: 1239

#1: 2011-03-25 14:26:01 ЛС | профиль | цитата

MAV,нужно было просто написать свою function floor. Trunc это немного не то

. (Хорошая мысля приходит опосля

)

И вот результат -

Последний вариант схемы вычислений новолуний, полнуний, затмений.

ng_not_error.rar - ошибок не нашел.
Поправку на часовой пояс не делал: Ntl-M- молчит, как рыба об лёд. Видно это ей уже ни на... не нужно.
За исходный взят скрипт из Морского интернет-клуба "Кубрик" http://www.randewy.ru/astr/astr.html

MAV,вопрос:

#pas
  y := ReadInteger(_Data,Year,0);
//..............................
  yy := ReadInteger(_Data,Year,0);
  if y = yy then _hi_OnEvent(onCalculation);

А что экономней запомнить год или повторно считать ?

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 1 ng_not_error.rar [4.1KB] [152]

Форумы Между делом Помогите вставить JavaScript в схему Hiasm плз ← Ctrl1 234 5Ctrl →