//--------------------------------------------------------------------------- // ADDTIME : 時間に時間を足すルーチン // [Usage] : // call ADDTIME $$time1, $$time2, ##flag; // $$addtime = $$return; // // $$time1 : 時間1("HH:MM:SS"形式 … ex. "13:57:02") // $$time2 : 時間2(       〃        ) // ##flag : = 0 なら時間が 23 を超える時間を許す。 // = 1 なら     〃      許さない。 // $$addtime : 結果("HH:MM:SS"形式) // //--------------------------------------------------------------------------- // サンプル: // call ADDTIME "01:15:20", "23:30:50", 0; // message "1時15分20秒+23時30分50秒 = " + $$return + " です。"; // endmacro; //--------------------------------------------------------------------------- // ADDTIME: $$ret = ""; // 秒の加算 ##s = val( rightstr($$1,2) ) + val( rightstr($$2,2) ); $$ret = ":" + rightstr( "0"+str(##s%60), 2 ); // 分の加算 ##m = val( midstr($$1,3,2) ) + val( midstr($$2,3,2) ) + ##s/60; $$ret = ":" + rightstr( "0"+str(##m%60), 2 ) + $$ret; // 時の加算 ##h = val( leftstr($$1,2) ) + val( leftstr($$2,2) ) + ##m/60; // 23 を超える場合の処理(指定時のみ) if( ##3 ) ##h = ##h%24; return rightstr( "0"+str(##h), 2 ) + $$ret; //---------------------------------------------------------------------------