代码之家  ›  专栏  ›  技术社区  ›  Galwegian

基本-启动按键话筒录音?

  •  0
  • Galwegian  · 技术社区  · 16 年前

    我负责一个旧的基本程序,需要修改才能激活特定按键上的麦克风录音。我不知道怎么做。

    这里有人能发光吗?

    谢谢你的帮助。

    编辑: 我很确定它最初是为GW-BASIC编写的。

    1 回复  |  直到 16 年前
        1
  •  1
  •   ChrisV    16 年前

    因为听起来你没有任何音频代码,我的建议是你 不要 尝试从GW-BASIC录制。没有访问声卡的内置功能(声音和嘟嘟声不算在内,因为它们与PC扬声器一起工作),在Windows中发送SoundBlaster控制代码最多是不可靠的。使用辅助的Windows本机程序进行录制。

    至于基本代码,您必须对键盘进行轮询。例子:

    100 PRINT "Press any key to continue"
    110 A$ = INKEY$
    120 IF A$ = "" THEN GOTO 110
    130 IF A$ = CHR$(1) THEN GOSUB 1000
    140 PRINT "Rest of code goes here..."
    1000 ' Ctrl+A triggered the microphone
    1010 PRINT "Starting microphone recording."
    1020 SHELL "otherprg --startrecording"
    1030 RETURN
    

    替换您首选的密钥代码。如果使用input,有一种方法——key语句?--要制作功能键,请插入您选择的文本。按功能键时,使用键插入chr$(2)+chr$(13)(^b+enter),然后在每次输入调用中使用instr扫描chr$(2)的结果,并根据需要分支到麦克风代码。

    但是,如果您使用输入来读取数字,这仍然不起作用。说真的,除非麦克风录音盒受到了极大的限制,否则你将自己设置为只能正常工作的可怕代码。

    编辑: 所有这些都是围绕着最大的问题:GW-BASIC是单一任务。当你用麦克风录音时,你不能在节目的其他地方做真正的工作,反之亦然。

    推荐文章