Ntl-M, Прикольный сайтик Главное не забывать указывать соавторов
Этот топик читают: Гость
Ответов: 88
Рейтинг: 1
|
|||
карма: 1 |
|
Гость
Ответов: 17029
Рейтинг: 0
|
|||
Редактировалось 4 раз(а), последний 2021-05-21 07:53:35 |
|||
карма: 0 |
|
Ответов: 8928
Рейтинг: 823
|
|||
Ntl-M, вот долгожданный код:
code_548 проверял с указанным сайтом, расхождения по длительности дня не более одной минуты, полагаю за счёт округления; разница во времени восхода-заката такая-же с учётом их странного Suntransit почему-то отличающегося от 12 час истинного местного времени Логика программы отличается от большинства других подобных программ тем, что вычисления выполняются в три захода - первый предварительный, для определения положения Земли на орбите в моменты восхода-заката и два окончательных по найденным положениям. Длительность года принята по действующему календарю 365,2425 дня; эллипсность орбиты интерполирована простым Sin с амплитудой 1.9..... дня (уж очень не хотелось возиться с бесконечными Tg, которые получаются при интегрировании знакомой Вам формулы r=p/(1-e*(fi)) ), в схеме есть примечания, читайте. [size=-2]------ Добавлено в 00:31 Ну надо же, только сейчас дошло, как до жирафа, что такое Suntransit, и почему отличен от 12 часов - вносит изменения в показания по часовому поясу. Ntl-M на днях сделаю, пока проверте по длительности дня. |
|||
карма: 19 |
| ||
файлы: 1 | code_548.txt [20.1KB] [670] |
Гость
Ответов: 17029
Рейтинг: 0
|
|||
Редактировалось 4 раз(а), последний 2021-05-21 07:53:36 |
|||
карма: 0 |
|
Ответов: 88
Рейтинг: 1
|
|||
Ntl-M, Вот тебе адрес твоей картинки. Пользуйся. Красивым женщинам рады помочь
|
|||
карма: 1 |
|
Ответов: 88
Рейтинг: 1
|
|||
Леонид,
У тебя случайно нет никаких компонентов измененных? И что у тебя за схема такая, на три экрана? Няужо нельга было па мулциелементам распихаць усё Ntl-M, А почему ты не авторизовываешься на форуме? все время гостем проходишь? |
|||
карма: 1 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
Defezit, все нормально компилируется и работает (3.62 в160)
[size=-2]------ Добавлено в 23:16 У меня измененных нет |
|||
карма: 25 |
|
Ответов: 88
Рейтинг: 1
|
|||
странно, Но у меня винда глючит, да так что сисюки только руками разводят Я ее довел до такого состояния, что самому страшно
[size=-2]------ Добавлено в 23:22 а компилятор от каких дельфей? |
|||
карма: 1 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
Компилятор с народа стандартный HiAsm-овский Delphi 4
Build start...
Generated code Create project... Command line: dcc32.exe "H:\HiAsm362b160\Elements\Delphi\code\_Project19.dpr" "-UH:\HiAsm362b160\." -DSQLITE_OBJ -Q "-EH:\HiAsm362b160\ Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation 8839 lines, 0.84 seconds, 92480 bytes code, 2621 bytes data. Compress code End build [size=-2]------ Добавлено в 23:26 и с FPC тоже нормально Build start...
Generated code Create project... Command line: fpc.exe '"H:\HiAsm362b160\Elements\Delphi\code\_Project19.pas"' -Sd -Mdelphi '"-FEH:\HiAsm362b160\"' '"-FUH:\HiAsm362b160\Elements\Delphi\code\\units"' -FDtools\ -CX -dF_P Free Pascal Compiler version 1.9.6 [2004/12/31] for i386 Copyright (c) 1993-2004 by Florian Klaempfl Target OS: Win32 for i386 Compiling H:\HiAsm362b160\Elements\Delphi\code\_Project19.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiMainForm.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\Share.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\Debug.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiFormatStr.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiMultiElement_8F6F2A0.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiStrPart.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiCopy.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiMultiElement_8F7D694.pas Compiling H:\HiAsm362b160\Elements\Delphi\code\hiMultiElement_8F87174.pas Compiling resource H:\HiAsm362b160\Elements\Delphi\code\allres.res Linking H:\HiAsm362b160\_Project19.exe 5091 Lines compiled, 9.5 sec Compress code End build |
|||
карма: 25 |
|
Ответов: 88
Рейтинг: 1
|
|||
значыцца будзем вокна перастауляць
|
|||
карма: 1 |
|
Ответов: 8928
Рейтинг: 823
|
|||
Defezit, мне тоже очень нравится начинать всё с "0", вернее с format C:, т. к. на терапевтическое лечение знаний не хватает
|
|||
карма: 19 |
|
Ответов: 88
Рейтинг: 1
|
|||
За всем не усмотришь, где то чето пропустишь и капец. У меня при запуске некоторых программ, запускаются сначала инсталяторы программ из папки windows. а после 6-7 раз, после отмены, уже программа. Никто не знает в чем прикол. ДВД не запускается. Диск достал, сунул новый, а в моемкомпьютере папки старого диска. Вот это глюки Может тут кто-нить знает что такое у меня с железкой
[size=-2]------ Добавлено в 17:52 А винда у меня почти год без переустановки |
|||
карма: 1 |
|
Ответов: 1305
Рейтинг: 29
|
|||
Defezit писал(а): Я ее довел до такого состояния, что самому страшноНу, при таком положении дел вот это: А винда у меня почти год без переустановки
и есть диагноз. Пришла пора, видать |
|||
карма: 0 |
|
Ответов: 88
Рейтинг: 1
|
|||
жалько. Столько Геммора этож надо все сохранять, не забыть спрятать. А скока программ надо ставить потом и опять мучицца с поиском лекарств на своей железке
|
|||
карма: 1 |
|
Ответов: 150
Рейтинг: 0
|
|||
Defezit, спасибо за ссылочку Вот теперь авторизировалась, а так время и деньги экономлю
|
|||
карма: 0 |
|
45