HiAsm
HiAsm
Вверх ↑
ФорумыМежду деломЭлементы Системы:Время-дата, разница дат. ← Ctrl12Ctrl →
Этот топик читают: Гость
Ответов: 21
Рейтинг: 0
#1: 2013-10-14 11:30:23 ЛС | профиль | цитата
Пожалуйста обьясните как нибудь.Задача:Расчет времени в годах, в месяцах, в днях, в часах,в минутах,в секундах от нужной даты по настоящее время.Ну не могу сообразить как. И вообще с этими ли элементами делать ?Помогите пожалуйста,подскажите!
карма: 1

0
Ответов: 8928
Рейтинг: 823
#2: 2013-10-14 13:32:27 ЛС | профиль | цитата
Beriya -- это фамилия Ваша или просто ник?
Надо запомнить, что дата в формате Real -- количество целых дней прошедших от Рождества Христова (на сегодня 735155 дней) плюс дробная часть сегодняшнего дня. Все остальные форматы лишь преобразуют это число в удобные представления. Ещё надо запомнить, что в сутках 24 часа, в одном часе 60 минут, а в одной минуте 60 секунд, итого в сутках 86400 секунд.
code_32015.txt
карма: 19

0
файлы: 1code_32015.txt [1.7KB] [351]
Ответов: 21
Рейтинг: 0
#3: 2013-10-14 13:46:30 ЛС | профиль | цитата
Вот не смотрел еще код, просто сообщение ваше улыбнуло, особенно " Ещё надо запомнить, что в сутках 24 часа, в одном часе 60 минут, а в одной минуте 60 секунд, итого в сутках 86400 секунд." Спасибо. Beriya -это ник по кликухе еще со школы, кликуха по фамилии, есть ассоциации Да....посмотрю код, если не понравиться.....расстреляю И спасибо за помощь!!!
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#4: 2013-10-14 18:19:06 правка | ЛС | профиль | цитата


Редактировалось 3 раз(а), последний 2017-06-14 18:46:59
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#5: 2013-10-14 18:19:43 ЛС | профиль | цитата
Выше я.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 9906
Рейтинг: 351
#6: 2013-10-14 18:26:15 ЛС | профиль | цитата
Tad писал(а):
Выше я

Да мы уже давно твой хост выучили
Если netvision -- значит это Tad
карма: 9

0
Ответов: 21
Рейтинг: 0
#7: 2013-10-15 12:16:16 ЛС | профиль | цитата
Tad
85-250-61-54.bb.netvision писал(а):
code_32017.txt
Спасибо, коряво ,но все же тоже получилось у меня слова менять в соответствии с циферками. А вот год и месяц не могу вывести вообще,ни цифры, ни словечки.... где то подтупливаю,да что там...... вообще туплю Голову сломал....как так то????????????
карма: 1

0
Ответов: 8928
Рейтинг: 823
#8: 2013-10-15 14:23:07 ЛС | профиль | цитата
Beriya, годы и месяцы в разнице дат?
карма: 19

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#9: 2013-10-15 14:35:14 ЛС | профиль | цитата
Beriya писал(а):
годы и месяцы в разнице дат?

А почему бы и нет?
карма: 22

0
Ответов: 21
Рейтинг: 0
#10: 2013-10-15 15:08:22 ЛС | профиль | цитата
Леонид писал(а):
Beriya, годы и месяцы в разнице дат?
Да, чтоб помимо дней считались года, месяцы ,и вот не догоняю, как цифры эти вытянуть с формата,или я просто зациклился на нем .млин..... еще и слова же надо....
карма: 1

0
Ответов: 8928
Рейтинг: 823
#11: 2013-10-15 18:50:01 ЛС | профиль | цитата
nesco писал(а):
А почему бы и нет?
Разницы менее 1600 лет наш конвертор не признаёт (раньше ничего не было кроме Большого Взрыва ), остаётся ручками считать
------------ Дoбавленo в 18.50:
Вот, считаю ручками от рождения, блин, какой же я старый 

Add(MainForm,7071527,133,98)
{
 Height=247
}
Add(Time,15045631,203,140)
{
 Point(DateTime)
}
Add(Edit,3974650,210,189)
{
 Left=65
 Top=35
 Width=120
 link(onChange,13113752:doEvent1,[])
 link(Str,15045631:DateTime,[])
}
Add(Timer,15798354,154,189)
{
 link(onTimer,3974650:doText,[])
}
Add(Label,9979472,203,98)
{
 Left=15
 Top=35
 Width=40
 Height=17
 Caption="Сейчас"
}
Add(DateConvertor,5050267,287,238)
{
 Point(Year)
 Point(Month)
 Point(Day)
 Point(Hour)
 Point(Minute)
 Point(Second)
 link(onResult,11981783:doConvert,[])
}
Add(Edit,1960085,350,189)
{
 Left=190
 Top=35
 Width=105
 link(onChange,14168219:doConvert,[])
}
Add(Edit,2757803,455,119)
{
 Left=30
 Top=70
 Width=125
 Text="11-03-1945 02:30:00"
}
Add(DateConvertor,14168219,406,189)
{
 Mode=8
 Point(Result)
 link(onResult,13966383:doConvert,[])
}
Add(DateConvertor,13966383,455,189)
{
 Mode=8
 Point(Data)
 Point(Result)
 link(onResult,9082976:doOperation,[])
 link(Data,2757803:Text,[])
}
Add(Label,7960756,210,91)
{
 Left=10
 Top=75
 Width=17
 Height=17
 Caption="От"
}
Add(Label,11162798,217,84)
{
 Left=95
 Top=15
 Width=58
 Height=17
 Caption="Дата  Real"
}
Add(Label,6235425,224,77)
{
 Left=210
 Top=15
 Width=58
 Height=17
 Caption="Дата FmtStr"
}
Add(Label,9840306,644,196)
{
 Left=80
 Top=135
 Width=159
 Height=19
 Color=12639424
 Font=[MS Sans Serif,8,0,255,1]
 Caption=""
 AutoSize=1
}
Add(Math,9082976,511,189)
{
 OpType=1
 link(onResult,11879575:doEvent1,[])
 link(Op1,14168219:Result,[(517,180)(503,180)(503,229)(412,229)])
}
Add(DateConvertor,15268595,595,196)
{
 Mode=9
 link(onResult,9840306:doText,[])
}
Add(Hub,11879575,560,189)
{
 link(onEvent1,7181467:doText,[(585,195)(585,153)])
 link(onEvent2,15268595:doConvert,[])
}
Add(Label,7181467,644,147)
{
 Left=80
 Top=100
 Width=160
 Height=20
 Color=12639424
 AutoSize=1
}
Add(DateConvertor,11981783,455,238)
{
 Point(Data)
 Point(Year)
 Point(Month)
 Point(Day)
 Point(Hour)
 Point(Minute)
 Point(Second)
 link(onResult,3399046:doWork1,[(508,244)(508,377)(403,377)(403,342)])
 link(Data,13966383:Result,[])
}
Add(MultiElement,3399046,413,336)
{
 @Hint=#35:Разность дат из набора целых (HInt)|
 link(onEvent1,7278699:doText,[])
 link(Data1,5050267:Year,[(419,327)(293,327)])
 link(Data2,5050267:Month,[(426,320)(300,320)])
 link(Data3,5050267:Day,[(433,313)(307,313)])
 link(Data4,5050267:Hour,[(440,306)(314,306)])
 link(Data5,5050267:Minute,[(447,299)(321,299)])
 link(Data6,5050267:Second,[(454,292)(328,292)])
 link(Data7,11981783:Year,[])
 link(Data8,11981783:Month,[])
 link(Data9,11981783:Day,[])
 link(Data10,11981783:Hour,[])
 link(Data11,11981783:Minute,[])
 link(Data12,11981783:Second,[])
}
BEGIN_SDK
  Add(EditMulti,134067,21,21)
  {
   EventCount=1
   WorkCount=1
   DataCount=12
   Width=391
   Height=277
   VOffset=100
   link(doWork1,1682230:doCalc,[(32,127)(32,118)])
  }
  Add(MathParse,1682230,70,112)
  {
   MathStr="%1 - %2"
   ResultType=0
   link(onResult,15894157:doCalc,[])
   link(X1,134067:Data6,[(76,103)(62,103)])
   link(X2,134067:Data12,[(83,103)(104,103)])
  }
  Add(MathParse,15894157,119,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,15176116:doCalc,[])
   link(X1,134067:Data5,[(125,96)(55,96)])
   link(X2,134067:Data11,[(132,89)(97,89)])
  }
  Add(MathParse,15176116,168,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,3171771:doCalc,[])
   link(X1,134067:Data4,[(174,82)(48,82)])
   link(X2,134067:Data10,[(181,75)(90,75)])
  }
  Add(MathParse,3171771,217,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,13477680:doCalc,[])
   link(X1,134067:Data3,[(223,70)(41,70)])
   link(X2,134067:Data9,[(230,64)(83,64)])
  }
  Add(MathParse,13477680,273,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,9752864:doCalc,[])
   link(X1,134067:Data2,[(279,58)(34,58)])
   link(X2,134067:Data8,[(286,51)(76,51)])
  }
  Add(MathParse,9752864,329,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,16621570:doCalc,[(368,118)(368,153)(60,153)(60,167)])
   link(X1,134067:Data1,[(335,44)(27,44)])
   link(X2,134067:Data7,[(342,37)(69,37)])
  }
  Add(MathParse,16621570,70,161)
  {
   DataCount=1
   MathStr="(%1 + 60) mod 60"
   ResultType=0
   link(onResult,1865450:doCalc,[])
   link(X1,1682230:Result,[])
  }
  Add(FormatStr,345270,196,245)
  {
   DataCount=6
   Mask="%4-%5-%6 %3:%2:%1"
   link(onFString,134067:onEvent1,[(382,251)(382,127)])
   link(Str1,16621570:Result,[(202,216)(76,216)])
   link(Str2,1865450:Result,[(209,209)(125,209)])
   link(Str3,14115624:Result,[(216,201)(174,201)])
   link(Str4,15117107:Result,[])
   link(Str6,9752864:Result,[(237,208)(335,208)])
  }
  Add(MathParse,1865450,119,161)
  {
   DataCount=1
   MathStr="(%1 + 60) mod 60"
   ResultType=0
   link(onResult,14115624:doCalc,[])
   link(X1,15894157:Result,[])
  }
  Add(MathParse,14115624,168,161)
  {
   DataCount=1
   MathStr="(%1 + 24) mod 24"
   ResultType=0
   link(onResult,15117107:doCalc,[])
   link(X1,15176116:Result,[])
  }
  Add(MathParse,15117107,217,161)
  {
   DataCount=1
   MathStr="(%1 + 31) mod 31"
   ResultType=0
   link(onResult,15972747:doCalc,[])
   link(X1,3171771:Result,[])
  }
  Add(MathParse,15972747,273,161)
  {
   DataCount=1
   MathStr="(%1 + 12) mod 12"
   ResultType=0
   link(onResult,345270:doString,[(313,167)(313,231)(186,231)(186,251)])
   link(X1,13477680:Result,[])
  }
END_SDK
Add(Label,7278699,532,336)
{
 Left=80
 Top=175
 Width=160
 Height=22
 Color=12639424
 Font=[MS Sans Serif,8,0,16711680,1]
 AutoSize=1
}
Add(Hub,13113752,252,189)
{
 link(onEvent1,776530:doConvert,[])
 link(onEvent2,5050267:doConvert,[(277,202)(277,244)])
}
Add(DateConvertor,776530,294,189)
{
 Mode=9
 link(onResult,1960085:doText,[])
}
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#12: 2013-10-15 19:17:37 ЛС | профиль | цитата
1.
Леонид писал(а):
какой же я старый
Шкет При встрече со мной (как говорят на Украине) повинен знімати кашкета і казати "Доброго дня, дядьку".

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Гость
Ответов: 17029
Рейтинг: 0
#13: 2013-10-16 09:22:59 правка | ЛС | профиль | цитата


Редактировалось 3 раз(а), последний 2017-06-14 18:46:59
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#14: 2013-10-16 17:17:44 правка | ЛС | профиль | цитата


Редактировалось 3 раз(а), последний 2017-06-14 18:47:00
карма: 0

0
Ответов: 21
Рейтинг: 0
#15: 2013-10-18 03:16:56 ЛС | профиль | цитата
85-250-61-54.bb.netvision писал(а):
Можно
1 код от Леонида поправил Tadcode_32057.txt
------------ Дoбавленo в 03.16:
Второй код также от Леонида поправил дядьку Tad, вернее вставил мультиэлемент от Tad сам уже 
Add(MainForm,7071527,21,42)
{
 Width=439
 Height=302
}
Add(Time,15045631,91,84)
{
 Point(DateTime)
}
Add(Edit,3974650,98,133)
{
 Left=65
 Top=35
 Width=120
 link(onChange,13113752:doEvent1,[])
 link(Str,15045631:DateTime,[])
}
Add(Timer,15798354,42,133)
{
 link(onTimer,3974650:doText,[])
}
Add(Label,9979472,91,42)
{
 Left=15
 Top=35
 Width=40
 Height=17
 Caption="Сейчас"
}
Add(DateConvertor,5050267,175,182)
{
 Point(Year)
 Point(Month)
 Point(Day)
 Point(Hour)
 Point(Minute)
 Point(Second)
 link(onResult,11981783:doConvert,[])
}
Add(Edit,1960085,238,133)
{
 Left=190
 Top=35
 Width=105
 link(onChange,14168219:doConvert,[])
}
Add(Edit,2757803,343,63)
{
 Left=30
 Top=70
 Width=125
 Text="22-09-2013 15:00:00"
}
Add(DateConvertor,14168219,294,133)
{
 Mode=8
 Point(Result)
 link(onResult,13966383:doConvert,[])
}
Add(DateConvertor,13966383,343,133)
{
 Mode=8
 Point(Data)
 Point(Result)
 link(onResult,9082976:doOperation,[])
 link(Data,2757803:Text,[])
}
Add(Label,7960756,98,35)
{
 Left=10
 Top=75
 Width=17
 Height=17
 Caption="От"
}
Add(Label,11162798,105,28)
{
 Left=95
 Top=15
 Width=58
 Height=17
 Caption="Дата  Real"
}
Add(Label,6235425,112,21)
{
 Left=210
 Top=15
 Width=58
 Height=17
 Caption="Дата FmtStr"
}
Add(Label,9840306,532,140)
{
 Left=80
 Top=135
 Width=159
 Height=19
 Color=12639424
 Font=[MS Sans Serif,8,0,255,1]
 Caption=""
 AutoSize=1
}
Add(Math,9082976,399,133)
{
 OpType=1
 link(onResult,11879575:doEvent1,[])
 link(Op1,14168219:Result,[(405,124)(391,124)(391,173)(300,173)])
}
Add(DateConvertor,15268595,483,140)
{
 Mode=9
 link(onResult,9840306:doText,[])
}
Add(Hub,11879575,448,133)
{
 link(onEvent1,7181467:doText,[(473,139)(473,97)])
 link(onEvent2,15268595:doConvert,[])
}
Add(Label,7181467,532,91)
{
 Left=80
 Top=100
 Width=160
 Height=20
 Color=12639424
 AutoSize=1
}
Add(DateConvertor,11981783,336,182)
{
 Point(Data)
 Point(Year)
 Point(Month)
 Point(Day)
 Point(Hour)
 Point(Minute)
 Point(Second)
 link(onResult,15508543:doWork1,[(397,188)(397,365)(282,365)(282,286)])
 link(Data,13966383:Result,[(342,174)(349,174)])
}
Add(Label,7278699,420,280)
{
 Left=80
 Top=175
 Width=175
 Height=57
 Color=12639424
 Font=[MS Sans Serif,8,0,16711680,1]
 AutoSize=1
}
Add(Hub,13113752,140,133)
{
 link(onEvent1,776530:doConvert,[])
 link(onEvent2,5050267:doConvert,[(165,146)(165,188)])
}
Add(DateConvertor,776530,182,133)
{
 Mode=9
 link(onResult,1960085:doText,[])
}
Add(MultiElement,15508543,294,280)
{
 @Hint=#35:Разность дат из набора целых (HInt)|
 link(onEvent1,7278699:doText,[])
 link(Data1,5050267:Year,[(300,252)(181,252)])
 link(Data2,5050267:Month,[(307,247)(188,247)])
 link(Data3,5050267:Day,[(314,242)(195,242)])
 link(Data4,5050267:Hour,[(321,235)(202,235)])
 link(Data5,5050267:Minute,[(328,230)(209,230)])
 link(Data6,5050267:Second,[(335,225)(216,225)])
 link(Data7,11981783:Year,[])
 link(Data8,11981783:Month,[])
 link(Data9,11981783:Day,[])
 link(Data10,11981783:Hour,[])
 link(Data11,11981783:Minute,[])
 link(Data12,11981783:Second,[])
}
BEGIN_SDK
  Add(EditMulti,11388328,21,21)
  {
   EventCount=1
   WorkCount=1
   DataCount=12
   Width=517
   Height=445
   VOffset=100
   link(doWork1,15492792:doCalc,[(32,127)(32,118)])
  }
  Add(MathParse,15492792,70,112)
  {
   MathStr="%1 - %2"
   ResultType=0
   link(onResult,4034126:doCalc,[])
   link(X1,11388328:Data6,[(76,103)(62,103)])
   link(X2,11388328:Data12,[(83,103)(104,103)])
  }
  Add(MathParse,4034126,119,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,9858961:doCalc,[])
   link(X1,11388328:Data5,[(125,96)(55,96)])
   link(X2,11388328:Data11,[(132,89)(97,89)])
  }
  Add(MathParse,9858961,168,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,14265988:doCalc,[])
   link(X1,11388328:Data4,[(174,82)(48,82)])
   link(X2,11388328:Data10,[(181,75)(90,75)])
  }
  Add(MathParse,14265988,217,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,10531960:doCalc,[])
   link(X1,11388328:Data3,[(223,70)(41,70)])
   link(X2,11388328:Data9,[(230,64)(83,64)])
  }
  Add(MathParse,10531960,273,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,3971648:doCalc,[])
   link(X1,11388328:Data2,[(279,58)(34,58)])
   link(X2,11388328:Data8,[(286,51)(76,51)])
  }
  Add(MathParse,3971648,329,112)
  {
   DataCount=3
   MathStr="%1 - %2 - (%3<0)"
   ResultType=0
   link(onResult,2494265:doCalc,[(368,118)(368,153)(60,153)(60,167)])
   link(X1,11388328:Data1,[(335,44)(27,44)])
   link(X2,11388328:Data7,[(342,37)(69,37)])
  }
  Add(MathParse,2494265,70,161)
  {
   DataCount=1
   MathStr="(%1 + 60) mod 60"
   ResultType=0
   link(onResult,1511602:doCalc,[])
   link(X1,15492792:Result,[])
  }
  Add(FormatStr,9797754,196,420)
  {
   DataCount=6
   Mask="%6 %5 %4 %3 %2 %1"
   link(onFString,11388328:onEvent1,[(499,432)(499,127)])
   link(Str1,9406819:Var,[(202,338)(76,338)])
   link(Str2,10930018:Var,[(209,338)(125,338)])
   link(Str3,15539660:Var,[(216,338)(174,338)])
   link(Str4,3078774:Var,[])
   link(Str5,9914236:Var,[(230,338)(279,338)])
   link(Str6,12071010:Var,[(237,282)(335,282)])
  }
  Add(MathParse,1511602,119,161)
  {
   DataCount=1
   MathStr="(%1 + 60) mod 60"
   ResultType=0
   link(onResult,4617103:doCalc,[])
   link(X1,4034126:Result,[])
  }
  Add(MathParse,4617103,168,161)
  {
   DataCount=1
   MathStr="(%1 + 24) mod 24"
   ResultType=0
   link(onResult,12733111:doCalc,[])
   link(X1,9858961:Result,[])
  }
  Add(MathParse,12733111,217,161)
  {
   DataCount=1
   MathStr="(%1 + 31) mod 31"
   ResultType=0
   link(onResult,10836643:doCalc,[])
   link(X1,14265988:Result,[])
  }
  Add(MathParse,10836643,273,161)
  {
   DataCount=1
   MathStr="(%1 + 12) mod 12"
   ResultType=0
   link(onResult,9406819:doConvert,[(318,167)(318,210)(58,210)(58,230)])
   link(X1,10531960:Result,[])
  }
  Add(ConvertorEx,12071010,329,224)
  {
   Mode=14
   Word_1="рiк"
   Word_2="роки"
   Word_5="рокiв"
   link(onResult,9797754:doString,[(376,230)(376,311)(184,311)(184,426)])
   link(Data,3971648:Result,[])
  }
  Add(ConvertorEx,3078774,217,224)
  {
   Mode=14
   Word_1="день"
   Word_2="днi"
   Word_5="днiв"
   link(onResult,9914236:doConvert,[])
   link(Data,12733111:Result,[])
  }
  Add(ConvertorEx,9914236,273,224)
  {
   Mode=14
   Word_1="мiсяць"
   Word_2="мiсяцi"
   Word_5="мiсяцiв"
   link(onResult,12071010:doConvert,[])
   link(Data,10836643:Result,[])
  }
  Add(ConvertorEx,15539660,168,224)
  {
   Mode=14
   Word_1="година"
   Word_2="години"
   Word_5="годин"
   link(onResult,3078774:doConvert,[])
   link(Data,4617103:Result,[])
  }
  Add(ConvertorEx,10930018,119,224)
  {
   Mode=14
   Word_1="хвилина"
   Word_2="хвилини"
   Word_5="хвилин"
   link(onResult,15539660:doConvert,[])
   link(Data,1511602:Result,[])
  }
  Add(ConvertorEx,9406819,70,224)
  {
   Mode=14
   Word_1="секунда"
   Word_2="секунди"
   Word_5="секунд"
   link(onResult,10930018:doConvert,[])
   link(Data,2494265:Result,[])
  }
END_SDK
В каком ошибка, почему разница в сутки, от одинаковых дат??????
карма: 1

0
файлы: 1code_32057.txt [3.3KB] [211]
ФорумыМежду деломЭлементы Системы:Время-дата, разница дат. ← Ctrl12Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика