0001: ;-----------------------------------------------------------------------------
0002: ;ti-83 include file
0003: ;-----------------------------------------------------------------------------
0004: ; 27/06/05
0005: ;-----------------------------------------------------------------------------
0006: ;brandon wilson
0007: ;-----------------------------------------------------------------------------
0008: ; 19/08/12
0009: ;-----------------------------------------------------------------------------
0010: ;deeph
0011: ;-----------------------------------------------------------------------------
0012: #define bcall call
0013: #define bcallz call z,
0014: #define bcallnz call nz,
0015: #define bcallc call c,
0016: #define bcallnc call nc,
0017: #define bjump jp
0018:
0019: #define __bank_call 0000h
0020: #define __bank_entry 0000h
0021: #define __bank_ret 0000h
0022: #define __bank_jump 0000h
0023:
0024: ;rom calls
0025: ;------------------------------------
0026: #define _ldhlind 4000h
0027: #define _cphlde 4004h
0028: #define _divhlby10 4008h
0029: #define _divhlbya 400ch
0030: #define _kbdscan 4010h
0031: #define _getcsc 4014h
0032: #define _coormon 4018h
0033: #define _mon 401bh
0034: #define _monforcekey 401eh
0035: #define _sendkpress 4021h
0036: #define _jforcecmdnochar 4024h
0037: #define _jforcecmd 4027h
0038: #define _syserrhandler 402ah
0039: #define _newcontext 402eh
0040: #define _newcontext0 4032h
0041: #define _a2pointhlind 4036h
0042: #define _pointhlind 403ah
0043: #define _pputawayprompt 403eh
0044: #define _pputaway 4042h
0045: #define _putaway 4046h
0046: #define _sizewind 404ah
0047: #define _errorep 404eh
0048: #define _callmain 4052h
0049: #define _monerrhand 4056h
0050: #define _appinit 405ah
0051: #define _appinitifdec 405eh
0052: #define _initialize 4062h
0053: #define _lcd_busy 4066h
0054: #define _min 406ah
0055: #define _max 406eh
0056: #define _abso1pabso2 4072h
0057: #define _intgr 4076h
0058: #define _trunc 407ah
0059: #define _invsub 407eh
0060: #define _times2 4082h
0061: #define _plus1 4086h
0062: #define _minus1 408ah
0063: #define _fpsub 408eh
0064: #define _fpadd 4092h
0065: #define _dtor 4096h
0066: #define _rtod 409ah
0067: #define _cube 409eh
0068: #define _timespt5 40a2h
0069: #define _fpsquare 40a6h
0070: #define _fpmult 40aah
0071: #define _ljrnd 40aeh
0072: #define _invop1sc 40b2h
0073: #define _invop1s 40b6h
0074: #define _invop2s 40bah
0075: #define _frac 40beh
0076: #define _fprecip 40c2h
0077: #define _fpdiv 40c6h
0078: #define _sqroot 40cah
0079: #define _rndguard 40ceh
0080: #define _rnfx 40d2h
0081: #define _int 40d6h
0082: #define _round 40dah
0083: #define _lnx 40deh
0084: #define _logx 40e2h
0085: #define _ljnornd 40e6h
0086: #define _etox 40eah
0087: #define _tenx 40eeh
0088: #define _sincosrad 40f2h
0089: #define _sin 40f6h
0090: #define _cos 40fah
0091: #define _tan 40feh
0092: #define _sinhcosh 4102h
0093: #define _tanh 4106h
0094: #define _cosh 410ah
0095: #define _sinh 410eh
0096: #define _acosrad 4112h
0097: #define _atanrad 4116h
0098: #define _atan2rad 411ah
0099: #define _asinrad 411eh
0100: #define _acos 4122h
0101: #define _atan 4126h
0102: #define _asin 412ah
0103: #define _atan2 412eh
0104: #define _atanh 4132h
0105: #define _asinh 4136h
0106: #define _acosh 413ah
0107: #define _ptor 413eh
0108: #define _rtop 4142h
0109: #define _hltimes9 4146h
0110: #define _ckop1cplx 414ah
0111: #define _ckop1real 414eh
0112: #define _angle 4152h
0113: #define _cop1set0 4156h
0114: #define _cpop4op3 415ah
0115: #define _mov9op2cp 415eh
0116: #define _abso1o2cp 4162h
0117: #define _cpop1op2 4166h
0118: #define _op3toop4 416ah
0119: #define _op1toop4 416eh
0120: #define _op2toop4 4172h
0121: #define _op4toop2 4176h
0122: #define _op3toop2 417ah
0123: #define _op1toop3 417eh
0124: #define _op5toop2 4182h
0125: #define _op5toop6 4186h
0126: #define _op5toop4 418ah
0127: #define _op1toop2 418eh
0128: #define _op6toop2 4192h
0129: #define _op6toop1 4196h
0130: #define _op4toop1 419ah
0131: #define _op5toop1 419eh
0132: #define _op3toop1 41a2h
0133: #define _op6toop5 41a6h
0134: #define _op4toop5 41aah
0135: #define _op3toop5 41aeh
0136: #define _op2toop5 41b2h
0137: #define _op2toop6 41b6h
0138: #define _op1toop6 41bah
0139: #define _op1toop5 41beh
0140: #define _op2toop1 41c2h
0141: #define _movreg 41c6h
0142: #define _mov10b 41cah
0143: #define _mov9b 41ceh
0144: #define _mov18 41d2h
0145: #define _mov8b 41d6h
0146: #define _mov7b 41dah
0147: #define _mov14 41deh
0148: #define _mov6b 41e2h
0149: #define _mov5b 41e6h
0150: #define _mov4b 41eah
0151: #define _mov3b 41eeh
0152: #define _mov2b 41f2h
0153: #define _op2toop3 41f6h
0154: #define _op4toop3 41fah
0155: #define _op5toop3 41feh
0156: #define _op4toop6 4202h
0157: #define _mov9toop1 4206h
0158: #define _mov9op1op2 420ah
0159: #define _mov9toop2 420eh
0160: #define _movfrop1 4212h
0161: #define _op4set1 4216h
0162: #define _op3set1 421ah
0163: #define _op2set8 421eh
0164: #define _op2set5 4222h
0165: #define _op2seta 4226h
0166: #define _op2set4 422ah
0167: #define _op2set3 422eh
0168: #define _op1set1 4232h
0169: #define _op1set4 4236h
0170: #define _op1set3 423ah
0171: #define _op3set2 423eh
0172: #define _op1set2 4242h
0173: #define _op2set2 4246h
0174: #define _setnum2 424ah
0175: #define _setmant1 424eh
0176: #define _op2set1 4252h
0177: #define _setnum1 4256h
0178: #define _setnum 425ah
0179: #define _setnuma 425eh
0180: #define _setmant 4262h
0181: #define _zero16d 4266h
0182: #define _set16a 426ah
0183: #define _set14a 426eh
0184: #define _set14d 4272h
0185: #define _op5set0 4276h
0186: #define _op4set0 427ah
0187: #define _op3set0 427eh
0188: #define _op2set0 4282h
0189: #define _op1set0 4286h
0190: #define _setnum0 428ah
0191: #define _zeroop1 428eh
0192: #define _zeroop2 4292h
0193: #define _zeroop3 4296h
0194: #define _zeroop 429ah
0195: #define _clrlp 429eh
0196: #define _shracc 42a2h
0197: #define _shlacc 42a6h
0198: #define _shlacc 42a6h
0199: #define _shr18 42aah
0200: #define _shr18a 42aeh
0201: #define _shr16 42b2h
0202: #define _shr14 42b6h
0203: #define _shl16 42bah
0204: #define _shl14 42beh
0205: #define _srdo1 42c2h
0206: #define _shrdrnd 42c6h
0207: #define _mantpa 42cah
0208: #define _addprop 42ceh
0209: #define _addproplp 42d2h
0210: #define _add16d 42d6h
0211: #define _add14d 42dah
0212: #define _sub16d 42deh
0213: #define _sub14d 42e2h
0214: #define _op2exop6 42e6h
0215: #define _op5exop6 42eah
0216: #define _op1exop5 42eeh
0217: #define _op1exop6 42f2h
0218: #define _op2exop4 42f6h
0219: #define _op2exop5 42fah
0220: #define _op1exop3 42feh
0221: #define _op1exop4 4302h
0222: #define _op1exop2 4306h
0223: #define _exlp 430ah
0224: #define _ckop1c0 430eh
0225: #define _ckop1fp0 4312h
0226: #define _ckop2fp0 4316h
0227: #define _posno0int 431ah
0228: #define _ckposint 431eh
0229: #define _ckint 4322h
0230: #define _ckodd 4326h
0231: #define _ckop1m 432ah
0232: #define _getcon1 432eh
0233: #define _getcon 4332h
0234: #define _pidiv2 4336h
0235: #define _pidiv4 433ah
0236: #define _twopi 433eh
0237: #define _picon 4342h
0238: #define _pidiv4a 4346h
0239: #define _pidiv2a 434ah
0240: #define _exptohex 434eh
0241: #define _op1exptodec 4352h
0242: #define _ckop2pos 4356h
0243: #define _ckop1pos 435ah
0244: #define _clrop2s 435eh
0245: #define _clrop1s 4362h
0246: #define _fdiv100 4366h
0247: #define _fdiv10 436ah
0248: #define _deco1exp 436eh
0249: #define _inco1exp 4372h
0250: #define _incexp 4376h
0251: #define _ckvalidnum 437ah
0252: #define _getexp 437eh
0253: #define _htimesl 4382h
0254: #define _eop1notreal 4386h
0255: #define _thetaname 438ah
0256: #define _rname 438eh
0257: #define _regeqname 4392h
0258: #define _recurnname 4396h
0259: #define _xname 439ah
0260: #define _yname 439eh
0261: #define _tname 43a2h
0262: #define _realname 43a6h
0263: #define _setestofps 43aah
0264: #define _chktempdirt 43aeh
0265: #define _op1mop2exp 43b2h
0266: #define _op1expmde 43b6h
0267: #define _chkerrbreak 43bah
0268: #define _isa2bytetok 43beh
0269: #define _getlastentry 43c2h
0270: #define _getlastentryptr 43c6h
0271: #define _regrclrchng 43cah
0272: #define _resetwintop 43ceh
0273: #define _setyup 43d2h
0274: #define _setxup 43d6h
0275: #define _iso1nontlstorprog 43dah
0276: #define _iso1nontemplst 43deh
0277: #define _is_a_lstorclst 43e2h
0278: #define _chk_hl_999 43e6h
0279: #define _equ_or_newequ 43eah
0280: #define _get_plus1_save 43eeh
0281: #define _errd_op1notpos 43f2h
0282: #define _errd_op1not_r 43f6h
0283: #define _errd_op1notposint 43fah
0284: #define _errd_op1_le_0 43feh
0285: #define _errd_op1_0 4402h
0286: #define _findsym_get_size 4406h
0287: #define _sto_statvar 440ah
0288: #define _rcl_statvar 440eh
0289: #define _ckop2real 4412h
0290: #define _get_x_indirect 4416h
0291: #define _memchk 441ah
0292: #define _cmpprgnamlen1 441eh
0293: #define _cmpprgnamlen 4422h
0294: #define _findprogsym 4426h
0295: #define _chkfindsym 442ah
0296: #define _findsym 442eh
0297: #define _insertmem 4432h
0298: #define _insertmema 4436h
0299: #define _enoughmem 443ah
0300: #define _cmpmemneed 443eh
0301: #define _createpvar4 4442h
0302: #define _createpvar3 4446h
0303: #define _createvar3 444ah
0304: #define _createcplx 444eh
0305: #define _createreal 4452h
0306: #define _createtrlist 4456h
0307: #define _createrlist 445ah
0308: #define _createtclist 445eh
0309: #define _createclist 4462h
0310: #define _createtrmat 4466h
0311: #define _creatermat 446ah
0312: #define _createtstrng 446eh
0313: #define _createstrng 4472h
0314: #define _create0equ 4476h
0315: #define _createtequ 447ah
0316: #define _createequ 447eh
0317: #define _createpict 4482h
0318: #define _creategdb 4486h
0319: #define _createprog 448ah
0320: #define _chkdel 448eh
0321: #define _chkdela 4492h
0322: #define _adjparser 4496h
0323: #define _adjmath 449ah
0324: #define _adjm7 449eh
0325: #define _delmema 44a2h
0326: #define _get_form_num 44a6h
0327: #define _delvar 44aah
0328: #define _delvario 44aeh
0329: #define _delmem 44b2h
0330: #define _delvar3d 44b6h
0331: #define _delvar3c 44bah
0332: #define _delvar3dc 44beh
0333: #define _sym_prog_non_t_lst 44c2h
0334: #define _adjsymptrs 44c6h
0335: #define _datasizea 44cah
0336: #define _datasize 44ceh
0337: #define _popmcplxo1 44d2h
0338: #define _popmcplx 44d6h
0339: #define _movcplx 44dah
0340: #define _popop5 44deh
0341: #define _popop3 44e2h
0342: #define _popop1 44e6h
0343: #define _poprealo6 44eah
0344: #define _poprealo5 44eeh
0345: #define _poprealo4 44f2h
0346: #define _poprealo3 44f6h
0347: #define _poprealo2 44fah
0348: #define _poprealo1 44feh
0349: #define _popreal 4502h
0350: #define _fpopcplx 4506h
0351: #define _fpopreal 450ah
0352: #define _fpopfps 450eh
0353: #define _deallocfps 4512h
0354: #define _deallocfps1 4516h
0355: #define _allocfps 451ah
0356: #define _allocfps1 451eh
0357: #define _pushrealo6 4522h
0358: #define _pushrealo5 4526h
0359: #define _pushrealo4 452ah
0360: #define _pushrealo3 452eh
0361: #define _pushrealo2 4532h
0362: #define _pushrealo1 4536h
0363: #define _pushreal 453ah
0364: #define _pushop5 453eh
0365: #define _pushop3 4542h
0366: #define _pushmcplxo3 4546h
0367: #define _pushop1 454ah
0368: #define _pushmcplxo1 454eh
0369: #define _pushmcplx 4552h
0370: #define _exmcplxo1 4556h
0371: #define _exch9 455ah
0372: #define _cpyto1fps11 455eh
0373: #define _cpyto2fps5 4562h
0374: #define _cpyto1fps5 4566h
0375: #define _cpyto2fps6 456ah
0376: #define _cpyto1fps6 456eh
0377: #define _cpyto2fps7 4572h
0378: #define _cpyto1fps7 4576h
0379: #define _cpyto1fps8 457ah
0380: #define _cpyto2fps8 457eh
0381: #define _cpyto1fps10 4582h
0382: #define _cpyto1fps9 4586h
0383: #define _cpyto2fps4 458ah
0384: #define _cpyto6fps3 458eh
0385: #define _cpyto6fps2 4592h
0386: #define _cpyto2fps3 4596h
0387: #define _cpycto1fps3 459ah
0388: #define _cpyto1fps3 459eh
0389: #define _cpyfps3 45a2h
0390: #define _cpyto1fps4 45a6h
0391: #define _cpyto3fps2 45aah
0392: #define _cpyto5fpst 45aeh
0393: #define _cpyto6fpst 45b2h
0394: #define _cpyto4fpst 45b6h
0395: #define _cpyto3fpst 45bah
0396: #define _cpyto2fpst 45beh
0397: #define _cpyto1fpst 45c2h
0398: #define _cpyfpst 45c6h
0399: #define _cpystack 45cah
0400: #define _cpyto3fps1 45ceh
0401: #define _cpyto2fps1 45d2h
0402: #define _cpyto1fps1 45d6h
0403: #define _cpyfps1 45dah
0404: #define _cpyto2fps2 45deh
0405: #define _cpyto1fps2 45e2h
0406: #define _cpyfps2 45e6h
0407: #define _cpyo3tofpst 45eah
0408: #define _cpyo2tofpst 45eeh
0409: #define _cpyo6tofpst 45f2h
0410: #define _cpyo1tofpst 45f6h
0411: #define _cpytofpst 45fah
0412: #define _cpytostack 45feh
0413: #define _cpyo3tofps1 4602h
0414: #define _cpyo5tofps1 4606h
0415: #define _cpyo2tofps1 460ah
0416: #define _cpyo1tofps1 460eh
0417: #define _cpytofps1 4612h
0418: #define _cpyo2tofps2 4616h
0419: #define _cpyo3tofps2 461ah
0420: #define _cpyo6tofps2 461eh
0421: #define _cpyo1tofps2 4622h
0422: #define _cpytofps2 4626h
0423: #define _cpyo5tofps3 462ah
0424: #define _cpyo2tofps3 462eh
0425: #define _cpyo1tofps3 4632h
0426: #define _cpytofps3 4636h
0427: #define _cpyo1tofps6 463ah
0428: #define _cpyo1tofps7 463eh
0429: #define _cpyo1tofps5 4642h
0430: #define _cpyo2tofps4 4646h
0431: #define _cpyo1tofps4 464ah
0432: #define _errnotenoughmem 464eh
0433: #define _fpsminus9 4652h
0434: #define _hlminus9 4656h
0435: #define _erroverflow 465ah
0436: #define _errdivby0 465dh
0437: #define _errsingularmat 4660h
0438: #define _errdomain 4663h
0439: #define _errincrement 4666h
0440: #define _errnon_real 4669h
0441: #define _errsyntax 466ch
0442: #define _errdatatype 466fh
0443: #define _errargument 4672h
0444: #define _errdimmismatch 4675h
0445: #define _errdimension 4678h
0446: #define _errundefined 467bh
0447: #define _errmemory 467eh
0448: #define _errinvalid 4681h
0449: #define _errbreak 4684h
0450: #define _errstat 4687h
0451: #define _errsignchange 468ah
0452: #define _erriterations 468dh
0453: #define _errbadguess 4690h
0454: #define _errtoltoosmall 4693h
0455: #define _errstatplot 4696h
0456: #define _errlinkxmit 4699h
0457: #define _jerror 469ch
0458: #define _jerrorno 469fh
0459: #define _noerrorentry 46a2h
0460: #define _pusherrorhandler 46a5h
0461: #define _poperrorhandler 46a9h
0462: #define _strcopy 46adh
0463: #define _strcat 46b1h
0464: #define _isinset 46b5h
0465: #define _sdone 46b9h
0466: #define _serrort 46bdh
0467: #define _snameeq 46c1h
0468: #define _sunderscr 46c5h
0469: #define _sfail 46c9h
0470: #define _sname 46cdh
0471: #define _sok 46d1h
0472: #define _seqn 46d5h
0473: #define _sselect 46d9h
0474: #define _stransmit 46ddh
0475: #define _srecurn 46e1h
0476: #define _geqnamea 46e5h
0477: #define _recname 46e9h
0478: #define ___bank_call 46edh
0479: #define ___bank_ret 46f1h
0480: #define ___bank_jump 46f5h
0481: #define ___bank_entry 46f9h
0482: #define _readdisp2 46fdh
0483: #define _putmap 4701h
0484: #define _putc 4705h
0485: #define _disphl 4709h
0486: #define _puts 470dh
0487: #define _putpsb 4711h
0488: #define _putps 4715h
0489: #define _wputps 4719h
0490: #define _putbuf 471dh
0491: #define _putbuf1 4721h
0492: #define _wputc 4725h
0493: #define _wputs 4729h
0494: #define _wputseol 472dh
0495: #define _wdispeol 4731h
0496: #define _whomeup 4735h
0497: #define _setnumwindow 4739h
0498: #define _newline 473dh
0499: #define _movedown 4741h
0500: #define _scrollup 4745h
0501: #define _shrinkwindow 4749h
0502: #define _moveup 474dh
0503: #define _scrolldown 4751h
0504: #define _clrlcdfull 4755h
0505: #define _clrlcd 4759h
0506: #define _clrscrnfull 475dh
0507: #define _clrscrn 4761h
0508: #define _clrtxtshd 4765h
0509: #define _clrwindow 4769h
0510: #define _eraseeol 476dh
0511: #define _eraseeow 4771h
0512: #define _homeup 4775h
0513: #define _getcurloc 4779h
0514: #define _vputmap 477dh
0515: #define _vputs 4781h
0516: #define _vputsn 4785h
0517: #define _vputsng 4789h
0518: #define _vputsnt 478dh
0519: #define _runindicon 4791h
0520: #define _runindicoff 4795h
0521: #define _savecmdshadow 4799h
0522: #define _saveshadow 479dh
0523: #define _rstrshadow 47a1h
0524: #define _rstrpartial 47a5h
0525: #define _rstrcurrow 47a9h
0526: #define _rstrundermenu 47adh
0527: #define _rstrbotrow 47b1h
0528: #define _savetr 47b5h
0529: #define _restoretr 47b9h
0530: #define _getkeypress 47bdh
0531: #define _gettoklen 47c1h
0532: #define _get_tok_strng 47c5h
0533: #define _gettokstring 47c9h
0534: #define _putbpatbuf2 47cdh
0535: #define _putbpatbuf 47d1h
0536: #define _putbpat 47d5h
0537: #define _putccheckscroll 47d9h
0538: #define _dispeol 47ddh
0539: #define _fdispeol 47e1h
0540: #define _makerowcmd 47e5h
0541: #define _totostrp 47e9h
0542: #define _setvarname 47edh
0543: #define _dispdone 47f1h
0544: #define _dispdone 47f1h
0545: #define _finishoutput 47f5h
0546: #define _curblink 47f9h
0547: #define _cursoroff 47fdh
0548: #define _hidecursor 4801h
0549: #define _cursoron 4805h
0550: #define _showcursor 4809h
0551: #define _keytostring 480dh
0552: #define _pulldownchk 4811h
0553: #define _menucatcommon 4815h
0554: #define _zifcatalog 4819h
0555: #define _zifmatrixmenu 481dh
0556: #define _loadcurcat 4821h
0557: #define _ncifprgmedmode 4825h
0558: #define _loadmenunum 4829h
0559: #define _loadmenunuml 482dh
0560: #define _menuedkey 4831h
0561: #define _mencatret 4835h
0562: #define _notalphnum 4839h
0563: #define _savesavedflags 483dh
0564: #define _setmenuflags 4841h
0565: #define _rstrsomeflags 4845h
0566: #define _rstrsmalltext 4849h
0567: #define _displistname 484dh
0568: #define _seeiferrorcx 4851h
0569: #define _rstroscreen 4855h
0570: #define _saveoscreen 4859h
0571: #define _displalphaname 485dh
0572: #define _abortprgmode 4861h
0573: #define _is_fullcntx 4865h
0574: #define _adrmrow 4869h
0575: #define _adrmele 486dh
0576: #define _getmatop1a 4871h
0577: #define _getm1toop1 4875h
0578: #define _getm1top1a 4879h
0579: #define _getmtoop1 487dh
0580: #define _puttom1a 4881h
0581: #define _puttoma1 4885h
0582: #define _puttomat 4889h
0583: #define _mat_el_div 488dh
0584: #define _cmatfun 4891h
0585: #define _rowech_poly 4895h
0586: #define _rowechelon 4899h
0587: #define _adrlele 489dh
0588: #define _getl1toop1 48a1h
0589: #define _getl1top1a 48a5h
0590: #define _getltoop1 48a9h
0591: #define _getl1toop2 48adh
0592: #define _getl1top2a 48b1h
0593: #define _getl2top1a 48b5h
0594: #define _puttola1 48b9h
0595: #define _puttol 48bdh
0596: #define _maxminlst 48c1h
0597: #define _llow 48c5h
0598: #define _lhigh 48c9h
0599: #define _lsum 48cdh
0600: #define _cumsum 48d1h
0601: #define _tofrac 48d5h
0602: #define _seqset 48d9h
0603: #define _seqsolve 48ddh
0604: #define _cmp_num_init 48e1h
0605: #define _binopexec 48e5h
0606: #define _exmean1 48e9h
0607: #define _set2mvlptrs 48edh
0608: #define _setmat1 48f1h
0609: #define _createtlist 48f5h
0610: #define _unopexec 48f9h
0611: #define _threeexec 48fdh
0612: #define _restoreerrno 4901h
0613: #define _fourexec 4904h
0614: #define _fiveexec 4908h
0615: #define _cpyto2es1 490ch
0616: #define _cpyto6es1 4910h
0617: #define _cpyto1es1 4914h
0618: #define _cpyto3es1 4918h
0619: #define _cpyto3es2 491ch
0620: #define _cpyto2es2 4920h
0621: #define _cpyto1es2 4924h
0622: #define _cpyto2es3 4928h
0623: #define _cpyto1es3 492ch
0624: #define _cpyto3es4 4930h
0625: #define _cpyto6es3 4934h
0626: #define _cpyto2es4 4938h
0627: #define _cpyto1es4 493ch
0628: #define _cpyto2es5 4940h
0629: #define _cpyto1es5 4944h
0630: #define _cpyto4est 4948h
0631: #define _cpyto2est 494ch
0632: #define _cpyto1est 4950h
0633: #define _cpyto2es6 4954h
0634: #define _cpyto1es6 4958h
0635: #define _cpyto2es7 495ch
0636: #define _cpyto1es7 4960h
0637: #define _cpyto2es8 4964h
0638: #define _cpyto1es8 4968h
0639: #define _cpyto1es9 496ch
0640: #define _cpyto2es9 4970h
0641: #define _cpyto2es10 4974h
0642: #define _cpyto1es10 4978h
0643: #define _cpyto2es11 497ch
0644: #define _cpyto1es11 4980h
0645: #define _cpyto2es12 4984h
0646: #define _cpyto1es12 4988h
0647: #define _cpyto2es13 498ch
0648: #define _cpyto1es13 4990h
0649: #define _cpyto1es14 4994h
0650: #define _cpyto1es16 4998h
0651: #define _cpyto1es17 499ch
0652: #define _cpyto1es18 49a0h
0653: #define _cpyto1es15 49a4h
0654: #define _cpyto2es15 49a8h
0655: #define _cpyo1toest 49ach
0656: #define _cpyo1toes1 49b0h
0657: #define _cpyo6toes1 49b4h
0658: #define _cpyo6toes3 49b8h
0659: #define _cpyo1toes2 49bch
0660: #define _cpyo2toes2 49c0h
0661: #define _cpyo1toes3 49c4h
0662: #define _cpyo1toes4 49c8h
0663: #define _cpyo1toes5 49cch
0664: #define _cpyo1toes6 49d0h
0665: #define _cpyo1toes7 49d4h
0666: #define _cpyo2toes4 49d8h
0667: #define _cpyo2toes5 49dch
0668: #define _cpyo2toes6 49e0h
0669: #define _cpyo2toes7 49e4h
0670: #define _cpyo2toes8 49e8h
0671: #define _cpyo2toes9 49ech
0672: #define _cpyo1toes8 49f0h
0673: #define _cpyo1toes9 49f4h
0674: #define _cpyo1toes10 49f8h
0675: #define _cpyo1toes11 49fch
0676: #define _cpyo1toes12 4a00h
0677: #define _cpyo1toes13 4a04h
0678: #define _cpyo1toes14 4a08h
0679: #define _cpyo1toes15 4a0ch
0680: #define _evalf3a 4a10h
0681: #define complex_exec 4a14h
0682: #define _getk 4a18h
0683: #define _settitle 4a1ch
0684: #define _dispvarval 4a20h
0685: #define _recalled 4a24h
0686: #define _setupbuffer 4a28h
0687: #define _createnumeditbuf 4a2ch
0688: #define _callcommon 4a30h
0689: #define _commonkeys 4a34h
0690: #define _leftmore 4a37h
0691: #define _fdel 4a3ah
0692: #define _fclear 4a3eh
0693: #define _finsdisp 4a42h
0694: #define _finsdisp02 4a45h
0695: #define _setindicator 4a49h
0696: #define _closeeditbufno 4a4dh
0697: #define _releasebuffer 4a51h
0698: #define _varnametoop1hl 4a55h
0699: #define _nametoop1 4a59h
0700: #define _numpputaway 4a5dh
0701: #define _numredisp 4a61h
0702: #define _numerror02 4a65h
0703: #define _load_sfont 4a68h
0704: #define _sfont_len 4a6ch
0705: #define _initnumvec 4a70h
0706: #define _setxxop1 4a74h
0707: #define _setxxop2 4a78h
0708: #define _setxxxxop2 4a7ch
0709: #define _uclines 4a80h
0710: #define _cline 4a84h
0711: #define _clines 4a88h
0712: #define _xrooty 4a8ch
0713: #define _ytox 4a90h
0714: #define _zmstats 4a94h
0715: #define _point_stat_hlp 4a98h
0716: #define _drawsplot 4a9ch
0717: #define _initnewtracep 4aa0h
0718: #define _splotcoord 4aa4h
0719: #define _splotright 4aa8h
0720: #define _splotleft 4aach
0721: #define _cmpboxinfo 4ab0h
0722: #define _nextplot 4ab4h
0723: #define _prevplot 4ab8h
0724: #define _clrprevplot 4abch
0725: #define _put_index_lst 4ac0h
0726: #define _get_index_lst 4ac4h
0727: #define _heap_sort 4ac8h
0728: #define _stogdb2 4acch
0729: #define _rclgdb2 4ad0h
0730: #define _circcmd 4ad4h
0731: #define _grphcirc 4ad8h
0732: #define _mov18b 4adch
0733: #define _darkline 4ae0h
0734: #define _iline 4ae4h
0735: #define _ipoint 4ae8h
0736: #define _xyrndboth 4aech
0737: #define _xyrnd 4af0h
0738: #define _checktop 4af4h
0739: #define _checkxy 4af8h
0740: #define _darkpnt 4afch
0741: #define _cpoints 4b00h
0742: #define _wtov 4b04h
0743: #define _vtowhlde 4b08h
0744: #define _xitof 4b0ch
0745: #define _yftoi 4b10h
0746: #define _xftoi 4b14h
0747: #define _traceoff 4b18h
0748: #define _grredisp 4b1ch
0749: #define _gdisptoken 4b20h
0750: #define _grdecoda 4b24h
0751: #define _labcoor 4b28h
0752: #define _coordisp 4b2ch
0753: #define _tmpequnosrc 4b30h
0754: #define _grlabels 4b34h
0755: #define _ypixset 4b38h
0756: #define _xpixset 4b3ch
0757: #define _copyrng 4b40h
0758: #define _valcur 4b44h
0759: #define _grputaway 4b48h
0760: #define _rstgflags 4b4ch
0761: #define _grreset 4b50h
0762: #define _xycent 4b54h
0763: #define _zoomxycmd 4b58h
0764: #define _cptdely 4b5ch
0765: #define _cptdelx 4b60h
0766: #define _setfuncm 4b64h
0767: #define _setseqm 4b68h
0768: #define _setpolm 4b6ch
0769: #define _setparm 4b70h
0770: #define _zmint 4b74h
0771: #define _zmdecml 4b78h
0772: #define _zmprev 4b7ch
0773: #define _zmusr 4b80h
0774: #define _setuzm 4b84h
0775: #define _zmfit 4b88h
0776: #define _zmsquare 4b8ch
0777: #define _zmtrig 4b90h
0778: #define _setxminmax 4b94h
0779: #define _zoodefault 4b98h
0780: #define _copygbuf 4b9ch
0781: #define _drawsplitline 4ba0h
0782: #define _restoredisp 4ba4h
0783: #define _fnddb 4ba8h
0784: #define _alleq 4bach
0785: #define _fndallseleq 4bb0h
0786: #define _nexteq 4bb4h
0787: #define _preveq 4bb8h
0788: #define _blinkgcur 4bbch
0789: #define _nbcursor 4bc0h
0790: #define _statmark 4bc4h
0791: #define _chktextcurs 4bc8h
0792: #define _regraph 4bcch
0793: #define _dorefflags02 4bd0h
0794: #define _initnseq 4bd4h
0795: #define _yres 4bd8h
0796: #define _plotptxy2 4bdch
0797: #define _ceiling 4be0h
0798: #define _putxy 4be4h
0799: #define _putequno 4be7h
0800: #define _pdspgrph 4bebh
0801: #define _pdspgrph 4bebh
0802: #define _horizcmd 4befh
0803: #define _vertcmd 4bf3h
0804: #define _linecmd 4bf7h
0805: #define _unlinecmd 4bfbh
0806: #define _pointcmd 4bffh
0807: #define _pixeltest 4c03h
0808: #define _pixelcmd 4c07h
0809: #define _tanlnf 4c0bh
0810: #define _drawcmd_init 4c0fh
0811: #define _drawcmd 4c13h
0812: #define _shadecmd 4c17h
0813: #define _invcmd 4c1bh
0814: #define _statshade 4c1fh
0815: #define _dspmattable 4c23h
0816: #define _dsplsts 4c27h
0817: #define _closeeditbuf 4c2bh
0818: #define _parseeditbuf 4c2fh
0819: #define _putsm 4c33h
0820: #define _dspcurtbl 4c37h
0821: #define _dspgrtbl 4c3bh
0822: #define _zerotemplate 4c3fh
0823: #define _settblrefs 4c43h
0824: #define _disptblbot 4c47h
0825: #define _disptbltop 4c4bh
0826: #define _disptblbody 4c4fh
0827: #define _vputblank 4c53h
0828: #define _vputblank 4c53h
0829: #define _tbltrace 4c57h
0830: #define _displistnamey 4c5bh
0831: #define _curnamelength 4c5fh
0832: #define _nametobuf 4c63h
0833: #define _jpromptcursor 4c67h
0834: #define _bufleft 4c6ah
0835: #define _bufright 4c6eh
0836: #define _bufinsert 4c72h
0837: #define _bufqueuechar 4c76h
0838: #define _bufreplace 4c7ah
0839: #define _bufdelete 4c7eh
0840: #define _bufpeek 4c82h
0841: #define _bufpeek1 4c86h
0842: #define _bufpeek2 4c8ah
0843: #define _bufpeek3 4c8eh
0844: #define _buftobtm 4c92h
0845: #define _setupeditequ 4c96h
0846: #define _buftotop 4c9ah
0847: #define _iseditfull 4c9eh
0848: #define _iseditempty 4ca2h
0849: #define _isattop 4ca6h
0850: #define _isatbtm 4caah
0851: #define _bufclear 4caeh
0852: #define _jcursorfirst 4cb2h
0853: #define _jcursorlast 4cb5h
0854: #define _cursorleft 4cb8h
0855: #define _jcursorright 4cbch
0856: #define _jcursorup 4cbfh
0857: #define _cursordown 4cc2h
0858: #define _cursortooffset 4cc6h
0859: #define _insdisp 4ccah
0860: #define _fdispbol1 4cceh
0861: #define _fdispbol 4cd2h
0862: #define _dispeow 4cd6h
0863: #define _disphead 4cdah
0864: #define _disptail 4cdeh
0865: #define _puttokstring 4ce2h
0866: #define _setupeditcmd 4ce6h
0867: #define _setemptyeditequ 4ceah
0868: #define _setemptyeditptr 4ceeh
0869: #define _closeeditequ 4cf2h
0870: #define _toggleins 4cf6h
0871: #define _getprevtok 4cfah
0872: #define _getkey 4cfeh
0873: #define _getkey 4cfeh
0874: #define _canindic 4d02h
0875: #define _lcd_driveron 4d06h
0876: #define _dfmin2 4d0ah
0877: #define _formdisp 4d0eh
0878: #define _formmatrix 4d12h
0879: #define _wscrollleft 4d16h
0880: #define _wscrollup 4d1ah
0881: #define _wscrolldown 4d1eh
0882: #define _wscrollright 4d22h
0883: #define _formereal 4d26h
0884: #define _formerealtok 4d2ah
0885: #define _formdcplx 4d2eh
0886: #define _formreal 4d32h
0887: #define _formscrollup 4d36h
0888: #define _setwinabove 4d3ah
0889: #define _disarmscroll 4d3eh
0890: #define _op1toedit 4d42h
0891: #define _mintoedit 4d46h
0892: #define _rclvartoedit 4d4ah
0893: #define _rclvartoeditptr 4d4eh
0894: #define _rclentrytoedit 4d52h
0895: #define _rcltoqueue 4d56h
0896: #define _formtotok 4d5ah
0897: #define _disp_interval 4d5eh
0898: #define _displstname 4d62h
0899: #define _dispslstnamehl 4d66h
0900: #define _editequ 4d6ah
0901: #define _closeequfield 4d6eh
0902: #define _autoselect 4d72h
0903: #define _dispyeos 4d76h
0904: #define _dispnumeos 4d7ah
0905: #define _setupdispeq 4d7eh
0906: #define _dispforward 4d82h
0907: #define _dispyprompt2 4d86h
0908: #define _stringwidth 4d8ah
0909: #define _disperrorscreen 4d8eh
0910: #define _popcx 4d92h
0911: #define _loadnoeentry 4d96h
0912: #define _savescreen 4d9ah
0913: #define _retscreen 4d9eh
0914: #define _retscreenerr 4da2h
0915: #define _splitchange 4da6h
0916: #define _solveredisp 4daah
0917: #define _solvedisp 4daeh
0918: #define _itemname 4db2h
0919: #define _setnorm_vals 4db6h
0920: #define _setvert_vals 4dbah
0921: #define _convkeytotok 4dbeh
0922: #define _keytotoknew2b 4dc2h
0923: #define _keytotok2byte 4dc6h
0924: #define _toktokey 4dcah
0925: #define _load_lfont 4dceh
0926: #define _send1berr 4dd2h
0927: #define _getvarcmd 4dd6h
0928: #define _sendvarcmd 4ddah
0929: #define _printscreen 4ddeh
0930: #define _keyscnlnk 4de2h
0931: #define _ioresetall 4de6h
0932: #define _delres 4deah
0933: #define _convlctolr 4deeh
0934: #define _redimmat 4df2h
0935: #define _inclstsize 4df6h
0936: #define _insertlist 4dfah
0937: #define _dellistel 4dfeh
0938: #define _editprog 4e02h
0939: #define _closeprog 4e06h
0940: #define _clrgraphref 4e0ah
0941: #define _fixtempcnt 4e0eh
0942: #define _savedata 4e12h
0943: #define _restoredata 4e16h
0944: #define _findalphaup 4e1ah
0945: #define _findalphadn 4e1eh
0946: #define _cmpsyms 4e22h
0947: #define _createtemp 4e26h
0948: #define _cleanall 4e2ah
0949: #define _movetonextsym 4e2eh
0950: #define _convlrtolc 4e32h
0951: #define _tblscreendn 4e36h
0952: #define _tblscreenup 4e3ah
0953: #define _screenup 4e3eh
0954: #define _screenupdown 4e42h
0955: #define _zifrclhandler 4e46h
0956: #define _zifrclkapp 4e4ah
0957: #define _rclkeyrtn 4e4eh
0958: #define _rclkey 4e52h
0959: #define _rclregeq_call 4e55h
0960: #define _rclregeq 4e59h
0961: #define _initnameprompt 4e5ch
0962: #define _nameprompt2 4e60h
0963: #define _catalogchk 4e64h
0964: #define _clrtr 4e68h
0965: #define _quad 4e6ch
0966: #define _graphquad 4e70h
0967: #define _bc2nonreal 4e74h
0968: #define _errnonreal 4e78h
0969: #define _write_text 4e7ch
0970: #define _forseqinit 4e80h
0971: #define _grphpars 4e84h
0972: #define _plotpars 4e88h
0973: #define _parseinp 4e8ch
0974: #define _parseoff 4e90h
0975: #define _parsescan 4e94h
0976: #define _getparse 4e98h
0977: #define _saveparse 4e9ch
0978: #define _initpflgs 4ea0h
0979: #define _ckendlinerr 4ea4h
0980: #define _op2set60 4ea8h
0981: #define _getstatptr 4each
0982: #define _cmp_statptr 4eb0h
0983: #define _varsysadr 4eb4h
0984: #define _stosystok 4eb8h
0985: #define _stoans 4ebch
0986: #define _stotheta 4ec0h
0987: #define _stor 4ec4h
0988: #define _stoy 4ec8h
0989: #define _ston 4ecch
0990: #define _stot 4ed0h
0991: #define _stox 4ed4h
0992: #define _stoother 4ed8h
0993: #define _rclans 4edch
0994: #define _rcly 4ee0h
0995: #define _rcln 4ee4h
0996: #define _rclx 4ee8h
0997: #define _rclvarsym 4eech
0998: #define _rclsystok 4ef0h
0999: #define _stmatel 4ef4h
1000: #define _stlstvecel 4ef8h
1001: #define _convop1 4efch
1002: #define _isaletter 4f00h
1003: #define _find_parse_formula 4f04h
1004: #define _parse_formula 4f08h
1005: #define _strngent1 4f0ch
1006: #define _getnumlet 4f15h
1007: #define _init_prog_list 4f1eh
1008: #define _prgrdlp 4f27h
1009: #define _varent 4f30h
1010: #define _rclstat 4f39h
1011: #define _parseloop 4f42h
1012: #define _parseonc 4f4bh
1013: #define _parseon 4f52h
1014: #define _parsecmd 4f5ah
1015: #define _stotype 4f61h
1016: #define _createpair 4f6ah
1017: #define _pushnum 4f73h
1018: #define _inccurpcerrend 4f7ch
1019: #define _errend 4f85h
1020: #define _commaerrf 4f8eh
1021: #define _commaerr 4f97h
1022: #define _steqarg2 4fa0h
1023: #define _steqarg 4fa9h
1024: #define _inparg 4fb2h
1025: #define _steqarg3 4fbbh
1026: #define _nxtfetch 4fc4h
1027: #define _ckfetchvar 4fcdh
1028: #define _fetchvara 4fd6h
1029: #define parser_exec 4fdfh
1030: #define _fetchvar 4fe3h
1031: #define _ckendlin 4fech
1032: #define _ckendexp 4ff5h
1033: #define _ckparsend 4ffeh
1034: #define _stotypearg 5007h
1035: #define _convdim 5010h
1036: #define _convdim00 5019h
1037: #define _aheadequal 5022h
1038: #define _parsaheads 502bh
1039: #define _parsahead 5034h
1040: #define _ansname 503dh
1041: #define _stocmpreals 5046h
1042: #define _getdeptr 504fh
1043: #define _push2boper 5058h
1044: #define _pop2boper 5061h
1045: #define _pushoper 506ah
1046: #define _popoper 5073h
1047: #define _find_e_undef 507ch
1048: #define _sttmpeq 5085h
1049: #define _findeol 508eh
1050: #define _brkinc 5097h
1051: #define _incfetch 50a0h
1052: #define _curfetch 50a9h
1053: #define pgmio_exec 50b2h
1054: #define _random 50b6h
1055: #define _storand 50bah
1056: #define _randinit 50beh
1057: #define _resetstacks 50c2h
1058: #define _factorial 50c6h
1059: #define _yonoff 50cah
1060: #define _eqselunsel 50ceh
1061: #define _itsolver 50d2h
1062: #define _gritsolver 50d6h
1063: #define _itsolverb 50dah
1064: #define _itsolvernb 50deh
1065: #define _extest_int 50e2h
1066: #define _dist_fun 50e6h
1067: #define _loggamma 50eah
1068: #define _onevar 50eeh
1069: #define _onevars_0 50f2h
1070: #define _ordstat 50f6h
1071: #define _initstatans2 50fah
1072: #define _anova_spec 50feh
1073: #define _exec_assembly 5102h
1074: #define _outputexpr 5106h
1075: #define _centcursor 510ah
1076: #define _text 5113h
1077: #define _finishspec 511ch
1078: #define _trcyfunc 5125h
1079: #define _rcl_seq_x 512eh
1080: #define _rclseq2 5137h
1081: #define _grpputaway 5140h
1082: #define _ckvaldelx 5149h
1083: #define _ckvaldelta 5152h
1084: #define _grbufclr 515bh
1085: #define _copygbuf_v 5164h
1086: #define _fndseleq 516dh
1087: #define _clrgraphxy 5176h
1088: #define _next_y_style 517fh
1089: #define graph_exec 5188h
1090: #define _plotpt 518ch
1091: #define _newindep 5195h
1092: #define _axes 519eh
1093: #define _setpenx 51a7h
1094: #define _setpeny 51b0h
1095: #define _setpent 51b9h
1096: #define _tan_equ_disp 51c2h
1097: #define _putans 51cbh
1098: #define _dispop1a 51d4h
1099: #define _mathtanln 51ddh
1100: #define _enddraw 51e6h
1101: #define io_exec 51efh
1102: #define execute_z80 52e5h
1103:
1104: ;ram equates
1105: ;------------------------------------
1106: #define currow 800ch
1107: #define curcol 800dh
1108: #define op1 8039h
1109: #define op1+1 803ah
1110: #define op1m 803bh
1111: #define op2 8044h
1112: #define op2exp 8045h
1113: #define op2m 8046h
1114: #define op3 804fh
1115: #define op3exp 8050h
1116: #define op3m 8051h
1117: #define op3ext 8058h
1118: #define op4 805ah
1119: #define op4exp 805bh
1120: #define op4m 805ch
1121: #define op4ext 8063h
1122: #define op5 8065h
1123: #define op5exp 8066h
1124: #define op5m 8067h
1125: #define op5ext 806eh
1126: #define op6 8070h
1127: #define op6exp 8071h
1128: #define op6m 8072h
1129: #define op6ext 8079h
1130: #define imathptr1 8094h
1131: #define imathptr2 8096h
1132: #define imathptr3 8098h
1133: #define imathptr4 809ah
1134: #define imathptr5 809ch
1135: #define pencol 8252h
1136: #define penrow 8253h
1137: #define usermem_offset 8565h
1138: #define curcy 886dh
1139: #define curgx 886eh
1140: #define progptr 9319h
1141: #define symtable fe6eh
1142:
1143: ;address of lcd driver instruction port
1144: ;--------------------------------------
1145: #define lcdinstport 10h
1146:
1147: ;screen shadows
1148: ;------------------------------------
1149: #define textshadow 80c9h
1150: #define cmdshadow 9157h
1151:
1152: ;graph backup buffer
1153: ;------------------------------------
1154: #define plotsscreen 8e29h
1155: #define gbuf plotsscreen
1156: #define graphbuffer gbuf
1157:
1158: ;safe ram locations
1159: ;------------------------------------
1160: #define savesscreen 8265h
1161: #define statvars 858fh
1162:
1163: ;indirect call byte
1164: ;------------------------------------
1165: #define asm_ind_call 80c8h
1166:
1167: ;link port write equates
1168: ;------------------------------------
1169: #define d0ld1l 0c3h
1170: #define d0ld1h 0c1h
1171: #define d0hd1l 0c2h
1172: #define d0hd1h 0c0h
1173: #define bport 0
1174:
1175: ;system flag equates
1176: ;------------------------------------
1177: #define trigfslags 0
1178: #define trigdeg 2
1179: ;
1180: #define plotflags 2
1181: #define plotloc 1
1182: #define plotdisp 2
1183: ;
1184: #define grfmodeflags 2
1185: #define grffuncm 4
1186: #define grfpolarm 5
1187: #define grfparamm 6
1188: #define grfrecurm 7
1189: ;
1190: #define graphflags 3
1191: #define graphdraw 0
1192: #define graphcursor 2
1193: ;
1194: #define grfdbflags 4
1195: #define grfdot 0
1196: #define grfsimul 1
1197: #define grfgrid 2
1198: #define grfpolar 3
1199: #define grfnocoord 4
1200: #define grfnoaxis 5
1201: #define grflabel 6
1202: ;
1203: #define textflags 5
1204: #define texterasebelow 1
1205: #define textscrolled 2
1206: #define textinverse 3
1207: ;
1208: #define onflags 9
1209: #define onrunning 3
1210: #define oninterrupt 4
1211: ;
1212: #define statflags 9
1213: #define statsvalid 6
1214: ;
1215: #define fmtflags 10
1216: #define fmtexponent 0
1217: #define fmteng 1
1218: ;
1219: #define nummode 10
1220: #define fmtreal 5
1221: #define fmtrect 6
1222: #define fmtpolar 7
1223: ;
1224: #define curflags 12
1225: #define curable 2
1226: #define curon 3
1227: #define curlock 4
1228: ;
1229: #define appflags 13
1230: #define apptextsave 1
1231: #define appautoscroll 2
1232: ;
1233: #define plotflag2 17
1234: #define expr_param 3
1235: #define expr_writing 4
1236: ;
1237: #define indicflags 18
1238: #define indicrun 0
1239: #define indiconly 2
1240: ;
1241: #define shiftflags 18
1242: #define shift2nd 3
1243: #define shiftalpha 4
1244: #define shiftalock 6
1245: ;
1246: #define tblflags 19
1247: #define autofill 4
1248: #define autocalc 5
1249: ;
1250: #define sgrflags 20
1251: #define grfsplit 0
1252: #define vertsplit 1
1253: #define write_on_graph 4
1254: #define textwrite 7
1255: ;
1256: #define asm_flag1 33
1257: #define asm_flag1_0 0
1258: #define asm_flag1_1 1
1259: #define asm_flag1_2 2
1260: #define asm_flag1_3 3
1261: #define asm_flag1_4 4
1262: #define asm_flag1_5 5
1263: #define asm_flag1_6 6
1264: #define asm_flag1_7 7
1265: ;
1266: #define asm_flag2 34
1267: #define asm_flag2_0 0
1268: #define asm_flag2_1 1
1269: #define asm_flag2_2 2
1270: #define asm_flag2_3 3
1271: #define asm_flag2_4 4
1272: #define asm_flag2_5 5
1273: #define asm_flag2_6 6
1274: #define asm_flag2_7 7
1275: ;
1276: #define asm_flag3 35
1277: #define asm_flag3_0 0
1278: #define asm_flag3_1 1
1279: #define asm_flag3_2 2
1280: #define asm_flag3_3 3
1281: #define asm_flag3_4 4
1282: #define asm_flag3_5 5
1283: #define asm_flag3_6 6
1284: #define asm_flag3_7 7
1285:
1286: ;system var equates, for storing and recalling them
1287: ;--------------------------------------------------
1288: #define xsclt 2 ;xscale
1289: #define ysclt 3 ;yscale
1290: #define xmint 0ah ;xmin
1291: #define xmaxt 0bh ;xmax
1292: #define ymint 0ch ;ymin
1293: #define ymaxt 0dh ;xmax
1294: #define tmint 0eh ;tmin
1295: #define tmaxt 0fh ;tmax
1296: #define thetmint 10h ;theta min
1297: #define thetmaxt 11h ;theta max
1298: #define tblmint 1ah ;table min
1299: #define plotstartt 1bh ;plot start
1300: #define nmaxt 1dh ;nmax
1301: #define nmint 1fh ;nmin
1302: #define tblstept 21h ;table step
1303: #define tstept 22h ;t step
1304: #define thetstept 23h ;theta step
1305: #define deltaxt 26h ;delta x
1306: #define deltayt 27h ;delta y
1307: #define xfactt 28h ;x zoom factor
1308: #define yfactt 29h ;y zoom factor
1309: #define finnt 2bh ;tvm n
1310: #define finit 2ch ;tvm i
1311: #define finpvt 2dh ;tvm pv
1312: #define finpmtt 2eh ;tvm pmt
1313: #define finfvt 2fh ;tvm fv
1314: #define finpyt 30h ;tvm p/y
1315: #define fincyt 31h ;tvm c/y
1316: #define plotstept 34h ;plot step
1317: #define xrest 36h ;x res
1318:
1319: ;character font equates
1320: ;-----------------------------------
1321: #define lseq_n 001h
1322: #define lseq_u 002h
1323: #define lseq_v 003h
1324: #define lseq_w 004h
1325: #define lconvert 005h
1326: #define lsqup 006h
1327: #define lsqdown 007h
1328: #define lintegral 008h
1329: #define lcross 009h
1330: #define lboxicon 00ah
1331: #define lcrossicon 00bh
1332: #define ldoticon 00ch
1333: #define lsubt 00dh ;small capital t for parametric mode.
1334: #define lcuber 00eh ;slightly different 3 for cubed root.
1335: #define lhexf 00fh
1336: #define lroot 010h
1337: #define linverse 011h
1338: #define lsquare 012h
1339: #define langle 013h
1340: #define ldegree 014h
1341: #define lradian 015h
1342: #define ltranspose 016h
1343: #define lle 017h
1344: #define lne 018h
1345: #define lge 019h
1346: #define lneg 01ah
1347: #define lexponent 01bh
1348: #define lstore 01ch
1349: #define lten 01dh
1350: #define luparrow 01eh
1351: #define ldownarrow 01fh
1352: #define lspace 020h
1353: #define lexclam 021h
1354: #define lquote 022h
1355: #define lpound 023h
1356: #define lfourth 024h
1357: #define lpercent 025h
1358: #define lampersand 026h
1359: #define lapostrophe 027h
1360: #define llparen 028h
1361: #define lrparen 029h
1362: #define lasterisk 02ah
1363: #define lplussign 02bh
1364: #define lcomma 02ch
1365: #define ldash 02dh
1366: #define lperiod 02eh
1367: #define lslash 02fh
1368: #define l0 030h
1369: #define l1 031h
1370: #define l2 032h
1371: #define l3 033h
1372: #define l4 034h
1373: #define l5 035h
1374: #define l6 036h
1375: #define l7 037h
1376: #define l8 038h
1377: #define l9 039h
1378: #define lcolon 03ah
1379: #define lsemicolon 03bh
1380: #define llt 03ch
1381: #define leq 03dh
1382: #define lgt 03eh
1383: #define lquestion 03fh
1384: #define latsign 040h
1385: #define lcapa 041h
1386: #define lcapb 042h
1387: #define lcapc 043h
1388: #define lcapd 044h
1389: #define lcape 045h
1390: #define lcapf equ 046h
1391: #define lcapg 047h
1392: #define lcaph 048h
1393: #define lcapi 049h
1394: #define lcapj 04ah
1395: #define lcapk 04bh
1396: #define lcapl 04ch
1397: #define lcapm 04dh
1398: #define lcapn 04eh
1399: #define lcapo 04fh
1400: #define lcapp 050h
1401: #define lcapq 051h
1402: #define lcapr 052h
1403: #define lcaps 053h
1404: #define lcapt 054h
1405: #define lcapu 055h
1406: #define lcapv 056h
1407: #define lcapw 057h
1408: #define lcapx 058h
1409: #define lcapy 059h
1410: #define lcapz 05ah
1411: #define ltheta 05bh
1412: #define lbackslash 05ch
1413: #define lrbrack 05dh
1414: #define lcaret 05eh
1415: #define lunderscore 05fh
1416: #define lbackquote 060h
1417: #define la 061h
1418: #define lb 062h
1419: #define lc 063h
1420: #define ld 064h
1421: #define le 065h
1422: #define lf 066h
1423: #define lg 067h
1424: #define lh 068h
1425: #define li 069h
1426: #define lj 06ah
1427: #define lk 06bh
1428: #define ll 06ch
1429: #define lm 06dh
1430: #define ln 06eh
1431: #define lo 06fh
1432: #define lp 070h
1433: #define lq 071h
1434: #define lr 072h
1435: #define ls 073h
1436: #define lt 074h
1437: #define lu 075h
1438: #define lv 076h
1439: #define lw 077h
1440: #define lx 078h
1441: #define ly 079h
1442: #define lz 07ah
1443: #define llbrace 07bh
1444: #define lbar 07ch
1445: #define lrbrace 07dh
1446: #define ltilde 07eh
1447: #define linveq 07fh
1448: #define lsub0 080h
1449: #define lsub1 081h
1450: #define lsub2 082h
1451: #define lsub3 083h
1452: #define lsub4 084h
1453: #define lsub5 085h
1454: #define lsub6 086h
1455: #define lsub7 087h
1456: #define lsub8 088h
1457: #define lsub9 089h
1458: #define lcapaacute 08ah
1459: #define lcapagrave 08bh
1460: #define lcapacaret 08ch
1461: #define lcapadier 08dh
1462: #define laacute 08eh
1463: #define lagrave 08fh
1464: #define lacaret 090h
1465: #define ladier 091h
1466: #define lcapeacute 092h
1467: #define lcapegrave 093h
1468: #define lcapecaret 094h
1469: #define lcapedier 095h
1470: #define leacute 096h
1471: #define legrave 097h
1472: #define lecaret 098h
1473: #define ledier 099h
1474: #define lcapiacute 09ah
1475: #define lcapigrave 09bh
1476: #define lcapicaret 09ch
1477: #define lcapidier 09dh
1478: #define liacute 09eh
1479: #define ligrave 09fh
1480: #define licaret 0a0h
1481: #define lidier 0a1h
1482: #define lcapoacute 0a2h
1483: #define lcapograve 0a3h
1484: #define lcapocaret 0a4h
1485: #define lcapodier 0a5h
1486: #define loacute 0a6h
1487: #define lograve 0a7h
1488: #define locaret 0a8h
1489: #define lodier 0a9h
1490: #define lcapuacute 0aah
1491: #define lcapugrave 0abh
1492: #define lcapucaret 0ach
1493: #define lcapudier 0adh
1494: #define luacute 0aeh
1495: #define lugrave 0afh
1496: #define lucaret 0b0h
1497: #define ludier 0b1h
1498: #define lcapcced 0b2h
1499: #define lcced 0b3h
1500: #define lcapntilde 0b4h
1501: #define lntilde 0b5h
1502: #define laccent 0b6h
1503: #define lgrave 0b7h
1504: #define ldieresis 0b8h
1505: #define lquesdown 0b9h
1506: #define lexclamdown 0bah
1507: #define lalpha 0bbh
1508: #define lbeta 0bch
1509: #define lgamma 0bdh
1510: #define lcapdelta 0beh
1511: #define ldelta 0bfh
1512: #define lepsilon 0c0h
1513: #define llbrack 0c1h
1514: #define llambda 0c2h
1515: #define lmu 0c3h
1516: #define lpi 0c4h
1517: #define lrho 0c5h
1518: #define lcapsigma 0c6h
1519: #define lsigma 0c7h
1520: #define ltau 0c8h
1521: #define lphi 0c9h
1522: #define lcapomega 0cah
1523: #define lxmean 0cbh
1524: #define lymean 0cch
1525: #define lsupx 0cdh
1526: #define lellipsis 0ceh
1527: #define lleft 0cfh
1528: #define lblock 0d0h
1529: #define lper 0d1h
1530: #define lhyphen 0d2h
1531: #define larea 0d3h
1532: #define ltemp 0d4h
1533: #define lcube 0d5h
1534: #define lenter 0d6h
1535: #define limagi 0d7h
1536: #define lphat 0d8h
1537: #define lchi 0d9h
1538: #define lstatf 0dah
1539: #define llne 0dbh
1540: #define llistl 0dch
1541: #define lfinann 0ddh
1542:
1543: ;# tokens in use = 249
1544: ;--------------------------------
1545: ;length (+80h for leading blank)
1546: ;(+40h for trailing blank)
1547: #define eosstart 0
1548:
1549: ;display conversions come immediately before 'tstore'
1550: ;----------------------------------------------------
1551: #define dconv 01h
1552: ;
1553: #define ttodms dconv ;01h
1554: #define ttodec dconv+1 ;02h
1555: #define ttoabc dconv+2 ;03h > a b/c
1556: ;
1557: #define tstore dconv+3 ;04h lstore 01
1558: ;
1559: #define tboxplot 05h
1560: ;
1561: #define bracks 06h
1562: ;
1563: #define tlbrack bracks ;06h '['
1564: #define trbrack bracks+1 ;07h ']'
1565: #define tlbrace bracks+2 ;08h '{'
1566: #define trbrace bracks+3 ; 09h '}'
1567: ;
1568: #define tpost1 bracks+4
1569: ;
1570: #define tfromrad tpost1 ;0ah lradian
1571: #define tfromdeg tpost1+1 ;0bh ldegree
1572: #define trecip tpost1+2 ;0ch linverse
1573: #define tsqr tpost1+3 ;0dh lsquare
1574: #define ttrnspos tpost1+4 ;0eh ltranspose
1575: #define tcube tpost1+5 ;0fh '^3'
1576: ;
1577: #define tlparen 10h ;10h '('
1578: #define trparen 11h ;11h ')'
1579:
1580: ;immediate unary tokens go from here to 'eosel-1'
1581: ;--------------------------------------------------------
1582: #define imun 12h
1583: ;
1584: #define tround imun ;12h 'round'
1585: #define tpxtst imun+1 ;13h 'pxl-test'
1586: #define taug imun+2 ;14h 'aug'
1587: #define trowswap imun+3 ;15h 'rswap'
1588: #define trowplus imun+4 ;16h 'radd'
1589: #define tmrow imun+5 ;17h 'multr'
1590: #define tmrowplus imun+6 ;18h 'mradd'
1591: #define tmax imun+7 ;19h 'max'
1592: #define tmin imun+8 ;1ah 'min'
1593: #define trtopr imun+9 ;1bh 'r>pr
1594: #define trtopo imun+10 ;1ch 'r>po
1595: #define tptorx imun+11 ;1dh 'p>rx
1596: #define tptory imun+12 ;1eh 'p>ry
1597: #define tmedian imun+13 ;1fh 'median
1598: #define trandm imun+14 ;20h 'randm'
1599: #define tmean imun+15 ;21h
1600: #define troot imun+16 ;22h 'root'
1601: #define tseries imun+17 ;23h 'seq'
1602: #define tfnint imun+18 ;24h 'fnint'
1603: #define tnderiv imun+19 ;25h 'fnir'
1604: #define tevalf imun+20 ;26h
1605: #define tfmin imun+21 ;27h
1606: #define tfmax imun+22 ;28h
1607:
1608: ;token 29h cannot be an eos function since el(=29h already
1609: ;---------------------------------------------------------
1610: #define teosel imun+23
1611: ;
1612: #define tspace teosel ;29h ' '
1613: #define tstring teosel+1 ;2ah '"'
1614: #define tcomma teosel+2 ;2bh ','
1615:
1616: #define tii 2ch ;i
1617:
1618: ;postfix functions
1619: ;---------------------------------------------
1620: #define tpost 2dh
1621: ;
1622: #define tfact tpost ;2dh '!'
1623:
1624: #define tcubicr 2eh
1625: #define tquartr 2fh
1626:
1627: ;number tokens
1628: ;--------------------------------------------
1629: #define nums 30h
1630: ;
1631: #define t0 nums ;30h
1632: #define t1 nums+1 ;31h
1633: #define t2 nums+2 ;32h
1634: #define t3 nums+3 ;33h
1635: #define t4 nums+4 ;34h
1636: #define t5 nums+5 ;35h
1637: #define t6 nums+6 ;36h
1638: #define t7 nums+7 ;37h
1639: #define t8 nums+8 ;38h
1640: #define t9 nums+9 ;39h
1641: #define tdecpt nums+10 ;3ah
1642: #define tee nums+11 ;3bh
1643:
1644: ;binary op
1645: ;----------------------------------------------
1646: #define tor 3ch ;3ch '_or_'
1647: #define txor 3dh ;3dh
1648: ;
1649: #define tcolon 3eh ;3eh ':'
1650: #define tenter 3fh ;3fh lenter
1651:
1652: ;binary op
1653: ;--------------------------------------------------
1654: #define tand 40h ;40h '_and_' 05
1655:
1656: ;letter tokens
1657: ;------------------------------------------
1658: #define let 41h
1659: ;
1660: #define ta let ;41h
1661: #define tb let+1 ;42h
1662: #define tc let+2 ;43h
1663: #define td let+3 ;44h
1664: #define te let+4 ;45h
1665: #define tf let+5 ;46h
1666: #define tg let+6 ;47h
1667: #define th let+7 ;48h
1668: #define ti let+8 ;49h
1669: #define tj let+9 ;4ah
1670: #define tk let+10 ;4bh
1671: #define tl let+11 ;4ch
1672: #define tm let+12 ;4dh
1673: #define tn let+13 ;4eh
1674: #define to let+14 ;4fh
1675: #define tp let+15 ;50h
1676: #define tq let+16 ;51h
1677: #define tr let+17 ;52h
1678: #define ts let+18 ;53h
1679: #define tt let+19 ;54h
1680: #define tu let+20 ;55h
1681: #define tv let+21 ;56h
1682: #define tw let+22 ;57h
1683: #define tx let+23 ;58h
1684: #define ty let+24 ;59h
1685: #define tz let+25 ;5ah
1686: #define ttheta let+26 ;5bh
1687:
1688: ;these var tokens are 1st of a double token
1689: ; see 'vars.doc' for more info on vars
1690: ;------------------------------------------
1691: #define vtoks let+27
1692:
1693: ;user matrix token, 2nd token needed for name
1694: ;--------------------------------------------
1695: #define tvarmat vtoks ;5ch
1696:
1697: ;user list token, 2nd token needed for name
1698: ;-------------------------------------------
1699: #define tvarlst vtoks+1 ;5dh
1700:
1701: ;user equation token, 2nd token needed for name
1702: ;----------------------------------------------
1703: #define tvarequ vtoks+2 ;5eh
1704:
1705: ;this is a single token, i will have to read the name in
1706: ;every single time i execute
1707: ;-------------------------------------------
1708: #define tprog vtoks+3 ;5fh
1709:
1710: ;user pict token, 2nd token needed for name
1711: ;-------------------------------------------
1712: #define tvarpict vtoks+4 ;60h
1713:
1714: ;user gdb token, 2nd token needed for name
1715: ;-------------------------------------------
1716: #define tvargdb vtoks+5 ;61h
1717:
1718: ;system vars that are used for output only
1719: ;cannot be stored to by the user
1720: ;-------------------------------------------
1721: #define tvarout vtoks+6 ;62h
1722:
1723: ;system vars that are not in the symbol table
1724: ;but the user can store to them
1725: ;--------------------------------------------
1726: #define tvarsys vtoks+7 ;63h
1727:
1728:
1729: ;mode setting commands
1730: ;------------------------------------------------------
1731: #define modesa vtoks+8 ;64h
1732: ;
1733: #define trad modesa ;64h 'radian'
1734: #define tdeg modesa+1 ; 65h 'degree'
1735: #define tnormf modesa+2 ;66h 'normal'
1736: #define tsci modesa+3 ;67h 'sci'
1737: #define teng modesa+4 ;68h 'eng'
1738: #define tfloat modesa+5 ;69h 'float'
1739: ;
1740: #define cmps 6ah
1741: ;
1742: #define teq cmps ;6ah '=='
1743: #define tlt cmps+1 ;6bh '<'
1744: #define tgt cmps+2 ;6ch '>'
1745: #define tle cmps+3 ;6dh lle
1746: #define tge cmps+4 ;6eh lge
1747: #define tne cmps+5 ;6fh lne
1748:
1749: ;binary op
1750: ;-------------------------------------------
1751: #define tadd 70h ;70h '+'
1752: #define tsub 71h ;71h '-'
1753: ;
1754: #define tans 72h ;72h
1755:
1756: ;mode setting commands
1757: ;----------------------------------
1758: #define modes 73h
1759: ;
1760: #define tfix modes ;73h 'fix_'
1761: #define tspliton modes+1 ;74h
1762: #define tfullscreen modes+2 ;75h
1763: #define tstndrd modes+3 ;76h 'func'
1764: #define tparam modes+4 ;77h 'param'
1765: #define tpolar modes+5 ;78h 'pol'
1766: #define tseqg modes+6 ;79h
1767: #define tafillon modes+7 ;7ah 'auto fill on
1768: #define tafilloff modes+8 ;7bh
1769: #define tacalcon modes+9 ;7ch
1770: #define tacalcoff modes+10 ;7dh 'autofill off
1771:
1772: ;graph format tokens are 2 byte tokens
1773: ;--------------------------------------------
1774: #define tgformat modes+11 ;7eh
1775: ;
1776: #define tboxicon 7fh
1777: #define tcrossicon 80h
1778: #define tdoticon 81h
1779:
1780: ;binary op
1781: ;---------------------------
1782: #define tmul 82h ;82h '*'
1783: #define tdiv 83h ;83h '/'
1784:
1785: ;some graph commands
1786: ;-------------------------
1787: #define grcmds 84h
1788: ;
1789: #define ttrace grcmds ;84h 'trace'
1790: #define tcldrw grcmds+1 ;85h 'cldrw'
1791: #define tzoomstd grcmds+2 ;86h 'zstd'
1792: #define tzoomtrg grcmds+3 ;87h 'ztrg'
1793: #define tzoombox grcmds+4 ;88h 'zbox'
1794: #define tzoomin grcmds+5 ;89h 'zin'
1795: #define tzoomout grcmds+6 ;8ah 'zout'
1796: #define tzoomsqr grcmds+7 ;8bh 'zsqr'
1797: #define tzoomint grcmds+8 ;8ch 'zint'
1798: #define tzoomprev grcmds+9 ;8dh 'zprev'
1799: #define tzoomdec grcmds+10 ;8eh 'zdecm'
1800: #define tzoomstat grcmds+11 ;8fh 'zstat
1801: #define tusrzm grcmds+12 ;90h 'zrcl'
1802: #define tprtscrn grcmds+13 ;91h 'prtscrn'
1803: #define tzoomsto grcmds+14 ;92h zoom store
1804: #define ttext grcmds+15 ;93h
1805:
1806: ;binary op
1807: ;----------------------------
1808: #define tnpr grcmds+16 ;94h '_npr_'
1809: #define tncr grcmds+17 ;95h '_ncr_'
1810:
1811: ;more graph commands
1812: ;--------------------------------
1813: #define tyon grcmds+18 ;96h 'fnon_'
1814: #define tyoff grcmds+19 ;97h 'fnoff_'
1815: #define tstpic grcmds+20 ;98h 'stpic_'
1816: #define trcpic grcmds+21 ;99h 'rcpic_'
1817: #define tstodb grcmds+22 ;9ah 'stgdb_'
1818: #define trcldb grcmds+23 ;9bh 'rcgdb_'
1819: #define tline grcmds+24 ;9ch 'line'
1820: #define tvert grcmds+25 ;9dh 'vert_'
1821: #define tpton grcmds+26 ;9eh 'pton'
1822: #define tptoff grcmds+27 ;9fh 'ptoff'
1823:
1824: ;token a0 cannot be an eos function since low mult=a0 already
1825: ;------------------------------------------------------------
1826: #define tptchg grcmds+28 ;a0h 'ptchg'
1827: #define tpxon grcmds+29 ;a1h
1828: #define tpxoff grcmds+30 ;a2h
1829: #define tpxchg grcmds+31 ;a3h
1830: #define tshade grcmds+32 ;a4h 'shade'
1831: #define tcircl grcmds+33 ;a5h 'circl'
1832: #define thorz grcmds+34 ;a6h 'horizontal'
1833: #define ttanln grcmds+35 ;a7h 'tanln'
1834: #define tdrinv grcmds+36 ;a8h 'drinv_'
1835: #define tdrawf grcmds+37 ;a9h 'drawf_'
1836: ;
1837: #define tvarstrng 0aah
1838:
1839: ;functions with no arguments
1840: ;------------------------------------------------------
1841: #define noarg 0abh
1842: ;
1843: #define trand noarg ;abh 'rand'
1844: #define tpi noarg+1 ;ach lpi
1845: #define tgetkey noarg+2 ;adh 'getky'
1846: ;
1847: #define tapost tgetkey+1 ;apostrophe
1848: #define tquest tapost+1 ;question mark
1849:
1850: ;unary functions
1851: ;---------------------------------------------------
1852: ;unary: these unary functions take a copmbination of
1853: ; arguments, real, list, matrix
1854: #define unary tquest+1 ;b0h
1855: ;
1856: #define tchs unary ;b0h
1857: #define tint unary+1 ;b1h
1858: #define tabs unary+2 ;b2h
1859: #define tdet unary+3 ;b3h
1860: #define tident unary+4 ;b4h
1861: #define tdim unary+5 ;b5h
1862: #define tsum unary+6 ;b6h
1863: #define tprod unary+7 ;b7h
1864: #define tnot unary+8 ;b8h
1865: #define tipart unary+9 ;b9h
1866: #define tfpart unary+10 ;bah
1867:
1868: ;new 2 byte tokens
1869: ;-----------------------------------
1870: #define t2bytetok 0bbh
1871:
1872: ;unarylr: unary functions that only work with
1873: ; real numbers and lists
1874: ;----------------------------------------------
1875: #define unarylr equ unary+12
1876: ;
1877: #define tsqrt unarylr ;bch
1878: #define tcubrt unarylr+1 ;bdh
1879: #define tln unarylr+2 ;beh
1880: #define texp unarylr+3 ;bfh
1881: #define tlog unarylr+4 ;c0h
1882: #define talog unarylr+5 ;c1h
1883: #define tsin unarylr+6 ;c2h
1884: #define tasin unarylr+7 ;c3h
1885: #define tcos unarylr+8 ;c4h
1886: #define tacos unarylr+9 ;c5h
1887: #define ttan unarylr+10 ;c6h
1888: #define tatan unarylr+11 ;c7h
1889: #define tsinh unarylr+12 ;c8h
1890: #define tasinh unarylr+13 ;c9h
1891: #define tcosh unarylr+14 ;cah
1892: #define tacosh unarylr+15 ;cbh
1893: #define ttanh unarylr+16 ;cch
1894: #define tatanh unarylr+17 ;cdh
1895:
1896: ;some programming commands
1897: ;--------------------------------------------------------
1898: #define progtok unarylr+18
1899: ;
1900: #define tif progtok ;ceh
1901: #define tthen progtok+1 ;cfh
1902: #define telse progtok+2 ;d0h
1903: #define twhile progtok+3 ;d1h
1904: #define trepeat progtok+4 ;d2h
1905: #define tfor progtok+5 ;d3h
1906: #define tend progtok+6 ;d4h
1907: #define treturn progtok+7 ;d5h
1908: #define tlbl progtok+8 ;d6h 'lbl_'
1909: #define tgoto progtok+9 ;d7h 'goto_'
1910: #define tpause progtok+10 ;d8h 'pause_'
1911: #define tstop progtok+11 ;d9h 'stop'
1912: #define tisg progtok+12 ;dah 'is>'
1913: #define tdsl progtok+13 ;dbh 'ds<'
1914: #define tinput progtok+14 ;dch 'input_'
1915: #define tprompt progtok+15 ;ddh 'prompt_'
1916: #define tdisp progtok+16 ;deh 'disp_'
1917: #define tdispg progtok+17 ;dfh 'dispg'
1918:
1919: ;token e0 cannot be an eos function since hi mu
1920: ;---------------------------------------------
1921: #define toutput progtok+18 ;e0h 'outpt'
1922: #define tcllcd progtok+19 ;e1h 'cllcd'
1923: #define tconst progtok+20 ;e2h 'fill'
1924: #define tsorta progtok+21 ;e3h 'sorta_'
1925: #define tsortd progtok+22 ;e4h 'sortd_'
1926: #define tdisptab progtok+23 ;e5h 'disp table
1927: #define tmenu progtok+24 ;e6h 'menu'
1928: #define tsendmbl progtok+25 ;e7h 'send'
1929: #define tgetmbl progtok+26 ;e8h 'get'
1930:
1931: ;stat plot commands
1932: ;-------------------------
1933: #define statpcmd progtok+27
1934: ;
1935: #define tploton statpcmd ;e9h ' plotson'
1936: #define tplotoff statpcmd+1 ;eah ' plotsoff
1937: ;
1938: #define tlistname 0ebh ;list designator
1939:
1940: #define tplot1 0ech
1941: #define tplot2 0edh
1942: #define tplot3 0eeh
1943:
1944: #define tpower 0f0h ;'^'
1945: #define txroot 0f1h ;lsupx,lroot
1946:
1947: #define statcmd 0f2h
1948: ;
1949: #define tonevar statcmd ;f2h 'onevar_'
1950: #define ttwovar statcmd+1 ;f3h
1951: #define tlr statcmd+2 ;f4h 'linr(a+bx
1952: #define tlrexp statcmd+3 ;f5h 'expr_'
1953: #define tlrln statcmd+4 ;f6h 'lnr_'
1954: #define tlrpwr statcmd+5 ;f7h 'pwrr_'
1955: #define tmedmed statcmd+6 ;f8h
1956: #define tquad statcmd+7 ;f9h
1957: #define tclrlst statcmd+8 ;fah 'clear list
1958: #define tclrtbl statcmd+9 ;fbh 'clear table
1959: #define thist statcmd+10 ;fch 'hist_'
1960: #define txyline statcmd+11 ;fdh 'xyline_'
1961: #define tscatter statcmd+12 ;feh 'scatter_'
1962: #define tlr1 statcmd+13 ;ffh 'linr(ax+b
1963:
1964: ;2nd half of graph format tokens
1965: ;--------------------------------------------------
1966: ;format settings commands
1967: #define gfmt 0
1968: ;
1969: #define tseq gfmt ;'seqg'
1970: #define tsimulg gfmt+1 ;'simulg'
1971: #define tpolarg gfmt+2 ;'polargc'
1972: #define trectg gfmt+3 ;'rectgc'
1973: #define tcoordon gfmt+4 ;'coordon'
1974: #define tcoordoff gfmt+5 ;'coordoff'
1975: #define tdrawline gfmt+6 ;'drawline'
1976: #define tdrawdot gfmt+7 ;'drawdot'
1977: #define taxison gfmt+8 ;'axeson'
1978: #define taxisoff gfmt+9 ;'axesoff'
1979: #define tgridon gfmt+10 ;'gridon'
1980: #define tgridoff gfmt+11 ;'gridoff'
1981: #define tlblon gfmt+12 ;'labelon'
1982: #define tlbloff gfmt+13 ;'labeloff'
1983: #define twebon gfmt+14 ;'webon'
1984: #define tweboff gfmt+15 ;'weboff'
1985: #define tuv gfmt+16 ;u vs v
1986: #define tvw gfmt+17 ;v vs w
1987: #define tuw gfmt+18 ;u vs w
1988:
1989: ;2nd half of user matrix tokens
1990: ;-----------------------------------------
1991: #define tmata 00h ;mat a
1992: #define tmatb 01h ;mat b
1993: #define tmatc 02h ;mat c
1994: #define tmatd 03h ;mat d
1995: #define tmate 04h ;mat e
1996: #define tmatf 05h ;mat f
1997: #define tmatg 06h ;mat g
1998: #define tmath 07h ;mat h
1999: #define tmati 08h ;mat i
2000: #define tmatj 09h ;mat j
2001:
2002: ;2nd half of user list tokens
2003: ;------------------------------------------
2004: #define tl1 00h ;list 1
2005: #define tl2 01h ;list 2
2006: #define tl3 02h ;list 3
2007: #define tl4 03h ;list 4
2008: #define tl5 04h ;list 5
2009: #define tl6 05h ;list 6
2010:
2011: ;2nd half of user equation tokens
2012: ;--------------------------------------
2013: ;"y" equations have bit 4 set
2014: #define ty1 10h ;y1
2015: #define ty2 11h ;y2
2016: #define ty3 12h ;y3
2017: #define ty4 13h ;y4
2018: #define ty5 14h ;y5
2019: #define ty6 15h ;y6
2020: #define ty7 16h ;y7
2021: #define ty8 17h ;y8
2022: #define ty9 18h ;y9
2023: #define ty0 19h ;y0
2024:
2025: ;param equations have bit 5 set
2026: ;---------------------------------------
2027: #define tx1t 20h ;x1t
2028: #define ty1t 21h ;y1t
2029: #define tx2t 22h ;x2t
2030: #define ty2t 23h ;y2t
2031: #define tx3t 24h ;x3t
2032: #define ty3t 25h ;y3t
2033: #define tx4t 26h ;x4t
2034: #define ty4t 27h ;y4t
2035: #define tx5t 28h ;x5t
2036: #define ty5t 29h ;y5t
2037: #define tx6t 2ah ;x6t
2038: #define ty6t 2bh ;y6t
2039:
2040: ;polar equations have bit 6 set
2041: ;--------------------------------------
2042: #define tr1 40h ;r1
2043: #define tr2 41h ;r2
2044: #define tr3 42h ;r3
2045: #define tr4 43h ;r4
2046: #define tr5 44h ;r5
2047: #define tr6 45h ;r6
2048:
2049: ;recursion equations have bit 7 set
2050: ;--------------------------------------
2051: #define tun 80h ;un
2052: #define tvn 81h ;vn
2053: #define twn 82h ;wn
2054:
2055: ;2nd half of user picture tokens
2056: ;----------------------------------------
2057: #define tpic1 00h ;pic1
2058: #define tpic2 01h ;pic2
2059: #define tpic3 02h ;pic3
2060: #define tpic4 03h ;pic4
2061: #define tpic5 04h ;pic5
2062: #define tpic6 05h ;pic6
2063: #define tpic7 06h ;pic7
2064: #define tpic8 07h ;pic8
2065: #define tpic9 08h ;pic9
2066: #define tpic0 09h ;pic0
2067:
2068: ;2nd half of user graph database tokens
2069: ;----------------------------------------
2070: #define tgdb1 00h ;gdb1
2071: #define tgdb2 01h ;gdb2
2072: #define tgdb3 02h ;gdb3
2073: #define tgdb4 03h ;gdb4
2074: #define tgdb5 04h ;gdb5
2075: #define tgdb6 05h ;gdb6
2076: #define tgdb7 06h ;gdb7
2077: #define tgdb8 07h ;gdb8
2078: #define tgdb9 08h ;gdb9
2079: #define tgdb0 09h ;gdb0
2080:
2081: ;2nd half of string vars
2082: ;----------------------------------
2083: #define tstr1 00h
2084: #define tstr2 01h
2085: #define tstr3 02h
2086: #define tstr4 03h
2087: #define tstr5 04h
2088: #define tstr6 05h
2089: #define tstr7 06h
2090: #define tstr8 07h
2091: #define tstr9 08h
2092: #define tstr0 09h
2093:
2094: ;2nd half of system output only variables
2095: ;--------------------------------------------------------------------
2096: ;#define open 00h
2097: ;
2098: #define tregeq 01h ;regression equation
2099: ;
2100: #define tstatn 02h ;statistics n
2101: ;
2102: #define txmean 03h ;x mean
2103: #define tsumx 04h ;sum(x)
2104: #define tsumxsqr 05h ;sum(x^2)
2105: #define tstdx 06h ;standard dev x
2106: #define tstdpx 07h ;standard dev pop x
2107: #define tminx 08h ;min x value
2108: #define tmaxx 09h ;max x value
2109: ;
2110: #define tminy 0ah ;min y value
2111: #define tmaxy 0bh ;max y value
2112: #define tymean 0ch ;y mean
2113: #define tsumy 0dh ;sum(y)
2114: #define tsumysqr 0eh ;sum(y^2)
2115: #define tstdy 0fh ;standard dev y
2116: #define tstdpy 10h ;standard dev pop y
2117: ;
2118: #define tsumxy 11h ;sum(xy)
2119: #define tcorr 12h ;correlation
2120: #define tmedx 13h ;med(x)
2121: #define tq1 14h ;1st quadrant of x
2122: #define tq3 15h ;3rd quadrant of x
2123: #define tquada 16h ;1st term of quad poly reg/ y-int
2124: #define tquadb 17h ;2nd term of quad poly reg/ slope
2125: #define tquadc 18h ;3rd term of quad poly reg
2126: #define tcubed 19h ;4th term of cubic poly reg
2127: #define tquarte 1ah ;5th term of quart poly reg
2128: #define tmedx1 1bh ;x1 for med-med
2129: #define tmedx2 1ch ;x2 for med-med
2130: #define tmedx3 1dh ;x3 for med-med
2131: #define tmedy1 1eh ;y1 for med-med
2132: #define tmedy2 1fh ;y2 for med-med
2133: #define tmedy3 20h ;y3 for med-med
2134: ;
2135: #define trecurn 21h ;recursion n
2136: #define tstatp 22h
2137: #define tstatz 23h
2138: #define tstatt 24h
2139: #define tstatchi 25h
2140: #define tstatf 26h
2141: #define tstatdf 27h
2142: #define tstatphat 28h
2143: #define tstatphat1 29h
2144: #define tstatphat2 2ah
2145: #define tstatmeanx1 2bh
2146: #define tstatstdx1 2ch
2147: #define tstatn1 2dh
2148: #define tstatmeanx2 2eh
2149: #define tstatstdx2 2fh
2150: #define tstatn2 30h
2151: #define tstatstdxp 31h
2152: #define tstatlower 32h
2153: #define tstatupper 33h
2154: #define tstat_s 34h
2155: #define tlrsqr 35h ;r^2
2156: #define tbrsqr 36h ;r^2
2157:
2158: ;these next tokens are only used to acess the data.
2159: ;they are display only and the user cannot access them at all.
2160: ;-------------------------------------------------------------
2161: #define tf_df 37h ;anofav factor df
2162: #define tf_ss 38h ;anofav factor ss
2163: #define tf_ms 39h ;anofav factor ms
2164: #define te_df 3ah ;anofav error df
2165: #define te_ss 3bh ;anofav error ss
2166: #define te_ms 3ch ;anofav error ms
2167:
2168: ;2nd half of system input/output variables
2169: ;----------------------------------------------------
2170: ;system variable equates
2171: ;
2172: ;vars with no restriction
2173: #define tuxscl 0
2174: #define tuyscl 1
2175: #define txscl 2
2176: #define tyscl 3
2177: #define trecuru0 4 ;u 1st initial cond
2178: #define trecurv0 5 ;v 1st initial cond
2179: #define tun1 6 ;u(n-1) ;not used
2180: #define tvn1 7 ;v(n-1) ;not used
2181: #define turecuru0 8
2182: #define turecurv0 9
2183:
2184: ;vars rounded to 10 digits
2185: ;----------------------------------
2186: #define txmin 0ah
2187: #define txmax 0bh
2188: #define tymin 0ch
2189: #define tymax 0dh
2190: #define ttmin 0eh
2191: #define ttmax 0fh
2192: #define tthetamin 10h
2193: #define tthetamax 11h
2194: #define tuxmin 12h
2195: #define tuxmax 13h
2196: #define tuymin 14h
2197: #define tuymax 15h
2198: #define tuthetmin 16h
2199: #define tuthetmax 17h
2200: #define tutmin 18h
2201: #define tutmax 19h
2202: #define ttblmin 1ah
2203: #define tplotstart 1bh
2204: #define tuplotstart 1ch
2205: #define tnmax 1dh
2206: #define tunmax 1eh
2207: #define tnmin 1fh
2208: #define tunmin 20h
2209:
2210: ;vars cannot be 0
2211: ;----------------------------------
2212: #define ttblstep 21h
2213: #define ttstep 22h
2214: #define tthetastep 23h
2215: #define tutstep 24h
2216: #define tuthetstep 25h
2217:
2218: ;special limits on these
2219: ;----------------------------------
2220: #define tdeltax 26h
2221: #define tdeltay 27h
2222:
2223: ;special limits on these
2224: ;----------------------------------
2225: #define txfact 28h
2226: #define tyfact 29h
2227:
2228: #define ttblinput 2ah
2229:
2230: ;any restrictions?
2231: ;-----------------------------------------
2232: #define tfinn 2bh
2233: #define tfini 2ch
2234: #define tfinpv 2dh
2235: #define tfinpmt 2eh
2236: #define tfinfv 2fh
2237: #define tfinpy 30h
2238: #define tfincy 31h
2239: ;
2240: #define trecurw0 32h ;w0(1)
2241: #define turecurw0 33h
2242: ;
2243: #define tplotstep 34h
2244: #define tuplotstep 35h
2245: ;
2246: #define txres 36h
2247: #define tuxres 37h
2248:
2249: ;all the tokens below do not have strings associated.
2250: ;they are here just for storing and recalling.
2251: ;----------------------------------------------------
2252: #define trecuru02 38h ;u0(2)
2253: #define turecuru02 39h
2254: #define trecurv02 3ch ;v0(2)
2255: #define turecurv02 3dh
2256: #define trecurw02 3eh ;w0(2)
2257: #define turecurw02 3fh
2258:
2259: ;no restrictions
2260: ;------------------------------------------
2261: ;#define twn1 40h ;w(n-1)
2262: ;#define un2 41h ;u(n-2)
2263: ;#define vn2 42h ;v(n-2)
2264: ;#define wn2 43h ;w(n-2)
2265:
2266: ;don't know if need these yet?
2267: ;-----------------------------
2268: ;tui12
2269: ;tui22
2270: ;tuui12
2271: ;tuui22
2272:
2273: #define tfinnpv 00h ;immediate unary
2274: #define tfinirr 01h ;immediate unary
2275: #define tfinbal 02h ;immediate unary
2276: #define tfinprn 03h ;immediate unary
2277: #define tfinint 04h ;immediate unary
2278: #define tfintonom 05h ;immediate unary
2279: #define tfintoeff 06h ;immediate unary
2280: #define tfindbd 07h ;immediate unary
2281: #define tlcm 08h ;immediate unary
2282: #define tgcd 09h ;immediate unary
2283: #define trandint 0ah ;immediate unary
2284: #define trandbin 0bh ;immediate unary
2285: #define tsubstrng 0ch ;immediate unary
2286: #define tstddev 0dh ;immediate unary
2287: #define tvariance 0eh ;immediate unary
2288: #define tinstrng 0fh ;immediate unary
2289: #define tdnormal 10h ;immediate unary
2290: #define tinvnorm 11h ;immediate unary
2291: #define tdt 12h ;immediate unary
2292: #define tchi 13h ;immediate unary
2293: #define tdf 14h ;immediate unary
2294: #define tbinpdf 15h ;immediate unary
2295: #define tbincdf 16h ;immediate unary
2296: #define tpoipdf 17h ;immediate unary
2297: #define tpoicdf 18h ;immediate unary
2298: #define tgeopdf 19h ;immediate unary
2299: #define tgeocdf 1ah ;immediate unary
2300: #define tnormalpdf 1bh ;immediate unary
2301: #define ttpdf 1ch ;immediate unary
2302: #define tchipdf 1dh ;immediate unary
2303: #define tfpdf 1eh ;immediate unary
2304: ;#define trandbin 1fh ;immediate unary
2305: #define trandnorm 1fh ;immediate unary
2306: #define tfinfpmt 20h ;0 or multy arg function
2307: #define tfinfi 21h ;0 or multy arg function
2308: #define tfinfpv 22h ;0 or multy arg function
2309: #define tfinfn 23h ;0 or multy arg function
2310: #define tfinffv 24h ;0 or multy arg function
2311: #define tconj 25h ;unary
2312: #define treal 26h ;unary
2313: #define timag 27h ;unary
2314: #define tangle 28h ;unary
2315: #define tcumsum 29h ;unary
2316: #define texpr 2ah ;unary
2317: #define tlength 2bh ;unary
2318: #define tdeltalst 2ch ;unary
2319: #define tref 2dh ;unary
2320: #define trref 2eh ;unary
2321: #define ttorect 2fh ;display conversion
2322: #define ttopolar 30h ;display conversion
2323: #define tconste 31h ;function no arg
2324: #define tsinreg 32h ;command opt push
2325: #define tlogistic 33h ;command opt push
2326: #define tlinregttest 34h ;command opt push
2327: #define tshadenorm 35h ;command pushed
2328: #define tshadet 36h ;command pushed
2329: #define tshadechi 37h ;command pushed
2330: #define tshadef 38h ;command pushed
2331: #define tmattolst 39h ;command pushed
2332: #define tlsttomat 3ah ;command pushed
2333: #define tztest 3bh ;command pushed
2334: #define tttest 3ch ;command pushed
2335: #define t2sampztest 3dh ;command pushed
2336: #define t1propztest 3eh ;command pushed
2337: #define t2propztest 3fh ;command pushed
2338: #define tchitest 40h ;command pushed
2339: #define tzintval 41h ;command pushed
2340: #define t2sampzint 42h ;command pushed
2341: #define t1propzint 43h ;command pushed
2342: #define t2propzint 44h ;command pushed
2343: #define tgraphstyle 45h ;command pushed
2344: #define t2sampttest 46h ;command opt pushed
2345: #define t2sampftest 47h ;command opt pushed
2346: #define ttintval 48h ;command opt pushed
2347: #define t2samptint 49h ;command opt pushed
2348: #define tsetuplst 4ah ;command opt pushed
2349: #define tfinpmtend 4bh ;mode command
2350: #define tfinpmtbeg 4ch ;mode command
2351: #define trealm 4dh ;mode command
2352: #define tpolarm 4eh ;mode command
2353: #define trectm 4fh ;mode command
2354: #define texpron 50h ;mode command
2355: #define texproff 51h ;mode command
2356: #define tclralllst 52h ;command not pushed
2357: #define tgetcalc 53h ;command not pushed
2358: #define tdelvar 54h ;command not pushed
2359: #define tequtostrng 55h ;command not pushed
2360: #define tstrngtoequ 56h ;command not pushed
2361: #define tdellast 57h ;command not pushed
2362: #define tselect 58h ;command not pushed
2363: #define tanova 59h ;command not pushed
2364: #define tmodbox 5ah ;icon
2365: #define tnormprob 5bh ;icon
2366:
2367: ;tokens 5ch to 63h cannot be the 2nd byte of
2368: ; two byte tokens. these are already the 1st byte value
2369: ; of two byte tokens. reading tokens backwards will not
2370: ; work if this restriction is not in place.
2371: ;------------------------------------------------------
2372: ;no use 5ch
2373: ;no use 5dh
2374: ;no use 5eh
2375: ;no use 5fh
2376: ;no use 60h
2377: ;no use 61h
2378: ;no use 62h
2379: ;no use 63h
2380:
2381: #define tmgt 64h ;vertical split
2382: #define tzfit 65h ;zoom fit
2383: #define tdiag_on 66h ;dianostic display on
2384: #define tdiag_off 67h ;dianostic display off