getYear

getYear関数は、指定された日付から「年」を返す関数です。

構文
getYear( date )
引数
date
日付(”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”)
戻値
指定した日付の「年」

プログラム

////////////////////////////////////////////////// // 【引数】 // date : 日付(”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”) // 【戻値】 // 指定した日付の「年」 ////////////////////////////////////////////////// FUNCTION getYear(date) GETTIME(0, date) RESULT = G_TIME_YY4 FEND

解説

  1. 2行目
    GETTIME(0, date)
    変数dateに指定した日時を特殊変数に代入。
  2. 3行目
    RESULT = G_TIME_YY4
    「年」を戻値として返す。

プログラム実行例

今年の恵方を求める

DIM year = getYear(today()) // 西暦の下1桁 DIM y = COPY(year, LENGTH(year), 1) SELECT y CASE 0; PRINT "西南西微西" CASE 1; PRINT "南南東微南" CASE 2; PRINT "北北西微北" CASE 3; PRINT "南南東微南" CASE 4; PRINT "東北東微東" CASE 5; PRINT "西南西微西" CASE 6; PRINT "南南東微南" CASE 7; PRINT "北北西微北" CASE 8; PRINT "南南東微南" CASE 9; PRINT "東北東微東" SELEND ////////////////////////////////////////////////// // 【引数】 // date : 日付(”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”) // 【戻値】 // 指定した日付の「年」 ////////////////////////////////////////////////// FUNCTION getYear(date) GETTIME(0, date) RESULT = G_TIME_YY4 FEND ////////////////////////////////////////////////// // 【引数】 // // 【戻値】 // 今日の日付 ////////////////////////////////////////////////// FUNCTION today() GETTIME() RESULT = G_TIME_YY4 + "/" + G_TIME_MM2 + "/" + G_TIME_DD2 FEND
結果
西南西微西