Easy language solar terms code

. Support library shell

. Subroutine _ button 1_ was clicked.

If true (edit box 1. Content = "")

Information box ("Setting time cannot be empty", 0, "Error prompt")

Return()

If it's over.

Clock 1. Clock period = 1000.

. Subroutine _ _ Start Window _ Created

Clock 1. Clock period = 0.

Edit box 1. Input method = 3? Integer text input

Subroutine _ Clock 1_ Periodic Event

. Local variable time, integer type, static.

Start judging (time ≥ to an integer (edit box 1. Content) × 60)

_ Start the window. Title = "Time is up and the system is shutting down. . 。"

Shut down the system (# shutdown, true)

. default

Time = time+1

_ Start the window. Title = "How long is it before shutdown:"+to text (to integer (edit box 1. Content) × 60 times)+"second"

The trial is over