ime t[l];\rinilgniph(&gd,&gm,"d:\tc")@\rinit();\rsetwritemode(l);\rgettime(t);.\rh=t[0].ti_hour;\rm=tlOJ.ti_min;\rs=t[O].ti_sec;\rsetcolor(7);\rd(150,h,30);\rsetcolor(14);\r(l(170,m,6);\rsetcolor(4);\rd(190,s,6);\rwhile(!kbhit())\r{whi!e(t[O].ti_sec==s)\rgettime(t);\rsound(400);\rdelay(70);\rsound(200);\rdelay(30);\rnosound();\rsetcolor(4);\rd(190,s,6);\rs=tLO].ti_sec;\rd(190,s,6);\rif (t[0].ti_min!=m)\r(\rsetcolor(14);\rd(170,m,6);\rd(170,m,6);\r)\rif (t[0].ti_hour!=h)\r{ setcolor(7);\rd(15O,h,3O);\rh=t[0].ti_hour;\rd(15O,h,3O)@\rsound(lOOO);\rdelay(240);\rnosound();\rdelay(140);\rsound(2000);\rdelay(240);\rnosound();.\r)\r)\rgetch();\rclosegraph();\r)
全文预览