HPHP48-E,*`****************************************************************************
			liste de routines en rom
		routines situées entre 60000h et 70000h
****************************************************************************
                         par Laurent JOUANNEAU
                           alias  J Y L O G  
		    mis à jour le 16 septembre 1993


commentaires non encore complets
pour plus de precision, lisez le fichier JYLOG.TXT et les fichiers HPROM FILES


#60035	secret1 page 141
#60058	secret1 page 141
#603E2	secret2 page 89
#60B17	secret1 page 189
#60D1B	secret1 page 192
#60DD3	secret2 page 88
#60EBD	secret2 page 105
#60EE7	secret1 page 130
#60F0E	secret1 page 131
#60F21	secret1 page 130
#60F33	secret1 page 130
#60F4B	secret1 page 129
#60F54	secret1 page 129
#60F66	secret1 page 129
#60F72	secret1 page 129
#60F7E	secret1 page 129
#60F9B	secret1 page 130
#60FAC	secret1 page 129
#60FBB	secret1 page 129
#60FD8	secret1 page 129
#61002	secret1 page 129
#6103C	secret1 page 129
#6106B	secret1 page 129
#61099	secret1 page 131
#6109E	secret1 page 129
#610C4	secret1 page 129
#610FA	secret1 page 129
#6112A	secret1 page 130
#6113C	secret1 page 130
#6114E	secret2 page 108
#61160	secret2 page 108
#61172	secret1 page 130
#6119E	secret1 page 130
#611A3	secret1 page 130
#611BE	secret1 page 130
#611D2	secret1 page 130
#611E1	secret1 page 130
#611F9	secret1 page 131
#611FE	secret1 page 129
#6121C	secret1 page 129
#6123A	secret1 page 129
#6125E	secret1 page 129
#61282	secret1 page 129
#612A9	secret1 page 129
#612CC	secret1 page 130
#612DE	secret1 page 130
#612F3	secret1 page 130
#61305	secret1 page 130
#61318	secret1 page 130
#6132C	secret1 page 130
#6133E	secret1 page 130
#61353	secret1 page 130
#61365	secret1 page 130
#61380	secret1 page 131; swap over
 613A8	? (61B89)
#613B6	secret1 page 303
#613E7	secret1 page 303
#6140E	secret1 page 303
#61438	secret1 page 303
#6145C	secret1 page 303
#6146C	secret1 page 303
#6147C	secret1 page 303
#6148C	secret1 page 303
#6149C	secret1 page 303
#614AC	secret1 page 303
#614BC	secret1 page 303
#614CC	secret1 page 303
#614DC	secret1 page 303
#614EC	secret1 page 303
#614FC	secret1 page 303
#6150C	secret1 page 303
#6151C	secret1 page 303
#6152C	secret1 page 303
#6153C	secret1 page 303
#6154C	secret1 page 303
#6155C	secret1 page 303
#6156C	secret1 page 303
#615E0	secret1 page 304
#615F0	secret1 page 304
#61600	secret1 page 304
#61610	secret1 page 309
#61615	secret1 page 304
#61625	secret1 page 304
#61635	secret1 page 304
#61645	secret1 page 304
#61655	secret1 page 304
#61665	secret1 page 304
#61675	secret1 page 304
#61685	secret1 page 304
#61695	secret1 page 304
#616A5	secret1 page 304
#616B5	secret1 page 304
#616C5	secret1 page 304
#616D5	secret1 page 304
#616E5	secret1 page 304
#616F5	secret1 page 304
#61705	secret1 page 304
#61715	secret1 page 304
#61725	secret1 page 304
#61735	secret1 page 304
#61745	secret1 page 309

#6186C	secret2 page 95
#6187C	secret2 page 95
#61896	secret2 page 95
#618A8	secret2 page 96
#618BA	secret2 page 96
#618D3	secret2 page 96
#618E8	secret2 page 96
#618F7	secret2 page 96
#61910	secret2 page 96
#6191F	secret2 page 96
#61933	secret2 page 95
#6194B	secret2 page 90
#61960	secret2 page 90
#61970	secret2 page 90
#61984	secret2 page 90
#61993	gosub 61A02;carry ->6199F;sinon 619A6  
	sert pour les structures cases: execute cond si true. secret2 page 94
 6199F	goto 06FD6
 619A6	goto 07152
#619AD	gosub 61A02;carry ->619A6;sinon 6199F
	sert pour les structures cases: execute cond si false. secret2 page 94
#619BC	a.s. secret2 page 85
 619D0	gosub 61A02;carry ->rtnrpl sinon 619A6
	structure if then end avec: bool,619BC,obj evalue si true, suite
#619CB	A=DAT0 A D0=A rtnrpl  on continue le rpl a l'adresse suivant cet
	external: sorte de goto. secret2 page 111
#619E0	gosub 61A02;carry->619D0 sinon d0=d0+5 goto 61A4E
	arg:bool2,bool1. secret2 page 111
#619F3	gosub 61A02;nocarry->619D0 sinon d0=D0+5;goto 61A4E. secret2 page 111
 61A02	sp:test si obj du niv1= true; oui->arme carry sinon pas de carry
	enleve le bool de la pile
#61A18	gosub 06641;?A=0 oui->61A47 sinon 61A4E.  secret2 page 90
	=IF <O> == THEN on continue a l'adr de pilret1 END
#61A2C	gosub 61A02;carry->61A4E sinon 61A47. secret2 page 90
	=IF bool not THEN on continue a l'adr de pilret1 END
#61A3B	gosub 61AO2;nocarry->61A4E sinon 61A47
	=IF bool THEN on continue à l'adr de pilret1 END. secret2 page 90
 61A47	goto 03130
 61A4E	rtnrpl
#61A58	gosub 61A02;nocarry->61A4E sinon drop;619A6. secret2 page 87
#61A6D	on fait pointe d0 à l'adr pilret1. puis dpilret.
	 A=adr obj niv1 puis drop;rtnrpl. secret2 page 92
#61A8E	on fait pointe d0 à l'adr pilret1. niv3=true ? oui->61AD0 sinon
	61ACE
	->  sorte de IFTE mais pointe d0 sur l'adr pilret1 (??) et suivant
	le bool du niv3, on evalue niv2 et met adr niv1 dans rstk sinon
	evalue obj niv1 ; drop4. secret2 page 92
 61ACE	d0=valeur du niveau 2 de rstk (->drop2 dans la rstk)
	puis on va a cette adresse qui est celle d'un objet
 61AD0	idem que 61ACE met c'est l'adr du niv1 de rstk
#61AD8	=if then else:on met adr de D0 dans rstk puis goto 61B02
	struct rpl: bool;61AD8;obj1;obj2; suite prog... secret2 page 85
#61AE9	on lit pilret1 que l'on met dans rstk; dpilret;goto 61B02. secret2 page 100
 61B02	gosub 3019;sauve adr de do dans rstk;gosub 3019;gosub 61A02
	carry->D0 pointe a la 2eme adr de rstk sinon a la premiere cette adr
	est sauve dans rstk. on verifie si D0 pointe sur un objet RPN
	oui->61ACE non->61AD0. D0 retrouve sa valeur initiale
#61B45	C=FFFF6 et on va en 61B61. secret2 page 104
#61B55	C=FFFF1 et on va en 61B61. secret2 page 104
 61B61	??
#61B72	gosub 61A02;carry->61A4E sinon drop puis 61A4E
	->si bool du niv1 = false alors on retire niv2. secret2 page 87
#61B89	secret2 page 103

#61C1C	secret1 page 144
#61CE9	secret1 page 300
#61D41	secret1 page 132
#61EA7	secret1 page 302
#61F8F	secret1 page 132
#61FA9	secret1 page 341
#62001	secret1 page 130
#62020	secret1 page 137
#62025	secret1 page 137
#62035	secret1 page 137
#6203A	secret1 page 137
#6204A	secret1 page 137
#6204F	secret1 page 137
 620D9	place true ou false sur la pile selon la valeur de carry
#620EB	secret1 page 140
#62103	secret1 page 134
#6210C	secret1 page 134
#62115	secret1 page 137
#6211A	secret1 page 137
#6212A	secret1 page 137
#6212F	secret1 page 137
#6213F	secret1 page 137
#62144	secret1 page 137
#62154	secret1 page 137
#62159	secret1 page 137
#62169	secret1 page 137
#6216E	secret1 page 137
#6217E	secret1 page 137
#62183	secret1 page 137
#62193	secret1 page 137
#62198	secret1 page 137
#621A8	secret1 page 137
#621AD	secret1 page 137
#621BD	secret1 page 137
#621C2	secret1 page 137
#621D2	secret1 page 137
#621D7	secret1 page 137
#621E7	secret1 page 137
#621EC	secret1 page 137
#621FC	secret1 page 137
#62201	secret1 page 137
#62211	secret1 page 137
#62216	secret1 page 137
#62226	secret1 page 137
#6222B	secret1 page 137
#6223B	secret1 page 137
#62256	secret1 page 137
#62266	secret1 page 140
#62289	secret1 page 140
#6229A	secret1 page 140
#622A7	secret1 page 140
#622B6	secret1 page 140
#622C5	secret1 page 140
#622D4	secret1 page 140
#622EF	secret1 page 173
#62376	secret1 page 173
#624BA	secret1 page 139
#624C6	secret1 page 139
#624FB	secret1 page 141
#62535	secret1 page 142
#6254E	secret1 page 142
#6256A	secret1 page 139
#6257A	secret1 page 139
#6258A	secret1 page 139
#6259A	secret1 page 139
#625AA	secret1 page 139
#625BA	secret1 page 139
#625CA	secret1 page 139
#625DA	secret1 page 139
#625EA	secret1 page 139
#625FA	secret1 page 139
#6260A	secret1 page 139
#6261A	secret1 page 139
#6262A	secret1 page 139
#6264E	secret1 page 139
#62674	secret1 page 139
#62691	secret1 page 139
#626AE	secret2 page 91
#626DC	secret2 page 91
#626E5	secret2 page 91
#626EE	secret2 page 91
#626F7	secret1 page 140
#6270C	secret1 page 131
#62726	secret1 page 130
#62747	secret1 page 131
#62775	secret1 page 131
#62794	secret1 page 141
#627A7	secret1 page 131
#627BB	secret1 page 174
#627D5	secret1 page 141
#627F8	secret1 page 141
#62809	secret1 page 140
#6281A	secret1 page 140
#62830	secret1 page 131
#6284B	secret1 page 131
#62864	secret1 page 130
#62880	secret1 page 130
#6289B	secret1 page 140
#628B5	secret1 page 140
#628D1	secret1 page 140
#628EB	secret1 page 140
#62904	secret1 page 140
#6292F	secret1 page 140
#62946	secret1 page 142
#62958	secret2 page 92
#6296D	secret2 page 92
#62986	secret2 page 97
#629A1	secret2 page 97
#629BC	secret2 page 94
#629D0	secret2 page 100
#629E9	secret2 page 100

#62A2F	secret1 page 293
#62A34	secret1 page 293
#62A61	secret1 page 315
#62A84	secret1 page 315
#62B0B	secret1 page 134
#62B1F	secret1 page 316
#62B5B	secret1 page 316
#62B6F	secret2 page 81
#62B88	secret1 page 166
#62B9C	secret1 page 164
#62BB0	secret1 page 174
#62BC4	secret1 page 129
#62BF1	secret1 page 148
#62C05	secret1 page 293
#62C19	secret1 page 314
#62C2D	secret2 page 86
#62C41	secret1 page 166
#62C55	secret1 page 138
#62C69	secret1 page 341
#62C7D	secret1 page 131
#62C91	secret1 page 138
#62CA5	secret1 page 131
#62CB9	secret1 page 131
#62CCD	secret1 page 131
#62CE1	secret1 page 178
#62CF5	secret1 page 131
#62D09	secret1 page 131
#62D1D	secret1 page 164
#62D31	secret1 page 131
#62D45	secret1 page 130
#62D59	secret1 page 175
#62D6D	secret1 page 175
#62D81	secret2 page 87
#62D9F	secret2 page 87
#62DB3	secret1 page 309
#62DCC	secret1 page 141
#62DE5	secret1 page 141
#62DFE	secret1 page 141
#62E12	secret1 page 141
#62E26	secret1 page 140
#62E3A	secret1 page 142
#62E4E	secret1 page 141
#62E67	secret1 page 142
#62E7B	secret1 page 178
#62E8F	secret1 page 178
#62EA3	secret1 page 152
#62EB7	secret1 page 134
#62ECB	secret1 page 131
#62EDF	secret1 page 131
#62EF3	secret1 page 131
#62F07	secret1 page 309
#62F1B	secret2 page 87
#62F2F	secret1 page 173
#62F43	secret2 page 87
#62F5C	secret2 page 87
#62F75	secret1 page 130
#62F89	secret1 page 130
#62F9D	secret1 page 155
#62FB1	secret1 page 131
#62FC5	secret1 page 131
#62FD9	secret1 page 140
#62FED	secret1 page 152
#63001	secret1 page 131
#63015	secret1 page 131
#63029	secret1 page 131
#6303D	secret1 page 135
#63051	secret1 page 141
#63065	secret1 page 141
#63079	secret1 page 142
#6308D	secret1 page 131
#630A1	secret1 page 131
#630B5	secret1 page 131
#630C9	secret1 page 131
#630DD	secret1 page 130
#630F1	secret1 page 130
#63105	secret1 page 130
#63119	secret1 page 129
#6312D	secret1 page 129
#63141	secret1 page 155
#63155	secret1 page 348
#63169	secret1 page 348
#6317D	secret2 page 87
#63191	secret1 page 174
#631A5	secret1 page 163
#631B9	secret1 page 163
#631CD	secret1 page 163
#631E1	secret1 page 166
#631F5	secret1 page 166
#63209	secret1 page 175
#6321D	secret2 page 87
#63231	secret1 page 165
#63245	secret1 page 175
#63259	secret1 page 175
#6326D	secret1 page 175
#63281	secret1 page 175
#63295	secret1 page 178
#632A9	secret1 page 150
#632BD	place sur la pile un prog vide
#632D1	secret1 page 166
#632E5	secret1 page 309
#632F9	secret2 page 108
#63312	secret2 page 92
#63326	secret2 page 92
#6333A	secret2 page 88
#63353	secret2 page 88
#6336C	secret2 page 88
#63385	secret1 page 140
#63399	secret2 page 88
#633B2	secret2 page 92
#633C6	secret2 page 81
#633DF	secret2 page 82
#633F8	secret2 page 82
#63411	secret2 page 78
#63425	secret2 page 78
#63439	secret2 page 78
#6344D	secret2 page 77
#63466	secret2 page 77
#6347F	secret2 page 76
#63498	secret2 page 76
#634B6	secret1 page 309
#634CA	secret1 page 309
#634CF	secret1 page 309
#634E3	secret2 page 90
#634F7	secret1 page 134
#6350B	secret1 page 134
#6351F	secret1 page 138
#63533	secret1 page 138
#63547	secret2 page 90
#6356A	secret2 page 90
#63583	secret2 page 90
#6359C	secret2 page 90
#635B0	secret1 page 134
#635C4	secret1 page 136
#635D8	secret1 page 135
#635EC	secret2 page 99
#635F1	secret2 page 99
#63605	secret1 page 135
#63619	secret1 page 136
#6362D	secret1 page 140
#6364B	secret1 page 140
#6365F	secret1 page 140
#63673	secret1 page 140
#63687	secret1 page 140
#636A0	secret1 page 172
#636B4	secret1 page 140
#636C8	secret1 page 140
#636DC	secret1 page 140
#636F0	secret1 page 140
#63704	secret1 page 141
#63718	secret1 page 141
#6372C	secret1 page 141
#63740	secret1 page 141
#63754	secret1 page 141
#63768	secret1 page 141
#6377C	secret1 page 141
#63790	secret2 page 78
#637A4	secret1 page 141
#637B8	secret1 page 141
#637CC	secret1 page 141
#637E0	secret1 page 140
#637F4	secret1 page 140
#63808	secret1 page 141
#6381C	secret2 page 92
#6383A	secret1 page 348
#6386C	secret1 page 131
#63880	secret2 page 101
#6389E	secret1 page 273
#638B2	secret2 page 90
#638CB	secret2 page 90
#638E4	secret2 page 87
#638FD	secret1 page 196
#63911	secret1 page 192
#63925	secret2 page 100
#63939	secret2 page 100
#6394D	secret2 page 100
#63961	secret2 page 100
#63975	secret2 page 100
#63989	secret2 page 100
#6399D	secret2 page 100
#639B6	secret2 page 100
#639CA	secret2 page 100
#639DE	secret2 page 101
#639FC	secret2 page 108
#63A15	secret2 page 92
#63A88	secret1 page 142
#63A9C	secret1 page 142
#63AB0	secret1 page 142
#63AC4	secret1 page 142
#63AD8	secret1 page 142
#63AEC	secret2 page 90
#63B05	secret1 page 352
#63B19	secret1 page 352
#63B2D	secret1 page 352
#63B46	secret1 page 352
#63B5A	secret2 page 99
#63B6E	secret2 page 99
#63B82	secret1 page 152
#63B96	secret1 page 177
#63BAA	secret2 page 87
#63BBE	secret1 page 152
#63BD2	secret2 page 90
#63BEB	secret2 page 90
#63C04	secret1 page 274
#63C18	secret1 page 152
#63C2C	secret1 page 131
#63C40	secret1 page 131
#63C54	secret1 page 131
#63C7C	secret1 page 131
#63C90	secret1 page 131
#63C98	secret1 page 130
#63CA4	secret2 page 96
#63CBD	secret2 page 90
#63CD6	secret2 page 95
#63CEA	secret2 page 94
#63CFE	secret2 page 95
#63D12	secret2 page 95
#63D26	secret2 page 95
#63D3A	secret2 page 95
#63D4E	secret2 page 95
#63D67	secret2 page 95
#63D7B	secret2 page 95
#63D8F	secret2 page 95
#63DA3	secret2 page 95
#63DB7	secret2 page 95
#63DCB	secret1 page 258
#63DDF	secret2 page 94
#63DF3	secret2 page 95
#63E07	secret2 page 95
#63E1B	secret2 page 95
#63E2F	secret2 page 86
#63E48	secret2 page 86
#63E61	secret2 page 86
#63E75	secret2 page 86
#63E89	secret2 page 86
#63E9D	secret2 page 86
#63EB1	secret2 page 86
#63EC5	secret2 page 86
#63ED9	secret2 page 86
#63EED	secret2 page 86
#63F01	secret1 page 209
#63F1A	secret1 page 192
#63F2E	secret1 page 193
#63F42	secret1 page 193
#63F56	secret1 page 203
#63F6A	secret1 page 173
#63F7E	secret1 page 342
#63F92	secret1 page 202
#63FA6	secret1 page 130
#63FBA	secret1 page 130
#63FCE	secret1 page 166
#63FE7	secret1 page 166
#63FFB	secret1 page 166
#6400F	secret2 page 78
#64023	secret1 page 298
#64037	secret1 page 298
#64078	secret1 page 298
#6408C	secret1 page 298
#640BE	secret1 page 298
#64127	secret1 page 172
#6416D	donne le nombre d'objet sur la pile
#64190	execute une erreur si numero d'erreur est 13E, 123 ou DFF
#641C7	a.s
 641CC	duplique niveau 1 et continue 5 quartets apres là ou etait inscrite
	l'adresse de ce prog (641CC)
#641FC	secret1 page 142
#64209	secret1 page 142
#6427A	secret1 page 142
#6428A	secret1 page 142
#6429D	secret1 page 142
#642AF	secret1 page 142
#642BF	secret1 page 142
#642D1	secret1 page 142
#642E3	secret1 page 142
#642F7	secret1 page 142
#64309	secret1 page 142
#6431D	secret1 page 142
#64331	secret1 page 142
#64345	secret1 page 193
#64368	secret1 page 130
#643EF	secret1 page 165
#64426	secret1 page 165
#6448A	secret1 page 165
#644A3	secret1 page 164
#644BC	secret1 page 164
#644D0	secret1 page 165
#645B1	secret1 page 175
#645BD	secret1 page 175
#6475C	conversion ch->st
#64775	secret1 page 218
#647A2	secret1 page 218
#647BB	secret1 page 218
#6480B	secret1 page 165
#648BD	secret1 page 312
#6594E	secret1 page 341
#6595A	secret1 page 341
#659DE	secret1 page 282
#6738F	secret1 page 282
#673A3	secret1 page 350
#67E84	secret1 page 142
#680B4	secret1 page 134
#685C9	secret1 page 141
#68736	secret1 page 134
#6910C	secret1 page 173
#69920	secret1 page 273
#6A478	secret1 page 246
#6B030	secret1 page 139
#6B08A	secret1 page 134
#6CE1A	secret1 page 141
#6CE88	secret1 page 142
#6CEA1	secret2 page 99
#6CFB4	secret1 page 137
#6D1BC	secret1 page 175
#6D414	secret1 page 134
#6F2CD	secret1 page 138