cloos@acsu.buffalo.edu (James H. Cloos) (11/29/90)
Please find enclosed a RPL version of KCRC. The usage is the same as for the previously posted userlang version. The algorithms used here are the same; all that is different is that I went thru and changed each occurance of a usrlang command with the routine that the given command calls after confirming the required args are on the stack. The XTIME routine in Jim Donnelly's toolkit says this takes about half the time as the usrlang version. (This actually uses xSTARTVAR (aka FOR) rather than the true RPL looping routines as I don't have the info on exactly how to use the true RPL looping routines, and also as I would need the addresses of the RPL commands that do multiplication, xor, et. al. on shorts. Anyway, here it is, ASC encoded: ==========Cut me here, bitte!=================== %%HP: T(3)A(R)F(.); "D9D20ECE81D0040D9D20E4A209000000002C23062AC19C2A2322300A132D6E20 2072A42C230D6E202072A488130BB8C1C2A20700003232230C2A207000086391 5039150731412C23062D35E4A2090000F00040D35E4A209000018013DE353223 018D3518D3518D3518D3562D35C4232E4A2090000FFFF40D353223044230B213 0B21307BDB" =============I'm over already==================== In a future article, I'll go thru the motions of how I did this. Also, you'll note that if there isn't a string on level 1, you'll get an error message that says "XLIB 3152 116 error:". I believe that if you were to put this into a library, that error message would replace the "XLIB 3152 116" with the programs name. I've not tested this yet, though. Enjoy. -JimC -- James H. Cloos, Jr. Phone: +1 716 673-1250 cloos@ACSU.Buffalo.EDU Snail: PersonalZipCode: 14048-0772, USA cloos@ub.UUCP Quote: <>