stuff

2024-02-22 15:35:06 +07:00
commit 8db26e9707
4220 changed files with 208544 additions and 0 deletions
@@ -0,0 +1,93 @@
+(defwidget calendar-win []
+  (eventbox
+    :onclick "scripts/toggle-calendar.sh --close &"
+    (box
+      :class "calendar-win"
+      :style "
+      ${rev_calendar ? '' : 'margin-top: -900px; margin-bottom: 900px;'}
+      ${anim_open_calendar ? 'transition: 200ms cubic-bezier(0.05, 0.7, 0.1, 1);' : 'transition: 150ms cubic-bezier(0.3, 0, 0.8, 0.15);'}
+      min-height: 1px;
+      "
+      ; (calendar)
+      ; Calendar
+      (box
+        :space-evenly false :orientation "v"
+        :halign "end" :valign "center"
+        (box
+          :space-evenly false :orientation "v"
+          (eventbox
+            :onscroll "scripts/scrollmonth {} &"
+            (box
+              :orientation "v"
+              :space-evenly false
+              (centerbox
+                :style "padding: 0 12px;"
+                (label :xalign 0 :class "calendarwin-title" :text "${calendartitle}")
+                (box)
+                (box
+                  :halign "end" :valign "center"
+                  (box
+                    :halign "end" :valign "center"
+                    (button
+                      :onclick "scripts/scrollmonth up &"
+                      :halign "end" :valign "center"
+                      :class "winicon dashfs-monthbutton"
+                      (image
+                        :valign "center"
+                        :path "images/svg/dark/caretup.svg"
+                      )
+                    )
+                    (button
+                      :onclick "scripts/scrollmonth down &"
+                      :halign "end" :valign "center"
+                      :class "winicon dashfs-monthbutton"
+                      (image
+                        :valign "center"
+                        :path "images/svg/dark/caretdown.svg"
+                      )
+                    )
+                  )
+                )
+              )
+              (box :space-evenly false :orientation "v"
+                ; :class "dashfs-section-nopad"
+                (box
+                  (for day in weekdays
+                    (box
+                      :class "calendarwin-button day${day.today}"
+                      (label :class "calendarwin-text" :text "${day.day}")
+                    )
+                  )
+                )
+                (for week in calendar
+                  (box
+                    (for day in week
+                      (button
+                        :class "calendarwin-button calendarwin-day${day.today}"
+                        (label :class "calendarwin-text" :text "${day.day}")
+                      )
+                    )
+                  )
+                )
+              )
+            )
+          )
+        )
+      )
+    )
+  )
+)
+
+(defwindow calendar
+  :wm-ignore true
+  :monitor 0
+  :focusable true
+  :geometry (geometry
+    :x "350px"
+    :y "61px"
+    :anchor "top right"
+    :width "0px"
+    :height "0px"
+  )
+  (calendar-win)
+)