MarytesPradziuPradzia
   C = 0,028
     MarytesPlaukas = ?
                     KolMarytesPlaukasNusibaigs iki 0.041
                                               MarytesNekaltybe = 
0.00000000000000000000000000?
                                               MarytesNuodeme = ?
                                               KolMarytesNekaltybe < A
                                               B = MarytesNekaltybe
                                               D = 55 - 55 / 
MarytesNekaltybe
                                               IrasytiMarytesSkaistybesMasyva 
B
                                               IrasytiMarytesNuodemesMasyva 
D
                                               MarytesNekaltybe = 
MarytesNekaltybe + MarytesNuodeme
                                               End MarytesNekaltybe
                                               DoEvents
                 C = C + MarytesPlaukas
                 End MarytesPlaukas
Exit Maryte

Error Log:
 Err.description Buffer Overflow
Err.rezume NIEKADA NEPRASIDEK SU SVENTOMIS MERGELEMIS
End Log