 筮".

ਬ:        80 FIELD 1,2 AS Z$, 30 AS  B$
	       85 GET 1
	       90 A%=CVI(Z$)

17.   ᨬ묨 ப  몥 ᨪ.

       ⠬᪨ (᫮) 㭪権  몥 ᨪ   楫 
  権    㭪権,     ᯮ짮  	ࠡ⪨   
ࠡ⪨ ᨬ ப.

17.1. 㭪 CHR$.

     㭪 CHR ८ࠧ 祭 - 楫᫥ ࠦ  
ᮮ⢥騥 ᨬ ASCII.
ଠ:   /<६ ⨯ ᨬ쭮 ப>=/ CHR$(<㬥>)
     <㬥>  	 楫 ࠦ,	楫 ६    楫 
⠭⮩.   ਭ 祭  0  127 ⥫쭮.
     㭪  ⨯ "ᨬ쭠 ப".

ਬ:        10 PRINT CHR(65)
	       RUN
	       A
	       OK

17.2. 㭪 ASC

     㭪 ASC ⠢ 筮 祭,  ᮮ⢥饥  ASCII
ࢮ ᨬ । ࠦ  ᨬ ப.
ଠ:   /<INTEGER-६>=/ASC (<㬥>)
     <㬥>    ࠦ  ᨬ ப,  ६ ⨯ 
ᨬ쭮 ப  ⠭⮩ ⨯ ᨬ쭮 ப.

ਬ:        10 ="BASIC"
	       20 PRINT ASC(A$)
	       RUN
	       66
	       OK

17.3. 㭪 STR$.

     㭪  STR$  ८ࠧ 祭 - ᫮	ࠦ   
ᨬ ப.
ଠ:   /<६ ⨯ ᨬ쭮 ப>=/ STR$(<㬥>)
     <㬥>  	 ᫮ ࠦ,  ஥    ਭ 
  ⨬ ᫮ ⨯.
㭪  ⨯ "ᨬ쭠 ப".
ਬ:        40 %=40
	       50 PRINT STR$(A%);A%
	       RUN
	       40  40
	       OK

17.4.  㭪 VAL

     㭪  VAL  ⠢  ᫮ 祭  -  ।⠢
᫮ 祭   ᨬ쭮 ப.
     ଠ:   /<᫮ ६>=/ VAL(<㬥>)
     <㬥>    ࠦ  ᨬ ப,  ६ ⨯ 
ᨬ쭮  ப   ⠭⮩ ⨯  ᨬ쭮  ப.  ᫨  㬥 
।⠢  ᮡ  ।⠢  ᫮ ࠦ      ᨬ쭮 
ப,    ந室  ८ࠧ  ᫮ ।⠢   設 
ଠ.  ᫨	<㬥>   ।⠢ ᫮  祭   
 ᨬ쭮 ப,  㭪 ਭ 㫥 祭.
     㭪  ᫮ ⨯.
     ਬ:   30 PRINT VAL("-3.4")
	       RUN
	       -3.4
	       OK
	       10 PRINT VAL("ABC")
	       RUN
	       0
	       OK

17.5.  㭪	HEX$

     㭪    HEX$   ८ࠧ   -   筮   祭    
⭠筮 ᫮  ।    ᨬ쭮 ப.
     ଠ: /<६ ⨯ ᨬ쭮 ப>=/ HEX$(<㬥>)
     <㬥>  	  楫 ࠦ,楫  ६    楫 
⠭⮩.
     㭪  ⨯ "ᨬ쭠 ப".
ਬ:        30 X%=62
	       40 PRINT HEX$(X%)
	       RUN
	       3E
	       OK

17.6. 㭪 OCT$.

     㭪  OCT$  ८ࠧ - 筮 ᫮  	쬥筮 
᫮  ।    ᨬ쭮 ப.
ଠ:  /<६   ᨬ쭮 ப>=OCT$(<㬥>).
     <㬥>  	 楫 ࠦ,	楫 ६    楫 
⠭⮩.
     㭪  ⨯ "ᨬ쭠 ப".

ਬ:        50 PRINT OCT$(40)
	       RUN
	       50
	       OK

17.7. 㭪 RIGHT$.

     㭪  RIGHT$ ନ ன  ᨬ -  ᨬ쭮 
ப, 稭 ࠢ.
ଠ:   /<६ ⨯ ᨬ쭮 ப>=/RIGHT$
	  (<㬥>,<⢮>).
     <㬥>   ࠦ  ᨬ ப,  ६	⨯ 
ᨬ쭮 ப  ⠭⮩ ⨯ ᨬ쭮 ப.
     <⢮>  ᨬ 祭 <㬥>,  稭  ࠢ,  ࠧ 
  ᨬ ப.  <⢮>   楫  ࠦ,  楫 
६   楫 ⠭⮩,   祭    0   255 
⥫쭮.
     㭪  ⨯ "ᨬ쭠 ப".

ਬ:        10 A$="STRING"
	       20 Z$=RIGHT$(A$,3)
	       30 PRINT Z$
	       RUN
	       ING
	       OK

17.8. 㭪 LEFT$.

     㭪  LEFT$  ନ ப  ᨬ  -  ᨬ쭮 
ப, 稭 ᫥.
ଠ:    /<६ ⨯ ᨬ쭮 ப>=/
	   LEFT$(<㬥>,<⢮>).
     <㬥>    ࠦ  ᨬ ப,  ६ ⨯ 
ᨬ쭮 ப  ⠭⮩ ⨯ ᨬ쭮 ப.
       ᨬ  <⢮>  祭  <㬥>,   稭   ᫥, 
⠢   ப.  <⢮>   楫 ࠦ,  楫 
६   楫 ⠭⮩,   祭    0   255 
⥫쭮.
     㭪  ⨯ "ᨬ쭠 ப".

ਬ:        10 A$="STRING"
	       20 Z$=LEFT$(A$,3)
	       30 PRINT Z$
	       RUN
	       STR
	       OK

17.9. 㭪 SPACE$.

     㭪  SPACE$   ନ஢ -  ᨬ  ப, 
  ஡.
ଠ:    /<६ ⨯ ᨬ쭮 ப">=/
	   SPACE$(<㬥>).
     <㬥>  	 楫 ࠦ,	楫 ६    楫 
⠭⮩,   ਭ 祭  0  255 ⥫쭮.
     㭪  ⨯ "ᨬ쭠 ப".
ਬ:        10 FOR I%=1 TO 4
	       20 Z$=SPACE$(I%)
	       30 PRINT Z$;I%
	       40 NEXT
	       RUN
		1
		 2
		  3
		   4
	       OK

17.10. 㭪 STRING$.

     㭪   STRING$	ନ  ப  	-   ।⥫쭮 
 ᨬ,   ࠧ.
ଠ:    /<६ ⨯ ᨬ쭮 ப>=/
	   STRING$(<⢮>, <ᨬ>).
       <ᨬ>       ᫮  祭   
  ASCII,      ᨬ.   祭   	ᠭ   
᫮  ࠦ,  ᫮	६ 	᫮  ⠭,  祬 
祭    0  127 ⥫쭮.  <>   
ᨬ 祭 ᨬ쭮 ப  ⠭ ⨯ ᨬ쭮 ப.
     ࠬ	<⢮>  㪠뢠  ⢮  ७  ᨬ   
ନ㥬  ᨬ쭮 ப.  <⢮>    楫  ࠦ, 
楫  ६  楫 ⠭⮩,   祭    0  
255 ⥫쭮.
     㭪  ⨯ "ᨬ쭠 ப".

ਬ:        10 G$=STRING$(10,42)
	       20 PRINT G$ 
	       RUN
	       **********
	       OK

17.11. 㭪 INSTR.

     㭪  INSTR ⢫   - ।⥫쭮   
ᨬ쭮  ப   ᨬ ப  ।,     
樨   ᨬ쭠 ப ᮤন  ⢥ ன   ࢮ 
ᨬ쭮 ப.
ଠ:   /<INTEGER-६>=/ INSTR(<⮢ >,
	  <㬥>,<᪮ ࠦ>)
     ࠬ <⮢ >   ࢮ ᨬ  <㬥>,
稭  ண 稭  ᪮ ࠦ.  <⮢ > 
    楫  ࠦ<楫 ६    楫  ⠭⮩,   
祭     1  255 ⥫쭮.  ᫨ 	ࠬ   
,   稭  ࢮ ᨬ.
     ࠬ  <㬥>   <᪮ ࠦ>   ࠦ   
ᨬ  ப,  ६	⨯ ᨬ쭮 ப   ⠭⮩	⨯ 
ᨬ쭮 ப.
     㭪 ਭ 祭 0, ᫨ ᪮ ࠦ  뫮 , 
 ⨢ 砥 ।  ࢮ ᨬ <᪮ ࠦ>  
<㬥>.
     㭪  ⨯ INTEGER.
ਬ:        50 A$="MATHEMATIK"
	       60 B$="MA"
	       70 PRINT INSTR(A$,B$)
	       80 PRINT INSTR(3,A$,B$)
	       RUN
		1
		6
	       OK

17.12. 㭪 MID$  ନ஢ ப ᨬ.

     㭪  MID$  롨ࠥ  ப ᨬ    -  ᨬ쭮 
ப.
ଠ:   /<६ ⨯ ᨬ쭮 ப>=/
	  MID$(<㬥>,<>,<>).
<㬥>     ࠦ 	ᨬ  ப,  ६	⨯ 
ᨬ쭮  ப   ⠭⮩ ⨯ ᨬ쭮 ப,     祭 
롨ࠥ ப ᨬ.
     祭 <> । ᨬ  <㬥>,  稭  ண 
	ନ஢ ப.   祭    0    255 
⥫쭮.
     ࠬ  <> ।  롨ࠥ ன  ᨬ.   
⠪    0  255 ⥫쭮. ᫨  ࠬ  , 
   ப ᨬ ७  ᨬ   ᨬ쭮  ப 
<㬥>.
     ࠬ	<>   <>   楫묨	ࠦﬨ,  楫묨 
६묨  楫묨 ⠭⠬.
     㭪  ⨯ "ᨬ쭠 ப".

ਬ砭:
     ᫨    ᨬ쭮 ப <㬥> ࠢ   㪠  ࠬ஬
<>   ᨬ,  祬 । ࠬ஬ <>   ࠬ 
<>   ,    ன ᨬ ७   ᨬ.	᫨ 
㪠  ࠬ஬  <>   室  	  ᨬ쭮 
ப,  ନ  ᨬ쭠 ப.

ਬ:        10 P$=MID$("ᨬ쭠 ப",8,4)
	       20 PRINT P$
	       30 P$=MID$("ᨬ쭠 ப",8)
	       40 PRINT P$
	       50 P$=MID$("ᨬ쭠 ப",13)
	       60 PRINT "<";P$;">"
	       RUN
	       KETT
	       KETTE
	       OK

17.13.  MID$  饭 ப ᨬ  ᨬ쭮 ப.

     㭪,    ᨬ묨 ப, MID$ ᯮ   
஭   ᢠ,   ࠧ -  ᨬ 
ப   㣮 ᨬ쭮 ப,  稭  ।⥫쭮   
樨 ᨬ.
ଠ:   MID$(<ᨬ쭠 ப 1>,<>/,<>/)=
	  <ᨬ쭠 ப 2>
     <ᨬ쭠  ப 1>   ६ ⨯ ᨬ쭮 ப  
⠭⮩  ⨯  ᨬ쭮  ப.     ந    ᨬ 
ᨬ  <ᨬ쭮 ப 2>,  稭  <樨>.    ⮬  ࠬ 
<> । ᨬ쭮 ⢮ 塞 ᨬ.
     ࠬ	<>   <>   楫묨	ࠦﬨ,  楫묨 
६묨  楫묨 ⠭⠬,  祭    1  255.
     ᫨  ࠬ <>,    ⮫쪮 ᨬ <ᨬ쭮 
ப	2>,  ᪮쪮   ᨬ쭮 ப 1,  ᫨  <ᨬ쭠 
ப	2>  ᮤন ⮫쪮 ᨬ,	 ⨢  砥  ⮫쪮  ⮫쪮 
ᨬ,  ᪮쪮    <ᨬ쭠 ப 2>.  ᫨    ࠬ 
<>,   騩  <ᨬ쭮 ப 1>,  ந室 ᮮ饭  
訡.
ਬ砭:
     ᨬ쭮    ⮫쪮 ᨬ,  ⮡  﫠  
<ᨬ쭮 ப 1>.

ਬ:        10 SI="DAS IST ELNE ZEICHENKETTE"
	       20 MID$(SI$,9,4)="LENE"
	       30 PRINT SI$
	       RUN
	       DAS IST LENE ZEICHENKETTE
	       OK

17.14. 㭪 LEN.

     㭪  LEN  㪠뢠  ,  ..  ⢮  ᨬ  -
ᨬ쭮 ப.
ଠ:   /<INTEGER-६>/ LEN(<㬥>)
     <㬥>    ࠦ  ᨬ ப,  ६ 
⨯ ᨬ쭮 ப  ⠭⮩ ⨯ ᨬ쭮 ப.
     㭪  ⨯ INTEGER.

ਬ:        30 A="BASIC"
	       40 PRINT LEN(A$)
	       RUN
	       5
	       OK

18.  ⠭ ᫮ 㭪樨  몥 ᨪ.

     騩 ଠ  㭪権  :
     [<᫮ ६>=]<祢 ᫮>(<㬥>)
       ⢥  <㬥>     ࠦ,  ६  
⠭.    饬 砥 㭪 㪠뢠 ࠢ    ᢮, 
     ⠢  ࠦ    ᮤন    ᯨ᪥ 
஢  뢮.  ᫨  <㬥>  㭪樨     楫  ⨯,   
  <㬥>  ⢥ ⨯,   । ࠡ⪮	ந 
㣫.
         ᯮ짮   㭪権      ᫮    ᨪ-,
頥 祭  楫 ⨯  ⢥ 筮 筮.

18.1. 㭪  ABS

     㭪   ABS   頥  ᮫  稭     ᫮
㬥.
ଠ:  [<᫮ ६>=] ABS (<㬥>)
     <㬥>  	 ᫮  ࠦ, ᫮  ६   
᫮  ⠭⮩, 饩  ⨯ 楫,  ⢥ 筮  筮   
⢥ 㤢 筮.
     祭 㭪樨  ⨯ 楫  ⢥ 筮 筮.

ਬ:        10 PRINT ABS(8*(-3))
	       RUN
	       24
	       OK

18.2. 㭪 FIX
     
     㭪  FIX  ।  楫    祭    ᫮
㬥 筮 筮.
     ଠ:   [<楫 ६>=] FIX (<㬥>)
     <㬥>  	 ᫮ ࠦ, ᫮ ६   
᫮ ⠭⮩, ਭ饩 祭 筮 筮.
     祭 㭪樨  楫 ⨯.

ਬ砭:
     㭪 ॠ ᫥ ࠦ
	       SGN(X)*TNT(ABS(X))

ਬ:        10 A!=-57.85: B!=5: C!=-5.8
	       20 PRINT FIX(A!);FIX(B!);FIX(C!)
	       RUN
	       -57  5  -5
	       OK

18.3.  㭪 INT

     㭪 INT 믮 (⥬᪮) 㣫.
ଠ:   [<楫 ६>=] INT (<㬥>)
     <㬥>    ᫮ ࠦ,  ᫮  ६	 
᫮ ⠭⮩, ਭ饩 祭 筮 筮.
     祭 㭪樨  楫 ⨯.

ਬ:        10 Z!=88.88
	       20 PRINT INT(Z!)
	       30 PRINT INT(-Z!)
	       RUN
		88
	       -89
	       OK

18.4. 㭪 SGN

     㭪  SGN  ।   稭   ᫮  ࠦ
筮 筮.
ଠ:  [<楫 ६>=] SGN (<㬥>)
     <㬥>    ᫮ ࠦ, ᫮  ६   
᫮ ⠭⮩, ਭ饩 祭 筮 筮.
     祭 㭪樨  楫 ⨯  ਭ ᫥騥 祭:
	  =+1, ᫨ 稭 㬥  ;
	  = 0, ᫨ 稭 㬥 ࠢ ;
	  =-1, ᫨ 稭 㬥  .

ਬ:        10 INPUT "EINGABEWERT";X%
	       20 ON SGN(X)+2 GOTO 40,60,80
	       30 GOTO 100
	       40 PRINT "EINGABEWERT NEGATIV"
	       50 GOTO 10
	       60 PRINT "EINGABEWERT NULL"
	       70 GOTO10
	       80 PRINT "EINGABEWERT POSITIV"
	       90 GOTO 10
	       100 END

18.5. 㭪 SQR

     㭪   SQR  ।  祭  ⭮       
᫮  ࠦ 筮 筮. 
ଠ:    [<᫮ ६>=] SQR(<㬥>)	
     <㬥>    ᫮ ६,  ᫮  ࠦ  
᫮ ⠭⮩. 稭 㬥    ⥫쭮.
     祭 㭪樨  ⨯ ⢥ 筮 筮.

ਬ:        10 FOR I%=1 TO 5
	       20 PRINT I%, SQR(I%)
	       30 NEXT
	       RUN
		1    1
		2    1.41421
		3    1.73205
		4    2
.CP15		5    2.23607
18.6.  㭪 EXP

     㭪  EXP । 祭 ᯮ樠쭮 㭪樨   
᫮ ࠦ 筮 筮.
ଠ:   [<᫮ ६>=] EXP (<㬥>)
     <㬥>  	 ᫮ ࠦ,  ᫮ ६	 
᫮  ⠭⮩. 祭	㬥          稭 
87.3365.
     祭 㭪樨  ⨯ ⢥ 筮 筮.

ਬ:        10 Z!=10
	       20 PRINT EXP(Z!-7)
	       RUN
		 20.0855
	       OK

ਬ砭:
     ᫨  襥  ⨬ 祭  㬥  㤥  ॢ襭,  
뤠   ᮮ饭   訡 OVERFLOW (९).  㭪  ਭ 
祭,  ࠢ  襬	।⠢      ࠢ  . 
믮 ணࠬ த. 

18.7. 㭪 LOG

     㭪 LOG  ࠫ  稭  ᫮
ࠦ 筮 筮.
ଠ:   [<᫮ ६>=] LOG (<㬥>)
     <㬥>  	 ᫮ ࠦ,  ᫮  ⠭⮩   
᫮ ६.
     祭 㭪樨  ⨯ ⢥ 筮 筮.

ਬ:        10 A!=77
	       20 B!=8
	       30 PRINT LOG(A!/B!)
	       RUN
		2.26436
	       OK		      

18.8. 㭪 SIN

     㭪  SIN । 祭 ᨭ   ᫮  ࠦ
筮 筮.
ଠ: [<᫮ ६>=] SIN (<㬥>)
     <㬥>  	 ᫮ ࠦ,  ᫮  ६   
᫮ ⠭⮩,   ࠤ.
     祭 㭪樨  ⨯ ⢥ 筮 筮.

ਬ:        10 A!=0.9
	       20 B!=0.7
	       30 PRINT SIN(A!+B!)
	       RUN
		   .999574
	       OK

18.9. 㭪 COS

     㭪  COS । 祭 ᨭ  ᫮ ࠦ
筮 筮.
ଠ:  <᫮ ६>=] COS(<㬥>)
     <㬥>  	 ᫮ ࠦ,  ᫮  ६   
᫮ ⠭⮩,   ࠤ.
     祭 㭪樨   ⢥ 筮 筮.

ਬ:        10 X!=2*COS(4)
	       20 PRINT X!
	       RUN
		 -1.30729

18.10.	㭪 TAN

     㭪 TAN । 祭 ⠭  ᫮  ࠦ
筮 筮.
ଠ:  [<᫮ ६>=] TAN (<㬥>)
     <㬥>  	 ᫮ ࠦ,  ᫮  ६   
᫮ ⠭⮩,   ࠤ.
     祭 㭪樨  ⨯ ⢥ 筮 筮.

ਬ:        10 A!=1.9
	       20 PRINT TAN(A!/2)
	       RUN
		 1.39838
	       OK

18.11. 㭪 ATN

     㭪   ATN  頥  祭  ⠭     ᫮
ࠦ  ࢠ  -PI/2  PI/2 ( 祭).
ଠ:   [<᫮ ६>=] ATN (<㬥>)
     <㬥>  	 ᫮ ࠦ,  ᫮  ६   
᫮ ⠭⮩ ⨯ ⢥ 筮 筮.
     祭 㭪樨  ⨯ ⢥ 筮 筮.

ਬ:        10 X!=3
	       20 PRINT ATN(X!)
	       RUN
		 1.24905
	       OK

18.12. 㭪 RND

     㭪 RND 頥 ᥢ砩 ᫮  ࢠ  0  1.
ଠ:  [<᫮ ६>=] RND (<㬥>).
     騩  ᨪ-  ᥢ砩 ᥫ 
  ᯮ짮      㭪樨	RND.     㯠  	 
ࠢ    ࠬ <㬥>.  㬥⮬   ᫮ 
ࠦ,   ᫮	६    ᫮   ⠭,	 ਭ 
⢥  祭	筮  筮.  ᫨  㬥    稭 
  ,	  ᥢ砩  ᥫ  樠.	᫨ 
㬥    稭,  ࠢ  ,  	祭  㭪樨   
।饥  ᥢ砩 ᫮.  ᫨ 㬥   稭,   
,  뤠 ᫥饥 ᥢ砩 ᫮.

ਬ:        10 FOR I%=1 TO 3
	       20 PRINT RND(I%);		  '㬥 > 0
	       30 NEXT
	       40 PRINT: PRINT
	       50 X!=RND(-6)			  '㬥 < 0
	       60 FOR I%=1 TO 3
	       70 PRINT RND(I%);		  '㬥 > 0
	       80 NEXT
	       90 PRINT: PRINT
	       100 RANDOMIZE 888		  'RANDOMIZE
	       110 X!=RND(-6)			  '㬥 < 0
	       120 FOR I%=1 TO 3
	       130 PRINT RND;		   '  䥪,  . > 0
	       140 NEXT
	       150 PRINT: PRINT
	       160 FOR I%=1 TO 3
	       170 PRINT INT(RND(0)*100)
	       180 NEXT
	       RUN
		 .245121    .305003    .311866
		 .709808    .658938    .639327
		 .709808    .658938    .639327
		 63	    63	       63
	       OK
	    
18.13.	  RANDOMIZE  । ⮢	祭   
	砩 ᥫ

       몥  ᨪ     ᯮ殮    砩  ᥫ.
  RANDOMIZE । 砩 ⮢   ᫥⥫쭮 
ᥢ砩 ᥫ.
ଠ:  RANDOMIZE (<㬥>)
     㬥⮬     ᫮  ࠦ,  ᫮  ६  
᫮    ⠭	 楫   ⨯,    ।   ⮢     
᫥⥫쭮 ᥢ砩 ᥫ.  ⨬  ᫠   
 -32768  32767.  ᫨ 㬥   ,   ணࠬ 뤠 ᮮ饭 
"RANDOM NUMBER SEED ( ந쭮 ᫮) (-32768  () 32767)?"   
   ⮢ 窨.   ᠬ,    믮 ணࠬ 
  ᯮ짮  ⮢ 窨.
ਬ:        10 RANDOMIZE 3
	       20 FOR I%=1 TO 3
	       30 PRINT RND;
	       40 NEXT
	       RUN
		 0.88598  0.484668  0.586328  0.119426	0.709225
	       OK

ਬ砭:
     ᫨,  ਬ,    祭 砩 ᫠  ࢠ  0
 1,    믮  ᮮ⢥⢨  ஬ 170  ਬ  
।饬 㭪.

19.  ࠢ騥   㭪樨  몥 ᨪ

19.1.  LET  祭 ஢ ᢮

       LET   ᯥ樠쭮 뤥  ᢮.
ଠ:  [LET] <䨪 ६>=<ࠦ>
      LET  饬 砥  ⢮.

ਬ:    ᫥騥 ணࠬ ப 믮    :

	       10 LET Z!=Z!%+Z!
	    
	       10 Z!=Z!%+Z!

ਬ砭:
     ணࠬ,  ᠭ    ᨪ,  易⥫쭮 ᮤঠ
 LET.  ணࠬ  ᯮ짮  .

19.2.  REM

     ଠ:  REM <਩>
	      
		' <਩>
     ਨ    ணࠬ    ࠧ         
ணࠬ    ᨪ.  ਨ    뢠  ﭨ    믮
ணࠬ,   뤠   ⥪⮬.   祢 ᫮ REM  
⠪  ᯮ짮  "'".   ப    GOTO,  ᮮ. 
GOSUB,  ⠪ 㪠뢠  ப ਥ.

ਬ:        100 GOSUB 150
		    . . .
	       150 REM ணࠬ 1
		    . . .
	       180 RETURN  ' / 1
		    . . .
	       210 H3!=25*A!/B !:   ZZ#=H3!*ZZ#:  REM  樥

ਬ砭: ᨪ-஬ ਨ 室.

19.3.   END  砭 ᨪ-ணࠬ

       END ந 襭 ᨪ-ணࠬ.
ଠ:  END
      ⨦  END 뢠   䠩,  
  ஢    ⠭  室  ﭨ  ࠡ稥   
ᨪ-.    室  ﭨ    
 ᫥饩 . ᫨  ᨪ-ணࠬ  END ,
  ⠭⭮ 室  ⮣,    END 室 ᫥  ᫥ 
ணࠬ ப.  END  室    ணࠬ.
     :
       ᯮ짮  ᨪ-,   ⨦ ⮣  
뢠    䠩   ᫥    	樮  ⥬.	᫨ 
 END ,   ਭ,   室 ᫥ ᫥ 
ணࠬ ப.

19.4.  STOP  맮 ணࠬ 뢠

      STOP 뢠 믮 ணࠬ.
ଠ:   STOP
       뢠  뤠  ᮮ饭 "BREAK IN (뢠  )  <
ப>".   饥  ﭨ	ࠡ⪨    ணࠬ  ࠭.	 
  室    ﭨ		       . 
믮 ணࠬ   த    CONT (. 㭪 
5.5.)  ப ணࠬ, ।⢥ ᫥饩  ஬ STOP.

ਬ:        10 FOR I%=0 TO 4
	       20 FOR J%=1 TO 2
	       30 PRINT I%+J%
	       40 NEXT
	       50 STOP
	       60 NEXT
	       RUN
		 1  2
	       BREAK IN 50
	       OK
	       CONT
		 2  3
	       BREAK IN 50
	       OK

:
        ᯮ짮  ᨪ-    STOP   ᮮ⢥
 END.     樮 ⥬ 뤠 ᮮ饭 
   ⭠筮	,     믮   	STOP.	᫨ 
⢮ 樨 /D, /X  /E,  ⥫쭮 ᮮ頥  ப.

19.5. 㭪 FRE

     㭪  FRE  ᮮ頥    ⢥ 㯭        
६  ணࠬ.
ଠ:  FRE (O)
      
	 FRE (X$)	  
       ᯮ짮  ࢮ ଠ 㭪 頥 祭  '
,  㯭  ᫮ ६  ணࠬ,    ६,   
ᯮ짮 ண ଠ 頥 祭 ' , 㯭 
 ப ६.

ਬ:        350 PRINT FRE(O); FRE (A$)

ਬ砭:
     ᫨  㭪 뢠  ᯮ짮  ⢥  㬥  ⮩
ப  (..  FRE  (" ")),   맮 ᯥ稢 ।  ।
᢮  '    믮  ⠪  뢠  "ᡮ  ",   
砥   ८࣠    	  ப	祭    
᢮  ᯮ㥬    .    ८࣠ 
筮	ந    ९      ப	(⠪ 
뢠 㯮冷祭 ᨢ)      .  
맮	FRE  ("  ") ८࣠ ந ࠭   ந室  ⮬ 
ᨢ)      .  
맮	FRE  ("  ") ८࣠ ந 