QBasic - Sine and cosine

This program draws waves using the sin and cos functions. This program has mainly educational purposes. Made for QBasic.

Downloads

English (EN)

cosin-en.exe

Language: English

Executable for Windows, generated with QB64.

cosin-en.bas

Language: English

Source code. You can generate an executable with it (using programs like QB64), you can use it on an old computer with QBASIC, or you can examine the code in case you are learning BASIC.

Spanish (ES)

cosin-es.exe

Language: Spanish

(In Spanish) Ejecutable para Windows, generado con QB64.

cosin-es.bas

Language: Spanish

(In Spanish) Código fuente. Puedes generar un ejecutable con el (usando programas como QB64), puedes usarlo en un antiguo computador con QBASIC, o puedes examinar el código en caso que estes aprendiendo BASIC.

Instructions

When you run the program, the waves will automatically be drawn on the screen. This program is an example of how you can use the sin and cos functions in QBasic. Check the ".bas" files for the source code and how it works.

For Windows executables, press the ALT and ENTER keys at the same time to enable fullscreen of the program.

Press any key to close the program.

Donations

You can use this software completely for free! On the other hand, donations are highly valuable to us. Your support allows us to meet our goals and continue developing games and apps. If this software has been useful to you, please consider making a donation.

Code

A small sample of the code:

Cls
Screen 12
Print ""
Print "  Sine and cosine"
Print " ~~~~~~~~~~~~~~~~~"
Print " This BASIC program draws waves using the SIN and COS functions."
Color 9
Locate 6, 2: Print "COS"
For T = 1 To 65 Step .1
    A = 8 * Cos(T)
    X = X + 1
    PSet (X, A + 110)
    For P = 1 To 200: Next P
Next T
Color 2
Locate 9, 2: Print "SIN"
X = 0
For T = 1 To 65 Step .1
    A = 8 * Sin(T)
    X = X + 1
    PSet (X, A + 158)
    For P = 1 To 200: Next P
Next T

To see the complete code, download the file with extension ".bas" from this page.

Important note: Files with the ".bas" extension may be displayed incorrectly in various text editors. This is due to character encoding. It is recommended to open these files in programs such as QB64, QBasic, or Visual Studio Code in a DOS encoding (CP437).

Credits

Programmed by Gustavo Belemmi

Tested by Karol Hidalgo

Special thanks to my dad for teaching me BASIC.

Visit our website!

https://hidalemmi.com