<¿ô¼°>¤ÎÀäÂÐÃͤòÊÖ¤·¤Þ¤¹¡£
ABS(<¿ô¼°>)
PRINT ABS(-1.2)
¡Úɽ¼¨¡Û1.2
<ʸ»ú¼°>¤Î¥¥ã¥é¥¯¥¿¥³¡¼¥É¤òÊÖ¤·¤Þ¤¹¡£
ASC(<ʸ»ú¼°>)
PRINT ASC("a")
¡Úɽ¼¨¡Û97
»ØÄꤷ¤¿<ʸ»ú¼°>¤¬¤¤¤¯¤Ä¤«¤Îʸ»ú¤«¤é¤Ê¤ëʸ»úÎó¤Î¾ì¹ç¤Ï¡¢°ìÈֺǽé¤Îʸ»ú¤Î¥¥ã¥é¥¯¥¿¥³¡¼¥É¤¬ÊÖ¤µ¤ì¤Þ¤¹¡£Ê¸»ú¤È¥¥ã¥é¥¯¥¿¥³¡¼¥É¤ÎÂбþ¤Ë¤Ä¤¤¤Æ¤Ï¡¢¥¥ã¥é¥¯¥¿¥³¡¼¥Éɽ¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
CHR$¡¢¥¥ã¥é¥¯¥¿¥³¡¼¥Éɽ
<¿ô¼°>¤ÎµÕÀµÀÜ(¥¢¡¼¥¯¥¿¥ó¥¸¥§¥ó¥È)¤ò·×»»¤·¤Þ¤¹¡£
ATN(<¿ô¼°>)
PRINT ATN(1)*4
¡Úɽ¼¨¡Û3.1415926535898
¥×¥í¥°¥é¥à¹Ô¤ÎÀèƬ¤Ë¹ÔÈÖ¹æ¤ò¼«Æ°Åª¤ËȯÀ¸¤µ¤»¤Þ¤¹¡£
AUTO [<¹ÔÈÖ¹æ>][,<Áýʬ>]
AUTO 1000,100
ºÇ½é¤Î¹ÔÈÖ¹æ¤âÈÖ¹æ¤ÎÁý²Ãʬ¤â¾Êά¤Ç¤¤Þ¤¹¤¬¡¢¤³¤Î¾ì¹ç¤Ï¡¢¼«Æ°Åª¤Ë10¤¬ºÎÍѤµ¤ì¤Þ¤¹¡£
Î㤨¤Ð¡¢
AUTO
¹ÔÈÖ¹æ¤Ï10¤òÀèƬ¤Ë20¡¢30¡¦¡¦¡¦¡¦¡¦¡¦¡¦¡¦¤ÈÉÕ¤±¤é¤ì¤Þ¤¹¡£
AUTO 100
¹ÔÈÖ¹æ¤Ï100¤òÀèƬ¤Ë110¡¢120¡¦¡¦¡¦¡¦¡¦¡¦¡¦¡¦¤ÈÉÕ¤±¤é¤ì¤Þ¤¹¡£
AUTO ,5
¹ÔÈÖ¹æ¤Ï10¤òÀèƬ¤Ë15¡¢20¡¦¡¦¡¦¡¦¡¦¡¦¡¦¡¦¤ÈÉÕ¤±¤é¤ì¤Þ¤¹¡£
¥×¥í¥°¥é¥àÃæ¤Ë¤¹¤Ç¤Ë¸ºß¤¹¤ë¹Ô¤ÈƱ¤¸¹ÔÈֹ椬ȯÀ¸¤·¤¿¾ì¹ç¤Ë¤Ï¡¢¹ÔÈÖ¹æ¤Î¸å¤Ë¥¢¥¹¥¿¥ê¥¹¥¯(*)¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£¤³¤Î¤È¤¡¢²¿¤âÆþÎϤ·¤Ê¤¤¤Ç¥ê¥¿¡¼¥ó¥¡¼¤ò²¡¤»¤Ð¡¢¤½¤Î¹Ô¤ÏÁ°¤ÎÆâÍƤΤޤޤǤ¹¡£
AUTOµ¡Ç½¤òÃæ»ß¤·¤¿¤¤¤È¤¤Ï¡¢[CTRL]+[C]¥¡¼¤Þ¤¿¤Ï[CTRL]+[STOP]¥¡¼¤ò²¡¤·¤Þ¤¹¡£
²èÌ̽ÐÎϤ˴ØÏ¢¤¹¤ëVRAM¾å¤Î¥Æ¡¼¥Ö¥ë¤Î¥¢¥É¥ì¥¹¤òÊÖ¤·¤Þ¤¹¡£
BASE(<¿ô¼°>)
PRINT BASE(10)
¥«¥Ã¥³Æâ¤Î¿ôÃͤǻØÄꤵ¤ì¤¿VRAM¾å¤Î¥Æ¡¼¥Ö¥ë¤Î¥¢¥É¥ì¥¹¤òÊÖ¤·¤Þ¤¹¡£MSX1¤Ç¤Ï¡¢VDP¤È¤·¤ÆTMS9918¡¢MSX2¤Ç¤ÏV9938¡¢MSX2+¤Ç¤ÏV9958¤ò»È¤Ã¤Æ¤¤¤Þ¤¹¡£
VDP
¥¹¥Ô¡¼¥«¡¼¤òÌĤ餷¤Þ¤¹¡£
BEEP
SET BEEPÌ¿Îá¤ÇÀßÄꤷ¤¿²»¿§¤ÈÂ礤µ¤Ç¡¢¥¹¥Ô¡¼¥«¡¼¤òÌĤ餷¤Þ¤¹¡£
¼¡¤Î¤è¤¦¤Ë¡¢PRINTÌ¿Îá¤ÇCHR$(7)¤ò¼Â¹Ô¤·¤Æ¤â¡¢BEEP¤ÈƱ¤¸·ë²Ì¤¬ÆÀ¤é¤ì¤Þ¤¹¡£
PRINT CHR$(7)
¥³¥ó¥È¥í¡¼¥ë¥³¡¼¥Éɽ
<¿ô¼°>¤ò2¿Ê¿ô¤Îʸ»úÎó¤ËÊÑ´¹¤·¤Þ¤¹¡£
BIN$(<¿ô¼°>)
PRINT BIN$(50)
¡Úɽ¼¨¡Û110010
VAL¡¢OCT$¡¢HEX$
µ¡³£¸ì¥×¥í¥°¥é¥à¡¢¤Þ¤¿¤Ï²èÌ̥ǡ¼¥¿¥Õ¥¡¥¤¥ë¤òÆɤ߹þ¤ß¤Þ¤¹(¥í¡¼¥É¤¹¤ë)¡£
BLOAD<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>[
,R][,<¥ª¥Õ¥»¥Ã¥È>]
BLOAD "A:DEMO",R
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤷ¤¿µ¡³£¸ì¥×¥í¥°¥é¥à¥Õ¥¡¥¤¥ë¤ò¥á¥â¥ê¾å¤Ë¥í¡¼¥É¤·¤Þ¤¹¡£¥«¥»¥Ã¥È¥Õ¥¡¥¤¥ë¤ËÂФ·¤Æ¤Ï¥Õ¥¡¥¤¥ë̾¤ò¾Êά¤¹¤ë¤³¤È¤¬½ÐÍè¤Þ¤¹¤¬¡¢¥Ç¥£¥¹¥¯¥Õ¥¡¥¤¥ë¤ËÂФ·¤Æ¤Ï¾Êά¤¹¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤ÎÃæ¤Ç<¥Ç¥Ð¥¤¥¹Ì¾>¤ò¾Êά¤¹¤ë¤È¸½ºßÁªÂò¤µ¤ì¤Æ¤¤¤ë¥Ç¥£¥¹¥¯¥É¥é¥¤¥Ö(¥«¥ì¥ó¥È¥É¥é¥¤¥Ö)¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£¥«¥»¥Ã¥È¥Õ¥¡¥¤¥ë¤òÂоݤȤ¹¤ë¾ì¹ç¤Ï"CAS:"¤È¤·¤Þ¤¹¡£
<¥ª¥Õ¥»¥Ã¥È>¤ò¾Êά¤¹¤ë¤Èµ¡³£¸ì¥×¥í¥°¥é¥à¤ÏBSAVE¤Ç¥»¡¼¥Ö¤¹¤ë¤È¤¤Ë»ØÄꤷ¤¿<³«»Ï¥¢¥É¥ì¥¹>¤«¤é¥í¡¼¥É¤·¤Þ¤¹¤¬¡¢<¥ª¥Õ¥»¥Ã¥È>¤ò»ØÄꤷ¤¿¾ì¹ç¤Ë¤Ï¡¢¥»¡¼¥Ö¤Îº¹°Û¤Ë»ØÄꤵ¤ì¤Æ³«»Ï¥¢¥É¥ì¥¹¤Ë¡¢<¥ª¥Õ¥»¥Ã¥È>¤ò²Ã¤¨¤¿ÈÖÃϤ«¤é¥í¡¼¥É¤·¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ¡¢<¥ª¥Õ¥»¥Ã¥È>¤òÉÕ¤±¤Æ¥í¡¼¥É¤¹¤ë¥×¥í¥°¥é¥à¤Ï¡¢¥ê¥í¥±¡¼¥¿¥Ö¥ë¤ÊÀ¼Á¤ò»ý¤Ã¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£
R¥ª¥×¥·¥ç¥ó¤ò»ØÄꤹ¤ë¤È¡¢¥×¥í¥°¥é¥à¤ò¥í¡¼¥É¸å¡¢BSAVE¤Ç»ØÄꤷ¤Æ¤ª¤¤¤¿¼Â¹Ô³«»Ï¥¢¥É¥ì¥¹¤«¤é¡¢¤¿¤À¤Á¤Ë¼Â¹Ô¤µ¤ì¤Þ¤¹¡£¤³¤Î¤È¤¡¢´û¤Ë³«¤«¤ì¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤¬¤¢¤ì¤Ð¥Õ¥¡¥¤¥ë¤Ï³«¤«¤ì¤¿¤Þ¤Þµ¡³£¸ì¥×¥í¥°¥é¥à¤¬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£
S¥ª¥×¥·¥ç¥ó¤ò»ØÄꤹ¤ë¤È¡¢¥Ç¥£¥¹¥¯¥Õ¥¡¥¤¥ë¤ÎÆâÍƤ¬VRAM¤Ë¥í¡¼¥É¤µ¤ì¤Þ¤¹¡£<¥ª¥Õ¥»¥Ã¥È>¤ò¾Êά¤¹¤ë¾ì¹ç¤Ë¤Ï¥«¥ó¥Þ(,)¤â¾Êά¤·¤Æ¤¯¤À¤µ¤¤¡£
BSAVE
µ¡³£¸ì¥×¥í¥°¥é¥à¡¢¤Þ¤¿¤Ï²èÌ̥ǡ¼¥¿¤òÊݸ(¥»¡¼¥Ö)¤·¤Þ¤¹¡£
BSAVE<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>,<³«»Ï¥¢¥É¥ì¥¹>,<½ªÎ»¥¢¥É¥ì¥¹>[ [,<¼Â¹Ô³«»Ï¥¢¥É¥ì¥¹>¡Ã[,S] ]
BSAVE "B:DEMO",&HA100,&HA2FF
<³«»Ï¥¢¥É¥ì¥¹>¤«¤é<½ªÎ»¥¢¥É¥ì¥¹>¤Þ¤Ç¤Î¥á¥â¥ê¾å¤ËÃÖ¤«¤ì¤Æ¤¤¤ëµ¡³£¸ì¥×¥í¥°¥é¥à¤ò¡¢<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤷ¤¿¥Õ¥¡¥¤¥ë¤Ë¥»¡¼¥Ö¤·¤Þ¤¹¡£
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤ÎÃæ¤Î<¥Ç¥Ð¥¤¥¹Ì¾>¤ò¾Êά¤·¤¿¾ì¹ç¡¢¥«¥ì¥ó¥È¥É¥é¥¤¥Ö¤Ë¥»¡¼¥Ö¤µ¤ì¤Þ¤¹¡£¥«¥»¥Ã¥È¥Õ¥¡¥¤¥ë¤Î¾ì¹ç¤Ï"CAS:"¤È¤·¤Æ¤¯¤À¤µ¤¤¡£
<¼Â¹Ô³«»Ï¥¢¥É¥ì¥¹>¤ò»ØÄꤷ¤Æ¤ª¤¯¤È¡¢BLOAD¤ÇR¥ª¥×¥·¥ç¥ó¤ò»ØÄꤷ¤Æ¡¢¥×¥í¥°¥é¥à¤Î¥í¡¼¥É¸å¤Ë¼«Æ°Åª¤Ë<¼Â¹Ô³«»Ï¥¢¥É¥ì¥¹>¤«¤é¼Â¹Ô¤µ¤»¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
S¥ª¥×¥·¥ç¥ó¤ò»ØÄꤹ¤ë¤È¡¢²èÌ̥ǡ¼¥¿¤ò¥Ç¥£¥¹¥¯¥Õ¥¡¥¤¥ë¤È¤·¤Æ¥»¡¼¥Ö¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
³ÈÄ¥¥¹¥Æ¡¼¥È¥á¥ó¥È¤ò¸Æ¤Ó½Ð¤·¤Þ¤¹¡£
CALL<³ÈÄ¥¥¹¥Æ¡¼¥È¥á¥ó¥È̾>[(<°ú¿ô>[,<°ú¿ô>¡¦¡¦¡¦])]
³ÈÄ¥ROM¥«¡¼¥È¥ê¥Ã¥¸¤Ê¤É¤Ç¶¡µë¤µ¤ì¤ë³ÈÄ¥¥¹¥Æ¡¼¥È¥á¥ó¥È¤ò¸Æ¤Ó½Ð¤·¤Þ¤¹¡£CALL¤Ï_(¥¢¥ó¥À¡¼¥¹¥³¥¢)¤ÇÂåÍѤ¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
<ʸ»úÎó>Ãæ¤ÎÁ´¤Æ¤Îʸ»ú¤òÁ´³Ñʸ»ú¤ËÊÑ´¹¤·¤Æ<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£
CALL AKCNV(<ʸ»úÊÑ¿ô,<ʸ»úÎó>)
10 CALL AKCNV(A$,"ABC´Á»úŽ²ŽÛŽÊ")
20 PRINT A$
¡Úɽ¼¨¡Û£Á£Â£Ã´Á»ú¥¤¥í¥Ï
Ⱦ³Ñʸ»ú(¥«¥¿¥«¥Ê¡¢±Ñ¿ô»úÅù)¤òÁ´³Ñ¤Îʸ»ú¤ËÊÑ´¹¤·¤Þ¤¹¡£¤â¤È¤â¤ÈÁ´³Ñ¤Îʸ»ú¤Ï¤½¤Î¤Þ¤Þ¤Ç¤¹¡£
´Á»ú¥É¥é¥¤¥Ð¤ò½ªÎ»¤·¤Þ¤¹¡£
CALL ANK
CALL ANK
´Á»ú¥â¡¼¥É¤ò½ªÎ»¤·¡¢ANK¥â¡¼¥É¤È¤Ê¤ê¤Þ¤¹¡£¤¿¤À¤·¡¢´Á»ú¥É¥é¥¤¥ÐÍѤ˳ÎÊݤµ¤ì¤¿¥á¥â¥ê¤Ï²òÊü¤µ¤ì¤Þ¤»¤ó¡£
´Á»ú¥â¡¼¥É¤Î²èÌ̤ò¥¯¥ê¥¢¤·¤Þ¤¹¡£
CALL CLS
CALL CLS
´Á»ú¥â¡¼¥É¤Ç¤ÏÄ̾ï¤ÎCLS¤Ï»È¤¨¤Þ¤»¤ó¡£´Á»ú¥â¡¼¥É°Ê³°¤Ç¤âCALL CLS¤Ï͸ú¤Ç¤¹¡£
¥Õ¥í¥Ã¥Ô¡¼¥Ç¥£¥¹¥¯¤ò¥Õ¥©¡¼¥Þ¥Ã¥È(½é´ü²½)¤·¤Þ¤¹¡£
CALL FORMAT
CALL FORMAT
Disk BASIC¤äMSX-DOS¤Ç»ÈÍѤǤ¤ë¤è¤¦¤Ë¡¢¥Ç¥£¥¹¥¯¤ò½é´ü²½¤·¤Þ¤¹¡£¼Â¹Ô¤¹¤ë¤È¥É¥é¥¤¥Ö̾¤ò¤¤¤¤Æ¤¯¤ë¤Î¤Ç¡¢»ØÄꤷ¤Þ¤¹¡£´Ö°ã¤Ã¤Æ´û¤Ë»ÈÍѤ·¤Æ¤¤¤ë¥Ç¥£¥¹¥¯¤ò¥Õ¥©¡¼¥Þ¥Ã¥È¤·¤Æ¤·¤Þ¤¦¤È¡¢¤½¤ÎÃæ¤Î¥Ç¡¼¥¿¤Ï´°Á´¤Ë¼º¤ï¤ì¤Æ¤·¤Þ¤¤¤Þ¤¹¡£½½Ê¬Ãí°Õ¤·¤Æ¤¯¤À¤µ¤¤¡£
<ʸ»úÎó>¤ÎºÇ½é¤Î2¥Ð¥¤¥È¤ò16¿Ê4·å¤ÎJIS¥³¡¼¥É¤ËÊÑ´¹¤·¤Æ<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£
CALL JIS(<ʸ»úÊÑ¿ô>,<ʸ»úÎó>)
10 CALL JIS(A$,"´Á»ú")
20 PRINT A$
¡Úɽ¼¨¡Û3441
<ʸ»úÎó>Ãæ¤ÎȾ³Ñʸ»ú¤ËÊÑ´¹¤Ç¤¤ëʸ»ú¤ò¤¹¤Ù¤ÆȾ³Ñʸ»ú¤ËÊÑ´¹¤·¤Æ<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£
CALL KACNV(<ʸ»úÊÑ¿ô>,<ʸ»úÎó>)
10 CALL KACNV(A$,"10¿Í¤Î¥×¥í¥°¥é¥Þ¡¼")
20 PRINT A$
¡Úɽ¼¨¡Û10¿ÍŽÉŽÌŽßŽÛŽ¸ŽÞŽ×ŽÏŽ°
´Á»ú¥É¥é¥¤¥Ð¤òµ¯Æ°¤·¤Þ¤¹¡£
CALL KANJI[n]
CALL KANJI3
n¤Ï0¡¢£±¡¢£²¡¢£³¤Î¤¦¤Á¤É¤ì¤«1ʸ»ú¤Ç¡¢´Á»ú¥Õ¥©¥ó¥È¤ÈSCREEN¤Î¥¤¥ó¥¿¥ì¡¼¥¹¥â¡¼¥É¤ò»ØÄꤷ¤Þ¤¹¡£¾Êά¤¹¤ë¤È0¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£
¥â¡¼¥É | ʸ»ú¤ÎÂ礤µ | ɽ¼¨Ê¸»ú¿ô |
| (Á´³ÑX¡ßY) | (ºÇÂç²£¡ß½Ä) |
KANJI0 | 16¡ß16 | 32¡ß13 |
KANJI1 | 12¡ß16 | 40¡ß13 |
KANJI2 | 16¡ß16 | 32¡ß24 |
KANJI3 | 12¡ß16 | 40¡ß24 |
CALL KANJI(¤Þ¤¿¤ÏCALL KANJI0)¤Ï¥Õ¥©¥ó¥È¤òMSX¤Îɸ½à´Á»úROM¤«¤é¼è¤Ã¤Æɽ¼¨¤·¤Þ¤¹¡£
CALL KANJI1¤Ï¥Õ¥©¥ó¥È¤òMSX¤Îɸ½à´Á»úROM¤«¤é¤È¤ê¡¢²£16¥É¥Ã¥È¤ò12¥É¥Ã¥È¤Ë°µ½Ì¤·¤Æɽ¼¨¤·¤Þ¤¹¡£¤¿¤À¤·¡¢¾¾²¼ÅÅ´ï¤Î»ÅÍͤˤè¤ë12¥É¥Ã¥È¥Õ¥©¥ó¥ÈROM¤¬¥·¥¹¥Æ¥à¤Ë¸ºß¤¹¤ë¾ì¹ç¤Ï¤³¤ì¤òɽ¼¨¤·¤Þ¤¹¡£
CALL KANJI2¤ÏCALL KANJI(¤Þ¤¿¤ÏCALL KANJI0)¤ÈƱ¤¸¤Ç¤¹¤¬¡¢¥¤¥ó¥¿¥ì¡¼¥¹¥â¡¼¥É¤¬»ÈÍѤµ¤ì½ÄÊý¸þ¤Îɽ¼¨Ê¸»ú¿ô¤¬Áý²Ã¤·¤Þ¤¹¡£
CALL KANJI3¤ÏCALL KANJI1¤ÈƱ¤¸¤Ç¤¹¤¬¡¢¥¤¥ó¥¿¥ì¡¼¥¹¥â¡¼¥É¤¬»ÈÍѤµ¤ì½ÄÊý¸þ¤Îɽ¼¨Ê¸»ú¿ô¤¬Áý²Ã¤·¤Þ¤¹¡£
MSXɸ½à¤ÎÆüËܸì¥Õ¥í¥ó¥È¥¨¥ó¥É¥×¥í¥»¥Ã¥µ(°Ê²¼¡¢MSX-JE)¤¬¤¢¤ì¤Ð¡¢¤³¤Î¥¹¥Æ¡¼¥È¥á¥ó¥È¤Î¼Â¹Ô»þ¤Þ¤¿¤Ï¥·¥¹¥Æ¥à¤ÎΩ¤Á¾å¤²»þ¤ËÁȤ߹þ¤Þ¤ì¤Þ¤¹¡£Ä¾ÀÜÆþÎϥ⡼¥É(ANK)¤È´ÖÀÜÆþÎϥ⡼¥É(´Á»ú)¤Ï¡¢[CTRL]+[SPACE]¤â¤·¤¯¤Ï[GRAPH]+[SELECT]¤Ë¤è¤Ã¤ÆÀÚ¤êÂؤ¨¤é¤ì¤Þ¤¹¡£MSX-JE¤¬Â¸ºß¤·¤Ê¤¤¤È¤¤Ï¡¢Ã±´Á»úÊÑ´¹µ¡Ç½¤¬»ÈÍѤǤ¤Þ¤¹¡£
MSXµ¯Æ°¸å¤Î°ìÈֺǽé¤ÎCALL KANJI¤Î¼Â¹Ô»þ¤Ë¤ÏÃí°Õ¤¬É¬ÍפǤ¹¡£¤½¤Î»þÅÀ¤Ç¤ÎHIMEM(CLEARʸ¤Ë¤è¤ë)¤ÎÀßÄê¤Ï¥¥ã¥ó¥»¥ë¤µ¤ì¡¢Á´¤Æ¤ÎÊÑ¿ô¤ª¤è¤Ó¥½¥Õ¥È¥¦¥§¥¢¥¹¥¿¥Ã¥¯(FOR/NEXT¡¢GOSUB/RETURNÍÑ)¤¬¥¯¥ê¥¢¤µ¤ì¤Þ¤¹¡£¤³¤ì¤Ï´Á»ú¥É¥é¥¤¥Ð¤Î¥ï¡¼¥¯¥¨¥ê¥¢(¤â¤·¤¢¤ì¤ÐMSX-JE¤â)¤ò³ÎÊݤ¹¤ë½èÍý¤¬¹Ô¤ï¤ì¤ë¤«¤é¤Ç¤¹¡£2²óÌܰʹߤμ¹ԤÏÌäÂê¤Ê¤¯¹Ô¤ï¤ì¤Þ¤¹¡£
CALL KANJIÌ¿Îá¤Ê¤É¤ò¼Â¹Ô¤·¡¢´Á»úɽ¼¨¤¬¤Ç¤¤ë¾õÂÖ¤ò¡Ö´Á»ú¥â¡¼¥É¡×¤È¸Æ¤Ó¤Þ¤¹¡£¤µ¤é¤Ë´Á»ú¥â¡¼¥É¤Ç¤«¤ÄSCREENʸ¤Ç0¤â¤·¤¯¤Ï1¤¬ÀßÄꤵ¤ì¤Æ¤¤¤ë¾õÂÖ¤ò¡Ö´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É¡×¤È¸Æ¤Ó¡¢´Á»ú¥â¡¼¥É¤Ç¤«¤ÄSCREENʸ¤Ç2°Ê¾å¤Î²èÌ̥⡼¥É¤¬ÀßÄꤵ¤ì¤Æ¤¤¤ë¾õÂÖ¤ò¡Ö´Á»ú¥°¥é¥Õ¥£¥Ã¥¯¥â¡¼¥É¡×¤È¸Æ¤Ó¤Þ¤¹¡£
BASIC¤Î¥³¥Þ¥ó¥ÉÂÔ¤Á¤Î¾õÂ֤ǤϴÁ»ú¥Æ¥¥¹¥È¥â¡¼¥É¤Ë¤Ê¤Ã¤Æ¤ª¤ê¡¢´Á»ú¤ÎÆþ½ÐÎϤ¬²Äǽ¤Ç¤¹¡£´Á»ú¥°¥é¥Õ¥£¥Ã¥¯¥â¡¼¥É¤Ç¤Ï¥×¥í¥°¥é¥à¤Ë¤è¤ë´Á»ú¤Î½ÐÎϤΤߤ¬²Äǽ¤Ç¤¹¡£
´Á»ú¥â¡¼¥É¤Ë¤ª¤±¤ëWIDTH
¢£´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É
¡¡CALL KANJI¼Â¹Ô¸å¤ÎWIDTH¤ÏANK¥â¡¼¥É¤Ç¤ÎWIDTH¤ò¤â¤È¤Ë¡¢°Ê²¼¤Î¤è¤¦¤Ë·èÄꤵ¤ì¤Þ¤¹¡£CALL KANJI¼Â¹Ô¸å¤ËľÀÜSCREENʸ¤äWIDTHʸ¤Ç»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£
1.ANK¥â¡¼¥É¤ÇSCREEN 0¤ò»ÈÍѤ·¤Æ¤¤¤¿¾ì¹ç¡£
| ¢£ | KANJI0¤«KANJI2 |
| | ANK¥â¡¼¥É¤Ç¤ÎWIDTH¤ÎÃͤÎ4/5¤¬´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É¤Ç¤ÎWIDTH¤Ë¤Ê¤ê¤Þ¤¹¡£ |
| ¢£ | KANJI1¤«KANJI3 |
| | ANK¥â¡¼¥É¤Ç¤ÎWIDTH¤ÎÃͤ¬¤½¤Î¤Þ¤Þ´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É¤Ç¤ÎWIDTH¤Ë¤Ê¤ê¤Þ¤¹¡£ |
2.ANK¥â¡¼¥É¤ÇSCREEN 1¤ò»ÈÍѤ·¤Æ¤¤¤¿¾ì¹ç¡£
| ¢£ | KANJI0¤«KANJI2 |
| | ANK¥â¡¼¥É¤Ç¤ÎWIDTH¤ÎÃͤ¬¤½¤Î¤Þ¤Þ´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É¤Ç¤ÎWIDTH¤Ë¤Ê¤ê¤Þ¤¹¡£ |
| ¢£ | KANJI1¤«KANJI3 |
| | ANK¥â¡¼¥É¤Ç¤ÎWIDTH¤ÎÃͤÎ5/4¤¬´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É¤Ç¤ÎWIDTH¤Ë¤Ê¤ê¤Þ¤¹¡£ |
¢£´Á»ú¥°¥é¥Õ¥£¥Ã¥¯¥â¡¼¥É
¡¡¾ï¤Ëɽ¼¨¤Ç¤¤ëºÇÂç¤ËÀßÄꤵ¤ì¤Þ¤¹¡£
WIDTH¤Ë¤è¤ëSCREEN¥â¡¼¥É¤ÎÁªÂò
| ¢£ | KANJI0¤«KANJI2 |
| | WIDTH¤¬26¤«¤é32¤Î»þ¤Ï256¥É¥Ã¥È¥â¡¼¥É(VDP¤ÎGRAPHIC 4¥â¡¼¥É)¤¬¡¢33¤«¤é64¤Î»þ¤Ï512¥É¥Ã¥È¥â¡¼¥É(VDP¤ÎGRAPHIC 6¥â¡¼¥É)¤¬ÁªÂò¤µ¤ì¤Þ¤¹¡£ |
| ¢£ | KANJI1¤«KANJI3 |
| | WIDTH¤¬26¤«¤é40¤Î»þ¤Ï256¥É¥Ã¥È¥â¡¼¥É(VDP¤ÎGRAPHIC 4¥â¡¼¥É)¤¬¡¢41¤«¤é80¤Î»þ¤Ï512¥É¥Ã¥È¥â¡¼¥É(VDP¤ÎGRAPHIC 6¥â¡¼¥É)¤¬ÁªÂò¤µ¤ì¤Þ¤¹¡£ |
<µ¡Ç½>¤¬0¤Ê¤é<ʸ»úÎó>Ãæ¤ÎȾ³Ñʸ»ú¤À¤±¤ò¡¢1¤Ê¤éÁ´³Ñʸ»ú¤À¤±¤òÈ´¤½Ð¤·¤Æ<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£
CALL KEXT(<ʸ»úÊÑ¿ô>,<ʸ»úÎó>,<µ¡Ç½>)
10 CALL KEXT(A$,"º£·îŽÊÎÉŽ²Å·µ¤ŽÃŽÞŽ½",0)
20 PRINT A$
¡Úɽ¼¨¡ÛŽÊŽ²ŽÃŽÞŽ½
´Á»ú¤ò´Þ¤àʸ»úÎó¤ò¸¡º÷¤·¤Þ¤¹¡£
CALL KINSTR(<¿ôÃÍÊÑ¿ô>[,<¿ô¼°>],<ʸ»úÎó1>,<ʸ»úÎó2>)
10 CALL KINSTR(A,"A °¡ B","B")
20 PRINT A
¡Úɽ¼¨¡Û3
<ʸ»úÎó1>¤ÎÃ椫¤é<ʸ»úÎó2>¤òõ¤·¤À¤·¡¢¸«¤Ä¤«¤ì¤Ð¤½¤Î°ÌÃÖ¤ò¡¢¸«¤Ä¤«¤é¤Ê¤±¤ì¤Ð0¤ò<¿ôÃÍÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£<¿ô¼°>¤Ïõ¤·»Ï¤á¤ë°ÌÃÖ¤òʸ»ú¿ô¤òñ°Ì¤È¤·¤Æ»ØÄꤹ¤ë¤â¤Î¤Ç¡¢¾Êά¤·¤¿¾ì¹ç¤Ï1¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£
´Á»ú¤ò´Þ¤àʸ»úÎó¤Îʸ»ú¿ô¤òÊÖ¤·¤Þ¤¹¡£
CALL KLEN(<¿ôÃÍÊÑ¿ô>,<ʸ»úÎó>[,<µ¡Ç½>])
10 CALL KLEN(A,"º£ÆüŽÊÎÉŽ²Å·µ¤¤Ç¤¹")
20 PRINT A
¡Úɽ¼¨¡Û9
<µ¡Ç½>¤¬0(¤â¤·¤¯¤Ï¾Êά)¤Î»þ¤Ï<ʸ»úÎó>¤ÎÁ´ÂΤÎʸ»ú¿ô¤ò¡¢1¤Î¤È¤¤Ï<ʸ»úÎó>Ãæ¤ÎȾ³Ñʸ»ú¿ô¤ò¡¢2¤Î¤È¤¤Ï<ʸ»úÎó>Ãæ¤ÎÁ´³Ñʸ»ú¿ô¤ò<¿ôÃÍÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£
´Á»ú¤ò´Þ¤àʸ»úÎó¤Î°ìÉô¤ò¼è¤ê½Ð¤·¤Þ¤¹¡£
CALL KMID(<ʸ»úÊÑ¿ô>,<ʸ»úÎó>,<¿ô¼°1>[,<¿ô¼°2>])
10 CALL KMID(A$,"º£Æü¤ÏŽÖ¤¤Å·µ¤¤Ç¤¹",3,3)
20 PRINT A$
¡Úɽ¼¨¡Û¤ÏŽÖ¤¤
<ʸ»úÎó>Ãæ¤Î<¿ô¼°1>ÈÖÌܤÎʸ»ú¤«¤é<¿ô¼°2>ʸ»úʬ¤À¤±È´¤½Ð¤·¤Æ<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£<¿ô¼°2>¤¬¾Êά¤µ¤ì¤¿¾ì¹ç¤Ï<¿ô¼°1>ÈÖÌܤÎʸ»ú¤«¤é½ª¤ï¤ê¤Þ¤ÇÁ´¤Æ¤Îʸ»ú¤¬ÂåÆþ¤µ¤ì¤Þ¤¹¡£
´Á»ú¥³¡¼¥É¤ËÁêÅö¤¹¤ë´Á»ú¤ò³ÍÆÀ¤·¤Þ¤¹¡£
CALL KNJ(<ʸ»úÊÑ¿ô>,<ʸ»úÎó>)
10 CALL KNJ(A$,"3441")
20 PRINT A$
¡Úɽ¼¨¡Û´Á
<ʸ»úÎó>¤Ç»ØÄꤵ¤ì¤ë4·å¤Î´Á»ú¥³¡¼¥É¤ËÁêÅö¤¹¤ë´Á»ú1ʸ»ú¤ò<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£´Á»ú¥³¡¼¥É¤¬8000H̤Ëþ¤Ç¤¢¤ì¤ÐJIS¡¢¤½¤ì°Ê¾å¤Î¾ì¹ç¤Ï¥·¥Õ¥ÈJIS¤È¤ß¤Ê¤·¤Þ¤¹¡£
ʸ»ú¤Î¥¿¥¤¥×¤òÄ´¤Ù¤Þ¤¹¡£
CALL KTYPE(<¿ôÃÍÊÑ¿ô>,<ʸ»úÎó>,<¿ô¼°>)
10 CALL KTYPE(T,"ŽºŽÚŽÊ´Á»ú",4)
20 PRINT T
¡Úɽ¼¨¡Û1
<ʸ»úÎó>Ãæ¤Î<¿ô¼°>ÈÖÌܤÎʸ»ú¤Î¥¿¥¤¥×¤ò<¿ôÃÍÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£¥¿¥¤¥×¤Ï¡¢0=Ⱦ³Ñ¡¢1=Á´³Ñ¤Ç¤¹¡£
¥á¥â¥ê¥Ç¥£¥¹¥¯¤Ç»È¤¦¥á¥â¥ê¤Î¾å¸Â¤ò»ØÄꤷ¤Þ¤¹¡£
CALL MEMINI(<¥á¥â¥ê¥Ç¥£¥¹¥¯¤Î¾å¸Â>)
CALL MEMINI(&H7000)
¡Úɽ¼¨¡Û27904 bytes allocated
ÈϰϤϡ¢0¡Á&H7FFF¤Ç¤¹¡£½é´ü¾õÂ֤Ǥϡ¢&H7FFF¤¬»ØÄꤵ¤ì¤Æ¤¤¤Þ¤¹¡£
CALL MEMINIÌ¿Î᤬¼Â¹Ô¤µ¤ì¤ë¤È¡¢¥á¥â¥ê¥Ç¥£¥¹¥¯¤Ë³ä¤êÅö¤Æ¤é¤ì¤¿¥á¥â¥ê¤ÎÎ̤¬É½¼¨¤µ¤ì¤Þ¤¹¡£
¥á¥â¥ê¥Ç¥£¥¹¥¯Ãæ¤Î¥Õ¥¡¥¤¥ë̾¤òɽ¼¨¤·¤Þ¤¹¡£
CALL MFILES
CALL MFILES
¥á¥â¥ê¥Ç¥£¥¹¥¯Æâ¤Î¥Õ¥¡¥¤¥ë¤òºï½ü¤·¤Þ¤¹¡£
CALL MKILL(<¥Õ¥¡¥¤¥ë̾>)
CALL MKILL("SAMPLE")
¥á¥â¥ê¥Ç¥£¥¹¥¯Æâ¤Î¥Õ¥¡¥¤¥ë̾¤òÉÕ¤±Âؤ¨¤Þ¤¹¡£
CALL MNAME(<¿·¥Õ¥¡¥¤¥ë̾>AS<µì¥Õ¥¡¥¤¥ë̾>)
CALL MNAME("TEST" AS "TEST.AA")
¥«¥é¡¼¥Ñ¥ì¥Ã¥È¤Î½é´ü²½¤Þ¤¿¤ÏÀßÄê¤ò¹Ô¤¤¤Þ¤¹¡£
CALL PALETTE[(<¥Ñ¥ì¥Ã¥ÈÈÖ¹æ>,<ÀÖµ±ÅÙ>,<Îе±ÅÙ>,<²«µ±ÅÙ>)]
CALL PALETTE(15,4,4,4)
CALL KANJI¥¹¥Æ¡¼¥È¥á¥ó¥È¤Ë¤è¤ê²èÌ̤ò´Á»ú¥Æ¥¥¹¥È¥â¡¼¥É¤Ë¤·¤¿¤È¤¤Ë¡¢¥Ñ¥ì¥Ã¥È¤òÊѹ¹¤¹¤ë¤¿¤á¤Ë»ÈÍѤ·¤Þ¤¹¡£´Á»ú¥â¡¼¥É¤Ç¤Ê¤¤¤È¤¤Ç¤â»ÈÍѤǤ¤Þ¤¹¡£
¥Ñ¥é¥á¡¼¥¿¤ò¤¹¤Ù¤Æ¾Êά¤·¤¿¾ì¹ç¤Ï¡¢¥Ñ¥ì¥Ã¥È¤ò½é´ü¾õÂ֤ˤ·¤Þ¤¹¡£¥Ñ¥é¥á¡¼¥¿¤¬»ØÄꤵ¤ì¤¿¾ì¹ç¡¢<¥Ñ¥ì¥Ã¥ÈÈÖ¹æ>¤Ç»ØÄꤵ¤ì¤¿¥Ñ¥ì¥Ã¥È¤ò<ÀÖµ±ÅÙ>¡¢<Îе±ÅÙ>¡¢<Àĵ±ÅÙ>¤Î¿§¤ËÀßÄꤷ¤Þ¤¹¡£¤Ê¤ª¡¢¥Ñ¥ì¥Ã¥ÈÈÖ¹æ¤ä³Æµ±ÅÙ¤ò¾Êά¤¹¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£
<ʸ»úÎó>¤ÎºÇ½é¤Î2¥Ð¥¤¥È¤ò16¿Ê4·å¤Î¥·¥Õ¥ÈJIS¥³¡¼¥É¤ËÊÑ´¹¤·¤Æ<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£
CALL SJIS(<ʸ»úÊÑ¿ô>,<ʸ»úÎó>)
10 CALL SJIS(A$,"´Á»ú")
20 PRINT A$
¡Úɽ¼¨¡Û3441
MSX-DOS¤òµ¯Æ°¤·¤Þ¤¹¡£
CALL SYSTEM
CALL SYSTEM
SYSTEM¥³¥Þ¥ó¥É¤ò¼Â¹Ô¤¹¤ë¤È¡¢DOS¤ËÌá¤ëÁ°¤Ë¤¹¤Ù¤Æ¤Î¥Õ¥¡¥¤¥ë¤ÏÊĤ¸¤é¤ì¡¢¥á¥â¥êÃæ¤Î¥×¥í¥°¥é¥à¤ä¥Ç¡¼¥¿¤Ï¼º¤ï¤ì¤Þ¤¹¡£
¤³¤ÎÌ¿Î᤬¼Â¹Ô¤Ç¤¤ë¤Î¤Ï¡¢MSX-DOS¤«¤éDisk BASIC¤òµ¯Æ°¤·¤¿¾ì¹ç¤À¤±¤Ç¤¹¡£¤½¤¦¤Ç¤Ê¤¤¾ì¹ç¤Ï¡¢¡ÖIllegal function call¡×¥¨¥é¡¼¤Ë¤Ê¤ê¤Þ¤¹¡£
<¿ô¼°>¤ÎÃͤòÇÜÀºÅټ¿ô¤ËÊÑ´¹¤·¤Þ¤¹¡£
CDBL(<¿ô¼°>)
PRINT CDBL(1/3)
¡Úɽ¼¨¡Û.33333333333333
<¿ô¼°>¤Î¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥É¤ò»ý¤Äʸ»ú¤òÊÖ¤·¤Þ¤¹¡£
CHR$(<¿ô¼°>)
PRINT CHR$(65)
¡Úɽ¼¨¡ÛA
<¿ô¼°>¤Ï0¡Á255¤ÎÈϰϤǤʤ±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£Ê¸»ú¤È¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥É¤ÎÂбþ¤Ë¤Ä¤¤¤Æ¤Ï¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥Éɽ¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
ASC¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥Éɽ
<¿ô¼°>¤Î¾®¿ôÅÀ°Ê²¼¤òÀÚ¤ê¼Î¤Æ¤Æ¡¢¼Â¿ô¤ËÊÑ´¹¤·¤Þ¤¹¡£
CINT(<¿ô¼°>)
PRINT CINT(123.45678)
¡Úɽ¼¨¡Û123
<¿ô¼°>¤ÎÃͤ¬-32768¡Á32767¤ÎÈϰϳ°¤Î¤È¤¤Ï¡¢¡ÖOverflow¡×¥¨¥é¡¼¤Ë¤Ê¤ê¤Þ¤¹¡£
¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤˱ߤäÂʱߤòÉÁ¤¤Þ¤¹¡£
CIRCLE[STEP](X,Y),<Ⱦ·Â>[,<¥«¥é¡¼¥³¡¼¥É>][,<³«»Ï³ÑÅÙ>][,<½ªÎ»³ÑÅÙ>][,<ÈæΨ>]
CIRCLE(128,96),50,1
SCREEN2°Ê¾å¤Î²èÌ̤DZߤòÉÁ¤¤Þ¤¹¡£Ãæ¿´ºÂɸ¤ÏX¼´Êý¸þ¤Ë255(SCREEN 6¡¢7¤Ç¤Ï511)¡¢Y¼´Êý¸þ¤Ë191(SCREEN 5°Ê¹ß¤Ç¤Ï211)¤¢¤ê¤Þ¤¹¤Î¤Ç¡¢¤½¤ÎÈÏ°ÏÆâ¤Î¿ôÃͤò»ØÄê¤Ç¤¤Þ¤¹¡£¤Þ¤¿¡¢STEP¤òÍѤ¤¤ÆÃæ¿´¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹(STEP¤òÍѤ¤¤¿»ØÄê¤ÎÊýË¡¤Ë¤Ä¤¤¤Æ¤ÏLINEÌ¿Îá¤ò»²¾È)¡£
¿§¤ò»ØÄꤹ¤ë¤È¡¢¤½¤Î¿§¤Ç±ß¤¬ÉÁ¤«¤ì¤Þ¤¹¡£¿§¤Î»ØÄê¤ò¾Êά¤¹¤ë¤È¡¢COLOR¤Ç»ØÄꤵ¤ì¤¿Á°·Ê¿§¤¬ÍѤ¤¤é¤ì¤Þ¤¹¡£
| ¢£ | ¸Ì¤ÈÀð·Á |
| | CIRCLE(128,96),50,1,3/4*3.14,1/4*3.14 |
| | ¤Î¤è¤¦¤Ë¡¢±ß¤Î³«»Ï³ÑÅÙ(3/4*3.14)¤È½ªÎ»³ÑÅÙ(1/4*3.14)¤ò»ØÄꤹ¤ì¤Ð¡¢¤½¤ÎÈϰϤθ̤¬ÉÁ¤«¤ì¤Þ¤¹¡£¤½¤ì¤¾¤ì¤Ë¥Þ¥¤¥Ê¥¹µ¹æ¤ò¤Ä¤±¤ë¤È¡¢Àð·Á¤¬ÉÁ¤«¤ì¤Þ¤¹¡£³«»Ï³ÑÅÙ¡¢½ªÎ»³ÑÅ٤λØÄê¤Ï¡¢-2¦Ð¤«¤é2¦Ð¤ÎÈÏ°ÏÆâ¤Ç¹Ô¤¤¤Þ¤¹¡£ |
| ¢£ | Â汧 |
| | CIRCLE(128,96),50,1,,,0.8 |
| | ¤Î¤è¤¦¤Ë¡¢ºÇ¸å¤ËÈæΨ(0.8)¤ò»ØÄꤹ¤ì¤Ð¡¢Âʱߤ¬ÉÁ¤«¤ì¤Þ¤¹¡£ÈæΨ¤Ï¡Ö¿âľÊý¸þ¤ÎȾ·Â/¿åÊ¿Êý¸þ¤ÎȾ·Â¡×¤ÎÃͤǻØÄꤷ¤Þ¤¹¡£Ãͤ¬1¤è¤ê¾®¤µ¤¤¤È²£¤ËÊ¿¤Ù¤Ã¤¿¤¤ÂʱߤȤʤꡢ1¤è¤êÂ礤¤¤È½Ä¤ËºÙŤ¤ÂʱߤȤʤê¤Þ¤¹¡£ |
SCREEN¡¢COLOR
ÊÑ¿ô¤Î½é´ü²½¤È»ÈÍѤ¹¤ë¥á¥â¥êÎΰè¤ÎÂ礤µ¤ò»ØÄꤷ¤Þ¤¹¡£
CLEAR[<ʸ»úÎóÎΰè¤ÎÂ礤µ>[,<¥á¥â¥ê¤Î¾å¸Â>]]
CLEAR 200,&HD000
CLEAR¤ò¼Â¹Ô¤¹¤ë¤È¡¢¤¹¤Ù¤Æ¤ÎÊÑ¿ô¤¬½é´ü²½¤µ¤ì¡¢DEFÌ¿Îá(DEF FN¡¢DEFINT/SGN/DBL/STR)¤ÎÄêµÁ¤Ï̵¸ú¤Ë¤Ê¤ê¤Þ¤¹¡£½é´ü²½¤µ¤ì¤ë¤È¡¢¿ôÃÍÊÑ¿ô¤Ï0¤Ë¡¢Ê¸»úÊÑ¿ô¤Ï¥Ì¥ë(²¿¤âʸ»ú¤¬ÂåÆþ¤µ¤ì¤Æ¤¤¤Ê¤¤¾õÂÖ)¤Ë¤Ê¤ê¤Þ¤¹¡£
¤Þ¤¿¡¢
CLEAR 300,&HD000
¤Î¤è¤¦¤Ê»ØÄê¤Ç¤Ï¡¢ÊÑ¿ô¤Î½é´ü²½¤Î¤Û¤«¤Ë¡¢Ê¸»úÊÑ¿ô¤ÎÆâÍƤò¤·¤Þ¤Ã¤Æ¤ª¤¯Ê¸»úÎóÎΰè¤ÎÂ礤µ(¤³¤Î¾ì¹ç¡¢300)¤È¡¢BASIC¤¬»ÈÍѤ¹¤ë¥á¥â¥ê¤Î¾å¸Â(¤³¤Î¾ì¹ç¡¢&HD000)¤òÀßÄꤹ¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£Ê¸»úÎóÎΰè¤ÎÂ礤µ¤Ï¡¢¥á¥â¥ê¤Îµö¤¹¸Â¤ê¤ÎÃͤޤǻØÄê¤Ç¤¤Þ¤¹¡£¾Êά¤·¤¿¤È¤¤Ï200¤Ë¤Ê¤ê¤Þ¤¹¡£¤Þ¤¿¡¢¥á¥â¥ê¤Î¾å¸Â¤Ï&H831F¡Á&HF380¤ÎÈϰϤǻØÄê¤Ç¤¤Þ¤¹¡£¤·¤«¤·¡¢Disk BASIC¤Ê¤É¤Î¥ï¡¼¥¯¥¨¥ê¥¢¤ò²õ¤µ¤Ê¤¤¤è¤¦¤ËÃí°Õ¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¥á¥â¥ê¤Î¾å¸Â¤ò¤òÀßÄꤹ¤ë¤È¤¤Ï¡¢Ê¸»úÎóÎΰè¤ÎÂ礤µ¤ò¾Êά¤Ç¤¤Þ¤»¤ó¡£¥á¥â¥ê¤Î¾å¸Â¤Ë¤Ä¤¤¤Æ¤Ï¡¢¡Ö4.2 ¥æ¡¼¥¶¡¼¥¨¥ê¥¢¤Î¾ÜºÙ¡×¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
FRE
¥«¥»¥Ã¥È¥Æ¡¼¥×¤Î¥×¥í¥°¥é¥à¤ò¥í¡¼¥É¤·¤Þ¤¹¡£
CLOAD[<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>]
CLOAD "TEST"
¥«¥»¥Ã¥È¥Æ¡¼¥×¤ËCSAVE¤Ç¥»¡¼¥Ö¤µ¤ì¤¿¥×¥í¥°¥é¥à¤ò¥í¡¼¥É¤·¤Þ¤¹¡£
CLOAD¤¬¼Â¹Ô¤µ¤ì¤ë¤È¡¢<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë̾¤Î¥×¥í¥°¥é¥à¤ò¥«¥»¥Ã¥È¥Æ¡¼¥×¾å¤Çõ¤·¤Þ¤¹¡£Ãµ¤·¤Æ¤¤¤ëºÇÃæ¤ËÊÌ¤Î¥×¥í¥°¥é¥à¤ò¸«¤Ä¤±¤ë¤È¡ÖSkip:¥Õ¥¡¥¤¥ë̾¡×¤È²èÌ̤Ëɽ¼¨¤µ¤ì¡¢»ØÄꤵ¤ì¤¿¥×¥í¥°¥é¥à¤¬¸«¤Ä¤«¤ë¤È¡ÖFound:¥Õ¥¡¥¤¥ë̾¡×¤Èɽ¼¨¤·¤Æ¥í¡¼¥É¤ò³«»Ï¤·¤Þ¤¹¡£
CLOAD¤Î¸å¤í¤Ë»ØÄꤹ¤ë¥Õ¥¡¥¤¥ë̾¤ò¾Êά¤¹¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£¾Êά¤·¤¿¤È¤¤Ï¡¢CLOAD¤¬¼Â¹Ô¤µ¤ì¤ÆºÇ½é¤Ë¤ß¤Ä¤±¤¿¥×¥í¥°¥é¥à(CSAVE¤Ç¥»¡¼¥Ö¤µ¤ì¤¿¤â¤Î)¤ò¥í¡¼¥É¤·¤Þ¤¹¡£CLOADÌ¿Îá¤ò¼Â¹Ô¤¹¤ë¤È¡¢¤½¤Î¤È¤¥á¥â¥ê¾å¤Ë¤¢¤Ã¤¿¥×¥í¥°¥é¥à¤Ï̵¤¯¤Ê¤Ã¤Æ¤·¤Þ¤¦¤Î¤ÇÃí°Õ¤·¤Æ¤¯¤À¤µ¤¤¡£¤Þ¤¿¡¢CLOAD¤Ç¡¢SAVEÌ¿Îá¤Ë¤è¤Ã¤Æ¥»¡¼¥Ö¤µ¤ì¤¿¥×¥í¥°¥é¥à¤ò¥í¡¼¥É¤¹¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£
CSAVE¡¢
LOAD
¥«¥»¥Ã¥È¥Æ¡¼¥×¤Î¥×¥í¥°¥é¥à¤È¥á¥â¥ê¾å¤Î¥×¥í¥°¥é¥à¤òÈæ³Ó¤·¤Þ¤¹¡£
CLOAD?[<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>]
CLOAD? "TEST"
¥á¥â¥ê¾å¤Ë¤¢¤ë¥×¥í¥°¥é¥à(LISTÌ¿Îá¤Ç²èÌ̤Ëɽ¼¨¤µ¤ì¤ë¤â¤Î)¤È¡¢¥«¥»¥Ã¥È¥Æ¡¼¥×¤Ë¥»¡¼¥Ö¤µ¤ì¤¿¥×¥í¥°¥é¥à¤¬Æ±¤¸¤«¤É¤¦¤«Ä´¤Ù¤Þ¤¹¡£Æ±¤¸¤Ç¤¢¤ì¤Ð¡ÖOk¡×¤Èɽ¼¨¤µ¤ì¡¢°ã¤Ã¤Æ¤¤¤ë¤È¡ÖVeriffy error¡×¤Èɽ¼¨¤µ¤ì¤Þ¤¹¡£CLOADÌ¿Îá¤Ï¡¢ÉáÄÌCSAVEÌ¿Îá¤ò¼Â¹Ô¤·¤¿¸å¤Ë¡¢¥»¡¼¥Ö¤¬Àµ¤·¤¯¹Ô¤ï¤ì¤¿¤«¤É¤¦¤«¤ò³Îǧ¤¹¤ë¤¿¤á¤Ë»È¤ï¤ì¤Þ¤¹¡£
CLOAD?¤Î¸å¤í¤Ë»ØÄꤹ¤ë¥Õ¥¡¥¤¥ë̾¤ò¾Êά¤¹¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£¾Êά¤·¤¿¤È¤¤Ï¡¢CLOAD?¤¬¼Â¹Ô¤µ¤ì¤ÆºÇ½é¤Ë¸«¤Ä¤±¤¿¥×¥í¥°¥é¥à(CSAVE¤Ç¥»¡¼¥Ö¤µ¤ì¤¿¤â¤Î)¤òÈæ³Ó¤·¤Þ¤¹¡£
CSAVE¡¢LOAD
¥Õ¥¡¥¤¥ë¤òÊĤ¸¤Þ¤¹¡£
CLOSE [[#]<¥Õ¥¡¥¤¥ëÈÖ¹æ>[,[#]<¥Õ¥¡¥¤¥ëÈÖ¹æ>]¡¦¡¦¡¦]
CLOSE #1
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤ËÂбþ¤¹¤ë¥Õ¥¡¥¤¥ë¤òÊĤ¸¤Þ¤¹¡£»ØÄꤷ¤¿<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ï¡¢°Ê¸å¤ÎOPENʸ¤Ç»ØÄꤹ¤ë¤³¤È¤¬¤Ç¤¤ë¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£¤Þ¤¿¡¢¤¤¤Ã¤¿¤óÊĤ¸¤¿¥Õ¥¡¥¤¥ë¤ò¤â¤¦°ìÅÙ³«¤¯¤È¤¤Ë¤Ï¡¢Â¾¤Î¥Õ¥¡¥¤¥ë¤¬»È¤Ã¤Æ¤¤¤Ê¤¤<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ê¤é¤Ð¡¢¤É¤Î<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ç¤â»ØÄꤹ¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
CLOSE¤Ç¤Ï¡¢<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤òÊ£¿ô»ØÄꤹ¤ë¤³¤È¤Ë¤è¤ê¡¢°ìÅÙ¤ËÊ£¿ô¤Î¥Õ¥¡¥¤¥ë¤òÊĤ¸¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤Þ¤¿<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤ò¾Êά¤¹¤ë¤È¡¢¤½¤Î¤È¤³«¤¤¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤ò¤¹¤Ù¤ÆÊĤ¸¤Þ¤¹¡£
ÊĤ¸¤¿¥Õ¥¡¥¤¥ë¤ËÂФ·¤Æ¤Ï¡¢ºÆ¤ÓOPENʸ¤Ç³«¤¯¤Þ¤ÇÆþ½ÐÎϤò¹Ô¤¦¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£CLOSEʸ¤Ï¡¢¥Õ¥¡¥¤¥ë¤¬½ÐÎÏÍѤ˥ª¡¼¥×¥ó¤µ¤ì¤Æ¤¤¤¿¾ì¹ç¤Ë¤Ï¡¢¥Ð¥Ã¥Õ¥¡¤Ë»Ä¤Ã¤Æ¤¤¤¿¥Ç¡¼¥¿¤ÎÁݤ½Ð¤·¤ò¹Ô¤¦¤Î¤Ç¡¢¥Õ¥¡¥¤¥ë¤Ø¤Î½ÐÎϽèÍý¤òÀµ¤·¤¯½ªÎ»¤¹¤ë¤¿¤á¤Ë¤Ï¡¢É¬¤ºCLOSEʸ¤ò¼Â¹Ô¤·¤Ê¤¯¤Æ¤Ï¤Ê¤ê¤Þ¤»¤ó¡£
ENDʸ¡¢NEWʸ¤ò¼Â¹Ô¤¹¤ë¤È¡¢¼«Æ°Åª¤Ë¤¹¤Ù¤Æ¤Î¥Õ¥¡¥¤¥ë¤¬ÊĤ¸¤é¤ì¤Þ¤¹¤¬¡¢STOPʸ¤Ï¥Õ¥¡¥¤¥ë¤òÊĤ¸¤Ê¤¤¤Î¤ÇÃí°Õ¤¹¤ëɬÍפ¬¤¢¤ê¤Þ¤¹¡£
OPEN¡¢END¡¢NEW
²èÌ̤Ëɽ¼¨¤µ¤ì¤Æ¤¤¤ëʸ»ú¤ä³¨¤ò¾Ã¤·¤Þ¤¹¡£
CLS
CLS
CLS¤Ï¡¢KEY ON»ØÄê¤Çɽ¼¨¤µ¤ì¤Æ¤¤¤ë¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤò½ü¤¤¤Æ¡¢Ê¸»ú¡¢ÅÀ¡¢Àþ¡¢³¨¤Ê¤É²èÌ̤Ëɽ¼¨¤µ¤ì¤Æ¤¤¤ë¤â¤Î¤ò¤¹¤Ù¤Æ¾Ã¤·¤Þ¤¹¡£
¤Þ¤¿¡¢CLS¤¬¼Â¹Ô¤µ¤ì¤ë¤È¡¢¥Æ¥¥¹¥È²èÌ̤ξì¹ç¡¢¥«¡¼¥½¥ë¤Ï²èÌÌ°ìÈÖ¾å¤Îº¸Ã¼¤Ë°ÜÆ°¤·¤Þ¤¹¤¬¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤ǤÏLP(ºÇ½ª»²¾ÈÅÀ)¤ÏÊѲ½¤·¤Þ¤»¤ó¡£
CLS¤Ï´Á»ú¥â¡¼¥É¤Ç¤Ï»ÈÍѤǤ¤Þ¤»¤ó¡£(Illegal function call¤Ë¤Ê¤ë)¡£´Á»ú¥â¡¼¥É¤Ç²èÌ̤ò¾Ã¤¹¤È¤¤ÏCALL CLSÌ¿Îá¤ò»È¤¤¤Þ¤¹¡£
COLOR¡¢CALL CLS
²èÌ̤理ò»ØÄꤷ¤Þ¤¹¡£½ñ¼°1°Ê³°¤ÏÁ´¤ÆMSX2°Ê¹ßÀìÍѤǤ¹¡£
COLOR[<Á°·Ê¿§>][,<ÇØ·Ê¿§>][,<¼þÊÕ¿§>]
COLOR=(<¥Ñ¥ì¥Ã¥ÈÈÖ¹æ>,<R¥³¡¼¥É>,<G¥³¡¼¥É>,<B¥³¡¼¥É>)
COLOR=RESTORE
COLOR[=NEW]
COLOR 1,5,8
¿§¤Ï¡¢¤½¤ì¤¾¤ì°Ê²¼¤Î0¡Á15(SCREEN6¤Ç¤Ï0¡Á3)¤Þ¤Ç¤ÎÃͤǻØÄꤷ¤Þ¤¹¡£
| 0 | Æ©ÌÀ(¼þÊÕ¿§¤ÈƱ¤¸¿§) | | 8 | ÀÖ |
| 1 | ¹õ | | 9 | ÌÀ¤ë¤¤ÀÖ |
| 2 | ÎÐ | | 10 | ²« |
| 3 | ÌÀ¤ë¤¤ÎÐ | | 11 | ÌÀ¤ë¤¤²« |
| 4 | °Å¤¤ÀÄ | | 12 | °Å¤¤ÎÐ |
| 5 | ÌÀ¤ë¤¤ÀÄ | | 13 | »ç |
| 6 | °Å¤¤ÀÖ | | 14 | ³¥ |
| 7 | ¿å¿§ | | 15 | Çò |
ÅŸ»ÅêÆþ»þ¤Ë¤Ï¡¢COLOR¤Ï¡ÖCOLOR 15,4,7¡×¤ËÀßÄꤵ¤ì¡¢SCREENʸ¤ò¼Â¹Ô¤·¤¿¤È¤¤Ë¤Ï¡¢¥«¥é¡¼¥Ñ¥ì¥Ã¥È¤Ï¾åµ¤Î¤è¤¦¤ËÀßÄꤵ¤ì¤Æ¤¤¤Þ¤¹¡£
SCREEN 8°Ê³°¤Ç¤Ï¡¢½ñ¼°2¤ÎCOLOR=¤ò»È¤Ã¤Æ¤³¤ì¤é¤Î¿§¤ò512¿§¤ÎÃ椫¤éÁª¤ó¤Ç¼«Í³¤ËÀßÄꤹ¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
¤Ê¤ª¡¢¥×¥í¥°¥é¥àÃæ¤Ç¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤ò»ØÄꤹ¤ë¤È¡¢¤½¤ì¤Þ¤Ç¥Æ¥¥¹¥È¥â¡¼¥É¤Ç»È¤ï¤ì¤Æ¤¤¤¿¿§¤¬¤½¤Î¤Þ¤Þ»È¤ï¤ì¤Æ¤¤¤Þ¤¹¡£
SCREEN 8¤Î¿§¤Ï¡¢0¡Á255¤¬»È¤¨¤Þ¤¹¡£
00000000 8¥Ó¥Ã¥È¤Î¿§¥³¡¼¥É
GGGRRRBB Green¡¢Red¡¢Blue¤Î³Æ¥Ó¥Ã¥È
Î㤨¤Ð¡¢ÌÀ¤ë¤¤ÎФÏ&B11100000(=224)¡¢°Å¤¤»ç¤Ê¤é&B00000101(=5)¤Ê¤É¤È¤Ê¤ê¤Þ¤¹¡£
SCREEN 10¤Ç¤Ï0¡Á15¡¢SCREEN 11¡¢12¤Ç¤Ï0¡Á255¤¬»È¤¨¤Þ¤¹¡£SCREEN 10¤Ç¤ÏYJK/RGBº®ºß¥â¡¼¥É¤ÎRGBÉôʬ¤Î¤ß¤Î»ØÄê¤Ê¤Î¤Ç¡¢SCREEN 7°Ê²¼¤Î¥«¥é¡¼¥Ñ¥ì¥Ã¥È¤Î»ØÄê¤ÈÁ´¤¯Æ±¤¸¤È¹Í¤¨¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£SCREEN 11°Ê¹ß¤Ç¤Ï¥«¥é¡¼¥³¡¼¥É¤ÏVRAM¤ÎÃͤȹͤ¨¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¤¬¡¢YJKÊý¼°¤ÎÀ³Ê¾å¤³¤ì¤òñ½ã¤Ë²ò¼á¤¹¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£¾Ü¤·¤¯¤ÏV9958¤ÎYJK¥â¡¼¥É¤Ë´Ø¤¹¤ëµ½Ò¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
| ¢£ | Á°·Ê¿§ |
| | ¥Æ¥¥¹¥È²èÌÌ(SCREEN 0¤ª¤è¤Ó1¤Î¥Æ¥¥¹¥È¥â¡¼¥É)¤Îʸ»ú¤Î¿§¤ä¡¢¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤ÎÅÀ¤äÀþ¤Î¿§¤Ç¤¹¡£¤¿¤À¤·¡¢¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤ÇÅÀ¤äÀþ¤Ê¤É¤òÉÁ¤¯¤È¤¤Ë¤Ï¡¢³ÆÌ¿Îá¤Ç¿§¤Î»ØÄê¤ò¹Ô¤¦¤³¤È¤¬¤Ç¤¤Þ¤¹¡£³ÆÌ¿Îá¤Ç¿§¤ò»ØÄꤹ¤ë¤È¡¢¤½¤Î»ØÄê¤ÎÊý¤¬Í¥À褵¤ì¤Þ¤¹¡£Á°·Ê¿§¤À¤±¤òÊѤ¨¤ë¤Ë¤ÏÎ㤨¤Ð¡¢¼¡¤Î¤è¤¦¤Ë»ØÄꤷ¤Þ¤¹¡£ |
| | COLOR 9 |
| ¢£ | ÇØ·Ê¿§ |
| | ¥Æ¥¥¹¥È²èÌ̤䥰¥é¥Õ¥£¥Ã¥¯²èÌ̤ÎÃϤο§¤Î¤³¤È¤Ç¤¹¡£¥Æ¥¥¹¥È²èÌ̤Ǥϡ¢Ì¿Îá¼Â¹Ô¸å¤Ë»ØÄꤷ¤¿ÇØ·Ê¿§¤ËÊѤ¨¤é¤ì¤Þ¤¹¡£¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤Ǥϡ¢SCREEN¤«CLS¤ò¼Â¹Ô¤·¤¿¸å¤ËÇØ·Ê¿§¤¬ÊѤ¨¤é¤ì¤Þ¤¹¡£ÇØ·Ê¿§¤À¤±¤òÊѤ¨¤ë¤Ë¤Ï¡¢Î㤨¤Ð¡¢¼¡¤Î¤è¤¦¤Ë»ØÄꤷ¤Þ¤¹¡£ |
| | COLOR ,4 |
| ¢£ | ¼þÊÕ¿§ |
| | ²èÌ̾岼¤ÎBASIC¤Ç»È¤¨¤Ê¤¤Éôʬ¤Î¤³¤È¤Ç¤¹¡£¼þÊÕ¿§¤À¤±¤òÊѤ¨¤ë¤Ë¤Ï¡¢Î㤨¤Ð¡¢¼¡¤Î¤è¤¦¤Ë»ØÄꤷ¤Þ¤¹¡£ |
| | COLOR ,,13 |
10 SCREEN 5
20 COLOR= (0,0,7,7)
SCREEN 6¤Ç¤Ï0¡Á3¡¢SCREEN 8°Ê³°¤Ç¤Ï0¡Á15¤Î¥Ñ¥ì¥Ã¥È¤Ë¿§¤ò³ä¤êÅö¤Æ¤Þ¤¹¡£¾å¤ÎÎã¤Ç¤Ï¥Ñ¥ì¥Ã¥È0¤Ë0¡¢7¡¢7¡¢¤Ä¤Þ¤ê
&B000 &B111 &B111
RRR GGG BBB (RGB³Æ3¥Ó¥Ã¥È¡¢0¡Á7¤ÎÃÍ)
¤Î·ë²Ì¤È¤·¤ÆÌÀ¤ë¤¤¿å¿§¤ò³ä¤êÅö¤Æ¤Æ¤¤¤Þ¤¹¡£³ä¤êÅö¤Æ¤¿¸å¤Ï¡¢½ñ¼°1¤Ë¤·¤¿¤¬¤Ã¤Æ¿§¤òÀßÄꤷ¤Þ¤¹¡£
½é´ü¾õÂ֤Ǥϡ¢½ñ¼°1¤ÇÀâÌÀ¤·¤¿¥«¥é¡¼ÈÖ¹æ¤È¥Ñ¥ì¥Ã¥ÈÈֹ椬Ʊ¤¸¤Ë¤Ê¤ë¤è¤¦¤ËÀßÄꤷ¤Æ¤¢¤ê¤Þ¤¹¡£
COLOR=RESTORE
VRAM¾å¤Î¥Ñ¥ì¥Ã¥È¥Æ¡¼¥Ö¥ë¤Î¾ðÊó¤Ë¤·¤¿¤¬¤Ã¤Æ¥Ñ¥ì¥Ã¥È¤òÀßÄꤷ¤Þ¤¹¡£
COLOR=NEW
¥Ñ¥ì¥Ã¥È¤ò½é´ü¾õÂ֤˥»¥Ã¥È¤·¤Þ¤¹¡£=NEW¤Ï¾Êά¤·¤Æ¤â¤«¤Þ¤¤¤Þ¤»¤ó¡£
CALL KANJI¡¢CLS¡¢SCREEN¡¢VRAM¥Þ¥Ã¥×¡¢V9958
¥¹¥×¥é¥¤¥È¤Î1¥é¥¤¥óËè¤Î¿§¤ò·è¤á¤Þ¤¹¡£
COLOR SPRITE$(<¥×¥ì¡¼¥óÈÖ¹æ>)=<ʸ»ú¼°>
COLOR SPRITE$(0)=CHR$(1)+CHR$(7)
¥¹¥×¥é¥¤¥È¤Î¿§¤â¼ÂºÝ¤Ë¤Ï¡¢¥Ñ¥ì¥Ã¥ÈÈÖ¹æ¤Ç»ØÄꤷ¤Þ¤¹¡£¤³¤ÎÎã¤Ç¤Ï¥×¥ì¡¼¥ó0¤Î1¥é¥¤¥óÌܤò¹õ¤Ë¡¢2¥é¥¤¥óÌܤò¿å¿§¤Ë¤·¤Æ¤¤¤Þ¤¹¡£¥¹¥×¥é¥¤¥È¤Î1¥é¥¤¥óËè¤Ë¿§¤ò¤Ä¤±¤é¤ì¤ë¤Î¤Ï¡¢SCREEN¥â¡¼¥É4°Ê¹ß¤Î»þ¤À¤±¤Ç¤¹¡£¿§¥³¡¼¥É¤Ë¤Ä¤¤¤Æ¤ÏCOLOR¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£¤Ê¤ª¿§¥³¡¼¥É¤¬15¤òĶ¤¨¤ë¾ì¹ç¡¢¾å°Ì4¥Ó¥Ã¥È¤Ï¼¡¤Î¤è¤¦¤Ê°ÕÌ£¤ò»ý¤Á¤Þ¤¹¡£
bit7 | 32¥É¥Ã¥Èº¸¥·¥Õ¥Èɽ¼¨¡£ |
bit6 | PUT SPRITE¤ò¼Â¹Ô¤·¤¿¤È¤Ï¢Â³¤·¤¿¥×¥ì¡¼¥ó¤òƱ»þ¤ËÆ°¤«¤¹¡£¤³¤Î¤È¤½Å¤Ê¤Ã¤¿Éôʬ¤Î¿§¥³¡¼¥É¤ÏOR¤µ¤ì¤Æɽ¼¨¤µ¤ì¡¢¾×Æͤϸ¡½Ð¤µ¤ì¤Ê¤¤*¡£ |
bit5 | ¾×Æͤò¸¡½Ð¤·¤Ê¤¤¡£ |
bit4 | ̤»ÈÍÑ¡£ |
- bit6¤¬ON¤Î¤È¤¤Ïɽ¼¨¤¬Ê£»¨¤Ë¤Ê¤ê¤Þ¤¹¡£¾Ü¤·¤¯¤Ï¡ÖÂè4Éô VDP¡×¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
| ¤¹¤Ù¤Æ¤ÎSPRITE$¤òSTRING$(32,255)¤È¤·¡¢¥¹¥×¥é¥¤¥ÈÌÌ0¤¬&B00000111(¿å¿§)¡¢¥¹¥×¥é¥¤¥ÈÌÌ1¤¬&B01001000(bit6¤¬ON¤µ¤ì¤¿ÀÖ)¤Î¤È¤¡£ |
¿Þ2.11 bit6¤¬ON¤Î»þ¤Î¥¹¥×¥é¥¤¥È |
bit6¤¬ON¤Î¥¹¥×¥é¥¤¥ÈÌ̤¬Ï¢Â³¤·¤Æ¤¤¤ë¤È¡¢1¤Ä¤ÎPUT SPRITEÌ¿Îá¤Ç¤½¤ì¤é¤òÆ°¤«¤¹¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
SCREEN 8¤Î¥¹¥×¥é¥¤¥È¤À¤±¤Ï¼¡¤Î¤è¤¦¤Ê16¿§¤Ë¸ÇÄꤵ¤ì¤Þ¤¹¡£
ɽ2.7 SCREEN 8¤Î¥¹¥×¥é¥¤¥È¿§
¥«¥é¡¼ÈÖ¹æ | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 |
¿§ | ¹õ | °Å¤¤ÀÄ | °Å¤¤ÀÖ | °Å¤¤»ç | °Å¤¤ÎÐ | °Å¤¤¿å¿§ | °Å¤¤²«¿§ | ³¥¿§ |
¥«¥é¡¼ÈÖ¹æ | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 |
¿§ | È©¿§ | ÀÄ | ÀÖ | »ç | ÎÐ | ¿å¿§ | ²«¿§ | Çò |
COLOR SPRITE(<¥×¥ì¡¼¥óÈÖ¹æ>)=<¼°>
COLOR SPRITE(1)=15
¥×¥ì¡¼¥ó1Á´ÂΤòÇò¤Ë¤·¤Þ¤¹¡£
COLOR¡¢
SPRITE
Ää»ß¤·¤¿¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤òºÆ³«¤·¤Þ¤¹¡£
CONT
CONT
¥×¥í¥°¥é¥à¤Î¼Â¹ÔÄä»ß¸å¡¢¡ÖCONT¡×¤ÈÆþÎϤ¹¤ë¤È¡¢Ää»ß¤·¤¿¼¡¤Îʸ¤«¤é¼Â¹Ô¤¬ºÆ³«¤µ¤ì¤Þ¤¹¡£¥×¥í¥°¥é¥à¤Î¼Â¹ÔÄä»ß¤Ï¡¢[CTRL]+[STOP]¥¡¼ÆþÎϤä¥×¥í¥°¥é¥àʸÃæ¤ÎSTOPʸ¤äENDʸ¤Ë¤è¤ë¤â¤Î¤Ç¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¤Þ¤¿INPUT$´Ø¿ô¤Î¥¡¼ÆþÎÏÂÔ¤Á¤ò[CTRL]+[STOP]¥¡¼¤Ç»ß¤á¤¿¾ì¹ç¤Ï¡¢CONT¤Ï¤Ç¤¤Þ¤»¤ó¡£
¼Â¹ÔÄä»ßÃæ¤ËLISTÌ¿Îá¤äPRINTÌ¿Îá¤Ê¤É¤ò¼Â¹Ô¤¹¤ë¤³¤È¤Ï¤Ç¤¤Þ¤¹¤¬¡¢¥×¥í¥°¥é¥à¤½¤Î¤â¤Î¤ÎÊѹ¹¤ò¹Ô¤Ã¤¿¤È¤¤Ï¡¢CONT¤Ë¤è¤ë¼Â¹Ô¤ÎºÆ³«¤Ï¤Ç¤¤Þ¤»¤ó¡£
STOP¡¢
END
¥Õ¥¡¥¤¥ë¤äVRAM¤ÎÆâÍÆ¡¢ÇÛÎó¤ò¥³¥Ô¡¼¤·¤Þ¤¹¡£½ñ¼°1°Ê³°¤ÏÁ´¤ÆSCREEN¥â¡¼¥É¤¬5°Ê¹ß¤Ç͸ú¤Ê¤Î¤ÇMSX2°Ê¹ßÀìÍѤǤ¹¡£¥Ñ¥é¥á¡¼¥¿¤Ë<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤ò´Þ¤à½ñ¼°¤ÏÁ´¤ÆDisk BASIC¤Ç¤Î¤ß͸ú¤Ç¤¹¡£ÏÀÍý±é»»»Ò¤È¤·¤Æ¤Ï¡¢AND¡¢OR¡¢XOR¡¢PSET¡¢PRESET¤¬»ØÄê²Äǽ¤Ç¤¹¡£
COPY<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯1> [TO <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯2>]
COPY (<¥½¡¼¥¹ºÂɸ1>)-(<¥½¡¼¥¹ºÂɸ2>)[,<¥½¡¼¥¹¥Ú¡¼¥¸>] TO (<¥Ç¥¹¥Æ¥£¥Í¡¼¥·¥ç¥óºÂɸ>)[,<¥Ç¥¹¥Æ¥£¥Í¡¼¥·¥ç¥ó¥Ú¡¼¥¸>][,<ÏÀÍý±é»»»Ò>]
COPY (<¥½¡¼¥¹ºÂɸ1>)-(<¥½¡¼¥¹ºÂɸ2>)[,<¥½¡¼¥¹¥Ú¡¼¥¸>] TO <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯¤Þ¤¿¤ÏÇÛÎó̾>
COPY <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯¤Þ¤¿¤ÏÇÛÎó̾>[,<Êý¸þ>] TO (<¥Ç¥¹¥Æ¥£¥Í¡¼¥·¥ç¥óºÂɸ>)[,<¥Ç¥¹¥Æ¥£¥Í¡¼¥·¥ç¥ó¥Ú¡¼¥¸>][,<ÏÀÍý±é»»»Ò>]
COPY <ÇÛÎó̾> TO <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>
COPY <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯> TO <ÇÛÎó̾>
COPY SCREEN [<¥â¡¼¥É>]
COPY "A:SAMPLE.DAT" TO "SAMPLE.BAK"
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯1>¤ò<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯2>¤Ç»ØÄꤷ¤¿¥É¥é¥¤¥Ö¤Ø¡¢»ØÄꤷ¤¿¥Õ¥¡¥¤¥ë̾¤Ç¥³¥Ô¡¼¤·¤Þ¤¹¡£¤³¤ÎCOPY¥³¥Þ¥ó¥É¤Ï¥Ç¥£¥¹¥¯ÁõÃִ֤ΤߤÇ͸ú¤Ç¤¹¡£
»ØÄê¤ÎÊýË¡¤Ï4¼ïÎढ¤ê¤Þ¤¹¡£
| ¢£ | <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯1>¤À¤±¤ò»ØÄꤷ¤¿¾ì¹ç |
| | COPY "B:SAMPLE.DAT" |
| | ¤³¤Î¾ì¹ç¡¢SAMPLE.DAT¤Ï¡¢¥«¥ì¥ó¥È¥É¥é¥¤¥Ö¤ËƱ¤¸Ì¾Á°(SAMPLE.DAT)¤Ç¥³¥Ô¡¼¤µ¤ì¤Þ¤¹¡£ |
| ¢£ | <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯2>¤Ç¥É¥é¥¤¥Ö̾¤À¤±¤ò»ØÄꤷ¤¿¾ì¹ç |
| | COPY "A:SAMPLE.DAT" TO "B:" |
| | ¤³¤Î¾ì¹ç¡¢SAMPLE.DAT¤Ï¡¢¥É¥é¥¤¥ÖB¤ËƱ¤¸Ì¾Á°¤Ç¥³¥Ô¡¼¤µ¤ì¤Þ¤¹¡£ |
| ¢£ | <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯2>¤Ç¥Õ¥¡¥¤¥ë̾¤À¤±¤ò»ØÄꤷ¤¿¾ì¹ç |
| | COPY "B:SAMPLE.DAT" TO "SAMPLE.BAK" |
| | ¤³¤Î¾ì¹ç¡¢SAMPLE.DAT¤Ï¡¢¥«¥ì¥ó¥È¥É¥é¥¤¥Ö¤ËSAMPLE.BAK¤È¤¤¤¦Ì¾Á°¤Ç¥³¥Ô¡¼¤µ¤ì¤Þ¤¹¡£ |
| ¢£ | <¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯2>¤Ç¥É¥é¥¤¥Ö̾¤È¥Õ¥¡¥¤¥ë̾¤È¤ò»ØÄꤷ¤¿¾ì¹ç |
| | COPY "A:SAMPLE.DAT" TO "B:SAMPLE.BAK" |
| | ¤³¤Î¾ì¹ç¡¢SAMPLE.DAT¤Ï¡¢¥É¥é¥¤¥ÖB¤ËSAMPLE.BAK¤È¤¤¤¦Ì¾Á°¤Ç¥³¥Ô¡¼¤µ¤ì¤Þ¤¹¡£ |
10 SCREEN 5
20 COPY(10,10)-(100,120),1 TO (30,30),0,XOR
VRAM¾å¤ÎĹÊý·Á¤ÎÎΰè¤ò¾¤ÎÎΰè¤Ë¥³¥Ô¡¼¤·¤Þ¤¹¡£¥Ú¡¼¥¸¤ò¾Êά¤·¤¿¾ì¹ç¤Ï¤½¤ì¤¾¤ì¥¢¥¯¥Æ¥£¥Ö¥Ú¡¼¥¸¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£ÏÀÍý±é»»»Ò¤ò¾Êά¤·¤¿¾ì¹ç¤ÏPSET¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£
COPYÌ¿Îá¤Ç²èÌÌÈϰϳ°¤Ë¥³¥Ô¡¼¤·¤¿¾ì¹ç¡¢¥¹¥×¥é¥¤¥È¤¬É½¼¨¤µ¤ì¤Æ¤·¤Þ¤¦¤³¤È¤¬¤¢¤ê¤Þ¤¹¡£Î㤨¤Ð¡¢
COPY(0,0)-(255,39) TO (0,211)
¤ò¼Â¹Ô¤¹¤ë¤È²èÌ̥ǡ¼¥¿¤ò¥¹¥×¥é¥¤¥È¤Ê¤É¤Î¥Ç¡¼¥¿¥¨¥ê¥¢¤Ë½ñ¤¤¤Æ¤·¤Þ¤¦¤Î¤Ç¡¢¥¹¥×¥é¥¤¥È¤Î¥´¥ß¤¬É½¼¨¤µ¤ì¤Æ¤·¤Þ¤¤¤Þ¤¹¡£VDP(V9938¡¢V9958)¤Ï¥Ï¡¼¥É¥¦¥§¥¢¥¹¥¯¥í¡¼¥ë¤Îµ¡Ç½¤ò»ý¤Ã¤Æ¤ª¤ê¡¢COPYʸ¤Ç¤Ï¡¢¤½¤Îµ¡Ç½¤ò½½Ê¬À¸¤«¤¹¤¿¤á¤Ë²èÌÌɽ¼¨Èϰϳ°¤Ë²èÌ̥ǡ¼¥¿¤ò¥³¥Ô¡¼¤Ç¤¤ë¤è¤¦¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ¡¢²èÌÌɽ¼¨Èϰϳ°¤Ë²èÌ̥ǡ¼¥¿¤ò¥³¥Ô¡¼¤¹¤ë¤È¤¤Ë¤Ï¡¢¥¹¥×¥é¥¤¥È¤òVDPÌ¿Îá¤Ç¾Ã¤·¤Æ²¼¤µ¤¤¡£VDP¥ì¥¸¥¹¥¿¤ÎR#8¤Îbit1¤ò1¤Ë¤¹¤ë¤È¡¢¥¹¥×¥é¥¤¥È¤Îɽ¼¨¤¬¶Ø»ß¤µ¤ì¤Þ¤¹¡£¶ñÂÎŪ¤Ë¤Ï¡¢°Ê²¼¤ÎÌ¿Îá¤ò¼Â¹Ô¤·¤Þ¤¹¡£
VDP(9)=VDP(9) OR 2
10 SCREEN 8
20 DIM B%(327)
30 COPY(100,100)-(120,130),0 TO B%
VRAM¾å¤ÎĹÊý·Á¤ÎÎΰè¤ÎÆâÍƤòÇÛÎó¤ä¥Õ¥¡¥¤¥ë¤Ë¥³¥Ô¡¼¤·¤Þ¤¹¡£ÇÛÎó¤Î¾ì¹ç¤ÏɬÍפÊÂ礤µ°Ê¾å¤Î¤â¤Î¤ò³ÎÊݤ·¤Æ¤ª¤«¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£É¬ÍפʥХ¤¥È¿ôN¤Ï¼¡¤Î¤è¤¦¤Ë·×»»¤µ¤ì¤Þ¤¹¡£
N=INT(X*Y/K+5)
¤¿¤À¤·X¤Ï²£¡¢Y¤Ï½Ä¤Î¥É¥Ã¥È¿ô¡¢K¤ÏÄê¿ô¤Ç¡¢
| SCREEN 5¤È7¤Ç¤Ï2 |
| SCREEN 6¤Ç¤Ï4 |
| SCREEN 8°Ê¹ß¤Ç¤Ï1 |
¤È¤·¤Æµá¤á¡¢¼¡¤ËÇÛÎó¤Î·¿¤Ë¤è¤Ã¤Æ
| À°¿ô·¿ | (N+1)\2 |
| ñÀºÅÙ·¿ | (N+3)\4 |
| ÇÜÀºÅÙ·¿ | (N+7)\8 |
¤È¤·¤ÆºÇÄã¸ÂɬÍפÊÍ×ÁÇ¿ô¤¬ÆÀ¤é¤ì¤Þ¤¹¡£Ê¸Îã3¤Î¥±¡¼¥¹¤Ç¤Ï
N=INT((120-100+1)*(130-100+1)/1+5):N=656
(N+1)\2=328
¤«¤éDIM B%(327)¤È¤Ê¤ê¤Þ¤¹¡£
10 SCREEN 7
20 COPY "TEST",1 TO (100,100),1,AND
¥Õ¥¡¥¤¥ë¤Þ¤¿¤ÏÇÛÎó¤ÎÆâÍƤò²èÌ̤ËžÁ÷¤·¤Þ¤¹¡£Êý¸þ¤Ï¥Ç¡¼¥¿¤ò½ñ¤¹þ¤à¸þ¤¤Ç¡¢
| 0 | º¸¾å¤«¤é±¦²¼ |
| 1 | ±¦¾å¤«¤éº¸²¼ |
| 2 | º¸²¼¤«¤é±¦¾å |
| 3 | ±¦²¼¤«¤éº¸¾å |
¤Î¤É¤ì¤«¤Ç¤¹¡£
10 DIM A%(100)
20 COPY A% TO "TEST"
ÇÛÎó¤ÎÆâÍƤò¥Õ¥¡¥¤¥ë¤Ë¥»¡¼¥Ö¤·¤Þ¤¹¡£
10 DIM A%(100)
20 COPY "TEST" TO A%
¥Õ¥¡¥¤¥ë¤«¤éÇÛÎó¤ËÆâÍƤò¥³¥Ô¡¼¤·¤Æ¤¤Þ¤¹¡£¥Õ¥¡¥¤¥ë¤Ï¤â¤È¤â¤È½ñ¼°3¤ä½ñ¼°5¤Çºî¤Ã¤¿¤â¤Î¤Ç¤Ê¤±¤ì¤Ð¤Ê¤é¤º¡¢ÇÛÎó¤Ï½½Ê¬¤ÊÂ礤µ¤Ç¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£
10 SCREEN 8
20 COPY SCREEN
³°Éô¥Ó¥Ç¥ª¿®¹æ¤ò¥Ç¥¸¥¿¥ë²½¤·¡¢VRAM¤ËÁ÷¤ê¤Þ¤¹¡£<¥â¡¼¥É>¤Ï0¤Ê¤éÄ̾ï¤Ç¡¢1¤Ê¤é¥¤¥ó¥¿¥ì¡¼¥¹¥â¡¼¥É¤Ç¤¹¡£¤³¤Îµ¡Ç½¤Ï²èÁü¼è¤ê¹þ¤ßÁõÃÖ¤¬¤Ä¤Ê¤¬¤Ã¤Æ¤¤¤ë¾ì¹ç¤Ë¤Î¤ß͸ú¤Ç¤¹¡£¤É¤Î¥¹¥¯¥ê¡¼¥ó¤Ç¤É¤Î¥â¡¼¥É¤Ç¼è¤ê¹þ¤ß¤¬¤Ç¤¤ë¤«¤Ï¤½¤Î¼è¤ê¹þ¤ßÁõÃÖ¤ÎÀǽ¤Ë°Í¸¤·¤Þ¤¹¡£
SET PAGE¡¢
LINE
<¿ô¼°>¤Î;¸¹(¥³¥µ¥¤¥ó)¤ò·×»»¤·¤Þ¤¹¡£
COS(<¿ô¼°>)
PRINT COS(3.14159)
¡Úɽ¼¨¡Û-.99999999999649
¥á¥â¥ê¾å¤Ë¤¢¤ë¥×¥í¥°¥é¥à¤ò¥«¥»¥Ã¥È¥Æ¡¼¥×¤Ë¥»¡¼¥Ö¤·¤Þ¤¹¡£
CSAVE<¥Õ¥¡¥¤¥ë̾>[,<¥Ü¡¼¥ì¡¼¥È>]
CSAVE "TEST"
¥á¥â¥ê¾å¤Ë¤¢¤ë¥×¥í¥°¥é¥à(LISTÌ¿Îá¤Ç²èÌ̤Ëɽ¼¨¤µ¤ì¤ë¤â¤Î)¤ò¡¢¥«¥»¥Ã¥È¥Æ¡¼¥×¤ËÊݸ¤·¤Þ¤¹¡£
¥Õ¥¡¥¤¥ë̾¤Î¸å¤í¤Ë¼¡¤Î¤è¤¦¤Ë»ØÄꤹ¤ì¤Ð¡¢¥»¡¼¥Ö¤¹¤ë¤È¤¤ÎÁᤵ¤ò»ØÄꤹ¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£»ØÄê¤Ç¤¤ë¤Î¤Ï1¤«2¤Ç¤¹¡£
CSAVE "TEST",1
2¤È»ØÄꤹ¤ë¤È1¤ÎÇܤή¤µ¤Ç¥»¡¼¥Ö¤µ¤ì¤Þ¤¹¤¬¡¢¥«¥»¥Ã¥È¥ì¥³¡¼¥À¤ÎÀǽ¤Ë¤è¤Ã¤Æ¤Ï¤¦¤Þ¤¯¥»¡¼¥Ö¤Ç¤¤Ê¤¤¤³¤È¤¬¤¢¤ê¤Þ¤¹¡£¤³¤Î¥»¡¼¥Ö¤Î®¤µ¤Ï¡¢SCREENÌ¿Îá¤Ç¤â»ØÄê¤Ç¤¡¢CSAVE¤Ç¾Êά¤µ¤ì¤¿¤È¤¤Ë¤Ï¡¢SCREENÌ¿Îá¤Î»ØÄ꤬»È¤ï¤ì¤Þ¤¹¡£
¤¦¤Þ¤¯¥»¡¼¥Ö¤µ¤ì¤¿¤«¤É¤¦¤«¤Ï¡¢CLOAD?Ì¿Îá¤Ç³Îǧ¤·¤Æ¤¯¤À¤µ¤¤¡£¥»¡¼¥Ö¤µ¤ì¤¿¥×¥í¥°¥é¥à¤Ï¡¢CLOADÌ¿Îá¤ò»È¤Ã¤Æ¥í¡¼¥É¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
CSAVE¤ÈSAVE¤È¤Î°ã¤¤¤Ë¤Ä¤¤¤Æ¤Ï¡¢SAVEÌ¿Îá¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
CLOAD¡¢
CLOAD?¡¢
SAVE
<¿ô¼°>¤ÎÃͤòñÀºÅټ¿ô¤ËÊÑ´¹¤·¤Þ¤¹¡£
CSNG(<¿ô¼°>)
PRINT CSNG(123.45678)
¡Úɽ¼¨¡Û123.456
¥Æ¥¥¹¥È²èÌ̤Υ«¡¼¥½¥ë¤Î¹Ô°ÌÃÖ¤òÊÖ¤·¤Þ¤¹¡£
CSRLIN
A=CSRLIN
CSRLIN¤Ï¡¢¸½ºß¥«¡¼¥½¥ë¤¬²¿¹ÔÌܤˤ¢¤ë¤Î¤«¤ò¡¢°ìÈÖ¾å¤Î¹Ô¤ò0¤È¤·¤¿ÃͤÇÄ´¤Ù¤Þ¤¹¡£
CSRLIN¤Ï¡¢¥Æ¥¥¹¥È²èÌ̤ǤΤ߻Ȥ¦¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
POS
ʸ»úÎó¤ò¿ôÃͥǡ¼¥¿¤ËÊÑ´¹¤·¤¿ÃͤòÊÖ¤·¤Þ¤¹¡£
CVI(<2¥Ð¥¤¥Èʸ»úÎó>)
CVS(<4¥Ð¥¤¥Èʸ»úÎó>)
CVD(<8¥Ð¥¤¥Èʸ»úÎó>)
PRINT CVI(A$)
¥Ç¥£¥¹¥¯¾å¤Î¥é¥ó¥À¥à¥Õ¥¡¥¤¥ë¤«¤éÆɤ߹þ¤ó¤À¿ôÃͥǡ¼¥¿¤Ïʸ»ú·¿¤Ë¤Ê¤Ã¤Æ¤¤¤ë¤¿¤á¡¢¤³¤ì¤é¤Î´Ø¿ô¤ò»È¤Ã¤Æ¿ôÃÍ·¿¤ËÊÑ´¹¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£CVI¤Ï2ʸ»ú(2¥Ð¥¤¥È=16¥Ó¥Ã¥È)¤Îʸ»úÎó¤òÀ°¿ôÃͤˡ¢CVS¤Ï4ʸ»ú¤Îʸ»úÎó¤òñÀºÅټ¿ôÃͤˡ¢CVD¤Ï8ʸ»ú¤Îʸ»úÎó¤òÇÜÀºÅټ¿ôÃͤˤ½¤ì¤¾¤ìÊÑ´¹¤·¤Þ¤¹¡£
¤³¤ÎÊÑ´¹¤Ï¡¢Î㤨¤Ð¡¢CVI¤Î¾ì¹ç¡¢¼¡¤Î¤è¤¦¤Ë¹Ô¤ï¤ì¤Þ¤¹¡£
A$="90"¤Î¾ì¹ç¡¢¤¹¤Ê¤ï¤ÁA$=CHR$(&H39)+CHR$(&H30)¤Î¾ì¹ç¤Ë¤Ï¡¢CVI(A$)¤ÎÃͤϡ¢¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥É¤ò¿ôÃͥǡ¼¥¿¤È¤ß¤Ê¤·¡¢&H3039(=12345)¤È¤Ê¤ê¤Þ¤¹¡£
CVS¡¢CVD¤Î¾ì¹ç¤Ï¡¢³Æ¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥É¤òÀµµ¬²½¤µ¤ì¤¿ÉâÆ°¾®¿ôÅÀ·Á¼°¤Î¿ôÃͥǡ¼¥¿¤È¤ß¤Ê¤·¤Þ¤¹¡£
READʸ¤ÇÆɤ߹þ¤à¤¿¤á¤Î¥Ç¡¼¥¿¤ò¥×¥í¥°¥é¥àÃæ¤ËÍÑ°Õ¤·¤Þ¤¹¡£
DATA<Äê¿ô>[,<Äê¿ô>¡¦¡¦¡¦]
10 READ A,B
20 DATA 1,2
<Äê¿ô>¤Ïʸ»ú·¿¤«¿ôÃÍ·¿¤Ç¡¢READʸ¤Ç¤½¤Î¥Ç¡¼¥¿¤òÆɤ߹þ¤àÊÑ¿ô¤Î·¿¤È°ìÃפ·¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¤³¤ÎÎã¤Ç¤Ï¿ôÃÍ·¿¤ÎÊÑ¿ôA¤ª¤è¤ÓB¤Ë¡¢¤½¤ì¤¾¤ì1¤È2¤È¤¤¤¦¿ôÃͤ¬ÂåÆþ¤µ¤ì¤Þ¤¹¡£
DATAʸÃæ¤Î¥Ç¡¼¥¿¤Ï¡¢1¹Ô¤Ë¼ý¤Þ¤ëÈÏ°ÏÆâ¤Ç¤¤¤¯¤Ä¤Ç¤â¥«¥ó¥Þ¤Ç¶èÀڤäƵ½Ò¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£DATAʸÃæ¤Î¥³¥í¥ó(:)¤Ï°úÍÑÉä¤Ë°Ï¤Þ¤ì¤Æ¤¤¤Ê¤¤¸Â¤ê¥Þ¥ë¥Á¥¹¥Æ¡¼¥È¥á¥ó¥È¤Î¶èÀÚ¤ê¤È²ò¼á¤µ¤ì¤Þ¤¹¡£DATAʸ¤ÏREADʸ¤Ë¤è¤Ã¤ÆÆɤ߹þ¤Þ¤ì¤Ê¤¤¸Â¤ê²¿¤ÎƯ¤¤â¤·¤Þ¤»¤ó¡£
READ¡¢
RESTORE
·×»»¼°¤òÄêµÁ¤·¤Þ¤¹¡£
<̾Á°>[<°ú¿ô>[,<°ú¿ô>[,<°ú¿ô>¡¦¡¦¡¦])]=<´Ø¿ô¤ÎÄêµÁ¼°>
10 DEF FN A(X)=X*X*3.14
20 FOR I=10 TO 20 STEP 5
30 PRINT FN A(I)
40 NEXT
¡Úɽ¼¨¡Û314
706.5
1256
10¹Ô¤Ç±ß¤ÎÌÌÀѤò½Ð¤¹·×»»¼°¤òFN A(X)¤È¤·¤ÆÄêµÁ¤·¡¢¤½¤Î¼°¤ò30¹Ô¤ÇI¤È¤¤¤¦ÊÑ¿ô¤ò»È¤Ã¤ÆÃͤòÊѤ¨¤Ê¤¬¤é¸Æ¤Ó½Ð¤·¤Æ¤¤¤Þ¤¹¡£
DEF FN¤Ï¡¢Ì¾Á°(¾å¤Î¾ì¹çA)¤Ç¡¢·×»»¼°¤òÄêµÁ¤·¤Æ¤ª¤¯¤³¤È¤¬¤Ç¤¤Þ¤¹¡£Ì¾Á°¤Ï±Ñ»ú¤Ç»Ï¤Þ¤ë2ʸ»ú°ÊÆâ¤Î±Ñ¿ô»ú¤Ç¤Ä¤±¤Þ¤¹¡£Ì¾Á°¤Î¼¡¤Ë¥«¥Ã¥³¤Ç°Ï¤ó¤ÀÊÑ¿ô(¾å¤Î¾ì¹çX)¤ò»ØÄꤷ¤Æ¡¢·×»»¼°(¾å¤Î¾ì¹çX*X*3.14)¤òÄêµÁ¤·¤Þ¤¹¡£¥«¥Ã¥³Æâ¤ÎÊÑ¿ô¤È·×»»¼°¤ÎÃæ¤ÎÊÑ¿ô¤ÏÂбþ¤·¤Æ¤¤¤Þ¤¹¡£
ÄêµÁ¤·¤¿·×»»¼°¤Ï¡ÖFN ̾Á°(ÊÑ¿ô)¡×¤È¤¤¤¦·Á¤Ç¸Æ¤Ó½Ð¤»¤Þ¤¹¡£ÄêµÁ¤ò¹Ô¤Ã¤¿¤È¤¤ÎÊÑ¿ô¤Ï²¾¤Î¤â¤Î¤Ê¤Î¤Ç¡¢¸Æ¤Ó½Ð¤¹¤È¤¤Ë¤Ï¥«¥Ã¥³Æâ¤Ç¤½¤Î¤È¤¤É¤¤ÇɬÍפÊÊÑ¿ô(¾å¤Î¾ì¹çI)¤ËÊѤ¨¤Æ»ØÄꤹ¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
ÊÑ¿ô¤Î·¿¤òÀë¸À¤·¤Þ¤¹¡£
DEFINT <ʸ»ú¤ÎÈÏ°Ï>[,<ʸ»ú¤ÎÈÏ°Ï>¡¦¡¦¡¦]
DEFSNG <ʸ»ú¤ÎÈÏ°Ï>[,<ʸ»ú¤ÎÈÏ°Ï>¡¦¡¦¡¦]
DEFDBL <ʸ»ú¤ÎÈÏ°Ï>[,<ʸ»ú¤ÎÈÏ°Ï>¡¦¡¦¡¦]
DEFSTR <ʸ»ú¤ÎÈÏ°Ï>[,<ʸ»ú¤ÎÈÏ°Ï>¡¦¡¦¡¦]
10 DEFINT A,B
20 DEFSTR C-E
30 A=3.12:B=0.33
40 C="3.12":D="0.33":E="ABC"
50 PRINT A,B
60 PRINT C,D,E
¡Úɽ¼¨¡Û 3 0
3.12 0.33 ABC
¤³¤ÎÎã¤Ç¤ÏÊÑ¿ôA¡¢B¤òÀ°¿ô·¿¤Ë¡¢ÊÑ¿ôC¡¢D¡¢E¤òʸ»ú·¿¤ËÀë¸À¤·¤Æ¤¤¤Þ¤¹¡£ÊÑ¿ô¤Î»ØÄê¤Ï¡¢±Ñ»ú1»ú(Îã A)¤¢¤ë¤¤¤Ï±Ñ»ú1»ú-±Ñ»ú1»ú(Îã A-Z)¤È¤¤¤¦·Á¤Ç¹Ô¤¤¤Þ¤¹¡£·¿¤Ï°Ê²¼¤Î¤è¤¦¤ËÀßÄꤵ¤ì¤Þ¤¹¡£
DEFINT À°¿ô·¿
DEFSNG ñÀºÅټ¿ô·¿
DEFDBL ÇÜÀºÅټ¿ô·¿
DEFSTR ʸ»ú·¿
·¿Àë¸À¤¬¹Ô¤ï¤ì¤Æ¤¤¤Ê¤¤ÊÑ¿ô¤Ï¡¢¤¹¤Ù¤ÆÇÜÀºÅټ¿ô¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£¤Þ¤¿¡¢DEFÌ¿Îá¤Ç¤Î·¿Àë¸À¤è¤ê¤â¡¢·¿Àë¸Àʸ»ú¤Ç¤Î»ØÄê¤ÎÊý¤¬Í¥À褵¤ì¤Þ¤¹¡£
CLEAR
µ¡³£¸ì¥×¥í¥°¥é¥à¤Î¼Â¹Ô³«»ÏÈÖÃϤò»ØÄꤷ¤Þ¤¹¡£
DEF USR[<ÈÖ¹æ>]=<³«»ÏÈÖÃÏ>
DEF USR2=&HE000
USR¤ò»È¤Ã¤Æ¸Æ¤Ó½Ð¤¹µ¡³£¸ì¥×¥í¥°¥é¥à¤Î¡¢¼Â¹Ô³«»ÏÈÖÃÏ(&HE000)¤ò»ØÄꤷ¤Þ¤¹¡£DEF USR¤Î¼¡¤Ë¤Ï¡¢Ê£¿ô¤Îµ¡³£¸ì¥×¥í¥°¥é¥à¤ò»È¤¦¤È¤¤Ë¶èÊ̤¹¤ë¤¿¤á¤ÎÈÖ¹æ(2)¤òÉÕ¤±¤Þ¤¹¡£»ØÄê¤Ç¤¤ë¤Î¤Ï¡¢0¤«¤é9¤Þ¤Ç¤ÎÃͤǤ¹¡£
CLEAR¡¢
USR¡¢¡Ö
5¾Ï ¥Þ¥·¥ó¸ì¤È¤Î¥ê¥ó¥¯¡×
»ØÄꤵ¤ì¤¿¥×¥í¥°¥é¥à¹Ô¤òºï½ü¤·¤Þ¤¹¡£
DELETE<¹ÔÈÖ¹æ¤ÎÈÏ°Ï>
DELETE 50-100
¹ÔÈÖ¹æ¤Î»ØÄê¤ÎÊýË¡¤Ë¤è¤Ã¤Æ¡¢¤µ¤Þ¤¶¤Þ¤Ê·Á¤Îºï½ü¤¬¹Ô¤¨¤Þ¤¹¡£°Ê²¼¤Ë¡¢¤½¤ÎÎã¤ò¼¨¤·¤Þ¤¹¡£
DELETE 10
¹ÔÈÖ¹æ10¤Î¹Ô¤òºï½ü¤·¤Þ¤¹¡£
DELETE -100
¥×¥í¥°¥é¥à¤ÎÀèƬ¤«¤é¹ÔÈÖ¹æ100¤Þ¤Ç¤Î¹Ô¤òºï½ü¤·¤Þ¤¹¡£
LIST¡¢MERGE¡¢NEW¡¢RENUM
ÇÛÎóÊÑ¿ô¤ò»È¤¦¤³¤È¤òÀë¸À¤·¡¢¤½¤ì¤ò¥á¥â¥êÎΰè¤Ë³ä¤êÅö¤Æ¤Þ¤¹¡£
DIM<ÊÑ¿ô̾>(<ź»ú¤ÎºÇÂçÃÍ>[,<ź»ú¤ÎºÇÂçÃÍ>¡¦¡¦¡¦])
DIM A(11),B%(100),C$(2,3)
DIM¤Ï¡¢»ÈÍѤ¹¤ëÇÛÎóÊÑ¿ô¤ÎºÇÂçÃͤòÀßÄꤷ¡¢Æ±»þ¤Ë¥á¥â¥ê¾å¤Ë¤½¤ÎÇÛÎó¤ÎÎΰè¤ò³ÎÊݤ·¤Þ¤¹¡£ÀßÄê¤Ç¤¤ëºÇ¾®¤ÎÃͤÏ0¡¤ºÇÂç¤ÎÃͤϥá¥â¥êÍÆÎ̤¬µö¤¹ÈϰϤǤ¹¡£ÀßÄê¤ò¹Ô¤ï¤Ê¤¤¾ì¹ç¤Ï¡¢ÃͤÏ10(Í×ÁÇ¿ô¤Ïź»ú0¡Á10¤Ç11¸Ä)¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£
ÉÔÍפˤʤä¿ÇÛÎóÊÑ¿ô¤Ï¡¢ERASEÌ¿Îá¤Çºï½ü¤Ç¤¤Þ¤¹¡£¤Þ¤¿¡¢Àë¸À¤·¤Æ¤¢¤ëÇÛÎóÊÑ¿ô¤Ï¡¢CLEARÌ¿ÎᤫERASEÌ¿Îá¤ò¼Â¹Ô¤·¤Ê¤¤¤ÈºÆÀë¸À¤Ç¤¤Þ¤»¤ó¡£
ERASE¡¢
CLEAR
¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤˿޷Á¤òÉÁ¤¤Þ¤¹¡£
DRAW<ʸ»ú¼°>
10 SCREEN 2
20 A$="A0C15S4BM150,80L40D12R8U6R24D6R8U12"
30 B$="BM134,86F12D8L32U8E12"
40 C$="C8BM132,92L4G4D4F4R4E4U4H4"
50 DRAW "XA$;":DRAW "XB$;"
60 DRAW XC$
70 GOTO 70
¡Úɽ¼¨¡Û☏
³Æʸ»úÊÑ¿ô¤ËÂåÆþ¤µ¤ì¤¿Ê¸»ú¼°¤¬¡¢50¹Ô¤Î»ØÄê¤Ç¼Â¹Ô¤µ¤ì¤Æ¡¢²èÌ̤ËÅÅÏô郎ÉÁ¤«¤ì¤Þ¤¹¡£
DRAW¤Ç¤Î»ØÄê¤Ï¼¡¤Î¤è¤¦¤Ê·Á¤Ç¹Ô¤¤¤Þ¤¹¡£
DRAW "ʸ»ú¼°"
DRAW ʸ»úÊÑ¿ô
DRAW "Xʸ»úÊÑ¿ô;"
ʸ»ú¼°¤Ï¡¢Àþ¤òÉÁ¤¯¤¿¤á¤Î¾ðÊó¤Çµ¹æ¤È¿ôÃͤǤǤ¤Æ¤¤¤Æ¡¢DRAW¤Ë³¤±¤Æ°úÍÑÉä¤Ç°Ï¤ó¤Ç»ØÄꤷ¤Þ¤¹¡£Ê¸»úÊÑ¿ô¤ò»È¤Ã¤Æ»ØÄꤹ¤ë¤È¤¤Ï¡¢¤¢¤é¤«¤¸¤á¤½¤Îʸ»úÊÑ¿ô¤Ë¡¢Àþ¤òÉÁ¤¯¤¿¤á¤Î¾ðÊó(ʸ»ú¼°)¤òÂåÆþ¤·¤Æ¤ª¤¤Þ¤¹¡£Ê¸»úÊÑ¿ô¤òÍѤ¤¤ë¤È¤¤Ë¤Ï¡¢"Xʸ»úÊÑ¿ô;"¤È»ØÄꤷ¤Æ¤â(50¹Ô)¡¢Ã±¤Ëʸ»úÊÑ¿ô¤À¤±»ØÄꤷ¤Æ¤â(60¹Ô)¡¢·ë²Ì¤ÏƱ¤¸¤Ç¤¹¡£
»ØÄꤹ¤ëµ¹æ¤Ë¤Ï¡¢°ÜÆ°¡¢²óž¡¢¿§¡¢¥µ¥¤¥º¤Î4¼ïÎà¤Î¤â¤Î¤¬¤¢¤ê¤Þ¤¹¡£
ɽ2.8 DRAWʸ¤Î»ØÄê°ìÍ÷
| µ¹æ | ¿ôÃÍ | °Õ¡¡Ì£ | Îã | È÷¹Í |
°Ü Æ° Ì¿ Îá | U | µ÷Î¥ | ¾å¤Ø°ÜÆ° | U10 | µ÷Î¥¤Ï²èÌ̤Î1ÅÀ¤òñ°Ì¤È¤¹¤ë(ñ°Ì¤Ï¥µ¥¤¥ºÌ¿Îá¤ÇÊѹ¹²Äǽ)¼Ð¤áÊý¸þ¤È¾å²¼º¸±¦Êý¸þ¤ÇƱ¤¸µ÷Î¥¤ò»ØÄꤷ¤Æ¤â¡¢²èÌ̾å¤Ç¤Î¼ÂºÝ¤Î°ÜÆ°µ÷Î¥¤Ï°Û¤Ê¤ë¡£ |
D | ¡· | ²¼ ¡· | D5 |
L | ¡· | º¸ ¡· | L8 |
R | ¡· | ±¦ ¡· | R12 |
E | ¡· | ±¦¾å ¡· | E7 |
F | ¡· | ±¦²¼ ¡· | F20 |
G | ¡· | º¸²¼ ¡· | G15 |
H | ¡· | º¸¾å ¡· | H40 |
M | ºÂɸ (X,Y) | (X,Y)¤Þ¤ÇÉÁ²è | M100,100 | X¤ÎÁ°¤Ë+¤«-¤ò¤Ä¤±¤ë¤ÈÁêÂкÂɸ»ØÄê |
B | ¤Ê¤· | °ÜÆ°¤Î¤ß | BM50,50 | U¡ÁM¤Þ¤Ç¤Îµ¹æ¤Ë¤Ä¤±¤ÆÍѤ¤¤ë¡£ |
N | ¤Ê¤· | LP°ÜÆ°¤·¤Ê¤¤ | NL10 | U¡ÁM¤Þ¤Ç¤Îµ¹æ¤Ë¤Ä¤±¤ÆÍѤ¤¤ë¡£ |
²ó ž Ì¿ Îá | A | 0¡Á3 | 90ÅÙñ°Ì¤Ç²óž | A1U12L4D12 | 0¡Á270Å٤βóž¡£»ØÄꤷľ¤¹¤Þ¤Ç͸ú¡£ |
¿§ Ì¿ Îá | C | 0¡Á255 | ¿§»ØÄê | C8D10 | ¿§¥³¡¼¥É¤ÎÈϰϤϲèÌ̥⡼¥É¤Ë¤è¤ë¡£ |
¥µ ¥¤ ¥º Ì¿ Îá | S | 1¡Á255 | °ÜÆ°µ÷Î¥¤Îñ°Ì | S20U12L4D12 | ¾ÊάÃͤÏ4¤Ç¡¢¤³¤ì¤¬²èÌÌ1¥É¥Ã¥Èʬ¡£ |
¢£¿ôÃÍÊÑ¿ô¤Î»ØÄê
¤Ê¤ª¡¢¼¡¤Î·Á¼°¤Ç¿ôÃÍÊÑ¿ô¤â»ØÄê¤Ç¤¤Þ¤¹¡£
DRAW "=ÊÑ¿ô̾;"
Î㤨¤Ð
10 SCREEN 2
20 A=10:B=120
30 DRAW "BM=A;,=B;U20"
40 GOTO 40
¤È¤¤¤¦¥×¥í¥°¥é¥à¤Ï(100,120)¤Î°ÌÃÖ¤Þ¤ÇÀþ¤ò°ú¤«¤º¤Ë°ÜÆ°¤·¡¢¤½¤³¤«¤é¾å¤Ë20ÅÀʬ¤ÎÀþ¤ò°ú¤¯¤È¤¤¤¦¤â¤Î¤Ç¤¹¡£
COLOR
¥Õ¥í¥Ã¥Ô¡¼¥Ç¥£¥¹¥¯¤Î»Ä¤êÍÆÎ̤ò¥¯¥é¥¹¥¿Ã±°Ì¤ÇÊÖ¤·¤Þ¤¹¡£
DSKF(<¥É¥é¥¤¥ÖÈÖ¹æ>)
PRINT DSKF(1)
<¥É¥é¥¤¥ÖÈÖ¹æ>¤Ç»ØÄꤵ¤ì¤¿¥Õ¥í¥Ã¥Ô¡¼¥Ç¥£¥¹¥¯¤Î»Ä¤êÍÆÎ̤ò¥¯¥é¥¹¥¿Ã±°Ì¤ÇÊÖ¤·¤Þ¤¹¡£1¥¯¥é¥¹¥¿¤Ï°Ê²¼¤ÎÄ̤ê¤Ç¤¹¡£
¥á¥Ç¥£¥¢ | ¥µ¥¤¥º |
¥Õ¥í¥Ã¥Ô¡¼¥Ç¥£¥¹¥¯ | 1024¥Ð¥¤¥È |
RAM¥Ç¥£¥¹¥¯* | 512¥Ð¥¤¥È(2M¥Ð¥¤¥È¤Þ¤Ç) |
| 1024¥Ð¥¤¥È(2M¡Á4M¥Ð¥¤¥È) |
¥Ï¡¼¥É¥Ç¥£¥¹¥¯ | ²ÄÊѡ̥ϡ¼¥É¥Ç¥£¥¹¥¯¤Î½é´ü²½(Îΰè³ÎÊÝ)¤Î¤È¤¡¢»ØÄꤹ¤ëÎΰè¤ÎÂ礤µ¤Ë¤è¤ê1K¥Ð¥¤¥È¡¢2K¥Ð¥¤¥È¡¢4K¥Ð¥¤¥È¡¢8K¥Ð¥¤¥È¡¢16K¥Ð¥¤¥È¡¢32K¥Ð¥¤¥È¡¢64K¥Ð¥¤¥È¤«¤éÁªÂò¤¹¤ë¡£¡Í |
- MSX-DOS2¤ÎRAMDISK¥³¥Þ¥ó¥É¤ÇÀßÄꤹ¤ë¤â¤Î¡£
¥×¥í¥°¥é¥à¤ò½ªÎ»¤·¤Þ¤¹¡£
END
10 PRINT "ŽÊŽÙŽ¶ŽÞ"
20 END
30 PRINT "ŽºŽÅŽ²"
40 END
ENDÌ¿Îá¤Ï¥×¥í¥°¥é¥à¤ò½ªÎ»¤µ¤»¤Þ¤¹¡£¥×¥í¥°¥é¥àÆâ¤Ë¤¤¤¯¤ÄÃÖ¤¤¤Æ¤â¤«¤Þ¤¤¤Þ¤»¤ó¡£
¤Þ¤¿¡¢¥×¥í¥°¥é¥à¤ÎºÇ¸å¤ÎEND(¤³¤Î¾ì¹ç¡¢40¹Ô)¤Ï¾Êά¤·¤Æ¤â¤«¤Þ¤¤¤Þ¤»¤ó¡£
¾å¤ÎÎã¤Ç¤Ï¡¢20¹Ô¤ËEND¤¬¤¢¤ë¤Î¤Ç¡¢¤½¤Î¸å¤Î¹Ô¤Ï¼Â¹Ô¤µ¤ì¤º¡¢¡ÖŽºŽÅŽ²¡×¤Ïɽ¼¨¤µ¤ì¤Þ¤»¤ó¡£
¥Õ¥¡¥¤¥ë¤¬½ªÎ»¤·¤¿¤«¤É¤¦¤«¤òÄ´¤Ù¤Þ¤¹¡£
EOF(<¥Õ¥¡¥¤¥ëÈÖ¹æ>)
IF EOF(1) THEN CLOSE1
EOF¤Ï¡¢¥Õ¥¡¥¤¥ëÈÖ¹æ¤Ç»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤¬½ª¤ï¤Ã¤¿¤«¤É¤¦¤«Ä´¤Ù¤ë¤â¤Î¤Ç¡¢½ª¤ï¤Ã¤Æ¤¤¤ì¤ÐŽ°1¤ò¡¢¤Þ¤ÀÅÓÃæ¤Ç¤¢¤ì¤Ð0¤ò·ë²Ì¤È¤·¤ÆÊÖ¤·¤Þ¤¹¡£EOF¤Ë³¤¯¥«¥Ã¥³Æâ¤Î¿ôÃͤϡ¢»ØÄꤷ¤¿¥Õ¥¡¥¤¥ë¤Î¥Õ¥¡¥¤¥ëÈÖ¹æ¤Ç¡¢OPENÌ¿Îá¤Ç»ØÄꤵ¤ì¤Æ¤¤¤ë¤â¤Î¤ÈÂбþ¤·¤Æ¤¤¤Þ¤¹¡£Ä´¤Ù¤ë¥Õ¥¡¥¤¥ë¤Ï¡¢OPENÌ¿Îá¤ÎINPUT¥â¡¼¥É¤Ç³«¤«¤ì¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£
OPEN¡¢
INPUT#
ÇÛÎóÊÑ¿ô¤òºï½ü¤·¤Þ¤¹¡£
ERASE<ÇÛÎóÊÑ¿ô̾>[,<ÇÛÎóÊÑ¿ô̾>¡¦¡¦¡¦]
ERASE A
DIM¤Ç»ØÄꤷ¤¿ÇÛÎóÊÑ¿ô¤òºï½ü¤·¡¢³ä¤êÅö¤Æ¤é¤ì¤¿¥á¥â¥ê¤ò»È¤¨¤ë¤è¤¦¤Ë¤·¤Þ¤¹¡£
DIM
¥¨¥é¡¼¥³¡¼¥É¤ä¥¨¥é¡¼¤Îµ¯¤³¤Ã¤¿¹ÔÈÖ¹æ¤òÄ´¤Ù¤Þ¤¹¡£
ERR
ERL
10 ON ERROR GOTO 40
20 A%=A%+10
30 GOTO 20
40 IF ERR<>6 THEN 80
50 PRINT ERL;"Ž·ŽÞŽ®Ž³ŽÃŽÞŽ´Ž×Ž°ŽÊŽ¯Ž¾Ž²"
60 A%=0:PRINT "Ž¼Ž®ŽØŽ¼ŽÏŽ¼ŽÀ"
70 RESUME
80 ON ERROR GOTO 0
40¹Ô¤ÇȯÀ¸¤·¤¿¥¨¥é¡¼¥³¡¼¥É¤¬6¤«¤É¤¦¤«¤ÎȽÄê¤ò¹Ô¤¤¡¢6¤Ê¤é50¹Ô¤Ç¥¨¥é¡¼¤ÎȯÀ¸¤·¤¿¹ÔÈÖ¹æ¤òɽ¼¨¤·¡¢60¹Ô¤Ç¥¨¥é¡¼¤ËÂФ¹¤ë½èÍý¤ò¹Ô¤Ã¤Æ¤¤¤Þ¤¹¡£
¤³¤Î¤è¤¦¤Ë¡¢ERL¤äERR¤òÍѤ¤¤ë¤È¡¢¥¨¥é¡¼¤¬È¯À¸¤·¤¿¤È¤¡¢¥¨¥é¡¼¤Îµ¯¤³¤Ã¤¿¹ÔÈÖ¹æ(ERL)¤ä¥¨¥é¡¼¥³¡¼¥É(ERR)¤òÃΤ뤳¤È¤¬½ÐÍè¤Þ¤¹¡£
ERL¤äERR¤ÏÉáÄÌ¡¢ON ERROR GOTOÌ¿Îá¤Ç¥¸¥ã¥ó¥×¤¹¤ë¥¨¥é¡¼½èÍý¤ÎÁàºî¤Ç»È¤ï¤ì¤Þ¤¹¡£¥À¥¤¥ì¥¯¥È¥â¡¼¥É¤Ç¥¨¥é¡¼¤¬È¯À¸¤·¤¿¤È¤¤Ë¤Ï¡¢ERL¤ÎÃͤÏ65535¤È¤Ê¤ê¤Þ¤¹¡£
ON ERROR GOTO¡¢
ERROR
¥×¥í¥°¥é¥à¤ò¥¨¥é¡¼¾õÂ֤ˤ·¤Þ¤¹¡£
ERROR<¥¨¥é¡¼¥³¡¼¥É>
ERROR 23
ERROR¤Ç0¤«¤é255¤Þ¤Ç¤ÎÃͤò»ØÄꤹ¤ë¤³¤È¤Ë¤è¤Ã¤Æ¡¢¥×¥í¥°¥é¥à¤ò¥¨¥é¡¼¾õÂ֤ˤ¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¥á¥Ã¥»¡¼¥¸¤¬ÍÑ°Õ¤µ¤ì¤Æ¤¤¤ë¥¨¥é¡¼¥³¡¼¥É¤ò»ØÄꤹ¤ë¤È¡¢²èÌ̤ËÂбþ¤¹¤ë¥¨¥é¡¼¥á¥Ã¥»¡¼¥¸¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£
¥¨¥é¡¼¥³¡¼¥É23¡¢26¡Á49¡¢60¡Á255¤Ë¤Ï¥á¥Ã¥»¡¼¥¸¤¬ÄêµÁ¤µ¤ì¤Æ¤¤¤Ê¤¤¤Î¤Ç¡¢ON ERROR GOTOʸ¤ÈÊ»¤»¤ÆÆȼ«¤Î¥¨¥é¡¼½èÍý¤ò¹Ô¤¦¤³¤È¤â¤Ç¤¤Þ¤¹¡£
ON ERROR GOTO¡¢[¥¨¥é¡¼¥á¥Ã¥»¡¼¥¸É½]
¼«Á³Âпô¤ÎÄì¡Öe¡×¤Î<¿ô¼°>¾è¤ò·×»»¤·¤Þ¤¹¡£
EXP(<¿ô¼°>)
PRINT EXP(1)
¡Úɽ¼¨¡Û2.7182818284588
¥é¥ó¥À¥àÆþ½ÐÎϥХåե¡Ãæ¤ËÊÑ¿ôÎΰè¤ò³ä¤êÅö¤Æ¤Þ¤¹¡£
FIELD[#]<¥Õ¥¡¥¤¥ëÈÖ¹æ>,<¥Õ¥£¡¼¥ë¥ÉÉý>AS<ʸ»úÊÑ¿ô>[,<¥Õ¥£¡¼¥ë¥ÉÉý>AS<ʸ»úÊÑ¿ô>]¡¦¡¦¡¦
FIELD#1, 15 AS A$, 10 AS B$
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤È¤ÏOPENʸ¤Ç³«¤¤¤¿¥Õ¥¡¥¤¥ë¤Ë¤Ä¤±¤¿ÈÖ¹æ¤Î¤³¤È¤Ç<¥Õ¥£¡¼¥ë¥ÉÉý>¤È¤Ï<ʸ»úÊÑ¿ô>¤Ë³ä¤êÅö¤Æ¤é¤ì¤ëʸ»ú¿ô¤Î¤³¤È¤Ç¤¹¡£¤Þ¤¿<ʸ»úÊÑ¿ô>¤Ï¥é¥ó¥À¥à¥Õ¥¡¥¤¥ë¤ò¥¢¥¯¥»¥¹¤¹¤ë¤È¤»È¤ï¤ì¤ëÊÑ¿ô̾¤Ç¤¹¡£
FIELDʸ¤Ï¡¢GETʸ¤Ë¤è¤ë¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡¤Ø¤Î¥Ç¡¼¥¿¤ÎÆɤ߹þ¤ß¡¢¤¢¤ë¤¤¤ÏPUTʸ¤Ë¤è¤ë¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡¤«¤é¤Î¥Ç¡¼¥¿¤Î½ñ¤½Ð¤·¤ò²Äǽ¤Ë¤¹¤ë¤¿¤á¤ËGET¡¢PUTʸ¤ÎÁ°¤Ë¼Â¹Ô¤µ¤ì¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£
Î㤨¤Ð¡¢
FIELD1, 15 AS A$, 10 AS B$
¤Ç¤Ï¡¢¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡Ãæ¤ÎºÇ½é¤Î15ʸ»ú(¥Ð¥¤¥È)¤òA$¤È¤¤¤¦Ê¸»úÊÑ¿ô¤Ë³ä¤êÅö¤Æ¡¢¼¡¤Î10ʸ»ú¤¬B$¤Ë³ä¤êÅö¤Æ¤é¤ì¤Þ¤¹¡£
FIELDʸ¤Ï¡¢¼ÂºÝ¤Ë¤Ï¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡¤Ë¥Ç¡¼¥¿¤òÃÖ¤¯¤³¤È¤Ï¤»¤º¡¢¤³¤ì¤ÏLSET¡¢RSETʸ¤Ç¹Ô¤ï¤ì¤Þ¤¹¡£
FIELDʸ¤Ç³ä¤êÅö¤Æ¤é¤ì¤ëÁí¥Ð¥¤¥È¿ô¤Ï¡¢OPEN»þ¤Ë·è¤á¤¿¥ì¥³¡¼¥ÉŤò±Û¤¨¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£Ëü°ì¡¢±Û¤¨¤¿¾ì¹ç¤Ë¤Ï¡¢¡ÖField overflow¡×¥¨¥é¡¼¤¬À¸¤¸¤Þ¤¹¡£
¤Ê¤ª¡¢1¤Ä¤Î¥Õ¥¡¥¤¥ëÈÖ¹æ¤ËÂФ·¤Æ¡¢²¿²ó¤«¤Ëʬ¤±¤ÆFIELDʸ¤ò¼Â¹Ô¤·¤Æ¤â¤«¤Þ¤¤¤Þ¤»¤ó¡£¤³¤Î¤È¤¡¢°ÊÁ°¤Ë¼Â¹Ô¤µ¤ì¤¿FIELDʸ¤â¡¢¤½¤Î¸úÎϤòÊÝ»ý¤·¤Þ¤¹¡£FIELDʸ¤Ï¡¢¼Â¹Ô¤¹¤ë¤¿¤Ó¤ËºÇ½é¤Î1ʸ»ú¤«¤é¥Ð¥Ã¥Õ¥¡¤òÄêµÁ¤¹¤ë¤¿¤á¡¢Æ±°ì¥Ç¡¼¥¿¤ËÂФ·Ê£¿ô¤ÎÎΰè¤òÄêµÁ¤¹¤ë¸ú²Ì¤ò¤â¤Á¤Þ¤¹¡£
FIELDʸ¤ÇÄêµÁ¤·¤¿Ê¸»úÊÑ¿ô¤Ï¡¢¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡Ãæ¤ÎÂбþ¤¹¤ë¥Ç¡¼¥¿¤ò»Ø¤·¤Æ¤¤¤Þ¤¹¤¬¡¢FIELDʸ¤Î¼Â¹Ô¸å¤ËÆþÎÏ´Ø·¸¤Îʸ¡¢¤Þ¤¿¤ÏÂåÆþʸ¤Îº¸ÊդǻÈÍѤ¹¤ë¤È¡¢¤½¤ÎÊÑ¿ô¤Ïʸ»úÎó¤Îµ²±Îΰè¤Ë°Ü¤ê¡¢¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡¤«¤é¤Ï¾Ã¤¨¤Æ¤·¤Þ¤¦¤Î¤ÇÃí°Õ¤¹¤ëɬÍפ¬¤¢¤ê¤Þ¤¹¡£
¥Õ¥í¥Ã¥Ô¡¼¥Ç¥£¥¹¥¯¤ÎÃæ¤Î¥Õ¥¡¥¤¥ë̾¤òɽ¼¨¤·¤Þ¤¹¡£
[L]FILES [<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>]
FILES "*.BAS"
LFILES "B:"
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤Î¥Õ¥¡¥¤¥ë̾¤òɽ¼¨¤·¤Þ¤¹¡£»ØÄê¥Õ¥¡¥¤¥ë¤¬¥Õ¥í¥Ã¥Ô¡¼¥Ç¥£¥¹¥¯Ãæ¤Ë¤Ê¤±¤ì¤Ð¡¢¡ÖFile not found¡×¥¨¥é¡¼¤¬À¸¤¸¤Þ¤¹¡£
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤¬¾Êά¤µ¤ì¤¿¾ì¹ç¤Ï¡¢¸½ºßÁªÂò¤µ¤ì¤Æ¤¤¤ë¥Ç¥£¥¹¥¯¥É¥é¥¤¥ÖÃæ¤ÎÁ´¥Õ¥¡¥¤¥ë̾¤òɽ¼¨¤·¤Þ¤¹¡£
»ØÄꤹ¤ë¥Õ¥¡¥¤¥ë̾¤Ë¤Ï¡¢µ¿ÌäÉä(?)¤ò´Þ¤à¤³¤È¤¬¤Ç¤¡¢¥Õ¥¡¥¤¥ë̾¤ä¡¢³ÈÄ¥»ÒÃæ¤Î1ʸ»ú¤ÎÂå¤ï¤ê¤ò¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤Þ¤¿¡¢¥Õ¥¡¥¤¥ë̾¡¢³ÈÄ¥»Ò¤Îʸ»úÃæ¤Ë¥¢¥¹¥¿¥ê¥¹¥¯(*)¤òÍѤ¤¤ë¤È¡¢Ç¤°Õ¤Î¥Õ¥¡¥¤¥ë̾¡¢¤Þ¤¿¤Ï³ÈÄ¥»Ò¤ÎÂå¤ï¤ê¤È¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç¡¢¥Ç¥£¥¹¥¯¥É¥é¥¤¥Ö¤¬»ØÄꤵ¤ì¤Æ¤¤¤ì¤Ð¡¢¤½¤Î¥Ç¥£¥¹¥¯¥É¥é¥¤¥ÖÃæ¤Î»ØÄê¥Õ¥¡¥¤¥ë¤¬½ÐÎϤµ¤ì¡¢¤½¤¦¤Ç¤Ê¤¤¤È¤¤Ï¡¢¸½ºßÁªÂò¤µ¤ì¤Æ¤¤¤ë¥Ç¥£¥¹¥¯¥É¥é¥¤¥Ö(¥«¥ì¥ó¥È¥É¥é¥¤¥Ö)¤¬»ÈÍѤµ¤ì¤Þ¤¹¡£
LFILES¤Ï½ÐÎÏÀ褬¥×¥ê¥ó¥¿¤Ç¤¢¤ë¤³¤È¤ò½ü¤¡¢FILES¤È¤Þ¤Ã¤¿¤¯Æ±¤¸¤Ç¤¹¡£
<¿ô¼°>¤ÎÃͤξ®¿ôÅÀ°Ê²¼¤ò¼è¤êµî¤Ã¤¿Ãͤò·×»»¤·¤Þ¤¹¡£
FIX(<¿ô¼°>)
PRINT FIX(-1.2)
¡Úɽ¼¨¡Û-1
<¿ô¼°>¤ÎÃͤ¬Àµ¤Î¤È¤¤ÏINT¤ÈƱ¤¸¤Ç¤¹¤¬¡¢Éé¤Î¤È¤¤Ï°Ê²¼¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£
¼° | ·ë²Ì | °ÕÌ£ |
FIX(-1.2) | -1 | ¾®¿ôÅÀ°Ê²¼ÀÚ¤ê¼Î¤Æ |
INT(-1.2) | -2 | -1.2¤òĶ¤¨¤Æ¤Ê¤¤ºÇÂç¤ÎÀ°¿ô |
FOR¤«¤éNEXT¤Þ¤Ç¤Î´Ö¤Ç»ØÄꤵ¤ì¤¿Áàºî¤ò¡¢»ØÄꤵ¤ì¤¿²ó¿ô¤À¤±·«¤êÊÖ¤·¤Þ¤¹¡£
FOR<ÊÑ¿ô̾>=<½é´üÃÍ>TO<½ªÃÍ>[STEP<Áýʬ>]
10 FOR I=0 TO 10 STEP 2
20 PRINT I
30 PRINT "ŽÙŽ°ŽÌŽß"
40 NEXT I
50 END
FOR¤Ç·«¤êÊÖ¤·¤Î²ó¿ô¤ò»ØÄꤷ¡¢FOR¤ÈNEXT¤Î´Ö¤ÎÁàºî¤ò¤½¤Î²ó¿ô¤À¤±·«¤êÊÖ¤·¹Ô¤¤¤Þ¤¹¡£FOR¤Î¼¡¤Ë¡ÖI=0¡×¤Î·Á¤Ç¡¢·«¤êÊÖ¤·¤Î½é´üÃÍ(0)¤òÀßÄꤷ¤Þ¤¹¡£TO¤Î¼¡¤Ç·«¤êÊÖ¤·¤ÎºÇ½ªÃÍ(10)¤òÀßÄꤷ¤Þ¤¹¡£ºÇ¸å¤ËSTEP¤Ë³¤±¤Æ½é´üÃͤȺǽªÃͤȤδ֤ÎÁýʬ(2)¤ò»ØÄꤷ¤Þ¤¹¡£
¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤¬NEXT(40¹Ô)¤Þ¤ÇÍè¤ë¤È¡¢ÊÑ¿ôI¤¬Áýʬ¤À¤±Áý¤ä¤µ¤ì¤Þ¤¹¡£¤½¤·¤Æ¡¢ºÇ½ªÃͤò±Û¤¨¤Æ¤¤¤Ê¤±¤ì¤ÐFOR(10¹Ô)¤ËÌá¤ê¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ¡¢½é´üÃͤ¬ºÇ½ªÃͤè¤ê¤âÂ礤¯ÀßÄꤵ¤ì¤Æ¤¤¤ë¤È¤¤â¡¢FORʸ¤«¤éNEXTʸ¤Þ¤Ç¤Î¥×¥í¥°¥é¥à¤Ï°ìÅټ¹Ԥµ¤ì¤Þ¤¹¡£
¤³¤Î¥×¥í¥°¥é¥à¤Ç¤Ï¡¢10¹Ô¤Î»ØÄê¤Ç¡¢I¤¬0¡¢2¡¢4¡¢6¡¢8¡¢10¤ÈÁý¤¨¤Þ¤¹¤Î¤Ç¡¢20¹Ô¤È30¹Ô¤Ï6²ó¼Â¹Ô¤µ¤ì¡¢¡Ö¥ë¡¼¥×¡×¤ÏÊÑ¿ôI¤ÎÃͤȤȤâ¤Ë6²óɽ¼¨¤µ¤ì¤Þ¤¹¡£I¤¬ºÇ½ªÃÍ10¤ÈƱ¤¸¤Ë¤Ê¤Ã¤¿¤È¤³¤í¤Ç¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤ÏFOR¡ÁNEXT¤«¤é½Ð¤Æ¡¢NEXT¤Î¼¡¤Î¹Ô¤Ë°Ü¤ê¤Þ¤¹¡£
FOR¡ÁNEXT¤ÎSTEP°Ê²¼¤Ï¾Êά¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¾Êά¤·¤¿¤È¤¤ÏÁýʬ¤Ï+1¤Ë¤Ê¤ê¤Þ¤¹¡£
¥á¥â¥ê¤Î̤»ÈÍÑÎΰè¤ÎÂ礤µ¤òÊÖ¤·¤Þ¤¹¡£
FRE(<°ú¿ô>)
PRINT FRE(0)
°ú¿ô¤¬¿ôÃͤξì¹ç¤Ï¡¢BASIC¤¬»È¤Ã¤Æ¤¤¤Ê¤¤¥á¥â¥ê¤ÎÂ礤µ(¥æ¡¼¥¶¡¼¥¨¥ê¥¢¤Î̤»ÈÍÑÎΰè)¤¬¥Ð¥¤¥È¿ô¤ÇÊÖ¤µ¤ì¤Þ¤¹¡£°ú¿ô¤Ï¡¢¿ôÃͤǤ¢¤ì¤Ð²¿¤Ç¤â¤«¤Þ¤¤¤Þ¤»¤ó¡£
PRINT FRE("A")
°ú¿ô¤¬Ê¸»úÎó¤Î¾ì¹ç¤Ï¡¢¤Þ¤ºÊ¸»úÎΰè¤ÎÀ°Íý¤¬¹Ô¤ï¤ì¡¢¤½¤ì¤«¤é̤»ÈÍѤÎʸ»úÎΰè¤ÎÂ礤µ¤¬¥Ð¥¤¥È¿ô¤Ç½Ð¤µ¤ì¤Þ¤¹¡£¤³¤Î°ú¿ô¤Ï¡¢Ê¸»úÎó¤Ç¤¢¤ì¤Ð²¿¤Ç¤â(¶õʸ»ú¤Ç¤â)¤«¤Þ¤¤¤Þ¤»¤ó¡£
CLEAR¡¢[¥á¥â¥ê¥Þ¥Ã¥×]
¥é¥ó¥À¥à¥Õ¥¡¥¤¥ë¤«¤é¡¢¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡¤Ë1¥ì¥³¡¼¥É¤òÆɤ߹þ¤ß¤Þ¤¹¡£
GET [#]<¥Õ¥¡¥¤¥ëÈÖ¹æ>[,<¥ì¥³¡¼¥ÉÈÖ¹æ>]
GET #1,1
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ï¡¢¤½¤Î¥Õ¥¡¥¤¥ë¤òOPENʸ¤Ë¤è¤Ã¤Æ³«¤¤¤¿¤È¤¤Ë»ØÄꤷ¤¿ÈÖ¹æ¤Ç¤¹¡£<¥ì¥³¡¼¥ÉÈÖ¹æ>¤¬¾Êά¤µ¤ì¤¿¾ì¹ç¤Ë¤Ï¡¢Ä¾Á°¤ÎGET¡¢PUTʸ¤Ç»²¾È¤µ¤ì¤¿¥ì¥³¡¼¥É¤Î¼¡¤Î¥ì¥³¡¼¥É¤¬¥Ð¥Ã¥Õ¥¡¤ËÆɤ߹þ¤Þ¤ì¤Þ¤¹¡£¥ì¥³¡¼¥ÉÈÖ¹æ¤È¤·¤Æ»ØÄê²Äǽ¤ÊºÇÂç¤Î¿ô¤Ï¡¢4,294,967,295¤Ç¤¹¡£
<ʸ»úÊÑ¿ô>¤Ë¸½ºß¤ÎÆüÉÕ¤òÂåÆþ¤·¤Þ¤¹¡£
GET DATE <ʸ»úÊÑ¿ô>[,A]
GET DATE A$
¸½ºß¤ÎÆüÉÕ¤ò»ØÄꤷ¤¿<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£¥ª¥×¥·¥ç¥ó¤ÎA¤òÉÕ¤±¤ë¤È¡¢¥¢¥é¡¼¥à¤ÎÀßÄꤵ¤ì¤¿ÆüÉÕ¤¬ÂåÆþ¤µ¤ì¤Þ¤¹¡£ÆüÉդϡ¢¡Ö85/04/03¡×¤Î¤è¤¦¤Ëǯ·îÆü¤¬¥¹¥é¥Ã¥·¥å¤Ç¶èÀÚ¤é¤ì¡¢·îÆü¤¬1·å¤Î¾ì¹ç¤Ï04¤Î¤è¤¦¤Ë2·å¤È¤Ê¤ê¤Þ¤¹¡£
<ʸ»úÊÑ¿ô>¤Ë¸½ºß¤Î»þ¹ï¤òÂåÆþ¤·¤Þ¤¹¡£
GET TIME <ʸ»úÊÑ¿ô>[,A]
GET TIME T$
¸½ºß¤Î»þ¹ï¤ò»ØÄꤷ¤¿<ʸ»úÊÑ¿ô>¤ËÂåÆþ¤·¤Þ¤¹¡£¥ª¥×¥·¥ç¥ó¤ÎA¤òÉÕ¤±¤ë¤È¡¢¥¢¥é¡¼¥à¤ÎÀßÄꤵ¤ì¤¿»þ¹ï¤¬ÂåÆþ¤µ¤ì¤Þ¤¹¡£»þ¹ï¤Ï¡¢¡Ö11:20:03¡×¤Î¤è¤¦¤Ë»þʬÉ䬥³¥í¥ó(:)¤Ç¶èÀÚ¤é¤ì¡¢»þ¹ï¤¬1·å¤Î¾ì¹ç¤Ï03¤Î¤è¤¦¤Ë2·å¤È¤Ê¤ê¤Þ¤¹¡£
»ØÄꤷ¤¿¥µ¥Ö¥ë¡¼¥Á¥ó¤ò¸Æ¤Ó½Ð¤·¤Þ¤¹¡£
GOSUB<¹ÔÈÖ¹æ>
10 GOSUB 30
20 END
30 PRINT "ŽºŽºŽ¶Ž×Ž»ŽÌŽÞŽÙŽ°ŽÁŽÝ"
40 PLAY "CDE"
50 PRINT "GOSUBŽÉŽÂŽ·ŽÞŽÉŽ·ŽÞŽ®Ž³ŽÍŽÓŽÄŽÞŽÙ"
60 RETURN
GOUSUBÌ¿Îá¤Ç»ØÄꤷ¤¿¹Ô¤Ç»Ï¤Þ¤ë¥µ¥Ö¥ë¡¼¥Á¥ó¤ò¸Æ¤Ó½Ð¤·¤Þ¤¹¡£¸Æ¤Ó½Ð¤µ¤ì¤¿¥µ¥Ö¥ë¡¼¥Á¥ó¤Ï¡¢RETURNÌ¿Îá¤Ë¤è¤Ã¤ÆGOSUB¤Î¼¡¤Îʸ¤Þ¤¿¤Ï¹Ô¤ËÌá¤ê¤Þ¤¹¡£¥µ¥Ö¥ë¡¼¥Á¥ó¤È¤Ï¡¢GOSUB¤Ç»ØÄꤹ¤ë¹Ô¤«¤é¡¢RETURN¤Î¹Ô¤Þ¤Ç¤ÎÆÈΩ¤·¤¿1¤Ä¤Î¥×¥í¥°¥é¥à¤Ç¤¹¡£
RETURN¡¢
GOTO
»ØÄꤷ¤¿¹Ô¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£
GOTO<¹ÔÈÖ¹æ>
10 PRINT "10Ž·ŽÞŽ®Ž³ŽÃŽÞŽ½":GOTO 30
20 PRINT "20Ž·ŽÞŽ®Ž³ŽÃŽÞŽ½":END
30 PRINT "30Ž·ŽÞŽ®Ž³ŽÃŽÞŽ½"
40 GOTO 20
¡Úɽ¼¨¡Û10Ž·ŽÞŽ®Ž³ŽÃŽÞŽ½
30Ž·ŽÞŽ®Ž³ŽÃŽÞŽ½
20Ž·ŽÞŽ®Ž³ŽÃŽÞŽ½
10¹Ô¤Ç¡¢30¹Ô¤ËÈô¤Ö¤è¤¦¤Ë»ØÄꤷ¤Æ¤¤¤ë¤Î¤Ç¡¢20¹Ô¤ÎENDÌ¿Îá¤òÈô¤Ó±Û¤·¤Æ30¹Ô¤¬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£¤½¤Î¤¢¤È¡¢40¹Ô¤«¤é20¹Ô¤Ë¥¸¥ã¥ó¥×¤·¤Æ¡¢¥×¥í¥°¥é¥à¤Ï½ªÎ»¤·¤Þ¤¹¡£
ON GOTO¡¢
ON GOSUB¡¢
GOSUB
<¿ô¼°>¤Î¿ôÃͤò16¿Ê¿ô¤Îʸ»úÎó¤ËÊÑ´¹¤·¤Þ¤¹¡£
HEX$(<¿ô¼°>)
PRINT HEX$(12)
¡Úɽ¼¨¡ÛC
VAL¡¢BIN$¡¢OCT$¡¢STR$
¾ò·ïȽÃǤò¹Ô¤¤¡¢¤½¤Î·ë²Ì¤Ë±þ¤¸¤¿Áàºî¤ò¹Ô¤¤¤Þ¤¹¡£
IF<¾ò·ï>THEN<ʸ¤Þ¤¿¤Ï¹ÔÈÖ¹æ>[ELSE<ʸ¤Þ¤¿¤Ï¹ÔÈÖ¹æ>]
IF<¾ò·ï>GOTO<¹ÔÈÖ¹æ>[ELSE<ʸ¤Þ¤¿¤Ï¹ÔÈÖ¹æ>]
10 A=A+1
20 PRINT A
30 IF A=20 THEN PRINT "ŽÊŽÀŽÁ" ELSE 10
40 END
IF¤Ë³¤±¤Æ¾ò·ï¤ò»ØÄꤷ¤Þ¤¹¡£¤½¤Î¾ò·ï¤¬Ëþ¤¿¤µ¤ì¤¿(0°Ê³°¤ÎÃͤò¼è¤ë)¤È¤¤ÏTHEN°Ê²¼¤Î»ØÄ꤬¼Â¹Ô¤µ¤ì¡¢¾ò·ï¤¬Ëþ¤¿¤µ¤ì¤Ê¤¤(0¤òÃͤȤ·¤Æ¼è¤ë)¤È¤¤ÏELSE°Ê²¼¤Î»ØÄ꤬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£
ELSE°Ê²¼¤Î»ØÄê¤Ï¾Êά¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤½¤Î¾ì¹ç¡¢¾ò·ï¤¬Ëþ¤¿¤µ¤ì¤Ê¤«¤Ã¤¿¤È¤¤Ï¼¡¤Î¹Ô¤¬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£
THEN¡¢ELSE¤Î¸å¤í¤Î»ØÄê¤Ï¡¢Ê¸¤Ç¤â¹ÔÈÖ¹æ¤Ç¤â¤«¤Þ¤¤¤Þ¤»¤ó¡£THEN¤Î¸å¤í¤Ë¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¾ì¹ç¡¢THEN¤ÎÂå¤ï¤ê¤ËGOTO¤ò»È¤Ã¤Æ¡¢IF¡ÁGOTO¡ÁELSE¤È¤¤¤¦·Á¤Ë¤¹¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£
¾ò·ï¤Ë¤Ï¡¢°Ê²¼¤Î¤è¤¦¤ÊÈæ³Ó±é»»»Ò¤ÈÏÀÍý±é»»»Ò¤È¤¬»È¤¨¤Þ¤¹¡£ÏÀÍý±é»»»Ò¤Ï¡¢Ê£¿ô¤Î¾ò·ï¤ò»ØÄꤹ¤ë¤È¤¤ËÍѤ¤¤Þ¤¹¡£
Èæ³Ó±é»»¤Ï¾ò·ï¤¬À®Î©¤·¤¿¤È¤¤Ë¤Ï¡Ö-1¡×¡¢À®Î©¤·¤Ê¤¤¤È¤¤Ë¤Ï¡Ö0¡×¤òÃͤȤ·¤ÆÊÖ¤·¤Þ¤¹¡£
ɽ2.9 Èæ³Ó±é»»
Èæ³Ó±é»»»Ò | °ÕÌ£ | Îã |
¼°1=¼°2 | ¼°1¤¬¼°2¤ÈÅù¤·¤¤ | IF A$="y" |
¼°1<>¼°2 | ¼°1¤¬¼°2¤ÈÅù¤·¤¯¤Ê¤¤ | IF A<>0 |
¼°1<¼°2 | ¼°1¤¬¼°2¤è¤ê¾®¤µ¤¤ | IF A<10 |
¼°1>¼°2 | ¼°1¤¬¼°2¤è¤êÂ礤¤ | IF A>B |
¼°1<=¼°2 (¼°1=<¼°2) | ¼°1¤¬¼°2¤ÈÅù¤·¤¤¤«¡¢¾®¤µ¤¤ | IF A<=B+1 |
¼°1>=¼°2 (¼°1=>¼°2) | ¼°1¤¬¼°2¤ÈÅù¤·¤¤¤«¡¢Â礤¤ | IF A>="Z" |
ɽ2.10 ÏÀÍý±é»»
ÏÀÍý±é»»»Ò | Îã | °ÕÌ£ |
NOT | IF NOT (A=1) | A¤¬1¤Ç¤Ê¤±¤ì¤ÐTHEN°Ê²¼¤ò¼Â¹Ô |
AND | IF A=0 AND B=3 | A¤¬0¤ÇB¤¬3¤Î¤È¤¤Î¤ßTHEN°Ê²¼¤ò¼Â¹Ô |
OR | IF A<0 OR B=0 | A¤¬0¤è¤ê¾®¤µ¤¤¤«¡¢B¤¬0¤Î¤È¤¤ËTHEN°Ê²¼¤ò¼Â¹Ô |
¥¡¼¤¬²¡¤µ¤ì¤Æ¤¤¤ì¤Ð¤½¤Îʸ»ú¤ò¡¢²¡¤µ¤ì¤Æ¤¤¤Ê¤±¤ì¤Ð¶õʸ»ú(¥Ì¥ë)¤òÊÖ¤·¤Þ¤¹¡£
INKEY$
10 A$=INKEY$
20 IF A$='"' THEN 10
30 PRINT A$;"=";HEX$(ASC(A$))
40 GOTO 10
¤³¤Î¥×¥í¥°¥é¥à¤ò¼Â¹Ô¤¹¤ë¤È¡¢¥¡¼¥Ü¡¼¥É¤«¤éÂǤÁ¹þ¤Þ¤ì¤¿Ê¸»ú¤È¡¢¤½¤Îʸ»ú¤Î¥¢¥¹¥¡¼¥³¡¼¥É¤¬²èÌ̤Ëɽ¼¨¤µ¤ì¤Þ¤¹¡£
INKEY$¤Ï¡¢[CTRL]+[C]¤È[CTRL]+[STOP]°Ê³°¤Î¥³¥ó¥È¥í¡¼¥ëʸ»ú¤âÆɤ߼è¤ê¤Þ¤¹¡£
INPUT¡¢
LINE INPUT¡¢
INPUT$¡¢[¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥Éɽ]
»ØÄꤷ¤¿ÆþÎϥݡ¼¥È¤«¤é¥Ç¡¼¥¿¤ò³ÍÆÀ¤·¤Þ¤¹¡£
INP(<¥Ý¡¼¥ÈÈÖ¹æ>)
A=INP(15)
¥«¥Ã¥³Æâ¤Î¥Ý¡¼¥ÈÈÖ¹æ(15)¤Ç»ØÄꤵ¤ì¤¿ÆþÎϥݡ¼¥È¤«¤é1¥Ð¥¤¥È¤Î¥Ç¡¼¥¿¤òÆɤ߼è¤ê¡¢¤½¤ÎÃͤòA¤ËÂåÆþ¤·¤Þ¤¹¡£¥Ý¡¼¥ÈÈÖ¹æ¤Ë´Ø¤·¤Æ¤Ï¡¢´¬Ëö¤Î¡ÖI/O¥Þ¥Ã¥×¡×¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
INP´Ø¿ô¤Ï¡¢¥Ï¡¼¥É¥¦¥§¥¢¤ÈÈó¾ï¤ËÌ©Ã夷¤¿´Ø¿ô¤Ç¡¢Â¾¤ÎMSXµ¡¼ï¤Ç¤ÏÊÖ¤¹Ãͤ¬°ã¤¦¾ì¹ç¤â¤¢¤ê¤Þ¤¹¡£MSX¤Î¸ß´¹À¤ò°Ý»ý¤¹¤ë¤¿¤á¡¢¹¤¯¸øɽ¤¹¤ë¥×¥í¥°¥é¥à¤Ë¤Ï»ÈÍѤ·¤Ê¤¤¤Ç¤¯¤À¤µ¤¤¡£
OUT¡¢
WAIT
¥¡¼¥Ü¡¼¥É¤«¤éÆþÎϤµ¤ì¤ë¥Ç¡¼¥¿¤ò»ØÄꤷ¤¿ÊÑ¿ô¤ØÂåÆþ¤·¤Þ¤¹¡£
INPUT["<¥×¥í¥ó¥×¥Èʸ>";]<ÊÑ¿ô̾>[,<ÊÑ¿ô̾>¡¦¡¦¡¦]
10 INPUT"ŽÃŽÞŽ°ŽÀ";A
20 PRINT A * A:GOTO 10
INPUTÌ¿Îá¤ò¼Â¹Ô¤¹¤ë¤È¡¢µ¿ÌäÉä(?)¤¬²èÌ̤Ëɽ¼¨¤µ¤ì¡¢¥×¥í¥°¥é¥à¤Ï¥¡¼¥Ü¡¼¥É¤«¤é¤Î¥Ç¡¼¥¿ÆþÎÏÂÔ¤Á¤Ë¤Ê¤ê¤Þ¤¹¡£²¿¤«¿ôÃͤòÆþÎϤ¹¤ë¤È¤½¤Î¿ôÃͤÏ?¤Ë³¤¤¤Æ²èÌ̤Ëɽ¼¨¤µ¤ì¡¢¤½¤ÎÃͤ¬»ØÄꤵ¤ì¤¿ÊÑ¿ôA¤ËÂåÆþ¤µ¤ì¤Þ¤¹¡£
°úÍÑÉä(")¤Ç°Ï¤Þ¤ì¤¿Ê¸»úÎó(¾å¤ÎÎã¤Î¾ì¹ç"ŽÃŽÞŽ°ŽÀ")¤Ï¡¢¥×¥í¥ó¥×¥Èʸ¤È¸Æ¤Ð¤ì¤ë¤â¤Î¤Ç¡¢¤³¤ì¤ò»ØÄꤷ¤Æ¤¤¤ì¤Ð¡¢?¤ÎÁ°¤Ë¤½¤Îʸ»úÎó¤¬É½¼¨¤µ¤ì¤Æ¡¢¥á¥Ã¥»¡¼¥¸¤ÎÌò³ä¤ò²Ì¤¿¤·¤Þ¤¹¡£
ÊÑ¿ô¤Ï¡¢¥«¥ó¥Þ(,)¤Ç¶èÀڤäÆÊ£¿ô¸Ä»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£¤³¤Î¾ì¹ç¡¢ÆþÎϤ¹¤ë¥Ç¡¼¥¿¤â¥«¥ó¥Þ¤Ç¶èÀڤäơ¢ÊÑ¿ô¤Î¿ô¤À¤±ÆþÎϤ·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£ÆþÎϤ¹¤ë¥Ç¡¼¥¿¤Î¸Ä¿ô¤¬Â¤ê¤Ê¤¤¤È¡¢¡Ö??¡×¤Èɽ¼¨¤µ¤ì¤ÆÆþÎÏÂÔ¤Á¤È¤Ê¤ê¡¢¸Ä¿ô¤¬Â¿¤¤¤È¡Ö?Extra ignored¡×¤Èɽ¼¨¤µ¤ì¡¢Í¾Ê¬¤ËÆþÎϤµ¤ì¤¿¥Ç¡¼¥¿¤Ï̵»ë¤µ¤ì¤Þ¤¹¡£¤Þ¤¿¡¢Âбþ¤¹¤ëÊÑ¿ô¤Î·¿¤È¥Ç¡¼¥¿¤Î·¿¤Ï¡¢°ìÃפ·¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£·¿¤¬°ã¤Ã¤Æ¤¤¤¿¾ì¹ç¤Ë¤Ï¡¢¡ÖRedo from start¡×¤Èɽ¼¨¤µ¤ì¤ÆºÆ¤ÓÆþÎÏÂÔ¤Á¤È¤Ê¤ê¤Þ¤¹¡£
¥Õ¥¡¥¤¥ë¤«¤é¥Ç¡¼¥¿¤òÆɤ߹þ¤ß¤Þ¤¹¡£
INPUT #<¥Õ¥¡¥¤¥ëÈÖ¹æ>,<ÊÑ¿ô>[,<ÊÑ¿ô>¡¦¡¦¡¦]
INPUT #1,A,B
¤¢¤é¤«¤¸¤áOPENʸ¤ÇINPUT¥â¡¼¥É¤ò»ØÄꤷ¤Æ³«¤¤¤Æ¤ª¤¤¤¿¥Õ¥¡¥¤¥ë¤«¤é¥Ç¡¼¥¿¤òÆɤ߹þ¤ß¡¢ÊÑ¿ô¤Ë¥»¥Ã¥È¤·¤Þ¤¹¡£INPUT #ʸ¤Ï¥Ç¡¼¥¿¤òÆɤ߹þ¤àÂоݤ¬¥Õ¥¡¥¤¥ë¤Ç¤¢¤ë¤³¤È¤ò½ü¤±¤Ð¡¢INPUTʸ¤È¤Û¤ÜƱ¤¸¤Ç¤¹¡£
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ï¡¢OPENʸ¤Ç»ØÄꤷ¤¿ÈÖ¹æ¤Ç¤¹¡£
INPUT #ʸ¤ÇÆɤ߹þ¤à¥Ç¡¼¥¿¤Ï¡¢PRINT #ʸ¤Ç½ñ¤½Ð¤·¤¿³Æ¥Ç¡¼¥¿¤ÈÂбþ¤·¤¿½ç¤ËÆɤ߹þ¤Þ¤ì¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ<ÊÑ¿ô>¤Î·¿¤Ï¥Õ¥¡¥¤¥ë¤«¤éÆþÎϤ¹¤ë¥Ç¡¼¥¿¤Î·¿¤ÈÂбþ¤·¤Æ¤¤¤Ê¤¯¤Æ¤Ï¤Ê¤ê¤Þ¤»¤ó¡£
¥Õ¥¡¥¤¥ëÃæ¤Î¥Ç¡¼¥¿¤Î¤¦¤Á¡¢Àè¤Ë³¤¯¥¹¥Ú¡¼¥¹¡¢¥é¥¤¥ó¥Õ¥£¡¼¥É¤Ï̵»ë¤µ¤ì¡¢¥¹¥Ú¡¼¥¹¡¢¥é¥¤¥ó¥Õ¥£¡¼¥É°Ê³°¤ÎºÇ½é¤Îʸ»ú¤¬¥Ç¡¼¥¿¤Î»Ï¤Þ¤ê¤È¤µ¤ì¤Þ¤¹¡£¥Ç¡¼¥¿¤Ï¡¢¥¹¥Ú¡¼¥¹¡¢¥¥ã¥ê¥Ã¥¸¥ê¥¿¡¼¥ó¡¢¥é¥¤¥ó¥Õ¥£¡¼¥É¡¢¥«¥ó¥Þ¤Ë¤è¤Ã¤Æ¶èÀÚ¤é¤ì¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£
¥Õ¥¡¥¤¥ëÃæ¤Î¥Ç¡¼¥¿¤¬Ê¸»úÎ󷿤ξì¹ç¤Ë¤Ï¡¢ºÇ½é¤Îʸ»ú¤¬°úÍÑÉä(")¤Ç¤¢¤ë¤È¡¢¤½¤Îʸ»ú·¿¥Ç¡¼¥¿¤Ï¡¢ºÇ½é¤Î°ú¿ô¤«¤é¼¡¤Î°úÍÑÉä¤Þ¤Ç¤Î´Ö¤ËÆɤ߹þ¤Þ¤ì¤¿Ê¸»ú¤Ç¹½À®¤µ¤ì¤ì¤Æ¤¤¤ë¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ¡¢°úÍÑÉä¤Ç°Ï¤Þ¤ì¤¿Ê¸»úÎóÃæ¤Ë¤Ï¡¢°úÍÑÉä¤òʸ»ú¤È¤·¤ÆÆþ¤ì¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£ºÇ½é¤Îʸ»ú¤¬°úÍÑÉä°Ê³°¤Î¤È¤¤Ï¡¢Ê¸»úÎó¤Ï¡¢°Ï¤Þ¤ì¤Æ¤¤¤Ê¤¤¤â¤Î¤È¤·¤Æ°·¤ï¤ì¡¢¥«¥ó¥Þ¡¢¥¥ã¥ê¥Ã¥¸¥ê¥¿¡¼¥ó¡¢¥é¥¤¥ó¥Õ¥£¡¼¥É¡¢¤Þ¤¿¤Ï255ʸ»ú¤ÎÆɤ߹þ¤ß½ªÎ»¤Ë¤è¤Ã¤Æ¶èÀÚ¤é¤ì¤Þ¤¹¡£¿ôÃÍ¡¢¤Þ¤¿¤Ïʸ»ú·¿¥Ç¡¼¥¿¤ÎÆɤ߹þ¤ßÃæ¤Ë¡¢¥Õ¥¡¥¤¥ë¤Î½ª¤ï¤ê(EOF)¤Ë㤷¤¿¤È¤¤Ï¡¢¤½¤Î¥Ç¡¼¥¿¹àÌܤϤ½¤³¤Ç¶èÀÚ¤é¤ì¤Þ¤¹¡£
INPUT¡¢
OPEN¡¢
PRINT #
»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤«¤é»ØÄꤵ¤ì¤¿Ä¹¤µ¤Îʸ»ú¤ò³ÍÆÀ¤·¤Þ¤¹¡£
INPUT$(<ʸ»úÎó>[,[#]<¥Õ¥¡¥¤¥ëÈÖ¹æ>])
WD$=INPUT$(6,#2)
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ç»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤«¤é<ʸ»ú¿ô>ʬ¤Îʸ»úÎó¤òÆɤ߽Ф·¤Þ¤¹¡£
INPUT$¤Ï¡¢[CTRL]+[STOP]¡¢[CTRL]+[C]¤ò½ü¤¯¤¹¤Ù¤Æ¤Îʸ»ú¤ò¤½¤Î¤Þ¤ÞÆɤ߽Ф¹¤Î¤Ç¡¢INPUTʸ¤äLINE INPUTʸ¤Ç¤ÏÆþÎϤ¹¤ë¤³¤È¤Î¤Ç¤¤Ê¤¤¥é¥¤¥ó¥Õ¥£¡¼¥É¥³¡¼¥É¤ä¥ê¥¿¡¼¥ó¥³¡¼¥É¤âÆþÎϤ¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
#¤Î¤¢¤È¤Î¿ôÃͤϡ¢Æɤ߽Ф¹¥Õ¥¡¥¤¥ë¤Î¥Õ¥¡¥¤¥ëÈÖ¹æ¤Ç¡¢OPENÌ¿Îá¤Ç»ØÄꤵ¤ì¤¿¤â¤Î¤ÈÂбþ¤·¤Æ¤¤¤Þ¤¹¡£¥Õ¥¡¥¤¥ëÈֹ椬¾Êά¤µ¤ì¤¿¾ì¹ç¤Ë¤Ï¡¢¥¡¼¥Ü¡¼¥É¤«¤éÆþÎϤµ¤ì¤¿¥Ç¡¼¥¿¤òÆɤ߽Ф·¤Þ¤¹¤¬¡¢INPUTÌ¿Îá¤È°Û¤Ê¤ê¡¢ÆþÎϤµ¤ì¤¿Ê¸»ú¤Ï²èÌ̤Ëɽ¼¨¤µ¤ì¤Þ¤»¤ó¡£
[CTRL]+[STOP]¤Ç¤³¤ÎÆþÎϤòÃæÃǤ·¤¿¾ì¹ç¡¢CONT¤Ï¼Â¹Ô¤Ç¤¤Þ¤»¤ó¡£
¥«¥Ã¥³Æâ¤ÎºÇ½é¤Î¿ôÃͤϡ¢Æɤ߽Ф¹Ê¸»ú¿ô¤ò»ØÄꤷ¤Æ¤¤¤Þ¤¹¡£¥¡¼¥Ü¡¼¥É¤«¤é¤ÎÆþÎϤòÆɤ߽Ф¹¾ì¹ç¡¢INPUT$¤Ï»ØÄꤵ¤ì¤¿Ê¸»ú¿ô¤Îʸ»ú¤¬ÆþÎϤµ¤ì¤ë¤Î¤òÂÔ¤Á³¤±¤Þ¤¹¤¬¡¢¤¹¤Ç¤Ë¥¡¼¥Ü¡¼¥É¥Ð¥Ã¥Õ¥¡¤ËÆþÎϺѤߤΥǡ¼¥¿¤¬¤¢¤ë¤È¤¤Ë¤Ï¡¢¥Ð¥Ã¥Õ¥¡¤ÎÃæ¤Îʸ»ú¤«¤éÀè¤ËÆɤ߽Ф·¤Þ¤¹¡£
OPEN¡¢
INPUT¡¢
LINE INPUT
¤¢¤ëʸ»úÎó¤ÎÃ椫¤é»ØÄꤵ¤ì¤¿Ê¸»úÎó¤òÁܤ·¡¢¸«¤Ä¤«¤Ã¤¿°ÌÃÖ¤òÊÖ¤·¤Þ¤¹¡£
INSTR([<¿ô¼°>,]<ʸ»úÎó1>,<ʸ»úÎó2>)
10 A$="SUPER MSX"
20 PRINT INSTR(A$,"M")
30 END
¡Úɽ¼¨¡Û7
°ú¿ô¤ÎºÇ½é¤Îʸ»úÎó(A$)¤ÎÃ椫¤é¡¢2ÈÖÌܤÎʸ»úÎó(¡ÖM¡×)¤ò¤µ¤¬¤·¤Þ¤¹¡£¤³¤ÎÎã¤Î¾ì¹ç¡¢¡ÖM¡×¤ÏA$¤ÎƬ¤«¤é¿ô¤¨¤Æ7ÈÖÌܤˤ¢¤¿¤ë¤Î¤Ç¡¢·ë²Ì¤Ï7¤Ë¤Ê¤ê¤Þ¤¹¡£
»ØÄꤵ¤ì¤¿Ê¸»úÎ󤬸«¤Ä¤«¤é¤Ê¤«¤Ã¤¿¤È¤¤Ï¡¢·ë²Ì¤Ï0¤Ë¤Ê¤ê¤Þ¤¹¡£¤Þ¤¿¡¢INSTR(6,A$,"M")¤Î¤è¤¦¤Ë¡¢ºÇ½é¤Ë¿ôÃͤòÆþ¤ì¤Æ¡¢¤µ¤¬¤·»Ï¤á¤ë°ÌÃÖ¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£
<¿ô¼°>°Ê²¼¤ÎºÇÂç¤ÎÀ°¿ô¤òÊÖ¤·¤Þ¤¹¡£
INT(<¿ô¼°>)
PRINT INT(-1.2)
¡Úɽ¼¨¡Û-2
<¿ô¼°>¤ÎÃͤ¬Àµ¤Î¤È¤¤ÏFIX¤ÈƱ¤¸¤Ç¤¹¤¬¡¢Éé¤Î¤È¤¤Ï°Û¤Ê¤ê¤Þ¤¹¡£FIX¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
ON INTERVAL GOSUBÌ¿Îá¤ÎÀßÄê¤ò¼Â¹Ô¤¹¤ë¤«¤É¤¦¤«¤ò·èÄꤷ¤Þ¤¹¡£
INTERVAL ON
INTERVAL OFF
INTERVAL STOP
ON INTERVAL=100 GOSUB 100:INTERVAL ON
INTERVAL ON¤Ï¡¢ON INTERVAL GOSUB¤ÎÀßÄê¤ò¼Â¹Ô¤¹¤ë¤è¤¦¤Ë»ØÄꤷ¡¢°Ê¸å¡¢»ØÄꤷ¤¿»þ´Ö¤´¤È¤Ë¥µ¥Ö¥ë¡¼¥Á¥ó¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£INTERVAL OFF¤Ï¡¢ÀßÄê¤Ë¤è¤ë¥¸¥ã¥ó¥×¤ò¶Ø»ß¤·¤Þ¤¹¡£INTERVAL STOP¤Ï¡¢ÀßÄê¤Ë¤è¤ë¥¸¥ã¥ó¥×¤ò°ì»þ»ß¤á¡¢¸å¤ÇINTERVAL ON¤¬»ØÄꤵ¤ì¤ë¤Èľ¤Á¤Ë¥¸¥ã¥ó¥×¤ò¼Â¹Ô¤·¤Þ¤¹¡£
ON INTERVAL GOSUB
¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤòÄêµÁ¤·¤Þ¤¹¡£
KEY<¥¡¼ÈÖ¹æ>,<ʸ»úÎó>
KEY 1,"LOAD"
¿ôÃͤϥե¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÈÖ¹æ¤ËÂбþ¤µ¤»¤ë¤¿¤á¡¢1¡Á10¤Þ¤Ç¤ÎÃͤǤʤ±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£ÄêµÁ¤Ç¤¤ëʸ»úÎó¤Ï¡¢ºÇÂç15ʸ»ú¤Þ¤Ç¤Îʸ»ú¤ª¤è¤Ó¥³¥ó¥È¥í¡¼¥ëʸ»ú¤Ç¤¹(¥³¥ó¥È¥í¡¼¥ëʸ»ú¤Ï¡¢CHR$¤ò»È¤Ã¤Æɽ¸½¤·¤Þ¤¹)¡£°ìÅÙÄêµÁ¤·¤¿¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤϡ¢¤¢¤é¤¿¤ËÄêµÁ¤·Ä¾¤¹¤«¡¢°ìöÅŸ»¤òÀڤäƺƤÓÅŸ»¤òÆþ¤ì¤ë¤Þ¤ÇÊѤï¤ê¤Þ¤»¤ó¤Î¤ÇÃí°Õ¤·¤Æ¤¯¤À¤µ¤¤¡£
CHR$¡¢
KEY LIST¡¢
KEY ON¡¢
KEY OFF
¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤò²èÌ̤Ëɽ¼¨¤·¤Þ¤¹¡£
KEY LIST
KEY LIST
[F1]¡Á[F10]¤Þ¤Ç¤Î¤¹¤Ù¤Æ¤Î¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤò²èÌ̤Ëɽ¼¨¤·¤Þ¤¹¡£
ÅŸ»ÅêÆþ»þ¤Ë¤Ï¡¢¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤϰʲ¼¤Î¤è¤¦¤ËÀßÄꤵ¤ì¤Æ¤¤¤Þ¤¹¡£
F1 | "color" |
F2 | "auto" |
F3 | "goto" |
F4 | "list" |
F5 | "run"+CHR$(13) |
F6 | "color 15,4,7"+CHR$(13) |
F7 | "cload"+CHR$(34) (MSX2+¤Ç¤Ï"load"+CHR$(34)) |
F8 | "cont"+CHR$(13) |
F9 | "list."+CHR$(13)+CHR$(31)+CHR$(31) |
F10 | CHR$(12)+"run"+CHR$(13) |
KEY¡¢KEY ON¡¢KEY OFF
¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤¬²¡¤µ¤ì¤¿¤È¤¤ËÆÃÊ̤ʽèÍý¤ò¹Ô¤¦¤«¤É¤¦¤«¤ò·èÄꤷ¤Þ¤¹¡£
KEY(<¥¡¼ÈÖ¹æ>)ON
KEY(<¥¡¼ÈÖ¹æ>)OFF
KEY(<¥¡¼ÈÖ¹æ>)STOP
10 ON KEY GOSUB 40,60
20 KEY(1) ON:KEY(2) ON
30 GOTO 30
40 PRINT "F1Ž¶ŽÞŽµŽ»ŽÚŽÏŽ¼ŽÀ"
50 KEY(1) STOP:RETURN
60 PRINT "F2Ž¶ŽÞŽµŽ»ŽÚŽÏŽ¼ŽÀ"
70 RETURN
¤³¤ÎÌ¿Îá¤Ï¡¢ON KEY GOSUB¤Ë¤è¤Ã¤ÆÄêµÁ¤µ¤ì¤¿½èÍý¤Î¥µ¥Ö¥ë¡¼¥Á¥ó¤Î¼Â¹Ô¤òµö²Ä¤¹¤ë¤«(ON)¡¢¶Ø»ß¤¹¤ë¤«(OFF)¡¢°ì»þÄä»ß¤¹¤ë¤«(STOP)¤ò·èÄꤷ¤Þ¤¹¡£
¥«¥Ã¥³Æâ¤Î¿ôÃͤϡ¢¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤Î¥¡¼ÈÖ¹æ¤ËÂбþ¤·¤Æ¤¤¤Þ¤¹¡£Î㤨¤Ð¡¢KEY(1) ON ¤ò¼Â¹Ô¤¹¤ë¤È¡¢[F1]¤ò²¡¤¹¤´¤È¤Ë¡¢ON KEY GOSUB¤Ë¤è¤êÄêµÁ¤µ¤ì¤Æ¤¤¤ë½èÍý¤Î¥µ¥Ö¥ë¡¼¥Á¥ó¤¬¸Æ¤Ó½Ð¤µ¤ì¤Þ¤¹¡£¥µ¥Ö¥ë¡¼¥Á¥ó¤¬¼Â¹Ô¤µ¤ì¤Æ¤¤¤ë´Ö¤Ï¡¢KEY(1) STOP ¤¬¼«Æ°Åª¤Ë¼Â¹Ô¤µ¤ì¤ë¤Î¤Ç¡¢¥µ¥Ö¥ë¡¼¥Á¥ó¤Î¼Â¹Ô¤¬½ª¤ï¤ë¤Þ¤Ç¤Ï¡¢Â¿½Å¤Ë¥µ¥Ö¥ë¡¼¥Á¥ó¤¬¸Æ¤Ó½Ð¤µ¤ì¤ë¤³¤È¤Ï¤¢¤ê¤Þ¤»¤ó¡£KEY(2) OFF ¤ò¼Â¹Ô¤¹¤ë¤È¡¢[F2]¤ò²¡¤·¤Æ¤â¡¢ÍÑ°Õ¤µ¤ì¤¿½èÍý¤Î¥µ¥Ö¥ë¡¼¥Á¥ó¤Ï¼Â¹Ô¤µ¤ì¤Þ¤»¤ó¡£KEY(3) STOP ¤ò¼Â¹Ô¤¹¤ë¤È¡¢[F3]¤ò²¡¤·¤Æ¤â¡¢ÍÑ°Õ¤µ¤ì¤¿½èÍý¤Î¥µ¥Ö¥ë¡¼¥Á¥ó¤Ï¼Â¹Ô¤µ¤ì¤Þ¤»¤ó¤¬¡¢ºÆ¤ÓKEY(3) ON ¤ò¼Â¹Ô¤¹¤ë¤³¤È¤Ë¤è¤Ã¤Æ¡¢½èÍý¤¬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£¤³¤ÎÌ¿Îá¤Ï¡¢KEY(3) ON ¤Î¾õÂ֤ǤΤß͸ú¤Ç¤¹¡£
¾å¤Î¥×¥í¥°¥é¥à¤Ç¤Ï¡¢[F1]¤Ë´Ø¤·¤Æ¡¢°ìöKEY ON¤·¤Æ¤¤¤Þ¤¹¤¬(20¹Ô)¡¢¤½¤Î½èÍý¤Î¥µ¥Ö¥ë¡¼¥Á¥ó¤ÇKEY STOP¤·¤Æ¤¤¤ë¤Î¤Ç(50¹Ô)¡¢°ìÅÙ[F1]¥¡¼¤¬²¡¤µ¤ì¤Æ¤·¤Þ¤¦¤È¡¢2ÅÙÌܤ«¤é¤Ï¡ÖF1Ž¶ŽÞŽµŽ»ŽÚŽÏŽ¼ŽÀ¡×¤È¤¤¤¦¥á¥Ã¥»¡¼¥¸¤Ïɽ¼¨¤µ¤ì¤Þ¤»¤ó¡£
ON KEY GOSUB
¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤò²èÌ̤β¼Éô¤Ëɽ¼¨¤¹¤ë¤«¤·¤Ê¤¤¤«¤òÀßÄꤷ¤Þ¤¹¡£
KEY ON
KEY OFF
KEY ON
KEY OFF
KEY ON¤ò¼Â¹Ô¤¹¤ë¤È¡¢¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤ÎÆâÍƤ¬²èÌ̤κDz¼¹Ô¤Ëɽ¼¨¤µ¤ì¤Þ¤¹¡£ÉáÄ̤ξõÂ֤ǤÏ[F1]¡Á[F5]¤Þ¤Ç¤¬¡¢¥·¥Õ¥È¥¡¼¤ò²¡¤·¤Æ¤¤¤ë¤È¤¤Ï[F6]¡Á[F10]¤Þ¤Ç¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£
KEY OFF¤ò¼Â¹Ô¤¹¤ë¤È¡¢¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤Îɽ¼¨¤¬¤È¤ê¤ä¤á¤é¤ì¤Þ¤¹¡£KEY ON/OFF ¤Ï SET SCREEN Ì¿Îá¤Ë¤è¤ê¡¢½é´ü¾õÂÖ¤òÅÐÏ¿¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
KEY¡¢
KEY LIST
¥Õ¥¡¥¤¥ë¤ò¾Ãµî¤·¤Þ¤¹¡£
KILL<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>
KILL "A:SAMPLE.BAK"
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤷ¤¿¥Õ¥¡¥¤¥ë¤ò¾Ãµî¤·¤Þ¤¹¡£¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯¤Î»ØÄê¤Ë¤Ï¡¢¥ï¥¤¥ë¥É¥«¡¼¥É(?¤ä*)¤ò»È¤¦¤³¤È¤¬¤Ç¤¤Þ¤¹¤¬Í½ÁÛ³°¤Î¥Õ¥¡¥¤¥ë¤Þ¤Ç¾Ãµî¤·¤Æ¤·¤Þ¤ï¤Ê¤¤¤è¤¦½½Ê¬Ãí°Õ¤¬É¬ÍפǤ¹¡£¤Þ¤¿¡¢¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯Ãæ¤Ç¡¢¥É¥é¥¤¥Ö̾¤¬»ØÄꤵ¤ì¤Æ¤Ê¤¤¾ì¹ç¤Ï¡¢¼«Æ°Åª¤Ë¸½ºßÁªÂò¤µ¤ì¤Æ¤¤¤ë¥É¥é¥¤¥Ö(¥«¥ì¥ó¥È¥É¥é¥¤¥Ö)¤È¤ß¤Ê¤µ¤ì¤Þ¤¹¡£³«¤¤¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤ËÂФ·¤ÆKILL¥³¥Þ¥ó¥É¤ò¼Â¹Ô¤¹¤ë¤È¡¢¡ÖFile still open¡×¥¨¥é¡¼¤È¤Ê¤ê¤Þ¤¹¡£
<ʸ»úÎó>¤Îº¸Â¦¤«¤é»ØÄꤵ¤ì¤¿¿ô¤Îʸ»úÎó¤òÊÖ¤·¤Þ¤¹¡£
LEFT$(<ʸ»ú¼°>,<¿ô¼°>)
10 A$="SUPER HOME COMPUTER"
20 B$=LEFT$(A$,5)
30 PRINT B$:END
¡Úɽ¼¨¡ÛSUPER
Í¿¤¨¤é¤ì¤¿Ê¸»úÎó(A$)¤Îº¸Â¦¤«¤é¡¢¿ôÃÍ(5)¤Ç»ØÄꤵ¤ì¤¿¿ô¤Îʸ»ú¤ò¼è¤ê½Ð¤·¤Þ¤¹¡£
»ØÄꤷ¤¿¿ô¤¬¡¢Ê¸»úÎó¤ÎÁíʸ»ú¿ô¤è¤êÂ礤¤¤È¤¤Ï¡¢Ê¸»úÎ󤬤½¤Î¤Þ¤Þ¼è¤ê½Ð¤µ¤ì¤Þ¤¹¡£
<ʸ»ú¼°>¤Ç»ØÄꤵ¤ì¤¿Ê¸»úÎó¤ÎÁíʸ»ú¿ô¤òÊÖ¤·¤Þ¤¹¡£
LEN(<ʸ»ú¼°>)
10 A$="SUPER HOME COMPUTER"
20 PRINT LEN(A$)
30 END
¡Úɽ¼¨¡Û19
LEN ¤Ï¥³¥ó¥È¥í¡¼¥ë¥³¡¼¥É¤ä¶õÇò¤âʸ»ú¤È¤·¤Æ¿ô¤¨¤Þ¤¹¡£
ÊÑ¿ô¤ËÃͤòÂåÆþ¤·¤Þ¤¹¡£
[LET]<ÊÑ¿ô̾>=<¼°>
10 LET A=10
20 B = 20
30 PRINT A;B
¡Úɽ¼¨¡Û10 20
ÂåÆþ¤¹¤ë¤â¤Î¤Ï¡¢Ê¸»úÎó¤Ç¤â¿ôÃͤǤ⹽¤¤¤Þ¤»¤ó¡£LET¤Ï¾Êά¤Ç¤¤ë¤Î¤Ç¡¢ÉáÄ̤ϻȤ¤¤Þ¤»¤ó¡£
¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤˿ôÃͤä»Í³Ñ¤òÉÁ¤¤Þ¤¹¡£
LINE[ [STEP](X1,Y1)]-[STEP](X2,Y2)[,<¥«¥é¡¼¥³¡¼¥É>][,B[F]][,<ÏÀÍý±é»»»Ò>]
10 COLOR 15,4,7:SCREEN 2
20 LINE(88,56)-(168,136),6,BF
30 LINE(128,76)-(108,116),15
40 LINE -STEP(40,-25),15
50 LINE -STEP(-40,0),15
60 LINE -STEP(40,25),15
70 LINE -(128,-76),15
80 GOTO 80
10¹Ô¤Ç¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤ò»ØÄꤷ¤Æ¤«¤é¡¢20¹Ô¤ÇÀÖ¤¯Åɤê¤Ä¤Ö¤µ¤ì¤¿»Í³Ñ¤òÉÁ¤¡¢30¹Ô¤«¤é70¹Ô¤Ç¤½¤Î»Í³Ñ¤ÎÃæ¤ËÀ±¤òÉÁ¤¤¤Æ¤¤¤Þ¤¹¡£
LINE¤Ï¡¢(X1,Y1)¤Ç»ØÄꤷ¤¿»ëÅÀ¤È(X2,Y2)¤Ç»ØÄꤷ¤¿½ªÅÀ¤È¤ò·ë¤ÖľÀþ¤ò°ú¤¤Þ¤¹¡£X¼´Êý¸þ¤Ë¤Ï¡¢SCREEN 2¡Á5¤ª¤è¤Ó8°Ê¹ß¤Ç¤Ï255¡¢SCREEN 6¤È7¤Ï511¤Þ¤Ç¡¢Y¼´Êý¸þ¤Ë¤Ï¡¢SCREEN 2¡Á4¤Ç¤Ï191¡¢SCREEN 5°Ê¹ß¤Ç¤Ï211¤Þ¤Ç¤¢¤ê¤Þ¤¹¤Î¤Ç¡¢0¤«¤é¤³¤ÎÃͤÎÈϰϤÎÅÀ¤ò»ØÄꤹ¤ë¤È¡¢²èÌ̤ËÀþ¤¬ÉÁ¤«¤ì¤Þ¤¹¡£
¿§¤ò»ØÄꤹ¤ë¤È¡¢»ØÄꤷ¤¿¿§¤ÇÀþ¤¬°ú¤«¤ì¤Þ¤¹¡£¾Êά¤·¤¿¾ì¹ç¤Ï¡¢COLOR¤Ç»ØÄꤷ¤Æ¤¤¤ëÁ°·Ê¿§¤¬»È¤ï¤ì¤Þ¤¹¡£¿§¤È»ØÄꤹ¤ëÃͤȤÎÂбþ¤Ë¤Ä¤¤¤Æ¤Ï¡¢COLOR¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
<¥«¥é¡¼¥³¡¼¥É>¤Î¸å¤ËB¤ò»ØÄꤹ¤ë¤È¡¢(X1,Y1)¤«¤é(X2,Y2)¤ò·ë¤ÖÀþ¤òÂгÑÀþ¤Ë¤·¤¿»Í³Ñ¤¬ÉÁ¤«¤ì¤Þ¤¹¡£BF¤ò»ØÄꤷ¤¿¤È¤¤Ë¤Ï¡¢»Í³Ñ¤ÎÃ椬»ØÄꤵ¤ì¤¿¿§¤ÇÅɤê¤Ä¤Ö¤µ¤ì¤Þ¤¹(20¹Ô»²¾È)¡£LINE¤ÎºÇ¸å¤Ë<ÏÀÍý±é»»»Ò>¤ò»ØÄꤹ¤ë¤È¡¢LINE¤Î¿§¤ò¼¡¤Î¤è¤¦¤ËÁàºî¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤¿¤À¤·¤³¤Î»ØÄ꤬¤Ç¤¤ë¤Î¤Ï¡¢SCREEN 5°Ê¹ß¤Ë¸Â¤é¤ì¤Þ¤¹¡£
C¤ò»ØÄ꿧¡¢SC¤òLINE¤Î²¼¤Ë¤Ê¤ë¿§¤È¤·¤¿¤È¤¤Ï¡¢
| AND | C AND SC |
| OR | C OR SC |
| XOR | NOT(C) AND SC |
| PSET | C |
| PRESET | NOT(C) |
| TAND | C AND SC(C=0¤Ê¤éC=SC) |
| TOR | C OR SC(C=0¤Ê¤éC=SC) |
| TXOR | NOT(C) AND SC(C=0¤Ê¤éC=SC) |
| TPSET | C(C=0¤Ê¤éC=SC) |
| TPRESET | NOT(C) (C=0¤Ê¤éC=SC) |
¤¬¼ÂºÝ¤Î¿§¤È¤Ê¤ê¤Þ¤¹¡£
(X1,Y1)¤ò¾Êά¤·¤Æ-(X2,Y2)¤À¤±¤¬»ØÄꤵ¤ì¤ë¤È¡¢ºÇ½ª»²¾ÈÅÀ¤«¤é(X2,Y2)¤Þ¤Ç¤ò·ë¤ó¤ÀÀþ¤¬°ú¤«¤ì¤Þ¤¹(70¹Ô»²¾È)¡£ºÇ½ª»²¾ÈÅÀ¤È¤¤¤¦¤Î¤Ï¡¢Àþ¤äÅÀ¤Ê¤É¤òÉÁ¤¯¤Î¤Ë1ÈֺǸå¤Ë»ØÄꤵ¤ì¤¿ÅÀ¤Î¤³¤È¤Ç¤¹¡£
¤â¤¦1¤Ä¤ÎLINE¤Î»ØÄê¤Ï¡¢STEP¤òÍѤ¤¤¿¤â¤Î¤Ç¤¹¡£STEP¤ò¤Ä¤±¤Æ»ØÄꤵ¤ì¤¿ÅÀ¤Ï¡¢ºÇ½ª»²¾ÈÅÀ¤«¤é¥«¥Ã¥³¤ÎÃæ¤Ç»ØÄꤷ¤¿ÃͤÎʬ¤À¤±°ÜÆ°¤·¤¿ÅÀ¤ò¼¨¤·¤Þ¤¹¡£Î㤨¤Ð¡¢ºÇ½ª»²¾ÈÅÀ¤¬(100,100)¤Ç¤¢¤Ã¤¿¤È¤¹¤ë¤È¡¢STEP(20,-30)¤È¤¤¤¦¤Î¤Ï¡¢(120,70)¤ÎÅÀ¤ò»Ø¤¹¤³¤È¤Ë¤Ê¤ê¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ¡¢STEP¤òÍѤ¤¤Æ°ú¤«¤ì¤ëÀþ¤Ï¡¢ºÇ½ª»²¾ÈÅÀ¤È¤½¤³¤«¤é¤Îµ÷Î¥¤Ë¤è¤Ã¤Æ»ØÄꤵ¤ì¤ëÅÀ¤È¤ò·ë¤ó¤À¤â¤Î¤Ë¤Ê¤ê¤Þ¤¹¡£(40¡¢50¡¢60¹Ô»²¾È)¡£
80¹Ô¤Ç80¹Ô¼«¿È¤Ë¥¸¥ã¥ó¥×¤·¤Æ¤¤¤ë¤Î¤Ï¡¢¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤Ǥϡ¢¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤¬½ª¤ï¤ë¤Èľ¤Á¤Ë¥Æ¥¥¹¥È²èÌ̤˰ܤäƤ·¤Þ¤¦¤«¤é¤Ç¤¹¡£¤³¤ì¤Ë¤Ä¤¤¤Æ¤ÏSCREEN¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
SCREEN¡¢
COLOR
¥¡¼¥Ü¡¼¥É¤«¤éÆþÎϤµ¤ì¤ë1¹ÔÁ´ÂΤÎʸ»úÎó¤ò¤½¤Î¤Þ¤Þʸ»úÊÑ¿ô¤ËÂåÆþ¤·¤Þ¤¹¡£
LINE INPUT["<¥×¥í¥ó¥×¥Èʸ>";]<ʸ»ú·¿ÊÑ¿ô̾>
10 LINE INPUT"ŽÃŽÞŽ°ŽÀ";A$
20 PRINT A$
30 GOTO 10
LINE INPUTÌ¿Îá¤ò¼Â¹Ô¤¹¤ë¤È¡¢¥×¥í¥°¥é¥à¤Ï¥¡¼¥Ü¡¼¥É¤«¤é¤ÎÆþÎÏÂÔ¤Á¤Î¾õÂ֤ˤʤê¤Þ¤¹¡£¤³¤Î¤È¤¡¢µ¿ÌäÉä(?)¤Ïɽ¼¨¤µ¤ì¤Þ¤»¤ó¡£°Ê¹ß¡¢²¿¤«¥Ç¡¼¥¿¤òÆþÎϤ¹¤ë¤È¡¢¥ê¥¿¡¼¥ó¥¡¼¤ò²¡¤¹¤Þ¤Ç¤ËÆþÎϤµ¤ì¤¿Ê¸»ú¥Ç¡¼¥¿¤¬²èÌ̤Ëɽ¼¨¤µ¤ì¡¢¤½¤ì¤¬¤½¤Î¤Þ¤Þʸ»ú·¿ÊÑ¿ô¤ËÂåÆþ¤µ¤ì¤Þ¤¹¡£¥¡¼¥Ü¡¼¥É¤«¤éÆþÎϤǤ¤ëʸ»úÎó¤ÎŤµ¤Ï¡¢254ʸ»ú°ÊÆâ¤Ç¤¹¡£¤Þ¤¿¡¢LINE INPUTÌ¿Îá¤Ç¤Ï¡¢¥«¥ó¥Þ(,)¤ä°úÍÑÉä(")¤â¥Ç¡¼¥¿¤È¤·¤ÆÆþÎϤǤ¤Þ¤¹¡£
¤Ê¤ª¡¢INPUTÌ¿ÎáƱÍÍ¡¢°úÍÑÉä(")¤òÍѤ¤¤Æ¥×¥í¥ó¥×¥Èʸ¤ò»ØÄꤹ¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
INPUT
1¹Ôñ°Ì¤Î¥Ç¡¼¥¿¤ò¥Õ¥¡¥¤¥ë¤«¤éʸ»úÎóÊÑ¿ô¤ØÆɤ߹þ¤ß¤Þ¤¹¡£
LINE INPUT #<¥Õ¥¡¥¤¥ëÈÖ¹æ>,<ʸ»úÎó·¿ÊÑ¿ô̾>
LINE INPUT #1,A$
¤¢¤é¤«¤¸¤áOPENʸ¤ÇINPUT¥â¡¼¥É¤ò»ØÄꤷ¤Æ³«¤¤¤Æ¤ª¤¤¤¿¥Õ¥¡¥¤¥ë¤«¤é¥¥ã¥ê¥Ã¥¸¥ê¥¿¡¼¥ó¥³¡¼¥É¡Ü¥é¥¤¥ó¥Õ¥£¡¼¥É¥³¡¼¥É¤Ç¶èÀÚ¤é¤ì¤Æ¤¤¤ë1¹Ôñ°Ì(255ʸ»ú°ÊÆâ)¤Î¥Ç¡¼¥¿¤ò»ØÄꤷ¤¿Ê¸»úÊÑ¿ô¤ËÆɤ߹þ¤ß¤Þ¤¹¡£
SAVEʸ¤Ç¥¢¥¹¥¡¼·Á¼°¤Î¥×¥í¥°¥é¥à¥Õ¥¡¥¤¥ë¤òºîÀ®¤·¤¿¾ì¹ç¡¢°ì¹Ô°ì¹Ô¤Ï¥¥ã¥ê¥Ã¥¸¥ê¥¿¡¼¥ó¥³¡¼¥É(CHR$(13))¤È¥é¥¤¥ó¥Õ¥£¡¼¥É¥³¡¼¥É(CHR$(10))¤È¤Ç¶èÀÚ¤é¤ì¤Æ½ñ¤½Ð¤µ¤ì¤Æ¤¤¤Þ¤¹¡£¤Þ¤¿¡¢PRINT#ʸ¤ÇºîÀ®¤·¤¿¥Õ¥¡¥¤¥ë¤Ë¤ÏPRINT#ʸ¤ò¼Â¹Ô¤¹¤ë¤´¤È¤Ë¿ôÃͤäʸ»úÎó¤ÎʤӤ¬¥¥ã¥ê¥Ã¥¸¥ê¥¿¡¼¥ó¥³¡¼¥É¡Ü¥é¥¤¥ó¥Õ¥£¡¼¥É¥³¡¼¥É¤Ç¶èÀÚ¤é¤ì¤Æ½ñ¤½Ð¤µ¤ì¤Æ¤¤¤Þ¤¹¡£LINE INPUT#ʸ¤Ï¤³¤ì¤é¤Î¥Õ¥¡¥¤¥ë¤«¤é¥¥ã¥ê¥Ã¥¸¥ê¥¿¡¼¥ó¥³¡¼¥É¡Ü¥é¥¤¥ó¥Õ¥£¡¼¥É¥³¡¼¥É¤Ë¤Ï¤µ¤Þ¤ì¤Æ¤¤¤ë¥Ç¡¼¥¿¤òÆɤ߹þ¤à¤È¤¤Ë»È¤¤¤Þ¤¹¡£
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤ÏOPENʸ¤Ç»ØÄꤷ¤¿ÈÖ¹æ¤Ç¤¹¡£
OPEN¡¢CLOSE¡¢PRINT#¡¢LINE INPUT
¥á¥â¥ê¤Ë¤¢¤ë¥×¥í¥°¥é¥à¤ò²èÌ̤Ëɽ¼¨¡¢¥×¥ê¥ó¥¿¤Ë°õºþ¤·¤Þ¤¹¡£
[L]LIST[<¹ÔÈÖ¹æ1>][-[<¹ÔÈÖ¹æ2>]]
LIST 100-200
¹ÔÈÖ¹æ1¤ÈƱ¤¸¤«¹ÔÈÖ¹æ1°Ê¾å¤ÇºÇ¤â¶á¤¤ÈÖ¹æ¤Î¹Ô¤«¤é¡¢¹ÔÈÖ¹æ2¤Þ¤¿¤Ï¹ÔÈÖ¹æ2°Ê²¼¤ÇºÇ¤â¶á¤¤ÈÖ¹æ¤Î¹Ô¤Þ¤Ç¤Î¥×¥í¥°¥é¥à¤ò²èÌ̤Ëɽ¼¨(LLIST¤Ï¥×¥ê¥ó¥¿¤Ë°õºþ)¤·¤Þ¤¹¡£
LIST
¥×¥í¥°¥é¥à¤ÎÀèƬ¤«¤éºÇ¸å¤Þ¤Ç¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£
LIST 50
¹ÔÈÖ¹æ50¤Î¹Ô¤Î¤ßɽ¼¨¤µ¤ì¤Þ¤¹¡£
LIST -100
¥×¥í¥°¥é¥à¤ÎÀèƬ¤«¤é100¹ÔÌܤޤǤ¬É½¼¨¤µ¤ì¤Þ¤¹¡£
LIST 200-
¥×¥í¥°¥é¥à¤Î200¹ÔÌܤ«¤éºÇ¸å¤Þ¤Ç¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£
LIST¤Îµ¡Ç½¤òÃæÃǤ·¤¿¤¤¤È¤¤Ï[STOP]¥¡¼¤ò²¡¤·¤Æ²¼¤µ¤¤¡£[STOP]¥¡¼¤ò¤â¤¦°ìÅÙ²¡¤»¤Ðɽ¼¨¤òºÆ³«¤·¤Þ¤¹¡£¤Þ¤¿¡¢LIST¤Îµ¡Ç½¤ò½ªÎ»¤·¤¿¤¤¤È¤¤Ï¡¢[CTRL]+[STOP]¥¡¼¤ò²¡¤·¤Æ²¼¤µ¤¤¡£
LIST¤ÎÂå¤ï¤ê¤ËLLIST¤òÍѤ¤¤ì¤Ð¡¢¥×¥í¥°¥é¥à¤ò¥×¥ê¥ó¥¿¤Ë°õºþ¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
¥×¥í¥°¥é¥à¤ò¥á¥â¥ê¾å¤ËÆɤ߹þ¤ß¤Þ¤¹(¥í¡¼¥É¤¹¤ë)¡£
LOAD<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>[,R]
LOAD "A:TEST"
LOAD¥³¥Þ¥ó¥É¤Ï<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤷ¤¿¥×¥í¥°¥é¥à¤ò¥á¥â¥ê¾å¤Ë¥í¡¼¥É¤·¤Þ¤¹¡£LOADʸ¤ò¼Â¹Ô¤¹¤ë¤È¡¢LOADʸ¼Â¹ÔÁ°¤Ë¥á¥â¥ê¾å¤Ë¤¢¤Ã¤¿¥×¥í¥°¥é¥à¤Ï¾Ãµî¤µ¤ì¤Þ¤¹¡£¤Þ¤¿¡¢¤¹¤Ù¤Æ¤Î³«¤¤¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤ÏÊĤ¸¤é¤ì¡¢ÊÑ¿ô¤ÎÃͤϽé´ü²½¤µ¤ì¤Þ¤¹¡£
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Î¥Ç¥Ð¥¤¥¹Ì¾¤ò¾Êά¤¹¤ë¤È¡¢¥«¥ì¥ó¥È¥É¥é¥¤¥Ö¤«¤é¥í¡¼¥É¤·¤Þ¤¹¡£
¤Þ¤¿¡¢¥Õ¥¡¥¤¥ë̾¤Ï¥«¥»¥Ã¥È¥Õ¥¡¥¤¥ë¤ËÂФ·¤ÆÍѤ¤¤ë»þ¤Î¤ß¾Êά¤Ç¤¡¢¤³¤Î¾ì¹ç¤ÏLOAD"CAS:"¤È¤·¤Þ¤¹¡£¥Ç¥£¥¹¥¯¥Õ¥¡¥¤¥ë¤Î¾ì¹ç¤Ï¥×¥í¥°¥é¥à¤Î¥»¡¼¥Ö·Á¼°¤¬¡¢¥Ð¥¤¥Ê¥ê¤Ç¤â¥¢¥¹¥¡¼¤Ç¤â¤«¤Þ¤¤¤Þ¤»¤ó¤¬¡¢¥«¥»¥Ã¥È¥Õ¥¡¥¤¥ë¤Ç¤Ï¥¢¥¹¥¡¼·Á¼°¤Ç¥»¡¼¥Ö¤·¤¿¤â¤Î¤Ë¸Â¤é¤ì¤Þ¤¹¡£¥«¥»¥Ã¥È¾å¤Î¥Ð¥¤¥Ê¥ê·Á¼°¤Î¥×¥í¥°¥é¥à(CSAVE¤·¤¿¤â¤Î)¤ÏCLOAD¤Ç¤Î¤ß¥í¡¼¥É¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
R¥ª¥×¥·¥ç¥ó¤ò¤Ä¤±¤ë¤È¥Õ¥¡¥¤¥ë¤Ï³«¤¤¤¿¤Þ¤Þ¤Ç¡¢¥×¥í¥°¥é¥à¤ò¥í¡¼¥É¸å¡¢¤¿¤À¤Á¤Ë¼Â¹Ô¤ò³«»Ï¤·¤Þ¤¹¡£
LOAD¤Ï¡¢»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤ò¸«¤Ä¤±¤Æ¥×¥í¥°¥é¥à¤Î¥í¡¼¥É¤ò³«»Ï¤¹¤ë¤Þ¤Ç¤Ï¡¢¥á¥â¥ê¾å¤Î¥×¥í¥°¥é¥à¤òÊݸ¤·¤Æ¤¤¤Þ¤¹¡£
SAVE¡¢
CLOAD
¥Õ¥¡¥¤¥ëÃæ¤Î¸½ºß¤Î°ÌÃÖ¤òÊÖ¤·¤Þ¤¹¡£
LOC(<¥Õ¥¡¥¤¥ëÈÖ¹æ>)
IF LOC(1) > 50 THEN STOP
¥é¥ó¥À¥à¥Õ¥¡¥¤¥ë¤ò»ØÄꤷ¤¿¤È¤¤Ï¡¢LOC´Ø¿ô¤Ï¡¢ºÇ¸å¤ËÆɤó¤À¤ê½ñ¤¤¤¿¤ê¤·¤¿¥ì¥³¡¼¥ÉÈÖ¹æ¤òÃͤȤ·¤ÆÊÖ¤·¤Þ¤¹¡£¤¿¤À¤·¡¢¥ª¡¼¥×¥óľ¸å¤ÏLOC´Ø¿ô¤ÎÃͤÏ0¤Ë¤Ê¤Ã¤Æ¤¤¤Þ¤¹¡£
¥·¡¼¥±¥ó¥·¥ã¥ë¥Õ¥¡¥¤¥ë¤ò»ØÄꤷ¤¿¤È¤¤Ï¡¢¤½¤Î¥Õ¥¡¥¤¥ë¤¬¥ª¡¼¥×¥ó¤µ¤ì¤Æ¤«¤éÆɤ߽Фµ¤ì¤¿¤ê½ñ¤¹þ¤Þ¤ì¤¿¥Ç¡¼¥¿¤Î¥Ð¥¤¥È¿ô¤òÊÖ¤·¤Þ¤¹(¤¿¤À¤·256¥Ð¥¤¥È¤ò1ñ°Ì¤È¤¹¤ë)¡£¥Õ¥¡¥¤¥ë¤ò¥·¡¼¥±¥ó¥·¥ã¥ëÆþÎϥ⡼¥É¤Ç¥ª¡¼¥×¥ó¤·¤¿¾ì¹ç¤Ï¡¢BASIC¤ÏºÇ½é¤Î¥»¥¯¥¿¤ò¼«Æ°Åª¤ËÆɤà¤Î¤Ç¡¢¤½¤Î¥Õ¥¡¥¤¥ë¤òÆɤàÁ°¤Ç¤âLOC´Ø¿ô¤ÎÃͤÏ256¤È¤Ê¤ê¤Þ¤¹¡£
¥Æ¥¥¹¥È²èÌ̤Υ«¡¼¥½¥ë°ÌÃÖ¤ò»ØÄꤷ¤Þ¤¹¡£
LOCATE[<XºÂɸ>][,<YºÂɸ>][,<¥«¡¼¥½¥ë¥¹¥¤¥Ã¥Á>]
LOCATE 10,12
¥«¡¼¥½¥ë¤ò»ØÄꤹ¤ë°ÌÃ֤ذÜÆ°¤·¤Þ¤¹¡£(10,12)¤Ê¤é¡¢²èÌ̤κ¸Â¦¤«¤é11·åÌÜ¡¢¾å¤«¤é13¹ÔÌܤΰÌÃÖ¤ò°ÕÌ£¤·¤Æ¤¤¤Þ¤¹(0¤«¤é»ØÄꤹ¤ë¤¿¤á)¡£LOCATEÌ¿Îá¤Ç¥«¡¼¥½¥ë°ÌÃÖ¤ò»ØÄꤷ¤Æ¤«¤é¡¢PRINT¤äINPUT¤ò¼Â¹Ô¤¹¤ë¤È¡¢¤½¤Î°ÌÃÖ¤Ëʸ»ú¤ä?¤¬É½¼¨¤µ¤ì¤Þ¤¹¡£»ØÄꤵ¤ì¤¿°ÌÃÖ¤¬²èÌ̤ÎÈϰϤòĶ¤¨¤Æ¤¤¤ë¤È¡¢²£¡¢½Ä¤È¤â¡¢¤½¤ì¤òĶ¤¨¤Ê¤¤ºÇÂç¤ÎÃͤËÀßÄꤷľ¤µ¤ì¤Þ¤¹¡£
<¥«¡¼¥½¥ë¥¹¥¤¥Ã¥Á>¤Ï¡¢0¤Ê¤éÆþÎÏÂÔ¤Á¤Î»þ¤Î¤ß¥«¡¼¥½¥ë¤òɽ¼¨¡¢0°Ê³°¤Ê¤é¾ï¤Ëɽ¼¨¤È¤Ê¤ê¤Þ¤¹¡£LOCATE¤Ï¡¢¥Æ¥¥¹¥È²èÌ̤ª¤è¤Ó´Á»ú¥°¥é¥Õ¥£¥Ã¥¯¥â¡¼¥É¤Ç¤Î¤ß»È¤¦¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤ÎÂ礤µ¤òÊÖ¤·¤Þ¤¹¡£
LOF(<¥Õ¥¡¥¤¥ëÈÖ¹æ>)
IF NM%>LOF(1) THEN PRINT"INVALID ENTRY"
»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤Î¼ÂºÝ¤ÎÂ礤µ¤ò¥Ð¥¤¥Èñ°Ì¤ÇÊÖ¤·¤Þ¤¹¡£
<¿ô¼°>¤Î¼«Á³Âпô¤òÊÖ¤·¤Þ¤¹¡£
LOG(<¿ô¼°>)
PRINT LOG(10)
¡Úɽ¼¨¡Û2.302585092994
¥×¥ê¥ó¥¿¤Î¥Ø¥Ã¥É¤Î°ÌÃÖ¤òÄ´¤Ù¤Þ¤¹¡£
LPOS(<¼°>)
A=LPOS(0)
¸½ºß¤Î¥×¥ê¥ó¥¿¤Î¥Ø¥Ã¥É°ÌÃÖ¤òÄ´¤Ù¡¢¤½¤Î·ë²Ì¤òA¤ËÂåÆþ¤·¤Þ¤¹¡£LPOS¤Ë¤è¤Ã¤ÆÆÀ¤é¤ì¤ëÃͤϡ¢¥×¥ê¥ó¥¿¥Ð¥Ã¥Õ¥¡¾å¤Î¥×¥ê¥ó¥¿¥Ø¥Ã¥É¤Î°ÌÃ֤ʤΤǡ¢É¬¤º¤·¤â¼ÂºÝ¤Î(ʪÍýŪ¤Ê)¥×¥ê¥ó¥¿¥Ø¥Ã¥É¤Î°ÌÃ֤Ȥϸ¤ê¤Þ¤»¤ó¡£¥«¥Ã¥³Æâ¤Î¿ôÃͤϷÁ¼°Åª¤Ê¤â¤Î¤Ê¤Î¤Ç¡¢²¿¤Ç¤¢¤Ã¤Æ¤â¹½¤¤¤Þ¤»¤ó¡£
LPRINT¡¢
WIDTH
¥×¥ê¥ó¥¿¤Ëʸ»úÎó¤ä¿ôÃͤò°õºþ¤·¤Þ¤¹¡£
LPRINT[<¼°>¡¦¡¦¡¦]
10 A$="ABC":A=123
20 LPRINT A$,A
30 LPRINT "DEF"
LPRINT¤Ë³¤±¤Æ»ØÄꤵ¤ì¤¿¿ôÃÍ(¤³¤Î¾ì¹ç¡¢45)¤äʸ»úÎó(DEF)¤ò¥×¥ê¥ó¥¿¤Ë½ÐÎϤ·¤Þ¤¹¡£¤Þ¤¿¡¢¿ôÃÍÊÑ¿ô(A)¤äʸ»úÊÑ¿ô(A$)¤¬»ØÄꤵ¤ì¤ë¤È¡¢¤½¤ì¤é¤ÎÊÑ¿ô¤ËÂåÆþ¤µ¤ì¤Æ¤¤¤ë¿ôÃͤäʸ»úÎ󤬥ץê¥ó¥¿¤Ë½ÐÎϤµ¤ì¤Þ¤¹¡£
LPRINTÌ¿Îá¤Ï¡¢½ÐÎÏÀ褬¥×¥ê¥ó¥¿¤Ç¤¢¤ë¤³¤È¤ò½ü¤±¤Ð¡¢¤½¤Îµ¡Ç½¤ä»È¤¤Êý¤ÏPRINTÌ¿Îá¤ÈÁ´¤¯Æ±¤¸¤Ç¤¹¤Î¤Ç¡¢¤½¤Á¤é¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
PRINT¡¢
PRINT USING¡¢
LPRINT USING
ʸ»úÎó¤ä¿ôÃͤò»ØÄꤷ¤¿½ñ¼°¤Ç¥×¥ê¥ó¥¿¤Ë°õºþ¤·¤Þ¤¹¡£
LPRINT¡¡USING<½ñ¼°>;<¼°>¡¦¡¦¡¦
LPRINT USING¤ò¼Â¹Ô¤¹¤ë¤È¡¢°úÍÑÉä(")¤Ç°Ï¤Þ¤ì¤¿½ñ¼°¤Ë¤·¤¿¤¬¤Ã¤Æ¡¢»ØÄꤵ¤ì¤¿Ê¸»úÎó¤ä¿ôÃͤ¬ÊÔ½¸¤µ¤ì¡¢¤½¤Î·ë²Ì¤¬¥×¥ê¥ó¥¿¤Ë½ÐÎϤµ¤ì¤Þ¤¹¡£
LPRINT USINGÌ¿Îá¤Ï¡¢½ÐÎÏÀ褬¥×¥ê¥ó¥¿¤Ç¤¢¤ë¤³¤È¤ò½ü¤±¤Ð¡¢¤½¤Îµ¡Ç½¤ä»È¤¤Êý¤ÏPRINT USINGÌ¿Îá¤ÈÁ´¤¯Æ±¤¸¤Ç¤¹¤Î¤Ç¡¢¤½¤Á¤é¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
PRINT USING¡¢
LPRINT
¥é¥ó¥À¥àÆþ½ÐÎÏÍѥХåե¡¤Ë¥Ç¡¼¥¿¤òžÁ÷¤·¤Þ¤¹(PUT¥³¥Þ¥ó¥É¤Î¤¿¤á¤Î½àÈ÷)¡£
LSET<ʸ»ú·¿ÊÑ¿ô>=<ʸ»ú¼°>
RSET<ʸ»ú·¿ÊÑ¿ô>=<ʸ»ú¼°>
LSET D$=MKI$(D)
<ʸ»ú¼°>¤Îʸ»ú¤¬¡¢FIELDʸ¤Ç»ØÄꤵ¤ì¤¿Ê¸»ú¤è¤êû¤¤¾ì¹ç¤Ï¡¢LSETʸ¤Ç¤Ïº¸µÍ¤á¡¢RSET¤Ç¤Ï±¦µÍ¤á¤Ç¥Õ¥£¡¼¥ë¥ÉÆâ¤òËä¤á¡¢Í¾Ê¬¤Ê½ê¤Ï¶õÇò¤ÇËþ¤¿¤µ¤ì¤Þ¤¹¡£µÕ¤ËFIELDʸ¤Ç¤Î³ä¤êÅö¤Æ¤è¤êŤ¤¾ì¹ç¤Ï¡¢LSETʸ¡¢RSETʸξÊý¤È¤âʸ»úÎó¤Î±¦Â¦¤¬¼º¤ï¤ì¤Þ¤¹¡£¤Þ¤¿¡¢¿ôÃͥǡ¼¥¿¤ò°·¤¦¤È¤¤Ï¡¢¤¢¤é¤«¤¸¤á¤½¤ì¤é¤òʸ»ú·¿¥Ç¡¼¥¿¤ËÊÑ´¹¤·¤Æ¤ª¤«¤Í¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¤½¤ì¤é¤Ë¤Ä¤¤¤Æ¤Ï¡¢MKI$¡¢MKS$¡¢MKD$¤Î³Æ´Ø¿ô¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
LSETʸ¡¢RSETʸ¤ÏFIELDʸ¤ÇÄêµÁ¤µ¤ì¤Æ¤¤¤Ê¤¤Ê¸»ú·¿ÊÑ¿ô¤Ë¤Ä¤¤¤Æ¤â¡¢¤½¤Î¥Õ¥£¡¼¥ë¥ÉÆâ¤Çº¸µÍ¤á¤Ê¤¤¤·±¦µÍ¤á¤ò¤¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤³¤ì¤Ï¡¢¥×¥ê¥ó¥È½ÐÎϤι½À®¤ËºÝ¤·¤ÆÍøÍѤ¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£
»ÈÍѤ¹¤ë¥Õ¥¡¥¤¥ë¤Î¿ô¤òÄêµÁ¤·¤Þ¤¹¡£
MAXFILES=<¥Õ¥¡¥¤¥ë¿ô>
MAXFILES=3
OPENʸ¤Ç³«¤¤¤Æ»ÈÍѤ¹¤ë¥Õ¥¡¥¤¥ë¤Î¿ô¤òÄêµÁ¤·¤Þ¤¹¡£°Ê¹ß¡¢»ØÄꤷ¤¿¥Õ¥¡¥¤¥ë¤òƱ»þ¤Ë³«¤¤¤Æ»ÈÍѤ¹¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¡£ÄêµÁ¤·¤Ê¤¤¤È¤¤Ï¡¢MAXFILES=1¤ËÀßÄꤵ¤ì¤Æ¤¤¤Þ¤¹¡£<¥Õ¥¡¥¤¥ë¿ô>¤Ï0¡Á15¤ÎÈϰϤò»ý¤Ä¼°¤Ç¡¢¥Õ¥¡¥¤¥ë1¸Ä¤Ë¤Ä¤¤¤Æ267¥Ð¥¤¥È¤Î¥Õ¥¡¥¤¥ë¥³¥ó¥È¥í¡¼¥ë¥Ö¥í¥Ã¥¯Îΰ褬³ÎÊݤµ¤ì¤Þ¤¹¡£MAXFILESʸ¤ò¼Â¹Ô¤¹¤ë¤È¡¢ÊÑ¿ô¤¬¤¹¤Ù¤Æ½é´ü²½¤µ¤ì¡¢¸½ºß¥ª¡¼¥×¥ó¤·¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤Ï¥¯¥í¡¼¥º¤µ¤ì¤Þ¤¹¡£¤Þ¤¿¡¢°ÊÁ°¤ÎÊÑ¿ô¤Î·¿Àë¸À¤Ê¤É¤Ï̵¸ú¤Ë¤Ê¤ê¤Þ¤¹¡£
CLEAR¡¢
OPEN
¥¢¥¹¥¡¼·Á¼°¤ÇÊݸ¤µ¤ì¤Æ¤¤¤ë¥×¥í¥°¥é¥à¤ò¥á¥â¥ê¾å¤Î¥×¥í¥°¥é¥à¤Ë¥Þ¡¼¥¸(º®¹ç)¤·¤Þ¤¹¡£
MERGE<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>
MERGE "CAS:TEST"
¥á¥â¥ê¾å¤Î¥×¥í¥°¥é¥à¤Ë<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤷ¤¿¥×¥í¥°¥é¥à¥Õ¥¡¥¤¥ë¤òº®¹ç¤·¤Æ1¤Ä¤Î¥×¥í¥°¥é¥à¤Ë¤·¡¢¥á¥â¥ê¾å¤ËÃÖ¤¤Þ¤¹¡£<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç»ØÄꤹ¤ë¥Õ¥¡¥¤¥ë¤ÏSAVE"",Aʸ¤ò»È¤Ã¤Æ¥¢¥¹¥¡¼·Á¼°¤Ç¥»¡¼¥Ö¤µ¤ì¤Æ¤¤¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¤½¤¦¤Ç¤Ê¤¤¾ì¹ç¤Ë¤Ï¡¢¥É¥é¥¤¥Ö̾¤ò»ØÄꤷ¤Æ¤¤¤ì¤Ð¥¨¥é¡¼¤È¤Ê¤ê¡¢CAS:¤ò»ØÄꤷ¤Æ¤¤¤ì¤Ð¥Æ¡¼¥×¤¬²ó¤ê³¤±¤Þ¤¹¡£<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Î¥Ç¥Ð¥¤¥¹Ì¾¤ò¾Êά¤¹¤ë¤È¡¢¥«¥ì¥ó¥È¥É¥é¥¤¥Ö¤¬»ÈÍѤµ¤ì¤Þ¤¹¡£¥Õ¥¡¥¤¥ëÃæ¤Î¥×¥í¥°¥é¥à¤È¡¢¥á¥â¥êÃæ¤Î¥×¥í¥°¥é¥à¤ËƱ°ì¹ÔÈֹ椬¤¢¤Ã¤¿¾ì¹ç¤Ë¤Ï¡¢¥Õ¥¡¥¤¥ëÃæ¤Î¹Ô¤Ç¥á¥â¥êÃæ¤Î¹Ô¤òÃÖ¤´¹¤¨¤Þ¤¹¡£MERGE¥³¥Þ¥ó¥É¤Ï¼Â¹Ô¤ò½ªÎ»¤¹¤ë¤È¡¢¥³¥Þ¥ó¥É¥ì¥Ù¥ë¤Ë¤â¤É¤ê¤Þ¤¹¡£
SAVE¡¢
LOAD
ʸ»úÎó¤ÎÃ椫¤é»ØÄꤵ¤ì¤¿¿ô¤Îʸ»úÎó¤ò¼è¤ê½Ð¤·¤Þ¤¹¡£
MID$(<ʸ»úÎó>,<¼°1>[,<¼°2>])
10 A$="SUPER HOME COMPUTER"
20 PRINT MID$(A$,7,4)
30 END
¡Úɽ¼¨¡ÛHOME
ʸ»úÎó(A$)¤Îº¸¤«¤é¿ô¤¨¤Æ7ÈÖÌܤÎʸ»ú¤«¤é¡¢4¤Ä¤Îʸ»ú¤ò¼è¤ê½Ð¤·¤Þ¤¹¡£¼è¤ê½Ð¤·¤¿¤¤Ê¸»ú¿ô(¤³¤Î¾ì¹ç¤Ï4)¤¬¾Êά¤µ¤ì¤¿¤È¤¤ä¡¢Ê¸»úÎó¤Î»Ä¤ê¤Îʸ»ú¿ô¤è¤ê¤âÂ礤¤¤È¤¤Ï¡¢»ØÄꤷ¤¿°ÌÃְʹߤΤ¹¤Ù¤Æ¤Îʸ»úÎ󤬼è¤ê½Ð¤µ¤ì¤Þ¤¹¡£
LEFT$¡¢
RIGHT$¡¢
MID$¢
ʸ»úÊÑ¿ô¤Î°ìÉô¤ò¾¤Îʸ»úÎó¤ÈÃÖ¤´¹¤¨¤Þ¤¹¡£
MID$(<ʸ»úÊÑ¿ô>,<¼°1>[,<¼°2>])=<ʸ»úÎó>
10 A$="SUPER HOME COMPUTER"
20 MID$(A$,7,4)="¥Û¡¼¥à"
30 PRINT A$:END
¡Úɽ¼¨¡ÛSUPER ¥Û¡¼¥à COMPUTER
ʸ»úÎó(A$)¤Îº¸¤«¤é¿ô¤¨¤Æ7ÈÖÌܤ«¤é4ʸ»ú¤ò¡¢±¦ÊÕ¤Îʸ»úÎó("¥Û¡¼¥à")¤ÈÃÖ¤´¹¤¨¤Þ¤¹¡£¤³¤ÎÂåÆþʸ¤ò¼Â¹Ô¤·¤Æ¤â¡¢¤â¤È¤Îʸ»úÎó¤ÎŤµ¤ÏÊѤï¤ê¤Þ¤»¤ó¡£¤Þ¤¿¡¢Ê¸»ú¿ô(4)¤ò¾Êά¤¹¤ë¤È<ʸ»úÎó>¤Îʸ»ú¿ô¤È¸«¤Ê¤µ¤ì¤Þ¤¹¡£
MID$¡
³Æ¿ôÃͤòÆâÉôɽ¸½¤ËÂбþ¤·¤¿¥¥ã¥é¥¯¥¿¥³¡¼¥É¤ËÊÑ´¹¤·¤Þ¤¹¡£
MKI$ (<À°¿ôɽµ>)
MKS$ (<ñÀºÅÙɽµ>)
MKD$ (<ÇÜÀºÅÙɽµ>)
RSET A$=MKI$(123)
¥é¥ó¥À¥à¥Õ¥¡¥¤¥ë¤Ç¤Ï¡¢Ê¸»ú¥Ç¡¼¥¿¤·¤«°·¤¨¤Ê¤¤¤Î¤Ç¡¢¿ôÃͥǡ¼¥¿¤Ïʸ»ú·¿¥Ç¡¼¥¿¤ËÊÑ´¹¤·¤Æ¥Ç¥£¥¹¥¯¤Ë½ñ¤¹þ¤ß¡¢Æɤ߽Ф¹ºÝ¤ÏµÕ¤Ëʸ»ú·¿¥Ç¡¼¥¿¤ò¿ôÃÍ·¿¥Ç¡¼¥¿¤ËÊÑ´¹¤·¤Þ¤¹¡£MKI$¤ÏÀ°¿ôÃͤò2¥Ð¥¤¥È¤Îʸ»úÎó¤Ë¡¢MKS$¤ÏñÀºÅÙ¿ôÃͤò4¥Ð¥¤¥È¤Îʸ»úÎó¤Ë¡¢¤½¤·¤ÆMKD$¤ÏÇÜÀºÅÙ¿ôÃͤò8¥Ð¥¤¥È¤Îʸ»úÎó¤Ë¤½¤ì¤¾¤ìÊÑ´¹¤·¤Þ¤¹¡£
¿ôÃͤ«¤éʸ»ú¤Ø¤ÎÊÑ´¹¤Ï¿ôÃͤ¬»ý¤ÄÆâÉôɽ¸½(2¿Ê¿ôɽ¸½)¤ÎÃͤò¤½¤Î¤Þ¤Þ¤½¤ì¤ËÂбþ¤¹¤ë¥¥ã¥é¥¯¥¿¡¼¥³¡¼¥É¤Ë¤¹¤ë¤³¤È¤Ë¤è¤Ã¤Æ¹Ô¤ï¤ì¤Þ¤¹¡£¤³¤ÎµÕ¤ÎÆ°ºî¤ò¤¹¤ë´Ø¿ô¤È¤·¤ÆCVI¡¢CVS¡¢CVD´Ø¿ô¤¬ÍÑ°Õ¤µ¤ì¤Æ¤¤¤Þ¤¹¡£
¥«¥»¥Ã¥È¥ì¥³¡¼¥À¤Î¥â¡¼¥¿¡¼¤òON¡¢OFF¤·¤Þ¤¹¡£
MOTOR[ON¤Þ¤¿¤ÏOFF]
MOTOR ON
¥ê¥â¡¼¥Èü»Ò¤Î¤¢¤ë¥«¥»¥Ã¥È¥ì¥³¡¼¥À¤òÀܳ¤·¤¿¤È¤¤Ë¡¢¥â¡¼¥¿¡¼¤ÎON¡¢OFF¤ò¹Ô¤Ã¤Æ¡¢¥«¥»¥Ã¥È¥Æ¡¼¥×¤ÎÁáÁ÷¤ê¡¢´¬¤Ìᤷ¤¬¤Ç¤¤ë¤è¤¦¤Ë¤·¤Þ¤¹¡£MOTOR ON¤È»ØÄꤹ¤ë¤È¥â¡¼¥¿¡¼¤¬ON¤Ë¤Ê¤ê¡¢MOTOR OFF¤È¤¹¤ë¤ÈOFF¤Ë¤Ê¤ê¤Þ¤¹¡£MOTOR¤È¤À¤±»ØÄꤹ¤ë¤È¡¢¸½ºß¥â¡¼¥¿¡¼¤¬ON¤Ê¤éOFF¤Ë¡¢OFF¤Ê¤éON¤Ë¤Ê¤ê¤Þ¤¹¡£
NAME ¡ÚDisk¡Û
¥Õ¥¡¥¤¥ë¤Î̾Á°¤òÊѹ¹¤·¤Þ¤¹¡£
NAME<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>AS<¥Õ¥¡¥¤¥ë̾>
NAME"TEST.BAS" AS "TEMP.BAS"
Êѹ¹¤·¤è¤¦¤È¤¹¤ë¥Õ¥¡¥¤¥ë¤Ï¸ºß¤·¤Æ¤¤¤ë¤â¤Î¤Ç¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¤Þ¤¿¡¢ÉÕ¤±¤è¤¦¤È¤¹¤ë̾Á°¤ÈƱ¤¸¥Õ¥¡¥¤¥ë¤Ï¸ºß¤·¤Æ¤¤¤Æ¤Ï¤Ê¤ê¤Þ¤»¤ó¡£¥É¥é¥¤¥Ö̾¤ò¾Êά¤¹¤ë¤È¡¢¥«¥ì¥ó¥È¥É¥é¥¤¥Ö(¸½ºßÁªÂò¤µ¤ì¤Æ¤¤¤ë¥É¥é¥¤¥Ö)¤¬ÁªÂò¤µ¤ì¤Þ¤¹¡£NAME¥³¥Þ¥ó¥É¤¬¼Â¹Ô¤µ¤ì¤ë¤È¡¢¤½¤Î¥Õ¥¡¥¤¥ë¤Î̾Á°¤ÏÊѹ¹¤µ¤ì¤Þ¤¹¤¬¡¢¥Õ¥¡¥¤¥ë¤Î¸ºß¤¹¤ë°ÌÃ֤䡢Àêͤ¹¤ëÂ礤µ¤Ê¤É¤ÏÊѲ½¤·¤Þ¤»¤ó¡£
¥á¥â¥ê¤Ë¤¢¤ë¥×¥í¥°¥é¥à¤òºï½ü¤·¡¢¤¹¤Ù¤Æ¤ÎÊÑ¿ô¤ò½é´ü²½¤·¤Þ¤¹¡£
NEW
NEW
NEW¤ò¼Â¹Ô¤¹¤ë¤È¡¢¥á¥â¥ê¤Ë¤¢¤ë¥×¥í¥°¥é¥à¤Ï¤¹¤Ù¤Æºï½ü¤µ¤ì¡¢ÄêµÁ¤µ¤ì¤Æ¤¤¤ëÊÑ¿ô¤Ï¤¹¤Ù¤Æ½é´ü²½¤µ¤ì¡¢³«¤«¤ì¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤Ï¤¹¤Ù¤ÆÊĤ¸¤é¤ì¤Þ¤¹¡£
DELETE¡¢
ERASE
<¿ô¼°>¤Î¿ôÃͤò8¿Ê¿ô¤Îʸ»úÎó¤ËÊÑ´¹¤·¤Þ¤¹¡£
OCT$(<¿ô¼°>)
PRINT OCT$(100)
¡Úɽ¼¨¡Û144
BIN$¡¢HEX$
¥¨¥é¡¼¤¬µ¯¤³¤Ã¤¿¤È¤¤Ë¥¸¥ã¥ó¥×¤¹¤ë¹Ô¤ò»ØÄꤷ¤Þ¤¹¡£
ON ERROR GOTO <¹ÔÈÖ¹æ>
10 ON ERROR GOTO 60
20 A$=INKEY$
30 IF A$="Y" THEN 80
40 A%=A%+100
50 GOTO 20
60 PRINT "Ž¼Ž®ŽØ":A%=0
70 RESUME
80 ON ERROR GOTO 0
10¹Ô¤Ç¡¢¥¨¥é¡¼¤¬µ¯¤³¤Ã¤¿¤È¤60¹Ô¤Ë¥¸¥ã¥ó¥×¤¹¤ë¤è¤¦¤Ë»ØÄꤷ¤Æ¤¢¤ë¤Î¤Ç¡¢40¹Ô¤ÎA%¤¬32767¤òĶ¤¨¤Æ¡ÖOverFlow¡×¥¨¥é¡¼¤¬µ¯¤¤ë¤È60¹Ô¤Ë¥¸¥ã¥ó¥×¤·¡¢A%¤Ë0¤òÂåÆþ¤·¤Þ¤¹¡£
¤¢¤é¤«¤¸¤á¡¢¥¨¥é¡¼¤ò½èÍý¤¹¤ëÉôʬ¤ò¥×¥í¥°¥é¥àÃæ¤ËÆþÎϤ·¤Æ¤ª¤¡¢¥×¥í¥°¥é¥à¤ÎºÇ½é¤ËON ERROR GOTO¤Ç¤½¤ÎÉôʬ¤ÎºÇ½é¤Î¹Ô¤ò»ØÄꤷ¤Æ¤ª¤±¤Ð¡¢¥¨¥é¡¼¤¬µ¯¤¤¿¤È¤¤Ë¡¢¥¨¥é¡¼½èÍýÍѤλØÄ꤬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£¥¨¥é¡¼½èÍýÍѤλØÄê¤ÎºÇ¸å¤Ë¤ÏRESUMEÌ¿Îá¤òÃÖ¤¯¤È¡¢¥¨¥é¡¼½èÍý¤ò½ªÎ»¤µ¤»¡¢¤â¤È¤Î¥×¥í¥°¥é¥à¤òºÆ³«¤µ¤»¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹(70¹Ô»²¾È)¡£
ON ERROR GOTO Ì¿Îá¤Ï¡¢Â¾¤ÎON ERROR GOTOÌ¿Îá¡¢RUN¡¢CLEAR¡¢NEW¤¬¼Â¹Ô¤µ¤ì¤ë¤Þ¤Ç͸ú¤Ç¤¹¤Î¤Ç¡¢¤½¤Î¤Þ¤Þ¥×¥í¥°¥é¥à¤ò½ªÎ»¤¹¤ë¤È¡¢¥À¥¤¥ì¥¯¥È¥â¡¼¥É¤Ç¥¿¥¤¥×¥ß¤Ê¤É¤ò¤·¤Æ¤â¡¢ºÆ¤Ó¥¨¥é¡¼½èÍýÍѤιԤإ¸¥ã¥ó¥×¤·¡¢¥×¥í¥°¥é¥à¤¬¼Â¹Ô¤µ¤ì¤Æ¤¤¤·¤Þ¤¤¤Þ¤¹¡£¤·¤¿¤¬¤Ã¤Æ¥×¥í¥°¥é¥à¤Î½ªÎ»Ä¾Á°¤Ë¤Ï¡¢ON ERROR GOTO¤Î»ØÄê¤ò̵¸ú¤Ë¤¹¤ë¡¢ON ERROR GOTO 0¤ò¼Â¹Ô¤¹¤ë¤è¤¦¤Ë¤·¤Æ¤¯¤À¤µ¤¤(80¹Ô»²¾È)¡£
RESUME¡¢
ERL¡¢
ERROR
<¼°>¤Ç»ØÄꤵ¤ì¤¿¤¤¤º¤ì¤«¤Î¹Ô¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£
ON<¼°>GOSUB<¹ÔÈÖ¹æ>[,<¹ÔÈÖ¹æ>¡¦¡¦¡¦]
ON<¼°>GOTO<¹ÔÈÖ¹æ>[,<¹ÔÈÖ¹æ>¡¦¡¦¡¦]
10 INPUT "1 Ž¶ 2 Ž¦ ŽµŽ¼ŽÃŽ¸ŽÀŽÞŽ»Ž²";A
20 ON A GOTO 100,200
30 GOTO 10
100 PRINT "100Ž·ŽÞŽ®Ž³ŽÆŽ¼ŽÞŽ¬ŽÝŽÌŽßŽ¼ŽÏŽ¼ŽÀ":END
200 PRINT "200Ž·ŽÞŽ®Ž³ŽÆŽ¼ŽÞŽ¬ŽÝŽÌŽßŽ¼ŽÏŽ¼ŽÀ":END
10 INPUT "1 Ž¶ 2 Ž¦ ŽµŽ¼ŽÃŽ¸ŽÀŽÞŽ»Ž²";A
20 ON A GOSUB 100,200
30 GOTO 10
100 PRINT "100Ž·ŽÞŽ®Ž³ŽÆŽ¼ŽÞŽ¬ŽÝŽÌŽßŽ¼ŽÏŽ¼ŽÀ":RETURN
200 PRINT "200Ž·ŽÞŽ®Ž³ŽÆŽ¼ŽÞŽ¬ŽÝŽÌŽßŽ¼ŽÏŽ¼ŽÀ":RETURN
ON ¤È GOTO¡¢¤¢¤ë¤¤¤ÏON ¤È GOSUB¤Î´Ö¤ÎÃÍ(A)¤Ë±þ¤¸¤Æ¡¢GOTO¡¢GOSUB¤Î¸å¤í¤Ç»ØÄꤷ¤¿¹Ô¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£ON GOTO¤Ï»ØÄꤷ¤¿¹Ô¤Ë¥¸¥ã¥ó¥×¤·¡¢ON GOSUB¤Ï»ØÄꤷ¤¿¹Ô¤Ç»Ï¤Þ¤ë¥µ¥Ö¥ë¡¼¥Á¥ó¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£(GOSUB»²¾È)¡£
GOTO¡¢GOSUB¤Î¸å¤í¤Î»ØÄê¤Ï¡¢º¸¤«¤é1¡¢2¡¢£³¡¢¡¦¡¦¡¦¤È¤¤¤¦¿ô¤ËÂбþ¤·¤Æ¤¤¤Æ¡¢Î㤨¤Ð¡¢¾å¤ÎÎã¤Ç¤Ï¡¢1¤¬²¡¤µ¤ì¤ì¤Ð100¹Ô¤Ë¡¢2¤¬²¡¤µ¤ì¤ì¤Ð200¹Ô¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£
Âбþ¤¹¤ë¹ÔÈֹ椬¤Ê¤¤¤È¤(¾å¤ÎÎã¤Ç¤Ï0¤ä3°Ê¾å¤Î¿ôÃͤòÆþÎϤ·¤¿¾ì¹ç)¤Ï¡¢¼¡¤ÎÌ¿Î᤬¼Â¹Ô¤µ¤ì¤Þ¤¹¡£Éé¤Î¿ô¤¬»ØÄꤵ¤ì¤¿¤È¤¤Ï¡¢Illegal function call¥¨¥é¡¼¤È¤Ê¤ê¤Þ¤¹¡£
GOTO¡¢GOSUB
»ØÄꤷ¤¿»þ´Ö¤´¤È¤Ë¥µ¥Ö¥ë¡¼¥Á¥ó¤Î¸Æ¤Ó½Ð¤·¤ò¹Ô¤¦¤è¤¦¤ËÀßÄꤷ¤Þ¤¹¡£
ON INTERVAL=<»þ´Ö>GOSUB<¹ÔÈÖ¹æ>
10 ON INTERVAL=600 GOSUB 40
20 INTERVAL ON
30 GOTO 30
40 PRINT"*";
50 RETURN
INTERVAL ¤Ç»ØÄꤹ¤ë»þ´Ö¤Ï¡¢1¤«¤é65535¤Þ¤Ç¤Î¿ôÃͤǡ¢Ã±°Ì¤Ï1/60ÉäǤ¹¡£ON INTERVAL GOSUBÌ¿Îá¤Ï¡¢ÀßÄê¤ò¹Ô¤¦¤À¤±¤Ç¤¹¡£ÀßÄê¸å¤ËINTERVAL ON¤ò»ØÄꤷ¤Æ½é¤á¤Æ¡¢»ØÄꤷ¤¿»þ´Ö¤¬¤¿·Ð¤Ä¤È¥µ¥Ö¥ë¡¼¥Á¥ó¤Ë¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£¥µ¥Ö¥ë¡¼¥Á¥ó¤«¤éÌá¤ë¤Ë¤Ï¡¢RETURNÌ¿Îá¤ò»È¤¤¤Þ¤¹¡£¤Þ¤¿¡¢RETURN¤ËÌá¤êÀè¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£
RETURNÌ¿Î᤬¼Â¹Ô¤µ¤ì¤ë¤Þ¤Ç¤Ï¡¢INTERVAL STOP¤¬¼Â¹Ô¤µ¤ì¤¿¤È¤¤ÈƱ¤¸¾õÂ֤ˤʤäƤ¤¤ë¤Î¤Ç¡¢Â¿½Å¤Ë¥¤¥ó¥¿¡¼¥Ð¥ë³ä¤ê¹þ¤ß¤¬¤«¤«¤ë¤³¤È¤Ï¤¢¤ê¤Þ¤»¤ó¡£
¾å¤Î¥×¥í¥°¥é¥à¤Ï10É䴤ȤˡÖ*¡×¤òɽ¼¨¤¹¤ë¤â¤Î¤Ç¤¹¡£10¹Ô¤Ç¡¢ON INTERVAL¤Ç»ØÄꤷ¤¿»þ´Ö(600)¤´¤È¤Ë¡¢GOSUB¤Ç»ØÄꤵ¤ì¤¿¹Ô(40¹Ô)¤Ë¥¸¥ã¥ó¥×¤¹¤ë¤è¤¦¤ËÀßÄꤷ¤Æ¤¤¤Þ¤¹¡£
INTERVAL ON¡¢
INTERVAL OFF¡¢
INTERVAL STOP
¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¥¸¥ã¥ó¥×¤¹¤ë¹Ô¤ò»ØÄꤷ¤Þ¤¹¡£
ON KEY GOSUB[<¹ÔÈÖ¹æ>][,<¹ÔÈÖ¹æ>¡¦¡¦¡¦]
10 ON A GOSUB 40,60
20 KEY(1)ON:KEY(2)ON
30 GOTO 30
40 PRINT "F1Ž¶ŽÞ ŽµŽ»ŽÚŽÏŽ¼ŽÀ"
50 RETURN
60 PRINT "F2Ž¶ŽÞ ŽµŽ»ŽÚŽÏŽ¼ŽÀ"
70 RETURN
¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¡¢¸Æ¤Ó½Ð¤¹¥µ¥Ö¥ë¡¼¥Á¥ó¤Î¹ÔÈÖ¹æ¤ò»ØÄꤷ¤Þ¤¹¡£
ON KEY GOSUB¤Ë³¤¯¹ÔÈÖ¹æ(40¤È60)¤¬¡¢¼ÂºÝ¤Ë½èÍý¤ò¹Ô¤¦¥µ¥Ö¥ë¡¼¥Á¥ó¤ÎÀèƬ¹Ô¤Ç¡¢»ØÄꤵ¤ì¤¿¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼([F1]¤È[F2])¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¤Ï¡¢¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤Ï¤³¤³¤Ë°Ü¤ê¤Þ¤¹¡£
¹ÔÈÖ¹æ¤ÎʤӤνç½ø¤Ï¡¢¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤Î¥¡¼ÈÖ¹æ¤ËÂбþ¤·¤Æ¤¤¤Þ¤¹¡£¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤Ï[F1]¤«¤é[F10]¤Þ¤Ç¤¢¤ë¤Î¤Ç¡¢ºÇÂç10¸Ä¤Î¹ÔÈֹ椬ʤ٤é¤ì¤Þ¤¹¡£
¸Æ¤Ó½Ð¤µ¤ì¤¿¥µ¥Ö¥ë¡¼¥Á¥ó¤Ï¡¢GOSUBÌ¿ÎáƱÍÍ¡¢RETURNÌ¿Îá¤Ë¤è¤Ã¤Æ¥¸¥ã¥ó¥×¤·¤¿¼¡¤Î¹Ô¤ËÌá¤ê¤Þ¤¹¡£¤Þ¤¿¡¢RETURN¤ËÌá¤êÀè¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£¤¿¤À¤·¡¢¤³¤ÎÌ¿Îá¤Ï¡¢¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥¡¼¤¬²¡¤µ¤ì¤¿¤È¤¤Î½èÍý¤ÎÄêµÁ¤ò¹Ô¤¦¤À¤±¤Ç¡¢¤³¤ì¤À¤±¤Ç¤Ï½èÍý¤Ï¼Â¹Ô¤µ¤ì¤Þ¤»¤ó¡£¾å¤Î¥×¥í¥°¥é¥à¤Ç¤â¡¢20¹Ô¤¬¼Â¹Ô¤µ¤ì¤Æ¡¢½é¤á¤Æ40¹Ô¤È60¹Ô¤¬¼Â¹Ô¤µ¤ì¤Æ¤¤¤Þ¤¹¡£¾Ü¤·¤¯¤Ï¡¢KEY(n) ON/OFF/STOP¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
KEY(n) ON¡¢KEY(n) OFF¡¢KEY(n) STOP
¥¹¥×¥é¥¤¥È¥Ñ¥¿¡¼¥ó¤¬½Å¤Ê¤Ã¤¿¤È¤¤Ë¥¸¥ã¥ó¥×¤¹¤ë¹Ô¤ò»ØÄꤷ¤Þ¤¹¡£
ON SPRITE GOSUB<¹ÔÈÖ¹æ>
10 SCREEN 1,1
20 SPRITE$(0)=STRING$(8,CHR$(&B11111111))
30 ON SPRITE GOSUB 90
40 PUT SPRITE 0,(100,100),1,0
50 SPRITE ON
60 X=255
70 PUT SPRITE 1,(X,100),6,0
80 X=X-1:GOTO 70
90 REM SUB
100 X=255
110 RETURN
30¹Ô¤Ç¡¢¥¹¥×¥é¥¤¥È¤Î¥Ñ¥¿¡¼¥ó¤¬½Å¤Ê¤Ã¤¿¤È¤¤Ë¤Ï¡¢90¹Ô¤Ë¥¸¥ã¥ó¥×¤¹¤ë¤è¤¦¤Ë»ØÄꤷ¤Æ¤¤¤Þ¤¹¡£
ON SPRITE GOSUB¤ò¼Â¹Ô¤·¤Æ¤ª¤¡¢SPRITE ON¤ò¼Â¹Ô¤¹¤ë¤È¡¢²èÌ̾å¤Ç¥¹¥×¥é¥¤¥È¥Ñ¥¿¡¼¥ó¤¬½Å¤Ê¤Ã¤¿¤È¤¤Ë¡¢ON SPRITE GOSUB¤Ç»ØÄꤷ¤¿¹Ô(90)¤Ø¥¸¥ã¥ó¥×¤·¤Þ¤¹¡£¥¸¥ã¥ó¥×¤·¤¿¹Ô°Ê¹ß¤Ç¡¢¥¹¥×¥é¥¤¥È¤¬½Å¤Ê¤Ã¤¿¤È¤¤Î½èÍý¤ò¹Ô¤Ã¤¿¤¢¤È¤Ï¡¢RETURN¤Ç¸µ¤Î¹Ô¤ØÌá¤ê¤Þ¤¹¡£¤Þ¤¿¡¢RETURN¤ËÌá¤êÀè¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£
¤Ê¤ª¡¢SCREEN 4°Ê¹ß¤Î¥¹¥×¥é¥¤¥È¤ÇÆüì¤Ê¥«¥é¡¼¥³¡¼¥É¤ò»ý¤Ä¤â¤Î¤Ï¾×Æͤ·¤Æ¤â³ä¤ê¹þ¤ß¤òµ¯¤³¤·¤Þ¤»¤ó¡£¾Ü¤·¤¯¤ÏCOLOR SPRITEʸ¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
SPRITE ON¡¢SPRITE OFF¡¢SPRITE STOP
[CTRL]+[STOP]¥¡¼¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¥¸¥ã¥ó¥×¤¹¤ë¹Ô¤ò»ØÄꤷ¤Þ¤¹¡£
ON STOP GOSUB<¹ÔÈÖ¹æ>
ON STOP GOSUB 100
[CTRL]+[STOP]¥¡¼¤¬²¡¤µ¤ì¤ë¤È¡¢¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤Ï100¹Ô°Ê¹ß¤Ë°Ü¤ê¤Þ¤¹¡£ON STOP¡¡GOSUB¤Ï¡¢[CTRL]+[STOP]¥¡¼¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¡¢Ê¬´ô¤¹¤ë¥µ¥Ö¥ë¡¼¥Á¥ó¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤â¤Î¤Ç¤¹¡£ON KEY GOSUB¤Ë³¤¯¹ÔÈÖ¹æ(¤³¤Î¾ì¹ç¡¢100)¤¬¡¢¼ÂºÝ¤Ë½èÍý¤ò¹Ô¤¦¥µ¥Ö¥ë¡¼¥Á¥ó¤ÎÀèƬ¹Ô¤Ë¤Ê¤ê¤Þ¤¹¡£¸Æ¤Ó½Ð¤µ¤ì¤¿¥µ¥Ö¥ë¡¼¥Á¥ó¤Ï¡¢GOSUBÌ¿ÎáƱÍÍ¡¢RETURNÌ¿Îá¤Ë¤è¤Ã¤Æ¥¸¥ã¥ó¥×¤·¤¿¼¡¤Î¹Ô¤ËÌá¤ê¤Þ¤¹¡£¤Þ¤¿¡¢RETURN¤ËÌá¤êÀè¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£ON KEY GOSUB¤ÎÀâÌÀ¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
ON KEY GOSUB¡¢
STOP ON¡¢
STOP OFF¡¢
STOP STOP
¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¥¸¥ã¥ó¥×¤¹¤ë¹Ô¤ò»ØÄꤷ¤Þ¤¹¡£
ON STRIG GOSUB<¹ÔÈÖ¹æ>[,<¹ÔÈÖ¹æ>¡¦¡¦¡¦]
ON STRIG GOSUB,100,200
¥Ý¡¼¥È1¤ËÀܳ¤µ¤ì¤Æ¤¤¤ë¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó1¤¬²¡¤µ¤ì¤¿¤é¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤ò100¹Ô°Ê¹ß¤Ë°Ü¤·¡¢¥Ý¡¼¥È2¤ËÀܳ¤µ¤ì¤Æ¤¤¤ë¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó1¤¬²¡¤µ¤ì¤¿¤é¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤ò200¹Ô°Ê¹ß¤Ë°Ü¤·¤Þ¤¹¡£
¤³¤ÎÌ¿Îá¤Ï¡¢¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¡¢Ê¬´ô¤¹¤ë¥µ¥Ö¥ë¡¼¥Á¥ó¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤â¤Î¤Ç¤¹¡£ON STRIG GOSUB¤Ë³¤¯¹ÔÈÖ¹æ(¤³¤Î¾ì¹ç¡¢100¤È200)¤¬¡¢¼ÂºÝ¤Ë½èÍý¤ò¹Ô¤¦¥µ¥Ö¥ë¡¼¥Á¥ó¤ÎÀèƬ¹Ô¤Ç¡¢»ØÄꤵ¤ì¤¿¥È¥ê¥¬¥Ü¥¿¥ó¤¬²¡¤µ¤ì¤¿¤È¤¤Ë¤Ï¡¢¥×¥í¥°¥é¥à¤Î¼Â¹Ô¤Ï¤³¤³¤Ë°Ü¤ê¤Þ¤¹¡£
¹ÔÈÖ¹æ¤ÏºÇÂç5¸Ä¤Þ¤Ç»ØÄꤹ¤ë¤³¤È¤¬¤Ç¤¡¢º¸Â¦¤«¤é½ç¤Ë°Ê²¼¤Î¥È¥ê¥¬¥Ü¥¿¥ó¤ÈÂбþ¤·¤Æ¤¤¤Þ¤¹¡£
¹ÔÈÖ¹æ | °ÕÌ£ |
1ÈÖÌÜ | ¥¡¼¥Ü¡¼¥É¤Î¥¹¥Ú¡¼¥¹¥¡¼ |
2ÈÖÌÜ | ¥Ý¡¼¥È1¤ËÀܳ¤µ¤ì¤Æ¤¤¤ë¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó1 |
3ÈÖÌÜ | ¥Ý¡¼¥È2¤ËÀܳ¤µ¤ì¤Æ¤¤¤ë¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó1 |
4ÈÖÌÜ | ¥Ý¡¼¥È1¤ËÀܳ¤µ¤ì¤Æ¤¤¤ë¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó2 |
5ÈÖÌÜ | ¥Ý¡¼¥È2¤ËÀܳ¤µ¤ì¤Æ¤¤¤ë¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó2 |
¤¿¤À¤·¡¢¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Ë¤è¤Ã¤Æ¤Ï¡¢¥È¥ê¥¬¥Ü¥¿¥ó2¤Î¤Ê¤¤¤â¤Î¤â¤¢¤ê¤Þ¤¹¡£
¸Æ¤Ó½Ð¤µ¤ì¤¿¥µ¥Ö¥ë¡¼¥Á¥ó¤Ï¡¢GOSUBÌ¿ÎáƱÍÍ¡¢RETURNÌ¿Îá¤Ë¤è¤Ã¤Æ¥¸¥ã¥ó¥×¤·¤¿¼¡¤Î¹Ô¤ËÌá¤ê¤Þ¤¹¡£¤Þ¤¿¡¢RETURN¤ËÌá¤êÀè¤Î¹ÔÈÖ¹æ¤ò»ØÄꤹ¤ë¤³¤È¤â¤Ç¤¤Þ¤¹¡£¤¿¤À¤·¡¢¤³¤ÎÌ¿Îá¤Ï¡¢¥¸¥ç¥¤¥¹¥Æ¥£¥Ã¥¯¤Î¥È¥ê¥¬¥Ü¥¿¥ó¤¬²¡¤µ¤ì¤¿¤È¤¤Î½èÍý¤ÎÄêµÁ¤ò¹Ô¤¦¤À¤±¤Ç¡¢¤³¤ì¤À¤±¤Ç¤Ï½èÍý¤Ï¼Â¹Ô¤µ¤ì¤Þ¤»¤ó¡£STRIG(n) ON/OFF/STOP ¤ò»²¾È¤·¤Æ²¼¤µ¤¤¡£
STRIG(n) ON¡¢STRIG(n) OFF¡¢STRIG(n) STOP¡¢ON KEY GOSUB
¥Õ¥¡¥¤¥ë¤ò³«¤¤Þ¤¹¡£
OPEN<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>[FOR<¥â¡¼¥É>]AS#<¥Õ¥¡¥¤¥ëÈÖ¹æ>[LEN=<¥ì¥³¡¼¥ÉĹ>]
OPEN "SAMPLE.DAT" FOR OUTPUT AS #1
OPENʸ¤Ï¡¢¥Õ¥¡¥¤¥ë¤ò»ÈÍѤ¹¤ë¤Ë¤¢¤¿¤Ã¤Æ¥Ð¥Ã¥Õ¥¡¥¨¥ê¥¢¤ò³ä¤êÅö¤Æ¡¢¥¢¥¯¥»¥¹¥â¡¼¥É¤ò·èÄꤷ¤Þ¤¹¡£°ìÅÙ¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤¹¤ë¤È¡¢°Ê¹ß¤Ï¡¢<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ç¥Ç¡¼¥¿¤Î¤ä¤ê¤È¤ê¤ò¹Ô¤¤¤Þ¤¹¡£°Ê²¼¤ÎÌ¿Îá¤ä´Ø¿ô¤ò»ÈÍѤ¹¤ëÁ°¤Ë¤Ï¡¢¤¢¤é¤«¤¸¤áOPENʸ¤ò¼Â¹Ô¤·¤Æ¤ª¤¯¤³¤È¤¬É¬ÍפǤ¹¡£
| EOF | FIELD |
| GET | INPUT# |
| INPUT$(n,#m) | LINE INPUT# |
| LOC | LOF |
| PRINT# | PRINT#USING |
| PUT | VARPTR(#n) |
<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç¥É¥é¥¤¥Ö̾¤ò¾Êά¤·¤¿¤È¤¤Ï¡¢¸½ºß¤Î¥Ç¥£¥¹¥¯¥É¥é¥¤¥Ö¤¬»ÈÍѤµ¤ì¤Þ¤¹¡£
<¥â¡¼¥É>¤Ï¥Õ¥¡¥¤¥ë¤ËÂФ¹¤ë¥¢¥¯¥»¥¹¥â¡¼¥É¤ò·èÄꤹ¤ë¤â¤Î¤Ç¡¢¼¡¤Î4¼ïÎब¤¢¤ê¤Þ¤¹¡£
| FOR INPUT | ´û¸¤Î¥·¡¼¥±¥ó¥·¥ã¥ë¥Õ¥¡¥¤¥ë¤«¤éÆþÎϤò¹Ô¤¦¡£ |
| FOR OUTPUT | ¿·¤·¤¯¥·¡¼¥±¥ó¥·¥ã¥ë¥Õ¥¡¥¤¥ë¤òºî¤ê½ÐÎϤò¹Ô¤¦¡£ |
| FOR APPEND | ´û¸¤Î¥·¡¼¥±¥ó¥·¥ã¥ë¥Õ¥¡¥¤¥ë¤Ë¿·¤¿¤Ê¥Ç¡¼¥¿¤òÄɲýÐÎϤ¹¤ë¡£ |
| <¥â¡¼¥É>¾Êά | ¥é¥ó¥À¥à¥Õ¥¡¥¤¥ë¤ËÂФ·¤ÆÆþ½ÐÎϤò¹Ô¤¦¡£ |
<¥Õ¥¡¥¤¥ëÈÖ¹æ>¤Ï¡¢1¤«¤é15¤Þ¤Ç¤ÎÃͤòÍѤ¤¤ë¤³¤È¤¬¤Ç¤¤Þ¤¹¤¬¡¢MAXFILESʸ¤Ç»ØÄꤷ¤¿¿ô¤òĶ¤¨¤Æ»ØÄꤹ¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£¤Þ¤¿¡¢´û¤Ë¥ª¡¼¥×¥ó¤µ¤ì¤Æ¤¤¤ë¥Õ¥¡¥¤¥ë¤¬»ÈÍѤ·¤Æ¤¤¤ëÈÖ¹æ¤òÍѤ¤¤ë¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£
¥·¡¼¥±¥ó¥·¥ã¥ëÆþÎϥ⡼¥É¤ª¤è¤ÓÄɲå⡼¥É¤Ç¤Ï¡¢»ØÄꤵ¤ì¤¿¥Õ¥¡¥¤¥ë¤¬Â¸ºß¤·¤Ê¤¤¤È¡¢¡ÖFile not found¡×¥¨¥é¡¼¤È¤Ê¤ê¤Þ¤¹¡£¥·¡¼¥±¥ó¥·¥ã¥ë½ÐÎϥ⡼¥É¤Ç¤Ï¡¢¾ï¤Ë»ØÄꤵ¤ì¤¿Ì¾Á°¤Î¥Õ¥¡¥¤¥ë¤ò¿·¤·¤¯ºî¤ê¡¢Æ±°ì̾¤Î¥Õ¥¡¥¤¥ë¤¬¤¢¤Ã¤¿¾ì¹ç¤Ë¤Ï¤½¤Î¥Õ¥¡¥¤¥ë¤Ïºï½ü¤µ¤ì¤Þ¤¹¡£¥é¥ó¥À¥àÆþ½ÐÎϥ⡼¥É¤Ç¥Õ¥¡¥¤¥ë¤¬Â¸ºß¤·¤Ê¤¤¾ì¹ç¤Ë¤Ï¿·¤¿¤Ëºî¤é¤ì¤Þ¤¹¡£<¥ì¥³¡¼¥ÉĹ>¤Ï¡¢¥é¥ó¥À¥àÆþ½ÐÎϥ⡼¥É¤Ç¥Õ¥¡¥¤¥ë¤ò¥ª¡¼¥×¥ó¤·¤¿¤È¤¤Î¡¢¥ì¥³¡¼¥ÉŤòÀßÄꤹ¤ë¤â¤Î¤Ç¤¹¡£¤³¤ì¤Ï1¤«¤é256¤ÎÈϰϤǡ¢¾Êά¤·¤¿¾ì¹ç¤Ï256¤ËÀßÄꤵ¤ì¤Þ¤¹¡£¥·¡¼¥±¥ó¥·¥ã¥ëÆþÎÏ¡¢¤¢¤ë¤¤¤Ï¥é¥ó¥À¥àÆþ½ÐÎϥ⡼¥É¤ò»ØÄꤹ¤ë¾ì¹ç¤Ë¤Ï¡¢1¤Ä¤Î¥Õ¥¡¥¤¥ë¤òÊ£¿ô¤ÎOPENʸ¤Ë¤è¤ê³«¤¯¤³¤È¤¬¤Ç¤¤Þ¤¹¡£¤³¤Î¾ì¹ç¡¢°Û¤Ê¤ë¥Õ¥¡¥¤¥ëÈÖ¹æ¤Ë¤è¤ê»ØÄꤹ¤ë¤³¤È¤Ë¤Ê¤ê¤Þ¤¹¤¬¡¢¥·¡¼¥±¥ó¥·¥ã¥ë½ÐÎϥ⡼¥É¤ò»ØÄꤹ¤ë¾ì¹ç¤Ë¤Ï¡¢1¤Ä¤Î¥Õ¥¡¥¤¥ë¤òÊ£¿ô¤ÎOPENʸ¤Ë¤è¤ê³«¤¯¤³¤È¤Ï¤Ç¤¤Þ¤»¤ó¡£
¢£¥Õ¥¡¥¤¥ë¤Î»ØÄê
OPEN¤Ë³¤¯<¥Õ¥¡¥¤¥ë¥¹¥Ú¥Ã¥¯>¤Ç¡¢¤½¤Î¥Õ¥¡¥¤¥ë¤òÁàºî¤¹¤ë¾ì½ê¤È¥Õ¥¡¥¤¥ë̾¤ò»ØÄꤷ¤Þ¤¹¡£¥Ç¥£¥¹¥¯¥Õ¥¡¥¤¥ë°Ê³°¤Ç¤Ï¼¡¤Î7¤Ä¤¬¤¢¤ê¤Þ¤¹¡£
| ¥«¥»¥Ã¥È¥ì¥³¡¼¥À | ¡ÈCAS:¥Õ¥¡¥¤¥ë̾(6ʸ»ú°ÊÆâ)¡É¤È»ØÄꤹ¤ë |
| ¥á¥â¥ê¥Ç¥£¥¹¥¯ | ¡ÈMEM:¥Õ¥¡¥¤¥ë̾¡É¤È»ØÄꤹ¤ë |
| ¥Ç¥£¥¹¥×¥ì¥¤¤Î¥Æ¥¥¹¥È²èÌÌ | ¡ÈCRT:¡É¤È»ØÄꤹ¤ë |
| ¥Ç¥£¥¹¥×¥ì¥¤¤Î¥°¥é¥Õ¥£¥Ã¥¯²èÌÌ | ¡ÈGRP:¡É¤È»ØÄꤹ¤ë |
| ¥×¥ê¥ó¥¿ | ¡ÈLPT:¡É¤È»ØÄꤹ¤ë |
| ¥³¥ó¥½¡¼¥ë¥Ç¥Ð¥¤¥¹ | ¡ÈCON:¡É¤È»ØÄꤹ¤ë |
| ¥Ì¥ë¥Ç¥Ð¥¤¥¹ | ¡ÈNUL:¡É¤È»ØÄꤹ¤ë |
¥³¥ó¥½¡¼¥ë¥Ç¥Ð¥¤¥¹¤Ï¥¡¼¥Ü¡¼¥É¤«¤é¤ÎÆɤ߹þ¤ß¡¢²èÌ̤ؤνñ¤¹þ¤ß¤Ë»ÈÍѤ·¤Þ¤¹¡£Î㤨¤Ð¡¢
COPY "TEST.DOC" TO "CON"
¤È¤¹¤ë¤È¡¢TEST.DOC¤ÎÆâÍƤò²èÌ̤Ëɽ¼¨¤·¤Þ¤¹¡£
¥Ì¥ë¥Ç¥Ð¥¤¥¹¤Ï¼ÂºÝ¤Ë¤Ï²¿¤â¤·¤Þ¤»¤ó¡£½ÐÎÏʸ»ú¤Ï̵»ë¤µ¤ì¡¢ÆþÎϤϾï¤Ë¥¨¥ó¥É¥ª¥Ö¥Õ¥¡¥¤¥ë([CTRL]+[Z])¤È¤Ê¤ê¤Þ¤¹¡£
¥Õ¥¡¥¤¥ë̾¤¬É¬ÍפʤΤϡ¢¥Ç¥£¥¹¥¯¥Õ¥¡¥¤¥ë¤ª¤è¤Ó¡¢CAS:¤äMEM:¤À¤±¤Ç¤¹¡£
CLOSE¡¢INPUT#¡¢PRINT#¡¢MAXFILES¡¢INPUT$¡¢EOF
»ØÄꤷ¤¿½ÐÎϥݡ¼¥È¤Ë¥Ç¡¼¥¿¤òÁ÷¤ê¤Þ¤¹¡£
OUT<¥Ý¡¼¥ÈÈÖ¹æ>,<¼°>
OUT &H22,&H80
&H22¤Î¥Ý¡¼¥ÈÈÖ¹æ¤Ç»ØÄꤵ¤ì¤¿½ÐÎϥݡ¼¥È¤Ø¡¢&H80¤È¤¤¤¦¥Ç¡¼¥¿¤òÁ÷¤ê¤Þ¤¹¡£¥Ý¡¼¥ÈÈÖ¹æ¤Ë´Ø¤·¤Æ¤Ï¡¢I/O¥Þ¥Ã¥×¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
OUT¤Ï¡¢¥Ï¡¼¥É¥¦¥§¥¢¤ÈÈó¾ï¤ËÌ©Ã夷¤¿Ì¿Îá¤Ç¡¢³Æ¡¹¤ÎMSX¤Ç°Û¤Ê¤ëÆ°ºî¤ò¤¹¤ë¾ì¹ç¤¬¤¢¤ê¤Þ¤¹¡£MSX¤Î¸ß´¹À¤ò°Ý»ý¤¹¤ë¤¿¤á¡¢¹¤¯¸øɽ¤¹¤ë¥×¥í¥°¥é¥à¤Ë¤Ï»ÈÍѤ·¤Ê¤¤¤Ç¤¯¤À¤µ¤¤¡£
INP
¥¿¥Ã¥Á¥Ñ¥Í¥ë¤Î¾õÂÖ¤òÄ´¤Ù¤Þ¤¹¡£
PAD(<¿ô¼°>)
X=PAD(1)
¥Ý¡¼¥È1¤ËÀܳ¤µ¤ì¤¿¥¿¥Ã¥Á¥Ñ¥Í¥ë¤¬²¡¤µ¤ì¤Æ¤¤¤¿¤é¡¢¤½¤ÎÅÀ¤ÎXºÂɸ¤òÊÑ¿ôX¤ËÂåÆþ¤·¤Þ¤¹¡£
PAD¤Ë³¤¯¥«¥Ã¥³Æâ¤Ë¤Ï¡¢0¤«¤é19¤Þ¤ÇÃͤ¬Æþ¤ê¤Þ¤¹¡£PADÌ¿Îá¤ò¼Â¹Ô¤¹¤ë¤È¡¢»ØÄê¤Ë¤è¤Ã¤Æ¡¢°Ê²¼¤Î·ë²Ì¤¬ÊÖ¤µ¤ì¤Þ¤¹¡£
¿ôÃÍ | °ÕÌ£ | ½Ð¤µ¤ì¤ëÃÍ |
0¡¢4 | ¥¿¥Ö¥ì¥Ã¥È¤Î¥Ç¡¼¥¿¤¬Í¸ú¤«¤É¤¦¤«¤òÄ´¤Ù¤ë | ͸ú=-1 |
| | ̵¸ú=0 |
1¡¢5 | ¥¿¥Ö¥ì¥Ã¥È¤¬²¡¤µ¤ì¤Æ¤¤¤ëÅÀ¤ÎXºÂɸ¤òÄ´¤Ù¤ë | XºÂɸ |
2¡¢6 | ¥¿¥Ö¥ì¥Ã¥È¤¬²¡¤µ¤ì¤Æ¤¤¤ëÅÀ¤ÎYºÂɸ¤òÄ´¤Ù¤ë | YºÂɸ |
3¡¢7 | ¥¿¥Ö¥ì¥Ã¥È¾å¤Î¥¹¥¤¥Ã¥Á¤¬²¡¤µ¤ì¤Æ¤¤¤ë¤«¤É¤¦¤«¤òÄ´¤Ù¤ë | ²¡¤µ¤ì¤Æ¤¤¤ë=-1 |
| | ²¡¤µ¤ì¤Æ¤¤¤Ê¤¤=0 |
*8 | ¥é¥¤¥È¥Ú¥ó¤Î¥Ç¡¼¥¿¤¬Í¸ú¤«¤É¤¦¤«¤òÄ´¤Ù¤ë | ͸ú=-1 |
| | ̵¸ú=0 |
*9 | ¥é¥¤¥È¥Ú¥ó¤ÎXºÂɸ¤òÄ´¤Ù¤ë | XºÂɸ |
*10 | ¥é¥¤¥È¥Ú¥ó¤ÎYºÂɸ¤òÄ´¤Ù¤ë | YºÂɸ |
*11 | ¥é¥¤¥È¥Ú¥ó¤Î¥¹¥¤¥Ã¥Á¤¬²¡¤µ¤ì¤Æ¤¤¤ë¤«¤É¤¦¤«¤òÄ´¤Ù¤ë | ²¡¤µ¤ì¤Æ¤¤¤ë=-1 |
| | ²¡¤µ¤ì¤Æ¤¤¤Ê¤¤=0 |
*12¡¢*16 | ¥Þ¥¦¥¹¤Þ¤¿¤Ï¥È¥é¥Ã¥¯¥Ü¡¼¥ë¤Î¥Ç¡¼¥¿¤òÍ¿¤¨¤ë | ¾ï¤Ë-1 |
*13¡¢*17 | ¥Þ¥¦¥¹¤Þ¤¿¤Ï¥È¥é¥Ã¥¯¥Ü¡¼¥ë¤ÎXºÂɸ¤òÄ´¤Ù¤ë | XºÂɸ |
*14¡¢*18 | ¥Þ¥¦¥¹¤Þ¤¿¤Ï¥È¥é¥Ã¥¯¥Ü¡¼¥ë¤ÎYºÂɸ¤òÄ´¤Ù¤ë | YºÂɸ |
*15¡¢*19 | ¥Þ¥¦¥¹¤Þ¤¿¤Ï¥È¥é¥Ã¥¯¥Ü¡¼¥ë¤Î¥Ç¡¼¥¿¤òÍ¿¤¨¤ë | ¾ï¤Ë0 |
0¡Á3¤Þ¤¿¤Ï12¡Á15¤Ï¥Ý¡¼¥È1¤ËÀܳ¤µ¤ì¤¿ÁõÃÖ¤ò¡¢4¡Á7¤Þ¤¿¤Ï16¡Á19¤Ï¥Ý¡¼¥È2¤ËÀܳ¤µ¤ì¤¿ÁõÃÖ¤òÄ´¤Ù¤Þ¤¹¡£¤¿¤À¤·¡¢*¤Î¤Ä¤¤¤¿ÁõÃÖ(8¡Á19)¤ÏMSX BASIC ver 2.0°Ê¹ß¤Ç͸ú¤Ç¤¹¡£
¤É¤Î¼þÊÕÁõÃÖ¤âºÂɸ¤òÄ´¤Ù¤ëÁ°¤Ë¤Ï¤½¤Î¥Ç¡¼¥¿¤¬Í¸ú¤«¤É¤¦¤«¤ò³Îǧ¤·¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£¤½¤ì¤¾¤ìPAD(0)¤Þ¤¿¤Ï(4)¡¢PAD(8)¡¢PAD(12)¤Þ¤¿¤ÏPAD(16)¤ò¼Â¹Ô¤·¤Æ¡¢¤½¤ÎÃͤ¬-1¤Ç¤¢¤Ã¤¿¤é¾¤Î¥Ç¡¼¥¿¤òÄ´¤Ù¤Æ²¼¤µ¤¤¡£
STRIG¡¢PDL
¥°¥é¥Õ¥£¥Ã¥¯²èÌ̤Ρ¢»ØÄꤵ¤ì¤¿¶³¦¿§¤Ç¤«¤³¤Þ¤ì¤¿Éôʬ¤ò»ØÄꤵ¤ì¤¿¿§¤ÇÅɤê¤Ä¤Ö¤·¤Þ¤¹¡£
PAINT[STEP](X,Y)[,<Îΰ迧>][,<¶³¦¿§>]
10 SCREEN 3
20 CIRCLE(128,96),50,11
30 PAINT(128,96),6,11
40 GOTO 40
(128,96)¤òÃæ¿´ÅÀ¤Ë¤·¤Æ¡¢²«¿§¤Ç½ñ¤«¤ì¤¿±ß¤ÎÃæ¤òÀÖ¤ÇÅɤê¤Þ¤¹¡£
PAINT¤Î»ØÄê¤Ï¼¡¤Î·Á¤Ç¹Ô¤¤¤Þ¤¹¡£
PAINT(X,Y)¡¢Îΰ迧¡¢¶³¦¿§
PAINT¤Ï(X,Y)¤Ç»ØÄꤷ¤¿°ÌÃÖ¤ò´Þ¤à¶³¦¿§¤Ç°Ï¤Þ¤ì¤¿Îΰè¤ò¡¢Îΰ迧¤ÇÅɤê¤Ä¤Ö¤·¤Þ¤¹¡£¿§¤Î»ØÄê¤Ë¤Ä¤¤¤Æ¤Ï¡¢COLOR¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
(X,Y)¤Î»ØÄê¤ÏSTEP¤ò»È¤Ã¤Æ¹Ô¤¦¤³¤È¤â¤Ç¤¤Þ¤¹¡£STEP¤Ë¤Ä¤¤¤Æ¤Ï¡¢LINE¤ò»²¾È¤·¤Æ¤¯¤À¤µ¤¤¡£
¶³¦¿§¤ÏSCREEN 3¤ª¤è¤Ó5°Ê¾å¤Ç¤À¤±»È¤¨¤Þ¤¹¡£SCREEN 2¤ä4¤Ç¤Ï¡¢Îΰ迧¤ÈƱ¤¸¿§¤Ç°Ï¤Þ¤ì¤¿Îΰ褬¡¢Îΰ迧¤Ç»ØÄꤷ¤¿¿§¤ÇÅɤé¤ì¤Þ¤¹¡£Î㤨¤Ð¡¢¾å¤ÎÎã¤òSCREEN 2¤Ç¹Ô¤¦¤È¼¡¤Î¤è¤¦¤Ë¤Ê¤ê¤Þ¤¹¡£
10 SCREEN 2
20 CIRCLE(128,96),50,11
30 PAINT(128,96),11
40 GOTO 40
Îΰ迧¤Î»ØÄê¤ò¾Êά¤¹¤ë¤È¡¢COLOR¤Ç»ØÄꤷ¤Æ¤¤¤ëÁ°·Ê¿§¤¬»È¤ï¤ì¤Þ¤¹¡£¶³¦¿§¤Î»ØÄê¤ò¾Êά¤¹¤ë¤È¡¢Îΰ迧¤Ç»ØÄꤷ¤¿¤â¤Î¤ÈƱ¤¸¿§¤¬»È¤ï¤ì¤Þ¤¹¡£PAINT¤ò¼Â¹Ô¤·¤¿¤È¤¤Ë¡¢»ØÄꤷ¤¿¶³¦¿§(SCREEN 2¤Î¾ì¹ç¤Ë¤ÏÎΰ迧)¤Ç°Ï¤Þ¤ì¤¿Îΰ褬¤Ê¤¤¤È¡¢²èÌÌ°ìÌ̤¬»ØÄꤷ¤¿Îΰ迧¤ÇÅɤê¤Ä¤Ö¤µ¤ì¤Þ¤¹¡£
SCREEN¡¢COLOR
¥Ñ¥É¥ë¤Î¾õÂÖ¤òÄ´¤Ù¤Þ¤¹¡£
PDL(<¥Ñ¥É¥ëÈÖ¹æ>)
X=PDL(2)
Îã¤Ç¤Ï¥Ý¡¼¥È2¤ËÀܳ¤µ¤ì¤¿¥Ñ¥É¥ë¤Î¾õÂÖ¤òÄ´¤Ù¡¢¤½¤Î·ë²Ì¤òÊÑ¿ôX¤ËÂåÆþ¤·¤Þ¤¹¡£
PDL¤Ë³¤¯¥«¥Ã¥³Æâ¤Ë¤Ï¡¢1¤«¤é12¤Þ¤Ç¤ÎÃͤ¬Æþ¤ê¤Þ¤¹¡£¿ôÃͤ¬´ñ¿ô(1¡¢3¡¢5¡¢7¡¢9¡¢11)¤Ê¤é¤Ð¡¢¥Ý¡¼¥È1¤ËÀܳ¤µ¤ì¤¿¥Ñ¥É¥ë¤¬»ØÄꤵ¤ì¡¢¶ö¿ô(2¡¢4¡¢6¡¢8¡¢10¡¢12)¤Ê¤é¤Ð¡¢¥Ý¡¼¥È2¤ËÀܳ¤µ¤ì¤¿¥Ñ¥É¥ë¤¬»ØÄꤵ¤ì¤Þ¤¹¡£
PDLÌ¿Îá¤ò¼Â¹Ô¤¹¤ë¤È¡¢¥Ñ¥É¥ë¤Î¾õÂÖ¤¬¤½¤Î²óž¤ÎÅٹ礤¤Ë¤è¤Ã¤Æ¡¢0¡Á255¤Î´Ö¤ÎÃͤÇÆÀ¤é¤ì¤Þ¤¹¡£
PAD¡¢STRIG
¥á¥â¥ê¾å¤Ë»ØÄꤵ¤ì¤¿ÈÖÃϤÎÆâÍƤòÆɤ߽Ф·¤Þ¤¹¡£
PEEK(<ÈÖÃÏ>)
A=PEEK(&HA000)
Îã¤Ç¤Ï¥«¥Ã¥³Æâ¤Ç»ØÄꤵ¤ì¤¿ÈÖÃÏ(&HA000)¤Î¥á¥â¥ê¤ÎÆâÍƤ¬¡¢¿ôÃͤȤ·¤ÆA¤ËÂåÆþ¤µ¤ì¤Þ¤¹¡£Æɤ߹þ¤ßÈÖÃϤϡ¢-32768¡Á65535¤ÎÈϰϤοôÃͤǻØÄꤷ¤Þ¤¹(¿ôÃͤ¬Éé¤Î¾ì¹ç¤Ï¡¢¤½¤ÎÃͤË65536¤ò²Ã¤¨¤ì¤Ð¼ÂºÝ¤ÎÈÖÃϤòÃΤ뤳¤È¤¬¤Ç¤¤Þ¤¹)¡£Æɤ߹þ¤Þ¤ì¤ë¥Ç¡¼¥¿¤Ï¡¢0¡Á255¤ÎÃͤò»ý¤Ä¿ôÃͤǤ¹¡£
POKE¡¢¥á¥â¥ê¥Þ¥Ã¥×
²»³Ú¤ò±éÁÕ¤·¤Þ¤¹¡£
PLAY<ʸ»ú¼°1>[,<ʸ»ú¼°2>][,<ʸ»ú¼°3>]
10 PLAY "O4L4T180V8"
20 PLAY "GAGAGGE2"
30 PLAY "EFEFEECR"
40 PLAY "E2CDE2CD"
50 PLAY "EFGGDEDR"
60 PLAY "GAGAGGE2"
70 PLAY "EFEFEECR"
80 PLAY "A2GEGGEC"
90 PLAY "EEDDC2"
»ØÄꤵ¤ì¤¿µ¹æ¤Ë¤·¤¿¤¬¤Ã¤Æ¡¢²»³Ú¤ò±éÁÕ¤·¤Þ¤¹¡£10¹Ô¤Ç¤Ï¡¢±éÁդΤ¿¤á¤Î¥Æ¥ó¥Ý(¤Ï¤ä¤µ)¤ä²»ÎÌ¡¢²»³¬¤Î²»°è¤Ê¤É¤ò»ØÄꤷ¤Æ¤¤¤Þ¤¹¡£
ʸ»ú¼°¤Ï¡¢²»³Ú¤ò±éÁÕ¤¹¤ë¤¿¤á¤Îµ¹æ¤òÁȤ߹ç¤ï¤»¤¿¤â¤Î¤Ç°úÍÑÉä¤Ç°Ï¤ß¤Þ¤¹¡£Ê¸»úÊÑ¿ô¤Ç»ØÄꤹ¤ë¤È¤¤Ï¡¢¤½¤Îʸ»úÊÑ¿ô¤Ë±éÁÕÍѤε¹æ¤òÂåÆþ¤·¤Æ¤ª¤¤Þ¤¹("Xʸ»úÊÑ¿ô;")¤È»ØÄꤷ¤Æ¤â¡¢Ã±¤Ëʸ»úÊÑ¿ô¤À¤±¤ò»ØÄꤷ¤Æ¤â¡¢·ë²Ì¤ÏÊѤï¤ê¤Þ¤»¤ó)¡£µ¹æ¤Ë¤Ï²»¤Î¹â¤µ¡¢²»¤ÎŤµ¡¢Â®¤µ(¥Æ¥ó¥Ý)¡¢²»¤ÎÂ礤µ¡¢²»¿§¤Î»ØÄê¤Î5¼ïÎब¤¢¤ê¤Þ¤¹¡£
PLAY¤Ç¤Ï¡¢3¤Ä¤Î¥Á¥ã¥ó¥Í¥ë¤ò»È¤¦¤³¤È¤¬¤Ç¤¡¢ºÇÂç3½Åϲ»¤Þ¤Ç½Ð¤¹¤³¤È¤¬¤Ç¤¤Þ¤¹¡£Ê¸»ú¼°1¡¢Ê¸»ú¼°2¡¢Ê¸»ú¼°3¤Ï¤½¤ì¤¾¤ì¥Á¥ã¥ó¥Í¥ë1¡¢2¡¢3¤ËÂбþ¤·¤Æ¤¤¤Þ¤¹¡£Ê¸»ú¼°¤Ë²¿¤â»ØÄꤷ¤Ê¤±¤ì¤Ð¡¢¤½¤Î¥Á¥ã¥ó¥Í¥ë¤«¤é¤Ï²»¤¬¤Ç¤Þ¤»¤ó¡£
°Ê²¼¤Ç¡¢³Æµ¹æ¤Ë¤Ä¤¤¤Æ¤Î²òÀâ¤ò¹Ô¤¤¤Þ¤¹¡£
PLAY "C","E","G"
¢£²»¤Î¹â¤µ
A¡ÁG | ²»¤Î¹â¤µ¤ò²»³¬Ì¾¤Çɽ¸½¤¹¤ë¡£A¡ÁG¤Î¸å¤í¤Ë#¡¢+¤ò¤Ä¤±¤ë¤ÈȾ²»¾å¤¬¤ê¡¢-¤òÉÕ¤±¤ë¤ÈȾ²»²¼¤¬¤ë¡£ |
O1¡Á8 | ²»³¬¤Î²»°è¤ò1¡Á8¤Î¿ôÃͤǻØÄꤹ¤ë¡£½é´üÃͤÏO4¡£Î㤨¤Ð¡¢O5¤ÏO4¤è¤ê1¥ª¥¯¥¿¡¼¥Ö¾å¤Î²»³¬¤ò»Ø¤¹¡£ |
N0¡Á96 | ²»¤Î¹â¤µ¤ò0¡Á96¤Î¿ôÃͤÇɽ¸½¤¹¤ë¡£N1¤ÏO1¤ÎC#¤ÈƱ¤¸¹â¤µ¡¢N96¤ÏO8¤ÎB¤ÈƱ¤¸¡£N0¤ÏR(µÙÉä)¤ÈƱ¤¸¡£ |