分享

Foxpro Windows 制作影视汉字字幕特技

 Alkaid2015 2012-07-26

制作字幕三维电视动画特技,可使用3DS与高级字幕机制作动态图像,这要求有较高的软硬件资源,一般用户不可能有这种条件,其实用Foxpro Windows就可制作出高质量汉字电视字幕特技。字幕特技在管理软件启动中使用,新颖别致,赏心悦目。其制作方法如下:
  一、用屏幕生成器制作电视汉字字幕显示屏
  汉字字幕在屏中翻滚,而字幕屏设计成无名None窗口在底屏中移动。启动屏幕生成器,根据需要设置屏幕颜色,边上画左上黑线,右、下白线组成立体效果的边框。使用输入字符按钮工具在框内写入要显示的汉字“烟叶库存管理”。再使用复制的方法复制汉字“烟叶库存管理”。把二个汉字字符串分别设置成红色和黑色,红色表示汉字彩色,黑色表示影印。将字符串移动到恰当位置,这样,带影印的立体汉字字幕屏就制作成功了。按ALT+PrSc键,将屏幕拷贝进Windows的剪贴板上(Clipboard)。
  二、用Windows画笔制作动态字幕
  按Ctrl+Esc键,启动程序管理器,再启动画笔,按Edit/Paste菜单,再对画笔中产生刚拷贝进粘贴板图形进行编辑,使用剪接、翻转、缩小或放大等操作,易于得到边框内一组动态图像名即正像、较扁正像、较扁倒像、倒像、较扁倒像、较扁正像,分别取名为move00.bmp、move01.bmp、move02.bmp、move03.bmp、move04.bmp、move05.bmp。
  三、用Foxpro编制字幕特技.prg程序
  按Alt+Esc使窗口从画笔切换到Foxpro Windows状态,编制下面prg程序,其中Novell.bmp为屏幕底图。运行此程序可见到立体汉字字幕从屏外翻滚进屏内,直观、动感,强烈地改变用户视觉。
源程序如下:
SET DEFAULT TO D:BOOK && 环境设置
SET TALK OFF
SET ESCAPE OFF
set console off
@ 0,0 SAY ″c:windows
ovell.bmp″BITMAP STYLE ″T″ && 字幕动画背景
bchar=″movep00.bmp″
DEFINE WINDOW move AT 0.000,0.000 SIZE 9,100.000 FONT;
″MS Sans Serif″,8 NOFLOAT NOCLOSE NOMINIMIZE NONE;
FILL FILE ″movep00.bmp″ &&窗口设置
ACTIVATE WINDOW move SAME
k=6 &&帧动画幅数
for i=7.4 to 47.4 step 1 &&字幕动画显示循环
move window move to i*0.09,i*0.25 &&窗口向右下移动
ii=mod(i-7,k)
if ii<10
bchar=″movep0″+str(ii,1)+″.bmp″ && 定义0-9幅图像文件名
else
bchar=″movep″+str(ii,2)+″.bmp″ &&定义10以上图像文件名
endif
clear
@ 0.0,0.0 SAY bchar BITMAP;
SIZE 9,100;
STYLE ″T″ && 字幕动画显示
do delay && 延迟时间
endfor
proc delay
for ii=0 to 300
de=1
endfor
return

摘自:http://www./tech/q28.htm

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多