Tutorials to .com

Tutorials to .com » Software » Vfp » OK karaoke subtitles colored dynamic display

OK karaoke subtitles colored dynamic display

Print View , by: iSee ,Total views: 20 ,Word Count: 417 ,Date: Sat, 18 Apr 2009 Time: 5:37 PM


This article provides an example of karaoke OK subtitles coloring process, the idea is for the use of FoxBASE + the SUBSTR function in the string shown in the corresponding string of characters to extract dynamic shading to simulate the subtitles karaoke OK coloring effects. Procedures adopted in FoxBASE +2.10.
SET TALK OFF
SET STATUS OFF
SET SCOREBOARD OFF
? SYS (2002)
SET COLOR TO +7 / 1
CLEAR
STRING = 'karaoke subtitles colored dynamic display OK "
@ 12,24 SAY STRING
SET COLOR TO 1 / +7
L = LEN (STRING)
I = 1
DO WHILE I <= L
CH = SUBSTR (STRING, I, 1)
IF CH <> ''
@ 12,23 + I SAY CH
?? CHR (7)
J = 0
DO WHILE J <5000
J = J +1
ENDDO
ENDIF
I = I +1
ENDDO
SET COLOR TO 7 / 0
CLEAR
? SYS (200,1)
SET SCOREBOARD ON
SET STATUS ON
SET TALK ON


Visual FoxPro Tutorial Articles


Can't Find What You're Looking For?


Rating: Not yet rated

Comments

No comments posted.