サルでもわかるWEBプログラミング

フリーソフトのみでホームページ作成

ユーザ用ツール

サイト用ツール

現在位置: index.html » elm » time
トレース:
elm:time


差分

このページの2つのバージョン間の差分を表示します。

この比較画面へのリンク

両方とも前のリビジョン前のリビジョン
次のリビジョン		前のリビジョン
elm:time [2019/06/17] – [elmで月monthを表示] adash333elm:time [2019/06/21] (現在) – [Elmでアナログ時計] adash333
行 1: 行 1:
 ====== Elmでtime ====== ====== Elmでtime ======
- 
- 
  
 https://qiita.com/ababup1192/items/803bd2e66461c70bf7e7 https://qiita.com/ababup1192/items/803bd2e66461c70bf7e7
行 17: 行 15:
 ElmとFirebaseでチャットアプリを写経してみる（２）複数ファイルを1個のファイルにする ElmとFirebaseでチャットアプリを写経してみる（２）複数ファイルを1個のファイルにする
 2019年6月13日2019年6月16日 2019年6月13日2019年6月16日
 +
 +===== Elmでアナログ時計 =====
 +
 +https://ellie-app.com/5StJCN9GCb9a1
 +{{:elm:pasted:20190621-135559.png}}
 +
 +[[https://ellie-app.com/37gYpCSxQHGa1|IntroductionToElmのサンプルコード]]と[[https://yoheikoga.github.io/2016/11/17/elm-analog-clock-time-now/|Elmで現在時刻を表示するアナログ時計2016-11-17]]をコピペしました。
 +
 +
 +https://qiita.com/KYhei/items/2f469d7254b3d06bd054
 +
  
  
行 67: 行 76:
 https://github.com/ababup1192/elm-firebase-chat/blob/master/src/Main.elm https://github.com/ababup1192/elm-firebase-chat/blob/master/src/Main.elm
  
-<code> +<html> 
-import Time exposing (Month(..), Posix, Weekday(..), Zone) +<script src="https://gist.github.com/adash333/feee772ea316b98df5037652a619a258.js"></script>
- +
- +
- +
--- --------------------------- +
--- TIME Util +
--- --------------------------- +
- +
- +
-toDate : Zone -> Posix -> String +
-toDate zone time = +
-    let +
-        padZero2 = +
-            String.padLeft 2 '0' +
- +
-        month = +
-            Time.toMonth zone time |> toMonthNumber +
- +
-        day = +
-            Time.toDay zone time |> String.fromInt +
- +
-        year = +
-            Time.toYear zone time |> String.fromInt +
- +
-        hour = +
-            Time.toHour zone time |> String.fromInt |> padZero2 +
- +
-        minutes = +
-            Time.toMinute zone time |> String.fromInt |> padZero2 +
- +
-        week = +
-            Time.toWeekday zone time |> toJapaneseWeekday +
-    in +
-    year ++ "年" ++ month ++ "月" ++ day ++ "日 " ++ hour ++ ":" ++ minutes ++ " " ++ week ++ "曜日" +
- +
- +
-toMonthNumber : Time.Month -> String +
-toMonthNumber month = +
-    case month of +
-        Jan -> +
-            "1" +
- +
-        Feb -> +
-            "2" +
- +
-        Mar -> +
-            "3" +
- +
-        Apr -> +
-            "4" +
- +
-        May -> +
-            "5" +
- +
-        Jun -> +
-            "6" +
- +
-        Jul -> +
-            "7" +
- +
-        Aug -> +
-            "8" +
- +
-        Sep -> +
-            "9" +
- +
-        Oct -> +
-            "10" +
- +
-        Nov -> +
-            "11" +
- +
-        Dec -> +
-            "12" +
-             +
-toJapaneseWeekday : Weekday -> String +
-toJapaneseWeekday weekday = +
-    case weekday of +
-        Mon -> +
-            "月" +
- +
-        Tue -> +
-            "火" +
- +
-        Wed -> +
-            "水" +
- +
-        Thu -> +
-            "木" +
- +
-        Fri -> +
-            "金" +
- +
-        Sat -> +
-            "土" +
- +
-        Sun -> +
-            "日" +
- +
-</code> +
  
 +</html>
  
  


elm/time.1560740611.txt.gz · 最終更新: 2019/06/17 by adash333
Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki