Изобразить природное или физическое явление: Волны — QBasic(Бейсик)

CLS
SCREEN 9
s = .01
i = 0
j = .7
DO WHILE i < 30
    FOR x = 0 TO 7 STEP s
        LINE (x * 100 - s, 50 + 15 * SIN(x - s + j))-(x * 100, 50 + 15 * SIN(x + j))
        LINE (x * 100 - s, 100 + 20 * SIN(x - s + i))-(x * 100, 100 + 20 * SIN(x + i))
    NEXT
    i = i + .3
    j = j + .7
    CLS
LOOP