001: .NOLIST
002: ; length (+80h for leading blank)
003: ; # TOKENS IN USE = 249
004: ; (+40h for trailing blank)
005: EOSSTART EQU 0
006: ;
007: ;
008: ; DISPLAY CONVERSIONS COME IMMEDIATELY BEFORE 'TSTORE'
009: ;
010: DCONV EQU 01H
011: ;
012: TTODMS equ DCONV ; 01H
013: TTODEC equ DCONV+1 ; 02H
014: TTOAbc EQU DCONV+2 ; 03H > A b/c
015: ;
016: TSTORE equ DCONV+3 ; 04H Lstore 01
017: ;
018: TBOXPLOT EQU 05h
019: ;
020: BRACKS EQU 06H
021: ;
022: tLBrack equ BRACKS ; 06h '['
023: tRBrack equ BRACKS+1 ; 07h ']'
024: tLBrace equ BRACKS+2 ; 08h '{'
025: tRBrace equ BRACKS+3 ; 09h '}'
026: ;
027: TPOST1 EQU BRACKS+4
028: ;
029: tFromRad equ TPOST1 ; 0Ah Lradian
030: tFromDeg equ TPOST1+1 ; 0Bh Ldegree
031: tRecip equ TPOST1+2 ; 0Ch Linverse
032: tSqr equ TPOST1+3 ; 0Dh Lsquare
033: tTrnspos equ TPOST1+4 ; 0Eh Ltranspose
034: TCUBE EQU TPOST1+5 ; 0Fh '^3'
035: ;
036: tLParen equ 10H ; 10h '('
037: tRParen equ 11H ; 11h ')'
038: ;
039: ;
040: ; IMMEDIATE UNARY TOKENS GO FROM HERE TO 'EOSEL-1'
041: ;
042: IMUN EQU 12H
043: ;
044: tRound equ IMUN ; 12h 'round'
045: TPXTST equ IMUN+1 ; 13h 'PXL-TEST'
046: tAug equ IMUN+2 ; 14h 'aug'
047: tRowSwap EQU IMUN+3 ; 15h 'rSwap'
048: tRowPlus equ IMUN+4 ; 16h 'rAdd'
049: tmRow EQU IMUN+5 ; 17h 'multR'
050: tmRowPlus EQU IMUN+6 ; 18h 'mRAdd'
051: tMax equ IMUN+7 ; 19H 'max'
052: tMin equ IMUN+8 ; 1AH 'min'
053: TRTOPr EQU IMUN+9 ; 1BH 'R>Pr
054: TRTOPo EQU IMUN+10 ; 1CH 'R>Po
055: TPTORx EQU IMUN+11 ; 1DH 'P>Rx
056: TPTORy EQU IMUN+12 ; 1EH 'P>Ry
057: tMEDIAN equ IMUN+13 ; 1Fh 'MEDIAN
058: tRandM equ IMUN+14 ; 20h 'randM'
059: TMEAN EQU IMUN+15 ; 21h
060: TROOT EQU IMUN+16 ; 22h 'ROOT'
061: tSeries equ IMUN+17 ; 23h 'seq'
062: tFnInt equ IMUN+18 ; 24h 'fnInt'
063: tNDeriv equ IMUN+19 ; 25h 'fnIr'
064: TEVALF EQU IMUN+20 ; 26h
065: TFMIN EQU IMUN+21 ; 27h
066: TFMAX EQU IMUN+22 ; 28h
067: ;
068: ;
069: ;
070: ; TOKEN 29H CANNOT BE AN EOS FUNCTION SINCE EL(=29H ALREADY
071: ;
072: tEOSEL EQU IMUN+23
073: ;
074: TSPACE EQU tEOSEL ; 29h ' '
075: tString equ tEOSEL+1 ; 2Ah '"'
076: tComma equ tEOSEL+2 ; 2Bh ','
077: ;
078: ;
079: ;
080: Tii equ 2Ch ; i
081: ;
082: ; ===== Postfix functions
083: ;
084: TPOST EQU 2Dh
085: ;
086: tFact equ TPOST ; 2Dh '!'
087:
088:
089:
090: TCUBICR EQU 2Eh
091: TQUARTR EQU 2Fh
092:
093: ;
094: ; NUMBER TOKENS
095: ;
096: NUMS EQU 30h
097: ;
098: T0 EQU NUMS ; 30h
099: T1 EQU NUMS+1 ; 31h
100: T2 EQU NUMS+2 ; 32h
101: T3 EQU NUMS+3 ; 33h
102: T4 EQU NUMS+4 ; 34h
103: T5 EQU NUMS+5 ; 35h
104: T6 EQU NUMS+6 ; 36h
105: T7 EQU NUMS+7 ; 37h
106: T8 EQU NUMS+8 ; 38h
107: T9 EQU NUMS+9 ; 39h
108: TDECPT EQU NUMS+10 ; 3Ah
109: Tee EQU NUMS+11 ; 3Bh
110: ;
111: ; BINARY OP
112: ;
113: tOr equ 3Ch ; 3Ch '_or_'
114: TXOR equ 3Dh ; 3Dh
115: ;
116: tColon equ 3Eh ; 3Eh ':'
117: tEnter equ 3Fh ; 3Fh Lenter
118: ;
119: ; BINARY OP
120: ;
121: tAnd equ 40h ; 40h '_and_' 05
122: ;
123: ; LETTER TOKENS
124: ;
125: LET EQU 41h
126: ;
127: TA EQU LET ; 41h
128: TB EQU LET+1 ; 42h
129: TC EQU LET+2 ; 43h
130: TD EQU LET+3 ; 44h
131: TE EQU LET+4 ; 45h
132: TF EQU LET+5 ; 46h
133: TG EQU LET+6 ; 47h
134: TH EQU LET+7 ; 48h
135: TI EQU LET+8 ; 49h
136: TJ EQU LET+9 ; 4Ah
137: TK EQU LET+10 ; 4Bh
138: TL EQU LET+11 ; 4Ch
139: TM EQU LET+12 ; 4Dh
140: TN EQU LET+13 ; 4Eh
141: TO EQU LET+14 ; 4Fh
142: TP EQU LET+15 ; 50h
143: TQ EQU LET+16 ; 51h
144: TR EQU LET+17 ; 52h
145: TS EQU LET+18 ; 53h
146: TT EQU LET+19 ; 54h
147: TU EQU LET+20 ; 55h
148: TV EQU LET+21 ; 56h
149: TW EQU LET+22 ; 57h
150: TX EQU LET+23 ; 58h
151: TY EQU LET+24 ; 59h
152: TZ EQU LET+25 ; 5Ah
153: TTHETA EQU LET+26 ; 5Bh
154: ;
155: ;
156: ; THESE VAR TOKENS ARE 1ST OF A DOUBLE TOKEN
157: ;
158: ; SEE 'VARS.DOC' FOR MORE INFO ON VARS
159: ;
160: VTOKS EQU LET+27 ;
161: ;
162: ; USER MATRIX TOKEN, 2ND TOKEN NEEDED FOR NAME
163: ;
164: TVARMAT EQU VTOKS ; 5Ch
165: ;
166: ; USER LIST TOKEN, 2ND TOKEN NEEDED FOR NAME
167: ;
168: TVARLST EQU VTOKS+1 ; 5Dh
169: ;
170: ; USER EQUATION TOKEN, 2ND TOKEN NEEDED FOR NAME
171: ;
172: TVAREQU EQU VTOKS+2 ; 5Eh
173: ;
174: ; THIS IS A SINGLE TOKEN, I WILL HAVE TO READ THE NAME IN
175: ; EVERY SINGLE TIME I EXECUTE
176: ;
177: TPROG EQU VTOKS+3 ; 5Fh
178: ;
179: ; USER PICT TOKEN, 2ND TOKEN NEEDED FOR NAME
180: ;
181: TVARPICT EQU VTOKS+4 ; 60h
182: ;
183: ; USER GDB TOKEN, 2ND TOKEN NEEDED FOR NAME
184: ;
185: TVARGDB EQU VTOKS+5 ; 61h
186: ;
187: ; SYSTEM VARS THAT ARE USED FOR OUTPUT ONLY
188: ; CANNOT BE STORED TO BY THE USER
189: ;
190: tVarOut equ VTOKS+6 ; 62h
191: ;
192: ; SYSTEM VARS THAT ARE NOT IN THE SYMBOL TABLE
193: ; BUT THE USER CAN STORE TO THEM.
194: ;
195: tVarSys equ VTOKS+7 ; 63h
196: ;
197: ;
198: ; ===== Mode setting commands
199: ;
200: MODESA EQU VTOKS+8 ; 64h
201: ;
202: tRad equ MODESA ; 64h 'Radian'
203: tDeg equ MODESA+1 ; 65h 'Degree'
204: tNormF equ MODESA+2 ; 66h 'Normal'
205: tSci equ MODESA+3 ; 67h 'Sci'
206: tEng equ MODESA+4 ; 68h 'Eng'
207: tFloat equ MODESA+5 ; 69h 'Float'
208: ;
209: CMPS EQU 6Ah
210: ;
211: tEQ equ CMPS ; 6Ah '=='
212: tLT equ CMPS+1 ; 6Bh '<'
213: tGT equ CMPS+2 ; 6Ch '>'
214: tLE equ CMPS+3 ; 6Dh LLE
215: tGE equ CMPS+4 ; 6Eh LGE
216: tNE equ CMPS+5 ; 6Fh LNE
217: ;
218: ; BINARY OP
219: ;
220: tAdd equ 70h ; 70h '+'
221: tSub equ 71h ; 71h '-'
222: ;
223: TANS EQU 72H ; 72h
224: ;
225: ; ===== Mode setting commands
226: ;
227: MODES EQU 73h
228: ;
229: tFix equ MODES ; 73h 'Fix_'
230: TSPLITON equ MODES+1 ; 74h
231: TFULLSCREEN EQU MODES+2 ; 75h
232: tStndrd EQU MODES+3 ; 76h 'Func'
233: tParam equ MODES+4 ; 77h 'Param'
234: tPolar EQU MODES+5 ; 78h 'Pol'
235: TSEQG equ MODES+6 ; 79h
236: TAFILLON equ MODES+7 ; 7Ah 'AUTO FILL ON
237: TAFILLOFF equ MODES+8 ; 7Bh
238: TACALCON EQU MODES+9 ; 7Ch
239: TACALCOFF equ MODES+10 ; 7Dh 'AUTOFILL OFF
240: ;
241: ;
242: ; GRAPH FORMAT TOKENS ARE 2 BYTE TOKENS
243: ;
244: TGFORMAT EQU MODES+11 ; 7Eh
245: ;
246: TBOXICON equ 7Fh
247: TCROSSICON EQU 80h
248: TDOTICON EQU 81h
249: ;
250: ; BINARY OP
251: ;
252: tMul equ 82h ; 82h '*'
253: tDiv equ 83h ; 83h '/'
254: ;
255: ; SOME GRAPH COMMANDS
256: ;
257: GRCMDS EQU 84h
258: ;
259: tTrace equ GRCMDS ; 84h 'Trace'
260: tClDrw equ GRCMDS+1 ; 85h 'ClDrw'
261: tZoomStd equ GRCMDS+2 ; 86h 'ZStd'
262: tZoomtrg equ GRCMDS+3 ; 87h 'Ztrg'
263: tZOOMBOX EQU GRCMDS+4 ; 88h 'ZBOX'
264: tZoomIn equ GRCMDS+5 ; 89h 'ZIn'
265: tZoomOut equ GRCMDS+6 ; 8Ah 'ZOut'
266: tZoomSqr equ GRCMDS+7 ; 8Bh 'ZSqr'
267: tZoomInt equ GRCMDS+8 ; 8Ch 'ZInt'
268: tZoomPrev equ GRCMDS+9 ; 8Dh 'ZPrev'
269: tZoomDec equ GRCMDS+10 ; 8Eh 'ZDecm'
270: TZOOMSTAT EQU GRCMDS+11 ; 8Fh 'ZSTAT
271: tUsrZm equ GRCMDS+12 ; 90h 'ZRcl'
272: tPrtScrn equ GRCMDS+13 ; 91h 'PrtScrn'
273: tZOOMSTO EQU GRCMDS+14 ; 92H ZOOM STORE
274: TTEXT EQU GRCMDS+15 ; 93h
275: ;
276: ; BINARY OP
277: ;
278: tnPr equ GRCMDS+16 ; 94h '_nPr_'
279: tnCr equ GRCMDS+17 ; 95h '_nCr_'
280: ;
281: ; MORE GRAPH COMMANDS
282: ;
283: tYOn equ GRCMDS+18 ; 96h 'FnOn_'
284: tYOff equ GRCMDS+19 ; 97h 'FnOff_'
285: tStPic equ GRCMDS+20 ; 98h 'StPic_'
286: tRcPic equ GRCMDS+21 ; 99h 'RcPic_'
287: tStoDB equ GRCMDS+22 ; 9Ah 'StGDB_'
288: tRclDB equ GRCMDS+23 ; 9Bh 'RcGDB_'
289: tLine equ GRCMDS+24 ; 9Ch 'Line'
290: tVert equ GRCMDS+25 ; 9Dh 'Vert_'
291: tPtOn equ GRCMDS+26 ; 9Eh 'PtOn'
292: tPtOff equ GRCMDS+27 ; 9Fh 'PtOff'
293: ;
294: ; TOKEN A0 CANNOT BE AN EOS FUNCTION SINCE LOW MULT=A0 ALREADY
295: ;
296: tPtChg equ GRCMDS+28 ; A0h 'PtChg'
297: TPXON EQU GRCMDS+29 ; A1h
298: TPXOFF EQU GRCMDS+30 ; A2h
299: TPXCHG EQU GRCMDS+31 ; A3h
300: tShade equ GRCMDS+32 ; A4h 'Shade'
301: tCircl equ GRCMDS+33 ; A5h 'Circl'
302: tHORZ equ GRCMDS+34 ; A6h 'HORIZONTAL'
303: tTanLn equ GRCMDS+35 ; A7h 'TanLn'
304: tDrInv equ GRCMDS+36 ; A8h 'DrInv_'
305: tDrawF equ GRCMDS+37 ; A9h 'DrawF_'
306: ;
307: TVARSTRNG EQU 0AAh
308: ;
309: ; ===== Functions with no arguments
310: ;
311: NOARG EQU 0ABh
312: ;
313: tRand equ NOARG ; ABh 'rand'
314: tPi equ NOARG+1 ; ACh Lpi
315: tGetKey equ NOARG+2 ; ADh 'getKy'
316: ;
317: ;
318: TAPOST EQU TGETKEY+1 ; APOSTROPHY
319: TQUEST EQU TAPOST+1 ; QUESTION MARK
320: ;
321: ;
322: ; ===== Unary functions
323: ;
324: ; UNARY : THESE UNARY FUNCTIONS TAKE A COMBINATION OF
325: ; ARGUMENTS, REAL,LIST,MATRIX
326: ;
327: UNARY EQU TQUEST+1 ; B0h
328: ;
329: tChs equ UNARY ; B0h
330: tInt equ UNARY+1 ; B1h
331: TABS equ UNARY+2 ; B2h
332: tDet equ UNARY+3 ; B3h
333: tIdent equ UNARY+4 ; B4h
334: tDim equ UNARY+5 ; B5h
335: tSum equ UNARY+6 ; B6h
336: tProd equ UNARY+7 ; B7h
337: tNot equ UNARY+8 ; B8h
338: tIPart equ UNARY+9 ; B9h
339: tFPart equ UNARY+10 ; BAh
340: ;
341: ;
342: ; NEW 2 BYTE TOKENS
343: ;
344: T2BYTETOK EQU 0BBh ;
345: ;
346: ;
347: ; UNARYLR : UNARY FUNCTIONS THAT ONLY WORK WITH
348: ; REAL NUMBERS AND LISTS
349: ;
350: UNARYLR EQU UNARY+12
351: ;
352: tSqrt equ UNARYLR ; BCh
353: TCUBRT equ UNARYLR+1 ; BDh
354: tLn equ UNARYLR+2 ; BEh
355: tExp equ UNARYLR+3 ; BFh
356: tLog equ UNARYLR+4 ; C0h
357: tALog equ UNARYLR+5 ; C1h
358: tSin equ UNARYLR+6 ; C2h
359: tASin equ UNARYLR+7 ; C3h
360: tCos equ UNARYLR+8 ; C4h
361: tACos equ UNARYLR+9 ; C5h
362: tTan equ UNARYLR+10 ; C6h
363: tATan equ UNARYLR+11 ; C7h
364: tSinh equ UNARYLR+12 ; C8h
365: tASinh equ UNARYLR+13 ; C9h
366: tCosh equ UNARYLR+14 ; CAh
367: tACosh equ UNARYLR+15 ; CBh
368: tTanh equ UNARYLR+16 ; CCh
369: tATanh equ UNARYLR+17 ; CDh
370: ;
371: ; SOME PROGRAMMING COMMANDS
372: ;
373: PROGTOK EQU UNARYLR+18
374: ;
375: tIf equ PROGTOK ; CEh
376: tThen equ PROGTOK+1 ; CFh
377: tElse equ PROGTOK+2 ; D0h
378: tWhile equ PROGTOK+3 ; D1h
379: tRepeat equ PROGTOK+4 ; D2h
380: tFor equ PROGTOK+5 ; D3h
381: tEnd equ PROGTOK+6 ; D4h
382: tReturn equ PROGTOK+7 ; D5h
383: tLbl equ PROGTOK+8 ; D6h 'Lbl_'
384: tGoto equ PROGTOK+9 ; D7h 'Goto_'
385: tPause equ PROGTOK+10 ; D8h 'Pause_'
386: tStop equ PROGTOK+11 ; D9h 'Stop'
387: tISG equ PROGTOK+12 ; DAh 'IS>'
388: tDSL equ PROGTOK+13 ; DBh 'DS<'
389: tInput equ PROGTOK+14 ; DCh 'Input_'
390: tPrompt equ PROGTOK+15 ; DDh 'Prompt_'
391: tDisp equ PROGTOK+16 ; DEh 'Disp_'
392: tDispG equ PROGTOK+17 ; DFh 'DispG'
393: ;
394: ; TOKEN E0 CANNOT BE AN EOS FUNCTION SINCE HI MU
395: ;
396: tOutput equ PROGTOK+18 ; E0H 'Outpt'
397: tClLCD equ PROGTOK+19 ; E1H 'ClLCD'
398: tConst equ PROGTOK+20 ; E2H 'Fill'
399: tSortA equ PROGTOK+21 ; E3H 'sortA_'
400: tSortD equ PROGTOK+22 ; E4H 'sortD_'
401: TDISPTAB EQU PROGTOK+23 ; E5h 'DISP TABLE
402: tMenu equ PROGTOK+24 ; E6H 'Menu'
403: tSENDMBL EQU PROGTOK+25 ; E7H 'SEND'
404: tGETMBL EQU PROGTOK+26 ; E8H 'GET'
405: ;
406: ; STAT PLOT COMMANDS
407: ;
408: STATPCMD EQU PROGTOK+27
409: ;
410: TPLOTON EQU STATPCMD ; E9h ' PLOTSON'
411: TPLOTOFF EQU STATPCMD+1 ; EAh ' PLOTSOFF
412: ;
413: TLISTNAME EQU 0EBH ; LIST DESIGNATOR
414: ;
415: ;
416: ;
417: TPLOT1 EQU 0ECH
418: TPLOT2 EQU 0EDH
419: TPLOT3 EQU 0EEH
420: ;
421: tPower equ 0F0h ; '^'
422: tXRoot equ 0F1h ; LsupX,Lroot
423:
424: STATCMD EQU 0F2h
425: ;
426: tOneVar equ STATCMD ; F2h 'OneVar_'
427: TTWOVAR EQU STATCMD+1 ; F3h
428: tLR equ STATCMD+2 ; F4h 'LinR(A+BX
429: tLRExp equ STATCMD+3 ; F5h 'ExpR_'
430: tLRLn equ STATCMD+4 ; F6h 'LnR_'
431: tLRPwr equ STATCMD+5 ; F7h 'PwrR_'
432: TMEDMED EQU STATCMD+6 ; F8h
433: TQUAD EQU STATCMD+7 ; F9h
434: tCLRLST equ STATCMD+8 ; FAh 'CLEAR LIST
435: TCLRTBL EQU STATCMD+9 ; FBH CLEAR TABLE
436: tHist equ STATCMD+10 ; FCh 'Hist_'
437: txyLine equ STATCMD+11 ; FDH 'xyline_'
438: tScatter equ STATCMD+12 ; FEh 'Scatter_'
439: tLR1 equ STATCMD+13 ; FFh 'LINR(AX+B
440: ;
441: ; 2ND HALF OF GRAPH FORMAT TOKENS
442: ;
443: ; ===== Format settings commands
444: ;
445: GFMT EQU 0
446: ;
447: tSeq equ GFMT ; 'SeqG'
448: tSimulG equ GFMT+1 ; 'SimulG'
449: tPolarG equ GFMT+2 ; 'PolarGC'
450: tRectG equ GFMT+3 ; 'RectGC'
451: tCoordOn equ GFMT+4 ; 'CoordOn'
452: tCoordOff equ GFMT+5 ; 'CoordOff'
453: tDrawLine equ GFMT+6 ; 'DrawLine'
454: tDrawDot equ GFMT+7 ; 'DrawDot'
455: tAxisOn equ GFMT+8 ; 'AxesOn'
456: tAxisOff equ GFMT+9 ; 'AxesOff'
457: tGridOn equ GFMT+10 ; 'GridOn'
458: tGridOff equ GFMT+11 ; 'GridOff'
459: tLblOn equ GFMT+12 ; 'LabelOn'
460: tLblOff equ GFMT+13 ; 'LabelOff'
461: tWebOn equ GFMT+14 ; 'WebOn'
462: tWebOff equ GFMT+15 ; 'WebOFF'
463: TUV EQU GFMT+16 ; U vs V
464: TVW EQU GFMT+17 ; V vs W
465: TUW EQU GFMT+18 ; U vs W
466: ;
467: ; 2ND HALF OF USER MATRIX TOKENS
468: ;
469: TMATA EQU 00h ; MAT A
470: TMATB EQU 01h ; MAT B
471: TMATC EQU 02h ; MAT C
472: TMATD EQU 03h ; MAT D
473: TMATE EQU 04h ; MAT E
474: TMATF EQU 05h ; MAT F
475: TMATG EQU 06h ; MAT G
476: TMATH EQU 07h ; MAT H
477: TMATI EQU 08h ; MAT I
478: TMATJ EQU 09h ; MAT J
479: ;
480: ; 2ND HALF OF USER LIST TOKENS
481: ;
482: TL1 EQU 00h ; LIST 1
483: TL2 EQU 01h ; LIST 2
484: TL3 EQU 02h ; LIST 3
485: TL4 EQU 03h ; LIST 4
486: TL5 EQU 04h ; LIST 5
487: TL6 EQU 05h ; LIST 6
488: ;
489: ; 2ND HALF OF USER EQUATION TOKENS
490: ;
491: ;
492: ; "Y" EQUATIONS HAVE BIT 4 SET
493: ;
494: TY1 EQU 10h ; Y1
495: TY2 EQU 11h ; Y2
496: TY3 EQU 12h ; Y3
497: TY4 EQU 13h ; Y4
498: TY5 EQU 14h ; Y5
499: TY6 EQU 15h ; Y6
500: TY7 EQU 16h ; Y7
501: TY8 EQU 17h ; Y8
502: TY9 EQU 18h ; Y9
503: TY0 EQU 19H ; Y0
504: ;
505: ; PARAM EQUATIONS HAVE BIT 5 SET
506: ;
507: TX1T EQU 20h ; X1t
508: TY1T EQU 21h ; Y1t
509: TX2T EQU 22h ; X2t
510: TY2T EQU 23h ; Y2t
511: TX3T EQU 24h ; X3t
512: TY3T EQU 25h ; Y3t
513: TX4T EQU 26h ; X4t
514: TY4T EQU 27h ; Y4t
515: TX5T EQU 28h ; X5t
516: TY5T EQU 29h ; Y5t
517: TX6T EQU 2Ah ; X6t
518: TY6T EQU 2Bh ; Y6t
519: ;
520: ; POLAR EQUATIONS HAVE BIT 6 SET
521: ;
522: TR1 EQU 40h ; R1
523: TR2 EQU 41h ; R2
524: TR3 EQU 42h ; R3
525: TR4 EQU 43h ; R4
526: TR5 EQU 44h ; R5
527: TR6 EQU 45h ; R6
528: ;
529: ; RECURSION EQUATIONS HAVE BIT 7 SET
530: ;
531: TUN EQU 80h ; Un
532: TVN EQU 81h ; Vn
533: TWN EQU 82h ; Wn
534: ;
535: ; 2ND HALF OF USER PICTURE TOKENS
536: ;
537: TPIC1 EQU 00h ; PIC1
538: TPIC2 EQU 01h ; PIC2
539: TPIC3 EQU 02h ; PIC3
540: TPIC4 EQU 03h ; PIC4
541: TPIC5 EQU 04h ; PIC5
542: TPIC6 EQU 05h ; PIC6
543: TPIC7 EQU 06h ; PIC7
544: TPIC8 EQU 07h ; PIC8
545: TPIC9 EQU 08h ; PIC9
546: TPIC0 EQU 09h ; PIC0
547: ;
548: ; 2ND HALF OF USER GRAPH DATABASE TOKENS
549: ;
550: TGDB1 EQU 00h ; GDB1
551: TGDB2 EQU 01h ; GDB2
552: TGDB3 EQU 02h ; GDB3
553: TGDB4 EQU 03h ; GDB4
554: TGDB5 EQU 04h ; GDB5
555: TGDB6 EQU 05h ; GDB6
556: TGDB7 EQU 06h ; GDB7
557: TGDB8 EQU 07h ; GDB8
558: TGDB9 EQU 08h ; GDB9
559: TGDB0 EQU 09h ; GDB0
560: ;
561: ; 2ND HALF OF STRING VARS
562: ;
563: TSTR1 EQU 00h
564: TSTR2 EQU 01h
565: TSTR3 EQU 02h
566: TSTR4 EQU 03h
567: TSTR5 EQU 04h
568: TSTR6 EQU 05h
569: TSTR7 EQU 06h
570: TSTR8 EQU 07h
571: TSTR9 EQU 08h
572: TSTR0 EQU 09h
573: ;
574: ; 2ND HALF OF SYSTEM OUTPUT ONLY VARIABLES
575: ;
576: ;
577: ; OPEN EQU 00H
578: ;
579: TREGEQ EQU 01h ; REGRESSION EQUATION
580: ;
581: TSTATN EQU 02h ; STATISTICS N
582: ;
583: TXMEAN EQU 03h ; X MEAN
584: TSUMX EQU 04h ; SUM(X)
585: TSUMXSQR EQU 05h ; SUM(X^2)
586: TSTDX EQU 06h ; STANDARD DEV X
587: TSTDPX EQU 07h ; STANDARD DEV POP X
588: TMINX EQU 08h ; MIN X VALUE
589: TMAXX EQU 09h ; MAX X VALUE
590: ;
591: TMINY EQU 0Ah ; MIN Y VALUE
592: TMAXY EQU 0Bh ; MAX Y VALUE
593: TYMEAN EQU 0Ch ; Y MEAN
594: TSUMY EQU 0Dh ; SUM(Y)
595: TSUMYSQR EQU 0Eh ; SUM(Y^2)
596: TSTDY EQU 0Fh ; STANDARD DEV Y
597: TSTDPY EQU 10h ; STANDARD DEV POP Y
598: ;
599: TSUMXY EQU 11h ; SUM(XY)
600: TCORR EQU 12h ; CORRELATION
601: TMEDX EQU 13h ; MED(X)
602: TQ1 EQU 14h ; 1ST QUADRANT OF X
603: TQ3 EQU 15h ; 3RD QUADRANT OF X
604: TQUADa EQU 16h ; 1ST TERM OF QUAD POLY REG/ Y-INT
605: TQUADb EQU 17h ; 2ND TERM OF QUAD POLY REG/ SLOPE
606: TQUADc EQU 18h ; 3RD TERM OF QUAD POLY REG
607: TCUBEd EQU 19h ; 4TH TERM OF CUBIC POLY REG
608: TQUARTe EQU 1Ah ; 5TH TERM OF QUART POLY REG
609: TMEDX1 EQU 1Bh ; x1 FOR MED-MED
610: TMEDX2 EQU 1Ch ; x2 FOR MED-MED
611: TMEDX3 EQU 1Dh ; x3 FOR MED-MED
612: TMEDY1 EQU 1Eh ; y1 FOR MED-MED
613: TMEDY2 EQU 1Fh ; y2 FOR MED-MED
614: TMEDY3 EQU 20h ; y3 FOR MED-MED
615: ;
616: TRECURN EQU 21h ; RECURSION N
617: TSTATP EQU 22h
618: TSTATZ EQU 23h
619: TSTATT EQU 24h
620: TSTATCHI EQU 25h
621: TSTATF EQU 26h
622: TSTATDF EQU 27h
623: TSTATPHAT EQU 28h
624: TSTATPHAT1 EQU 29h
625: TSTATPHAT2 EQU 2Ah
626: TSTATMEANX1 EQU 2Bh
627: TSTATSTDX1 EQU 2Ch
628: TSTATN1 EQU 2Dh
629: TSTATMEANX2 EQU 2Eh
630: TSTATSTDX2 EQU 2Fh
631: TSTATN2 EQU 30h
632: TSTATSTDXP EQU 31h
633: TSTATLOWER EQU 32h
634: TSTATUPPER EQU 33h
635: TSTAT_S EQU 34h
636: TLRSQR EQU 35h ; r^2
637: TBRSQR EQU 36h ; R^2
638: ;
639: ; these next tokens are only used to acess the data
640: ; they are display only and the user cannot access them at all
641: ;
642: TF_DF EQU 37h ; ANOFAV FACTOR DF
643: TF_SS EQU 38h ; ANOFAV FACTOR SS
644: TF_MS EQU 39h ; ANOFAV FACTOR MS
645: TE_DF EQU 3Ah ; ANOFAV ERROR DF
646: TE_SS EQU 3Bh ; ANOFAV ERROR SS
647: TE_MS EQU 3Ch ; ANOFAV ERROR MS
648: ;
649: ;
650: ; 2ND HALF OF SYSTEM INPUT/OUTPUT VARIABLES
651: ;
652:
653: ; SYSTEM VARIABLE EQUATES
654: ;
655: ; VARS WITH NO RESTRICTION
656: ;
657: TUXSCL EQU 0
658: TUYSCL EQU 1
659: TXSCL EQU 2
660: TYSCL EQU 3
661: TRECURU0 EQU 4 ; U 1ST INITIAL COND
662: TRECURV0 EQU 5 ; V 1ST INITIAL COND
663: TUN1 EQU 6 ; U(N-1) ; NOT USED
664: TVN1 EQU 7 ; V(N-1) ; NOT USED
665: TURECURU0 EQU 8 ;
666: TURECURV0 EQU 9 ;
667: ;
668: ; VARS ROUNDED TO 10 DIGITS
669: ;
670: TXMIN EQU 0AH
671: TXMAX EQU 0BH
672: TYMIN EQU 0CH
673: TYMAX EQU 0DH
674: TTMIN EQU 0EH
675: TTMAX EQU 0FH
676: TTHETAMIN EQU 10H
677: TTHETAMAX EQU 11H
678: TUXMIN EQU 12H
679: TUXMAX EQU 13H
680: TUYMIN EQU 14H
681: TUYMAX EQU 15H
682: TUTHETMIN EQU 16H
683: TUTHETMAX EQU 17H
684: TUTMIN EQU 18H
685: TUTMAX EQU 19H
686: TTBLMIN EQU 1AH
687: TPLOTSTART EQU 1BH
688: TUPLOTSTART EQU 1CH
689: TNMAX EQU 1DH
690: TUNMAX EQU 1EH
691: TNMIN EQU 1FH
692: TUNMIN EQU 20H
693: ;
694: ; VARS CANNOT BE 0
695: ;
696: TTBLSTEP EQU 21H
697: TTSTEP EQU 22H
698: TTHETASTEP EQU 23H
699: TUTSTEP EQU 24H
700: TUTHETSTEP EQU 25H
701: ;
702: ; SPECIAL LIMITS ON THESE
703: ;
704: TDELTAX EQU 26H
705: TDELTAY EQU 27H
706: ;
707: ; SPECIAL LIMITS ON THESE
708: ;
709: TXFACT EQU 28H
710: TYFACT EQU 29H
711: ;
712: TTBLINPUT EQU 2Ah
713: ;
714: ; ANY RESTRICTIONS ??????
715: ;
716: TFINn EQU 2Bh
717: TFINi EQU 2Ch
718: TFINpv EQU 2Dh
719: TFINpmt EQU 2Eh
720: TFINfv EQU 2Fh
721: TFINpy EQU 30h
722: TFINcy EQU 31h
723: ;
724: TRECURW0 EQU 32h ; W0(1)
725: TURECURW0 EQU 33h
726: ;
727: TPLOTSTEP EQU 34h
728: TUPLOTSTEP EQU 35h
729: ;
730: TXRES EQU 36h
731: TUXRES EQU 37h
732: ;
733: ; ALL THE TOKENS BELOW DO NOT HAVE STRINGS ASSOCIATED
734: ; THEY ARE HERE JUST FOR STORING AND RECALLING
735: ;
736: TRECURU02 EQU 38h ; U0(2)
737: TURECURU02 EQU 39h
738: TRECURV02 EQU 3Ch ; V0(2)
739: TURECURV02 EQU 3Dh
740: TRECURW02 EQU 3Eh ; W0(2)
741: TURECURW02 EQU 3Fh
742: ;
743: ; NO RESTRICTIONS
744: ;
745: ;TWN1 EQU 40h ; W(N-1)
746: ;UN2 EQU 41h ; U(N-2)
747: ;VN2 EQU 42h ; V(N-2)
748: ;WN2 EQU 43h ; W(N-2)
749: ;
750: ;
751: ; DON'T KNOW IF NEED THESE YET ?
752: ;
753: ;TUI12
754: ;TUI22
755: ;TUUI12
756: ;TUUI22
757: ;
758: ;
759:
760: TFINnpv EQU 00h ; immediate unary
761: TFINirr EQU 01h ; immediate unary
762: TFINbal EQU 02h ; immediate unary
763: TFINprn EQU 03h ; immediate unary
764: TFINint EQU 04h ; immediate unary
765: TFINtonom EQU 05h ; immediate unary
766: TFINtoeff EQU 06h ; immediate unary
767: TFINdbd EQU 07h ; immediate unary
768: TLCM EQU 08h ; immediate unary
769: TGCD EQU 09h ; immediate unary
770: TRANDINT EQU 0Ah ; immediate unary
771: TRANDBIN EQU 0Bh ; immediate unary
772: TSUBSTRNG EQU 0Ch ; immediate unary
773: TSTDDEV EQU 0Dh ; immediate unary
774: TVARIANCE EQU 0Eh ; immediate unary
775: TINSTRNG EQU 0Fh ; immediate unary
776: TDNORMAL EQU 10h ; immediate unary
777: TINVNORM EQU 11h ; immediate unary
778: TDT EQU 12h ; immediate unary
779: TCHI EQU 13h ; immediate unary
780: TDF EQU 14h ; immediate unary
781: TBINPDF EQU 15h ; immediate unary
782: TBINCDF EQU 16h ; immediate unary
783: TPOIPDF EQU 17h ; immediate unary
784: TPOICDF EQU 18h ; immediate unary
785: TGEOPDF EQU 19h ; immediate unary
786: TGEOCDF EQU 1Ah ; immediate unary
787: TNORMALPDF EQU 1Bh ; immediate unary
788: TTPDF EQU 1Ch ; immediate unary
789: TCHIPDF EQU 1Dh ; immediate unary
790: TFPDF EQU 1Eh ; immediate unary
791: ;TRANDBIN EQU 1Fh ; immediate unary
792: TRANDNORM EQU 1Fh ; immediate unary
793: TFINFpmt EQU 20h ; 0 or multy arg function
794: TFINFi EQU 21h ; 0 or multy arg function
795: TFINFpv EQU 22h ; 0 or multy arg function
796: TFINFn EQU 23h ; 0 or multy arg function
797: TFINFfv EQU 24h ; 0 or multy arg function
798: TCONJ EQU 25h ; unary
799: TREAL EQU 26h ; unary
800: TIMAG EQU 27h ; unary
801: TANGLE EQU 28h ; unary
802: TCUMSUM EQU 29h ; unary
803: TEXPR EQU 2Ah ; unary
804: TLENGTH EQU 2Bh ; unary
805: TDELTALST EQU 2Ch ; unary
806: TREF EQU 2Dh ; unary
807: TRREF EQU 2Eh ; unary
808: TTORECT EQU 2Fh ; display conversion
809: TTOPOLAR EQU 30h ; display conversion
810: TCONSTE EQU 31h ; function no arg
811: TSINREG EQU 32h ; command opt push
812: TLOGISTIC EQU 33h ; command opt push
813: TLINREGTTEST EQU 34h ; command opt push
814: TSHADENORM EQU 35h ; command pushed
815: TSHADET EQU 36h ; command pushed
816: TSHADECHI EQU 37h ; command pushed
817: TSHADEF EQU 38h ; command pushed
818: TMATTOLST EQU 39h ; command pushed
819: TLSTTOMAT EQU 3Ah ; command pushed
820: TZTEST EQU 3Bh ; command pushed
821: TTTEST EQU 3Ch ; command pushed
822: T2SAMPZTEST EQU 3Dh ; command pushed
823: T1PROPZTEST EQU 3Eh ; command pushed
824: T2PROPZTEST EQU 3Fh ; command pushed
825: TCHITEST EQU 40h ; command pushed
826: TZINTVAL EQU 41h ; command pushed
827: T2SAMPZINT EQU 42h ; command pushed
828: T1PROPZINT EQU 43h ; command pushed
829: T2PROPZINT EQU 44h ; command pushed
830: TGRAPHSTYLE EQU 45h ; command pushed
831: T2SAMPTTEST EQU 46h ; command opt pushed
832: T2SAMPFTEST EQU 47h ; command opt pushed
833: TTINTVAL EQU 48h ; command opt pushed
834: T2SAMPTINT EQU 49h ; command opt pushed
835: TSETUPLST EQU 4Ah ; command opt pushed
836: TFINpmtend EQU 4Bh ; mode command
837: TFINpmtbeg EQU 4Ch ; mode command
838: TREALM EQU 4Dh ; mode command
839: TPOLARM EQU 4Eh ; mode command
840: TRECTM EQU 4Fh ; mode command
841: TEXPRON EQU 50h ; mode command
842: TEXPROFF EQU 51h ; mode command
843: TCLRALLLST EQU 52h ; command not pushed
844: TGETCALC EQU 53h ; command not pushed
845: TDELVAR EQU 54h ; command not pushed
846: TEQUTOSTRNG EQU 55h ; command not pushed
847: TSTRNGTOEQU EQU 56h ; command not pushed
848: tdellast EQU 57h ; command not pushed
849: TSELECT EQU 58h ; command not pushed
850: TANOVA EQU 59h ; command not pushed
851: TMODBOX EQU 5Ah ; icon
852: TNORMPROB EQU 5Bh ; icon
853: ;
854: ; tokens 5Ch to 63h CANNOT BE THE 2ND BYTE OF
855: ; TWO BYTE TOKENS. THESE ARE ALREADY THE 1ST BYTE VALUE
856: ; OF TWO BYTE TOKENS. READING TOKENS BACKWARDS WILL NOT
857: ; WORK IF THIS RESTRICTION IS NOT IN PLACE.
858: ;
859: ;
860: ; NO USE EQU 5Ch
861: ; NO USE EQU 5Dh
862: ; NO USE EQU 5Eh
863: ; NO USE EQU 5Fh
864: ; NO USE EQU 60h
865: ; NO USE EQU 61h
866: ; NO USE EQU 62h
867: ; NO USE EQU 63h
868: ;
869: TMGT EQU 64h ; VERTICAL SPLIT
870: TZFIT EQU 65h ; ZOOM FIT
871: TDIAG_ON EQU 66h ; DIANOSTIC DISPLAY ON
872: TDIAG_OFF EQU 67h ; DIANOSTIC DISPLAY OFF
873: ;
874: ;