﻿sueseo
{ '花咲季    ~hasawa~' }
reNului
{
    if !_argv[0] ; _argv[0] = year ;
    if !_argv[1] ; _argv[1] = month ;
    if !_argv[2] ; _argv[2] = day ;

    if (loihensa = TOINT(_argv[0]-2015))<0 ; loihensa=-loihensa ;
    lnihensa = TOINT(FLOOR(loihensa/4)) ;
    
    if (_argv[0]-2015+1)>0 {
        tlui = TOINT(loihensa*365+lnihensa+TOINT((0,31,59,90,120,151,181,212,243,273,304,334)[_argv[1]-1])+TOINT(_argv[2])-1) ;
        reloi = TOINT(2030+FLOOR(tlui/360)) ;
        relni = TOINT(FLOOR(tlui/30)%12 +1) ;    //月份1-12
        if !(relui = TOINT((tlui+1)%30)) ; relui= 30 ;    //日期1-30
        relniba = TOINT(FLOOR(tlui/30)%7) ;    //月种0-6
        if !(resazr = TOINT(((relui-1)+2*relniba)%7)) ; resazr=7 ;    //星期1-7
    
    }else{
        tlui = TOINT((loihensa-1)*365)+lnihensa+TOINT((365,334,306,275,245,214,184,153,122,92,61,31)[_argv[1]-1]-_argv[2]) ;
        reloi = TOINT(2029-FLOOR(tlui/360)) ;
        relni = TOINT(12-FLOOR(tlui/30)%12) ;    //月份1-12
        relui = TOINT(30-tlui%30) ;    //日期1-30
        relniba = TOINT(6-FLOOR(tlui/30)%7) ;    //月种0-6
        resazr = TOINT(((relui-1)+2*relniba)%7) ;    //星期1-7
    }
    relniba += 1    //月种1-7
    "【bosrc】\s[%(bsus+2)]\![set,autoscroll,disable]/
    ❀%(boottia)❀\_q\n现在的时间是：【%(wisjikan(hour)):%(wisjikan(minute))】\n▲%(sueseo)\n/
    %(reloi)年 %(wisjikan(relni))月 %(wisjikan(relui))日，%(wissazr(resazr))    月种：%(wislniba(relniba))"
    --
    "\n    "+(,,,,,,,,'七实祭',,,,'莉兹季')[relni]
    --
    if ASEARCHEX(relui,wanNelui(relniba)) ; "\n    休息日~"
}
wanNelui
{ case _argv[0] {
when 1 ; (4,7,10,14,16,20,21,22,26,28)
when 2 ; (2,5,8,12,14,18,19,20,24,26,30)
when 3 ; (3,6,10,12,16,17,18,22,24,28)
when 4 ; (1,4,8,10,14,15,16,20,22,26,29)
when 5 ; (2,6,8,12,13,14,18,20,24,27,30)
when 6 ; (4,6,10,11,12,16,18,22,25,28)
when 7 ; (2,4,8,9,10,14,16,20,23,26,30)
}}
wissazr
{ ('星期一 ~foia sazr~','星期二 ~hasa sazr~','星期三 ~kasa sazr~','星期四 ~qinesa sazr~','星期五 ~snLialia sazr~','星期六 ~lisrli sazr~','星期日 ~wanma sazr~')[_argv[0]-1] }
wislniba
{ ('tue','lei','zei','klo','liu','neu','fba')[_argv[0]-1] }
