¡@ ²Ä¤Q¤T³¹°j°éªº¨Ï¥Î ( for-end )
¡@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: ¡°
¸É¥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;
<¦^¶º> |