Loa của máy PC (Personal Computer : máy tính cá nhân) làm theo nguyên lý chuyển mạch bật tắt. Trong trường hợp bật sẽ tạo âm thanh ở một tần số nào đó, còn trường hợp chuyển mạch tắt sẽ tắt luôn âm thanh.

     Công cụ cơ bản của Turbo Pascal để xử lý loa là các thủ tục Sound, Nosound và Delay. Tất cả các thủ tục này đều là thành phần của unit Crt. Sound nhận một tham biến là tần số của tone cần phát ra. Ví dụ nốt Đô trung có tần số 512 Hertz, trong khi nốt Đô ở quảng tám thấp hơn có tần số 256 Hertz và nốt Đô ở quảng tám cao hơn có tần số 1024 Hertz.

     Đi kèm với thủ tục Sound là thủ tục Nosound. Mỗi khi bật tắt loa để phát một tone nào đó, loa sẽ tiếp tục phát tone cho đến khi bạn dùng Nosound. Để ấn định thời khoảng phát tone, bạn dùng thủ tục Delay. Delay nhận một tham biến cho biết thời khoảng trễ (tính bằng mili giây). 

     Ví dụ sau đây sẽ cho loa phát ra  âm thanh có tần số 500 Hertz trong khoảng thời gian 1000 mili giây (1 giây) : 

                    Program Am_thanh ;

                    Uses Crt ;

                    BEGIN

                       Sound ( 500 ) ;

                       Delay ( 1000 ) ;

                       Nosound ;

                    END.