======== _dos63.def ======== by - aja - * M 1 "!Timer" ; ax[, dx[, cx[, am5, ax=$2C00, &i($21) ; ; &m("%02d:%02d:%02d",cx>>8,cx&63,dx>>8) ; ← 追加 ; am], cx], dx], ax], ; ?. ic[$7000, ;Auto Do 自動起動 モジュール by m.gann (ic-0][&$f000)?ic+++0],?ic]++, ;&m("%d",ic&$fff*Qt) (ic&$fff>=60*5/Qt)?{ ic-,>83 } ;to Saver ( 60*t/Qt: t 分 ) ; (Qt<2&&ic&$fff>1)?>02 ;to Watch /Qt1 (Qt<2||Qt>15)?. ;Auto Save /Qt2..15 (mr!=1)?. (qn<=Qc)?. (mb)?. ; (Qw){ ; &m("オートセーブしますか?") ; (Qw){ &w(1) &k (r)?{ &m("キャンセルしました") qn-, . } } ; } eb[-,#S #m #83 eb], ; 編集テキストのみセーブ ; sq[-, #Q 'N'(s)?{ #[ #Q "YN"} sq], #83 ; 全修正テキストをセーブ ;2: r[, ;※ディジタル・ウォッチ ; ax$2c00, &i($21) &Sp(si=pr, ;$(1b)[36m 色属性 ; "$(1b)[%02d;69H $(1b)[36m-%02d:%02d:%02d-$(1b)[m$(8)", ; lc-1,cx>>8,cx&63,dx>>8) &v(0) se[+, ; cx40, &i("$(8a,04,cd,29,3c,08,74,01,46,e2,f5,c3)") ;40=28+12 ; pn.-15=-1, se], (r]) 83: #if 98 (wy>20)?{ &Zs("wtime_30") (r)?? &z("wtime_30") >* }?{ &Zs("wrldtime") (r)?? &z("wrldtime") >* ; . } #else &Zs("wrldtime") (r)?? &z("wrldtime") >* #endif #if 98 14 [CLR] "表示位置変更" #else 14 [HOME] "表示位置変更" ;by 榊原 知 #endif ?. (ly)??{(wy-2){#x#w}.} ((ly-1)%(wy/2)+1){#e#z} * ======== End of _dos63.def ========