Этот человек VH пришёл с другого языка. Он спалился на 42 странице - листинг в бейсике работать не будет.
DO
++sc
GR.MODIFY txt,"text",STR$(sc)
! Начальные языки пламени
в бейсике так не пишут. Там надо sc=sc+1
Но язык действительно интересен. Надо пробовать.