Small program written in easy language--Electronic watch

Write software assessment when the thought of easy language, this I high school to write small program play programming software, just made up a small program to share, electronic watch.

, this is an EXE file that can be opened directly.

After opening the title, I set the time to be divided into Chinese and American time to choose from.

China time display and US time display, respectively.

The time can be changed dynamically, using the time period. When China time is displayed, shielding the US time period, when the United States time display, shielding China cycle, so as not to show confusion.

Also attached this small software (personal Web site, rest assured access, you can listen to music O (∩_∩) o): http://hgcrown.amnuo.com/

Another easy language source code:

. Version 2
. Support for the library Internet

. assembly Window assembly _ Startup Window

. subroutine _ button 1_ clicked

Clock 1. Clock period = 1000
Clock 2. Clock period = 0

. Subroutine _ Clock 1_ cycle Event
. Local Variables Web page data, text type
. local variable data front end, integer type
Local variable fetch time, text type
. Local variables remaining time, text type
. local variable time, datetime type
The local variable increases the time, date and time type.

Clock 1. Clock period = 1000
Web page data = To text (http Read file ("http://open.baidu.com/special/time/"))
Data front end = Look for text (Web page data, "Window.baidu_time (",, false) + 18
Remove time = Take text middle (Web page data, data front end, 10)
Time = increment/decrement time ([January 1, 1970 8 o'clock], #秒, to Integer (Take time))
Tab 1. title = To text (time)

. subroutine _ button 2_ clicked

Clock 2. Clock period = 1000
Clock 1. Clock period = 0

. Subroutine _ Clock 2_ cycle Event
. Local Variables Web page data, text type
. local variable data front end, integer type
Local variable fetch time, text type
. Local variables remaining time, text type
. local variable time, datetime type
The local variable increases the time, date and time type.

Web page data = To text (http Read file ("http://open.baidu.com/special/time/"))
Data front end = Look for text (Web page data, "Window.baidu_time (",, false) + 18
Remove time = Take text middle (Web page data, data front end, 10)
Time = increment/decrement time ([December 31, 1969 19 o'clock], #秒, to Integer (Take time))
Tab 1. title = To text (time)

Small program written in easy language--electronic watch