********************************************

           KM-BASIC ver 0.8.3-beta
       for KM-Z80/MZ-80K/MZ-80C/MZ-700

    Copyright (C) 2012 Katsumi Morimatsu

       kmorimatsu@users.sourceforge.jp
  http://hp.vector.co.jp/authors/VA016157/

********************************************

̃Cu̓t[\tgEFAłBȂ͂At[\tgEF
AcɂĔsꂽGNU 򓙈ʌOp_(o[W2.1 
A]ɂĂ͂ȍ~̃o[Ŵǂꂩ)̒߂̉
ĔЕz܂͉ς邱Ƃł܂B

̃Cu͗Lpł邱ƂĔЕz܂A*S̖ۏ* 
łBƉ\̕ۏ؂̖ړIւ̓ḰAOɎꂽ̂
ߑS݂܂BڂGNU 򓙈ʌOp_񏑂
B
@
Ȃ͂̃CuƋɁAGNU 򓙈ʌOp_񏑂̕
ꕔ󂯎͂łB󂯎ĂȂ΁At[\tgEFA
c܂ŐĂ( the Free Software Foundation, Inc., 59
Temple Place, Suite 330, Boston, MA 02111-1307 USA)B

GNU 򓙈ʌOp_(o[W2.1)̔ȓ{́A
URLŉ{邱Ƃł邩܂B
http://www.opensource.gr.jp/lesser/lgpl.ja.html

LGPL(v2.1)ɊÂt[\tgEFAƂĈĔЕz\łB

Tv
KM-BASIĆAMZ-80K/MZ-80C/MZ-700yKM-Z80Ŏgp\ȁA^BASICłB
C^[v^[łAJITRpC`ŎŝŁAʏ̃C^[
v^[葬삵܂BGfB^[͌ÂBASICƓAsԍ`łB

_
MZ-80ḰASHARP1978NɔA8bitp[\iRs[^[łB
Aقړɔꂽ̃x[VbN}X^[AxĔ̔
ꂽNECPC-8001ƕŁAłBASICl̃xŎg}C
NRs[^[ƂāAꐢr܂B

MZ-80Kɂ́A}EXȂǂ̃|CeBOfoCX͂Ȃ̂́A
OtBbN\E͂邽߂̃fBXvCL[{[hA
\CPUłZ80A܂͑eʂł20 KBRAMœ܂
B

OLuƂăJZbge[vR[_[tĂ܂Bǂݏ
x͕ς1400{[łA͓̎嗬łJUXVeBX^
_[h300{[gƔׂāÂ悤ȑxłB܂AR[_[{̂
tĂ邽߂ɓǂݏ̈萫QłB

̂悤ɁAMZ-80ḰÃp[\iRs[^[{A
K͂ł̂́AقƂǔĂA{̃p[\iRs[^[̂
Ƃ鑶݂łBŁA̍\͂ăVvłA
SH}JĂ܂BMZ-80K̂́ARs[^[
쌴𗝉邤ŁAMdȂ̂łBp[\iRs[^[͂
AWɔW𐋂AɕGɂȂ܂B݂ł́Al̃xł
Rs[^[̑S̑c邱Ƃ́Av̕Xłƌ
ł傤B

AMZ-80K{̂w邱Ƃ͂ȂȂĂ܂i܂ɃI[N
Vɏoi邱Ƃ܂jBÃAbp[Rp`uł
MZ-700̃G~[^[(MZ-700 Emulator MZ700WIN For Windows)J
Ă̂ŁA݂łꂪǂȂ̂ł̂fm邱Ƃo܂B
܂AٍMZ-80KvJiKM-Z80; H}yуvOJς݁j
΁AMZ-80K̓Č邱Ƃo܂B

G~[^[⃌vJȂǂ𗘗pł΂ΖɂȂ
̂Ȁœ삷vOłBROMɂ{vOi
́Aj^[vOƌĂԂƂɂ܂j́ARs[^[̓ɕK{
łA̔ЁiMZ-80K̏ꍇ́ASHARPj쌠L邽߁A
IWĩRs[^[LĂ̂łȂAgp邱Ƃo
BApple ĨvJ̏ꍇAj^[vO쐬Zp҂狖
𓾂邱ƂŁA̖NA[Ă܂BMZ80K̏ꍇAIWi
j^[vO(SP-1002)Ƃ͒쌠̈قȂ郂j^[vO\
Ă(MZ-NEW MONITER)Ap邱Ƃł̖NA[Ă
B

MZ-80K̂悤ȃgRs[^[lŁAłBASIC
؂Ă؂藣Ȃ݂łBMZ-80Kpɂ́ASHARPIWiSP-5010
SP-5030Anh\\tgHu-BASICȂǂ܂BJZbge[v
ɓԂŔ̔Ă܂AA\tgEFA
邱Ƃ͂قƂǕs\łB

ŁAMZ-700G~[^[MZ-80KvJŎgp\BASICA
ɍ쐬邱Ƃɂ܂BI[v\[X̃t[\tgEFAƂČ
J܂̂ŁAǂȂłRɎgpłA܂Aς鎖\łBA
Zuł͂ȂACgĊJ܂̂ŁARpNgɂ͌܂
AςĎgp邱ƂeՂłB

gp@
Ytrelease.mztt@CA܂邭ijMZ-700 EmulatorŎgp
邩Â̂肳񐻍mzt2wavpwavt@CɕϊAMZ-80KȂ
̎@ŎgpĂBMZ-700 Emulatorymzt2wav̓́Ãt@
ĆuQlNvɂ܂B

KM-BASIC[hƁA

LOADING KM-BASIC
BASIC KM-1010
3FD61-CFFF
36906 BYTES FREE

ƕ\i̓o[WƊɈˑjBASICvO͉\
ԂɂȂ܂BsԍɑăR[h͂邱ƂŁAvO̕ҏW
\łBsԍȂăR[h͂ƁÃR[ĥ܂܎s
܂B

p\ȕϐ^
płϐ̌^́A16rbgt(-32768 ` +32767)ƁASO
̂̕QނłB̖[ɂ0x0Dt܂B

A-ẐQU̐^ϐp\łBƂĈꍇA$̂悤ɋL
q܂BAAi^jA$i^j𓯎Ɏgp邱Ƃ͏o
B

^̒萔́APOi@ŋLq܂BPUi@gꍇAu$1200v̂悤
ɁAɁu$vtĂB

̒萔́Au"vň͂ċLqĂBu"vgpꍇ́A
uCHR$($22)v̂悤ɋLq邱Ƃo܂B

߁
ȉAx, y, z͐lAx$, y$, z$͕w܂Bxxx, yyy, zzz, www
͔Cӂ̃Xe[ggw܂B[ ]͏ȗ\ŗL鎖܂B

ߓmu:vŋ؂邱ƂɂAsŕ̃R}h邱
o܂B

LIST [xxx] [-] [yyy]
	xxxsڂyyysڂ܂ł̃vO\B
RUN [xxx]
	vOsiw肳ꂽꍇAxxxsڂj
SAVE
	vOJZbge[vɕۑB
LOAD
	vOJZbge[vĂяoB
NEW
	vO
BYE
	MONITORvvgɖ߂
REM xxx
	sȂ
[LET] x=yyy
	yŎꂽvZʂAxɑBuLETv͏ȗB
[LET] x$=yyy
	yyyŎꂽi͘AʁjAx$ɑBuLETv͏ȗB
DIM xxx [, yyy [, zzz [, ... ]]]
	^̈ꎟz蓖ĂB
	xxx,yyy,zzźAႦ΁uA(10)v̂悤ɋLqB̏ꍇAA(0)
	A(10)܂ł̂PP̐^ϐmۂB
CLEAR
	ׂĂ̕^ϐƐ^zjAlOƂB
PRINT [ x܂x$ [ ,܂; [ y܂y$ [ ... ]]]]
	fBXvCɁAl܂͕\Bu;vgpꍇA
	̕\čsBu,vgpꍇAPOɋ؂
	ĕ\BǂgpȂꍇA̕\͍sςčsB
POKE x,y
	xŎ镨IAhXɁAyŎl(PoCgl)ށB
EXEC xxx[yyy[zzz[...]]]
	@BsBAxxx,yyy,zzz͂QHEXŎꂽPoCglB
IF x THEN yyy [ ELSE zzz ]
	xOȊÔƂAyyyAÔƂzzzs
FOR x=yyy TO zzz [ STEP www ]
NEXT
	yyyŎꂽvZʂxɑAx̒lzzzɂȂ܂ŎNEXT܂ł
	Xe[ggAJԂsBJԂ̂сAx̒lwww
	iȗꂽꍇ͂PjBuNEXTv̎ɉLqȂƂɒӁB
GOTO xxx
	xxxsڂɈړB
GOSUB xxx
	݂̎sʒuLAxxxsڂɈړB
RETURN
	ŌɎsꂽGOSUB̎̃Xe[ggɈړB
END
	BASICvvgɖ߂

֐
ȉAx, y, z͐lAx$, y$, z$͕w܂B[ ]͏ȗ\ŗL鎖
܂B

PEEK(x)
	xŎ镨AhXPoCgǂݎAԂB
RND()
	032767܂ł̋[ԂB
ABS(x)
	x̐ΒlԂB
SGN(x)
	x̕(-1, 0, ܂1)ԂB
NOT(x)
	x=0̏ꍇɂPAłȂꍇɂOԂB
INKEY()
	݉ĂL[ASCIIR[h(ĂȂꍇ͂O)ԂB
ASC(x$)
	̍ŏ̈ꕶ́AAXL[R[hԂB
LEN(x$)
	̒ԂB
STRNCMP(x$,y$,z)
	Q̂̕zrAʂԂB̏ꍇ͂OB
VAL(x$)
	10i16i\L̕𐮐ɕϊ
CHR$(x)
	xAXL[R[hƂ镶ԂB
HEX$(x [,y])
	x̒lAPUi̕ƂĕԂByw肳ꂽꍇAyoCg
	ɂȂB
DEC$(x)
	x̒lAPOi̕ƂĕԂB
INPUT$()
	L[͑҂ɂȂACRƁA͂ԂB
A$(x [,y])Ȃ
	x̒lȌꍇAŜԂB
	x̒l̏ꍇAxŎʒuE̕ԂB
	x̒l̂ƂẢExԂB
	yw肳ꂽꍇAy̕ԂB

Zq
x + y
	Z
x - y
	Z
x * y
	Z
x / y
	Z
x % y
	]
x = y
	Q̐lꍇɂPAłȂƂɂO
x != y
	Q̐lꍇɂOAłȂƂɂP
x < y
	xy菬ꍇɂPAłȂƂɂO
x <= y
	xy菬ꍇɂPAłȂƂɂO
x > y
	xy葽ꍇɂPAłȂƂɂO
x >= y
	xy葽ꍇɂPAłȂƂɂO
x AND y
	xy̒l̃rbgƂ ANDi_ςłȂƂɒӁj
x OR y
	xy̒l̃rbgƂ OR
x XOR y
	xy̒l̃rbgƂ XOR
x$ + y$
	̘AiLETł̂ݎgpj

[Xm[g

Ever 0.6.8 (BASIC KM-1000 3FB6-CFFF 36938 BYTES FREE) ŏ̌Jo[W
Ever 0.7.0 (BASIC KM-1001 3FB1-CFFF 36943 BYTES FREE) [48K
ꍇɑΉłȂsB
Ever 0.8.0 (BASIC KM-1010 3FD6-CFFF 36906 BYTES FREE) INKEY() VAL() 
INPUT$() DEC$() ̂S̊֐ǉB
Ever 0.8.1 (BASIC KM-1011 3FE0-CFFF 36896 BYTES FREE) ꕔ̖߂͂
ƃG[ɂȂsB
Ever 0.8.2 (BASIC KM-1012 4006-CFFF 36858 BYTES FREE) ^ϐ̎舵
ɂG[ƁASGN()֐̕sB
Ever 0.8.3 (BASIC KM-1013 401D-CFFF 36835 BYTES FREE) REM̎舵ɂ
oOCB

QlN

uEnri's Home PAGE (mz-80K)v
http://www43.tok2.com/home/cmpslv/Mz80k/EnrMzk.htm
Enrĩy[WBMZ-80KɊւāA܂܂ȉ͂ȂĂBMZ-80K
H}JĂB

uMZ-700 Emulator MZ700WIN For Windowsv
http://retropc.net/mz-memories/mz700/
MZ-700G~[^[ЉĂA܂邭ij̃y[WB
"MZ-NEW MONITOR""mzt2wav"̃_E[hAB

uKM-Z80v
http://www.recfor.net/blog/mycom/index.php?itemid=846
http://www.recfor.net/blog/mycom/index.php?itemid=885
http://www.recfor.net/blog/mycom/index.php?itemid=895
ٍMZ-80K݊}CȐЉy[WB

uKM-Z80 webv
http://hp.vector.co.jp/authors/VA016157/kmz80web10/
ٍ́AMZ-80K݊}CRHTML5ɂG~[^[B
