用ruby编写的音乐

railschina

管理员

Rank: 36

1^# 大中小发表于 2007-3-2 16:42 只看该作者

用ruby编写的音乐

复制内容到剪贴板

代码:

require "win32/sound"

include Win32

Sound.beep(440, 200)

Sound.beep(440, 200)

Sound.beep(680, 200)

Sound.beep(680, 200)

Sound.beep(740, 200)

Sound.beep(740, 200)

Sound.beep(680, 400)



Sound.beep(620, 200)

Sound.beep(620, 200)

Sound.beep(560, 200)

Sound.beep(560, 200)

Sound.beep(500, 200)

Sound.beep(500, 200)

Sound.beep(400, 400)



Sound.beep(680, 200)

Sound.beep(680, 200)

Sound.beep(620, 200)

Sound.beep(620, 200)

Sound.beep(560, 200)

Sound.beep(560, 200)

Sound.beep(500, 400)



Sound.beep(680, 200)

Sound.beep(680, 200)

Sound.beep(620, 200)

Sound.beep(620, 200)

Sound.beep(560, 200)

Sound.beep(560, 200)

Sound.beep(500, 400)



Sound.beep(440, 200)

Sound.beep(440, 200)

Sound.beep(680, 200)

Sound.beep(680, 200)

Sound.beep(740, 200)

Sound.beep(740, 200)

Sound.beep(680, 400)



Sound.beep(620, 200)

Sound.beep(620, 200)

Sound.beep(560, 200)

Sound.beep(560, 200)

Sound.beep(500, 200)

Sound.beep(500, 200)

Sound.beep(400, 400)

很有意思：）

TOP

zch198627

新手上路

Rank: 1

2^# 大中小发表于 2007-4-9 13:22 只看该作者

beep方法内的数字代表什么？

TOP

railschina

管理员

Rank: 36

3^# 大中小发表于 2007-4-9 14:05 只看该作者

ri Win32::Sound::beep

复制内容到剪贴板

代码:

----------------------------------------------------- Win32::Sound::beep

     Win32::Sound::beep(frequency, duration)

------------------------------------------------------------------------

     Generates simple tones on the speaker. The function is synchronous;

     it does not return control to its caller until the sound finishes.



     The frequency (in Hertz) must be between 37 and 32767. The duration

     is in milliseconds.

First they ignore you, then they laugh at you, then they fight you, then you win.

TOP

haskio

新手上路

Rank: 1

4^# 大中小发表于 2007-4-10 16:21 只看该作者

厉害
满天都是小星星

TOP

zhuzhao

新手上路

Rank: 1

5^# 大中小发表于 2007-6-12 12:48 只看该作者

我靠，厲害啊，听了，哈哈！

TOP

v70

新手上路

Rank: 1

6^# 大中小发表于 2007-6-23 10:06 只看该作者

强，不知我的主板喇叭能支持吧！

TOP

‹‹ 上一主题 | 下一主题 ››