¡@

²Ä¤Q¤T³¹°j°éªº¨Ï¥Î ( for-end )

<¦^¡u¤JªùÁ¿¸q¡v>

¡@AREMOS/Windows ´£¨Ñ§Ú­Ì¥i¹ï¤@­Ó list ¸Ìªº¨C¤@­Ó item ¶i¦æ¦P¼Ëªº¡u¹Bºâ¾Þ§@¡v¡C¥Ñ©ó list ¥i§t¤W¦Ê©Î³Ì¦h¦Ü 10,000 ­Ó items¡A¦]¦¹­Y¦³°j°é¾Þ§@ªº¥\¯à¡A¥i¸`¬Ù§Ú­Ì¤£¤Ö®É¶¡¡C¦³Ãö°j°éªº¨Ï¥Î¡A¥i°Ñ¦Ò­ì¤å¤â¥U¡uAREMOS/Windows Reference Manual¡vp. 95~97 ¤§»¡©ú¡C¥»³¹¶È¥H¤T­Ó½d¨Ò¨Ó¤¶²Ð¨ä³Ì²³æ¤§¥Îªk¡C¥H¤U¬Ò¬O¦b¥Dµe­± AREMOS Command ¤UÁä¤J«ü¥O¡C

 

13.1  °j°é¤§¨Ï¥Î¨Ò(¥Ò)

 (1) Áä¤J«ü¥O open e:\waremos\niaq¡Q

 (2) Áä¤J«ü¥O list n1=gnp ,cp,cg¡Q

 (3) Áä¤J«ü¥O set freq q ¡Qset per 1990q1 2003q4

 (4) Áä¤J«ü¥O for aaa=#nl¡Q

 (5) Áä¤J«ü¥O print pchya(#aaa)¡Q

 (6) Áä¤J«ü¥O analyze #aaa¡Q

 (7) Áä¤J«ü¥O end¡Q

»¡©ú¡G

 (4) :¡ufor aaa=#n1¡vªí¥Ü­n¹ï list n ¶i¦æ°j°é¹B§@¡Caaa ¬OÀH«Kµ¹¥N¸¹¡C±q¦¹¦æ°_§Y¶}©l°j°éªº¹B§@¡Aª½¨ì²Ä (7)¦æ end ¬°¤î¡Cfor-end ¤§¶¡§Y¬O°j°éªº¡u¹B§@«ü¥O¸s¡v¡C

 (5)(6)¡G¦¹¤G¦æ¦b for »P end ¤§¶¡¡A¬O°j°éªº¡u¹B§@«ü¥O¸s¡v¡C°ò¥»¤W¡A¡uaaa¡v¬O¤@¥N¸¹ (¬O¤@µêÀÀ¥N¸¹¡A¨Ã¤£¦s¦b)¡C¹q¸£·|§â n1 ¸Ìªº¨C¤@­Ó item ·í°µ¡uaaa¡v¦Ó¨Ì¦¹¡u¹B§@«ü¥O¸s¡v°õ¦æ¤@¦¸¡C

 (7)¡G¿é¤J end ¥H«á¡A¹q¸£¤~·|¶}©l°õ¦æ(5)(6)¤§«ü¥O¸s¡C

 <¦^­¶­º>

 

13.2  °j°é¤§¨Ï¥Î¨Ò(¤A)    

°²©w§Ú­Ì­n±q¸ê®Æ®w¥s¨ú¤j°ï¸ê®Æ¡A¨ú¥X«á¨Ã¥[¥H§ï¦W¡A¦Ó¥B¬O©w´Á(¨C¤ë©Î¨C©u)±`±`­n¶i¦æ¦¹ºØ¨ú§ï°Ê§@¡C¦¹®É¥H for-end ¨Ó°µ´N²«K¦h¤F¡C¤U­±½d¨Ò¬O§â aa  list ©Ò¥Nªí¤§À˯Á¥N¸¹±q niaq ¸ê®Æ®w copy ¨ì primary bank¡A¦P®É§â¦WºÙ§ï¦¨ bb  list ©Ò¥Nªí¤§¦W¦r¡C

(1)    Áä¤J«ü¥O set freq q ; set per 1985:1 1994:4¡F

(2)    Áä¤J«ü¥O open e:\waremos\niaq¡F

(3)    Áä¤J«ü¥O for aa=gnp,cp,cg  bb=x1,x2,x3¡F

(4)    Áä¤J«ü¥O copy #aa as #bb¡F

(5)    Áä¤J«ü¥O print #aa,#bb¡F

(6)    Áä¤J«ü¥O end¡F

»¡©ú¡Q

(3)¡G«e­±§Ú­Ì±Ä¥Î¹w¥ý³]©w list ªº¤º®e¬°¦ó¡C¦b¦¹¡A§Ú­Ì¤]¥i±Ä¥Îª½±µ¦b for listname =«á­±§â items ªº¦WºÙ¤@¤@¿é¤J¡Cfor aa=.¡K bb=.¡K;ªí¥Ü­n¹ï¨â­Ó list aa »P bb ¶i¦æ°j°é¹B§@¡A¥HªÅ¤@®æ§â aa »P bb ³s±µ°_¨Ó¡CFor ¬O«ÅºÙ¶}©l°j°é¹B§@¡Aª½¨ì²Ä (6)end ¥X²{¬°¤î¡Cfor-end ¤§¶¡§Y¬O°j°éªº¡u¹B§@«ü¥O¸s¡v¡C

(4)(5)¡G¦¹¤G«ü¥O¬°°j°éªº¡u¹B§@«ü¥O¡v¡C¡uaa¡v»P¡ubb¡v¬°µêÀÀ¥N¸¹¡C¹q¸£·|§â aa list ùتº¨C¤@­Ó item ·í°µ aa¡A§â bb list ¸Ìªº¨C¤@­Ó item ·í°µ bb¡A¦Ó¨Ì¦¹¡u¹B§@«ü¥O¡v°õ¦æ¤@¦¸¡C

(6)¡G¿é¤J end ¥H«á¡A¹q¸£¤~·|¶}©l°õ¦æ°j°éªº¹B§@«ü¥O¡C

 

 <¦^­¶­º>

¡@

13.3  °j°é¤§¨Ï¥Î¨Ò(¤þ)

¦b²Ä¥|³¹½d¨Ò(¤­)¡A§Ú­Ì­n¥s¨ú¸ó¸ê®Æ®w¤§®É¶¡§Ç¦C®É¡A¥²¶·¥t¥~«Ø¥ß¤@­Ó·sªºÅܼƨӱN©ñ¦b¤£¦P¸ê®Æ®wªº¦P¤@µ§¸ê®Æ¥[¥Hµ²¦X¡C

 ­Y©Ò¸û¨ú¸ê®Æ¤ñ¼Æ¤£¦h¡A«h¥i¤gªk·Ò¿û¦¡ªº¦p½d¨Ò(¤­)¨Ó¾Þ§@¡C¦ý·s¥s¨úªº¸ê®Æ¦³´X¤Qµ§¡B¬Æ¦Ü¤W¦Êµ§®É¡A«h¥i¥H°j°é¨Ó¸`¬Ù®É¶¡¡C¦¹±N½d¨Ò(¤­)ªº«ü¥O§ï¬°¦p¤U:

 (1) Áä¤J«ü¥O set freq d; set per 1989:12:1 1990:1:12;

(2) Áä¤J«ü¥O open e:\waremos\stock80,e:\waremos\stock90;

(3) Áä¤J«ü¥O list n1=s1206@cl,s2805@cl;

(1) Áä¤J«ü¥O for aaa=#n1;

(2) Áä¤J«ü¥O series<1989:12:1 1989:12:31>new|#aaa=stock80:#aaa;

(3) Áä¤J«ü¥O series<1990:1:1 1990:1:20>new|#aaa=stock90:#aaa;

(4) Áä¤J«ü¥O end;

(5) Áä¤J«ü¥O list n2=#n1 prefix=new;

(6) Áä¤J«ü¥O print #n2;

 »¡©ú:

 (3)¡G«Ø¥ß¤@­Ó list ¥sn1¡An1 ¥NªíµÛ s1206@cl¡Bs2805@cl ¨â­ÓÅܼƦWºÙ¡C

 (5)¡G¦¹«ü¥O¤D³z¹L°j°éªº°õ¦æ§Î¦¨¤@µ§·sªºÅܼơC·sÅܼƦWºÙ§Y¦b aaa ©Ò¥NªíªºÅܼƦWºÙ«e­±¥[¤W new ¦r²´¡C¦p·í aaa=s126@cl ®É¡A¦¹«ü¥O§Y¦b primary bank §Î¦¨¤@µ§¸ê®Æ¥s news1206@cl¡C

 (6):¨£(5)¤§»¡©ú¡C

 (8):«Ø¥ß¤@­Ó list ¦W¥s n2¡C¦¹«ü¥O¬Û·í©ó list n2=news1206@cl,news2805@cl; §Y¦b n1 ©Ò¥Nªíªº¦U­ÓÅܼƦWºÙ«e¥[¤W¤@­Ó¦r¦ê new ¡C§Ú­Ì¤]¥i±N¦¹¦r¥À¥[©óÅܼƤ§«á¡A«ü¥O«h¬O±N prefix §ï¬° suffix §Y¥i¡C

¦p:
          
   list n2=#n1 suffix=new;
        ¬Û·í©ó:
          
   list n2 =s1206@clnew,s2805@clnew;

  ½Ð¯d·N¡G¦b open ¸ê®Æ®w®É¡A¡uÁä¤J«ü¥O open niaq;¡v¡A·N«ä¨Æ open c:\WAREM32 ¤l¥Ø¿ý¸Ìªº niaq.bnk ;­Y±zªº¸ê®Æ®w niaq.bnk ¬O©ñ¦b e ¼Ñªº WAREMOS ¤l¥Ø¿ý®É¡A«h±z¥²¶·¡uÁä¤J«ü¥O open e:\WAREMOS\niaq;¡v¡C

 ¡°          ¸É¥R¡GÂà´«ÀW²vªº°j°é³]©w¡A¦b AREMOS Command ¤U

(1)  Áä¤J«ü¥O set freq w; set per 1990:1 2003:47;

(2)  Áä¤J«ü¥O open e:\waremos\tse.bnk;

(3)  Áä¤J«ü¥O list n1=jhk,jbangkok,js;

(4)  Áä¤J«ü¥O for x=#n1;

(5)  Áä¤J«ü¥O collapse<tolerate=99>#x|.w=#x|.d  last;

(6)  Áä¤J«ü¥O end;

(7)  Áä¤J«ü¥O print #n1;

 

 <¦^­¶­º>

<¦^¡u¤JªùÁ¿¸q¡v>