added 7 characters in body; edited tags

Source Link

edited Sep 13, 2018 at 11:43

137.7k
13
289
751

I have this code. When I click on the clock, my alarm don't activate and not work. I have tried with Dynamic ModuleDynamicModule and nothing. I don't know where is the error.

reloj = Dynamic[
   Refresh[ClockGauge[DateString["Time"], ImageSize -> 120, 
     LabelStyle -> {Darker@Black, 10.5, Bold}, 
     GaugeStyle -> {Red, Red, Black}, PlotTheme -> "Minimal", 
     TicksStyle -> Directive[Black, Bold], LabelStyle -> Bold, 
     GaugeLabels -> {"ROLEX", Placed[ "AMPM", {0.5, 0.35}]}, 
     GaugeMarkers -> "ThinArrowNeedle"], UpdateInterval -> 1]]; 

sound = EmitSound@
   Import[NotebookDirectory[] <> "alarmbeep.mp3", "Sound"]; 

alarma = Dynamic@
   Panel[Row[{Column[{Control[{{h, "", "Hours"}, Range[25] - 1}], 
        Control[{{m, "", "Minutes"}, Range[61] - 1}], 
        Control[{{oo, True, "Alarm"}, {True -> "ON", 
           False -> "OFF"}}]}], 
      If[Refresh[DateList[], UpdateInterval -> 1][[4 ;; 5]] == {h, 
          m} && oo, sound]}], Background -> LightBlue]; 

EventHandler[reloj, 
 "MouseClicked" :> 
  Quiet@CreateDialog[Column[{Panel[alarma], ChoiceButtons[]}], 
    WindowTitle -> "CONFIGURE LA ALARMA"]]

I have this code. When I click on the clock, my alarm don't activate and not work. I have tried with Dynamic Module and nothing. I don't know where is the error.

reloj = Dynamic[
   Refresh[ClockGauge[DateString["Time"], ImageSize -> 120, 
     LabelStyle -> {Darker@Black, 10.5, Bold}, 
     GaugeStyle -> {Red, Red, Black}, PlotTheme -> "Minimal", 
     TicksStyle -> Directive[Black, Bold], LabelStyle -> Bold, 
     GaugeLabels -> {"ROLEX", Placed[ "AMPM", {0.5, 0.35}]}, 
     GaugeMarkers -> "ThinArrowNeedle"], UpdateInterval -> 1]];
sound = EmitSound@
   Import[NotebookDirectory[] <> "alarmbeep.mp3", "Sound"];
alarma = Dynamic@
   Panel[Row[{Column[{Control[{{h, "", "Hours"}, Range[25] - 1}], 
        Control[{{m, "", "Minutes"}, Range[61] - 1}], 
        Control[{{oo, True, "Alarm"}, {True -> "ON", 
           False -> "OFF"}}]}], 
      If[Refresh[DateList[], UpdateInterval -> 1][[4 ;; 5]] == {h, 
          m} && oo, sound]}], Background -> LightBlue];
EventHandler[reloj, 
 "MouseClicked" :> 
  Quiet@CreateDialog[Column[{Panel[alarma], ChoiceButtons[]}], 
    WindowTitle -> "CONFIGURE LA ALARMA"]]

I have this code. When I click on the clock, my alarm don't activate and not work. I have tried with DynamicModule and nothing. I don't know where is the error.

reloj = Dynamic[
   Refresh[ClockGauge[DateString["Time"], ImageSize -> 120, 
     LabelStyle -> {Darker@Black, 10.5, Bold}, 
     GaugeStyle -> {Red, Red, Black}, PlotTheme -> "Minimal", 
     TicksStyle -> Directive[Black, Bold], LabelStyle -> Bold, 
     GaugeLabels -> {"ROLEX", Placed[ "AMPM", {0.5, 0.35}]}, 
     GaugeMarkers -> "ThinArrowNeedle"], UpdateInterval -> 1]]; 

sound = EmitSound@
   Import[NotebookDirectory[] <> "alarmbeep.mp3", "Sound"]; 

alarma = Dynamic@
   Panel[Row[{Column[{Control[{{h, "", "Hours"}, Range[25] - 1}], 
        Control[{{m, "", "Minutes"}, Range[61] - 1}], 
        Control[{{oo, True, "Alarm"}, {True -> "ON", 
           False -> "OFF"}}]}], 
      If[Refresh[DateList[], UpdateInterval -> 1][[4 ;; 5]] == {h, 
          m} && oo, sound]}], Background -> LightBlue]; 

EventHandler[reloj, 
 "MouseClicked" :> 
  Quiet@CreateDialog[Column[{Panel[alarma], ChoiceButtons[]}], 
    WindowTitle -> "CONFIGURE LA ALARMA"]]

Maybe the grammar error was intentional. can't say :)

Link

edited Sep 7, 2018 at 14:44

Johu

5k
17
43

My clock don'tdoesn't work

Source Link

asked Sep 7, 2018 at 14:32

Andres

543
1
3
9

My clock don't work

I have this code. When I click on the clock, my alarm don't activate and not work. I have tried with Dynamic Module and nothing. I don't know where is the error.

reloj = Dynamic[
   Refresh[ClockGauge[DateString["Time"], ImageSize -> 120, 
     LabelStyle -> {Darker@Black, 10.5, Bold}, 
     GaugeStyle -> {Red, Red, Black}, PlotTheme -> "Minimal", 
     TicksStyle -> Directive[Black, Bold], LabelStyle -> Bold, 
     GaugeLabels -> {"ROLEX", Placed[ "AMPM", {0.5, 0.35}]}, 
     GaugeMarkers -> "ThinArrowNeedle"], UpdateInterval -> 1]];
sound = EmitSound@
   Import[NotebookDirectory[] <> "alarmbeep.mp3", "Sound"];
alarma = Dynamic@
   Panel[Row[{Column[{Control[{{h, "", "Hours"}, Range[25] - 1}], 
        Control[{{m, "", "Minutes"}, Range[61] - 1}], 
        Control[{{oo, True, "Alarm"}, {True -> "ON", 
           False -> "OFF"}}]}], 
      If[Refresh[DateList[], UpdateInterval -> 1][[4 ;; 5]] == {h, 
          m} && oo, sound]}], Background -> LightBlue];
EventHandler[reloj, 
 "MouseClicked" :> 
  Quiet@CreateDialog[Column[{Panel[alarma], ChoiceButtons[]}], 
    WindowTitle -> "CONFIGURE LA ALARMA"]]

dynamic

Stack Exchange Network

Return to Question

My clock don'tdoesn't work

My clock don't work