اذا لم تجد ما تبحث عنه يمكنك استخدام كلمات أكثر دقة.
PRINT"Hello, World"
CLS PRINT"Hello, World" END
LETBOTTLES=99:LETBOTTLES$="99":LETBOTTLE$=" bottles" FORA=1TO99 PRINTBOTTLES$;BOTTLE$;" on the wall, ";BOTTLES$;BOTTLE$;" ." LETBOTTLES=BOTTLES-1 IFBOTTLES>0THENLETBOTTLES$=LTRIM$(STR$(BOTTLES)):LETPRONOUN$="one" IFBOTTLES=0THENLETBOTTLES$="no more":LETPRONOUN$="it" IFBOTTLES<>1THENLETBOTTLE$=" bottles" IFBOTTLES=1THENLETBOTTLE$=" bottle" PRINT"Take ";PRONOUN$;" down and pass it around, ";BOTTLES$;BOTTLE$;" on the wall." PRINT:NEXTA PRINT"No more bottles on the wall, no more bottles ." PRINT"Go to the store and buy some more, 99 bottles on the wall."