QB4PE Spring Banner Contest!

[bplus]

I found the error in dbox code:

Code: (Select All)

For i = 0 To nDrops
    newDrop i, 1
Next
'Color , &HFF009900
While _KeyDown(27) = 0
    'Cls
    _PutImage , wallpaper&, 0 ' <<<<<<<<<<  not paper&  use wallpaper&
    For i = 0 To nDrops
        drawDrop (i)
        drop(i).curY = drop(i).curY + 1
        If drop(i).curY > Len(s$(i)) Then newDrop i, 0
    Next
    '_PutImage (25, 18)-Step(220, 220), l&, 0
    _PutImage (25, 18)-(245, 238), l&, 0
    _Display
    'If InKey$ = " " Then _SaveImage "Spring 2024 Matrix.png"
    _Limit 15
Wend

but I suppose I won't get a prize for that either