/ RISC DISC 2 / RISC_DISC_2.iso / pd_share / music / cdlike / BasLibrary / Functions1

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 19 f4 20 3e 4c | 69 62 72 61 72 79 2e 46 |..... >L|ibrary.F|
|00000010| 75 6e 63 74 69 6f 6e 73 | 31 0d 00 14 09 f4 20 4a |unctions|1..... J|
|00000020| 75 67 0d 00 1e 05 e0 0d | 00 28 15 dd 20 f2 5f 5f |ug......|.(.. .__|
|00000030| 66 75 6e 63 74 69 6f 6e | 73 31 3a e1 0d 00 32 05 |function|s1:...2.|
|00000040| 3a 0d 00 3c 0e dd 20 a4 | 6d 74 78 28 6d 25 29 0d |:..<.. .|mtx(m%).|
|00000050| 00 46 08 ea 20 74 24 0d | 00 50 09 74 24 3d 22 22 |.F.. t$.|.P.t$=""|
|00000060| 0d 00 5a 0d c8 95 20 3f | 6d 25 3e 33 31 0d 00 64 |..Z... ?|m%>31..d|
|00000070| 0d 20 74 24 2b 3d bd 3f | 6d 25 0d 00 6e 0a 20 6d |. t$+=.?|m%..n. m|
|00000080| 25 2b 3d 31 0d 00 78 05 | ce 0d 00 82 07 3d 74 24 |%+=1..x.|.....=t$|
|00000090| 0d 00 8c 05 3a 0d 00 96 | 0f dd 20 a4 6d 74 78 32 |....:...|.. .mtx2|
|000000a0| 28 6d 25 29 0d 00 a0 08 | ea 20 74 24 0d 00 aa 09 |(m%)....|. t$....|
|000000b0| 74 24 3d 22 22 0d 00 b4 | 0d c8 95 20 3f 6d 25 3e |t$=""...|... ?m%>|
|000000c0| 33 32 0d 00 be 0d 20 74 | 24 2b 3d bd 3f 6d 25 0d |32.... t|$+=.?m%.|
|000000d0| 00 c8 0a 20 6d 25 2b 3d | 31 0d 00 d2 05 ce 0d 00 |... m%+=|1.......|
|000000e0| dc 07 3d 74 24 0d 00 e6 | 05 3a 0d 00 f0 0e dd 20 |..=t$...|.:..... |
|000000f0| a4 6c 6f 77 28 74 24 29 | 0d 00 fa 0b ea 20 70 25 |.low(t$)|..... p%|
|00000100| 2c 63 25 0d 01 04 10 e3 | 20 70 25 3d 31 20 b8 20 |,c%.....| p%=1 . |
|00000110| a9 74 24 0d 01 0e 12 20 | 63 25 3d 97 c1 74 24 2c |.t$.... |c%=..t$,|
|00000120| 70 25 2c 31 29 0d 01 18 | 23 20 e7 20 63 25 3e 3d |p%,1)...|# . c%>=|
|00000130| 97 22 41 22 20 80 20 63 | 25 3c 3d 97 22 5a 22 20 |."A" . c|%<=."Z" |
|00000140| 8c 20 63 25 2b 3d 33 32 | 0d 01 22 12 20 c1 74 24 |. c%+=32|..". .t$|
|00000150| 2c 70 25 2c 31 29 3d bd | 63 25 0d 01 2c 05 ed 0d |,p%,1)=.|c%..,...|
|00000160| 01 36 07 3d 74 24 0d 01 | 40 05 3a 0d 01 4a 0e dd |.6.=t$..|@.:..J..|
|00000170| 20 a4 75 70 70 28 74 24 | 29 0d 01 54 0b ea 20 70 | .upp(t$|)..T.. p|
|00000180| 25 2c 63 25 0d 01 5e 10 | e3 20 70 25 3d 31 20 b8 |%,c%..^.|. p%=1 .|
|00000190| 20 a9 74 24 0d 01 68 12 | 20 63 25 3d 97 c1 74 24 | .t$..h.| c%=..t$|
|000001a0| 2c 70 25 2c 31 29 0d 01 | 72 23 20 e7 20 63 25 3e |,p%,1)..|r# . c%>|
|000001b0| 3d 97 22 61 22 20 80 20 | 63 25 3c 3d 97 22 7a 22 |=."a" . |c%<=."z"|
|000001c0| 20 8c 20 63 25 2d 3d 33 | 32 0d 01 7c 12 20 c1 74 | . c%-=3|2..|. .t|
|000001d0| 24 2c 70 25 2c 31 29 3d | bd 63 25 0d 01 86 05 ed |$,p%,1)=|.c%.....|
|000001e0| 0d 01 90 07 3d 74 24 0d | 01 9a 05 3a 0d 01 a4 18 |....=t$.|...:....|
|000001f0| dd 20 a4 72 65 61 64 76 | 61 72 76 61 6c 28 62 25 |. .readv|arval(b%|
|00000200| 2c 76 24 29 0d 01 ae 0b | ea 20 70 25 2c 66 25 0d |,v$)....|. p%,f%.|
|00000210| 01 b8 30 c8 99 20 22 58 | 4f 53 5f 52 65 61 64 56 |..0.. "X|OS_ReadV|
|00000220| 61 72 56 61 6c 22 2c 76 | 24 2c 62 25 2c 32 35 36 |arVal",v|$,b%,256|
|00000230| 2c 30 2c 30 20 b8 20 2c | 2c 70 25 20 3b 66 25 0d |,0,0 . ,|,p% ;f%.|
|00000240| 01 c2 11 e7 20 66 25 3c | 3e 36 20 8c 20 3d 22 22 |.... f%<|>6 . =""|
|00000250| 0d 01 cc 0c 62 25 3f 70 | 25 3d 31 33 0d 01 d6 08 |....b%?p|%=13....|
|00000260| 3d 24 62 25 0d 01 e0 05 | 3a 0d 01 ea 14 dd 20 a4 |=$b%....|:..... .|
|00000270| 6c 65 61 66 28 62 24 2c | f8 20 70 24 29 0d 01 f4 |leaf(b$,|. p$)...|
|00000280| 0e ea 20 78 25 2c 79 25 | 2c 62 25 0d 01 fe 29 e7 |.. x%,y%|,b%...).|
|00000290| 20 a7 62 24 2c 22 3a 22 | 29 3d 30 20 80 20 a7 62 | .b$,":"|)=0 . .b|
|000002a0| 24 2c 22 2e 22 29 3d 30 | 20 8c 20 70 24 3d 22 22 |$,".")=0| . p$=""|
|000002b0| 3a 3d 62 24 0d 02 08 0e | de 20 62 25 20 a9 62 24 |:=b$....|. b% .b$|
|000002c0| 2b 31 0d 02 12 0a 24 62 | 25 3d 62 24 0d 02 1c 09 |+1....$b|%=b$....|
|000002d0| 78 25 3d 62 25 0d 02 26 | 05 f5 0d 02 30 0a 20 79 |x%=b%..&|....0. y|
|000002e0| 25 3d 78 25 0d 02 3a 12 | 20 78 25 2b 3d a7 24 78 |%=x%..:.| x%+=.$x|
|000002f0| 25 2c 22 2e 22 29 0d 02 | 44 12 20 78 25 2b 3d a7 |%,".")..|D. x%+=.|
|00000300| 24 78 25 2c 22 3a 22 29 | 0d 02 4e 0b fd 20 78 25 |$x%,":")|..N.. x%|
|00000310| 3d 79 25 0d 02 58 0c 78 | 25 3f 2d 31 3d 31 33 0d |=y%..X.x|%?-1=13.|
|00000320| 02 62 0a 70 24 3d 24 62 | 25 0d 02 6c 08 3d 24 78 |.b.p$=$b|%..l.=$x|
|00000330| 25 0d 02 76 05 3a 0d 02 | 80 15 dd 20 f2 66 69 6c |%..v.:..|... .fil|
|00000340| 6c 28 6d 25 2c 73 25 2c | 63 25 29 0d 02 8a 08 ea |l(m%,s%,|c%).....|
|00000350| 20 70 25 0d 02 94 0e e7 | 20 73 25 3c 31 20 8c 20 | p%.....| s%<1 . |
|00000360| e1 0d 02 9e 17 e3 20 70 | 25 3d 6d 25 20 b8 20 6d |...... p|%=m% . m|
|00000370| 25 2b 73 25 20 88 20 31 | 0d 02 a8 0b 20 3f 70 25 |%+s% . 1|.... ?p%|
|00000380| 3d 63 25 0d 02 b2 05 ed | 0d 02 bc 05 e1 0d 02 c6 |=c%.....|........|
|00000390| 05 3a 0d 02 d0 18 dd 20 | a4 66 69 6e 64 28 6d 25 |.:..... |.find(m%|
|000003a0| 2c 73 25 2c 63 25 2c 74 | 25 29 0d 02 da 08 ea 20 |,s%,c%,t|%)..... |
|000003b0| 70 25 0d 02 e4 10 e7 20 | 73 25 3c 31 20 8c 20 3d |p%..... |s%<1 . =|
|000003c0| 2d 31 0d 02 ee 18 e3 20 | 70 25 3d 6d 25 20 b8 20 |-1..... |p%=m% . |
|000003d0| 6d 25 2b 73 25 20 88 20 | 74 25 0d 02 f8 0c 20 c8 |m%+s% . |t%.... .|
|000003e0| 8e 20 74 25 20 ca 0d 03 | 02 18 20 20 c9 20 31 3a |. t% ...|..  . 1:|
|000003f0| e7 20 3f 70 25 3d 63 25 | 20 8c 20 3d 70 25 0d 03 |. ?p%=c%| . =p%..|
|00000400| 0c 18 20 20 c9 20 34 3a | e7 20 21 70 25 3d 63 25 |..  . 4:|. !p%=c%|
|00000410| 20 8c 20 3d 70 25 0d 03 | 16 06 20 cb 0d 03 20 05 | . =p%..|.. ... .|
|00000420| ed 0d 03 2a 07 3d 2d 31 | 0d 03 34 05 3a 0d 03 3e |...*.=-1|..4.:..>|
|00000430| 12 dd 20 f2 66 72 65 65 | 28 6d 25 2c 73 25 29 0d |.. .free|(m%,s%).|
|00000440| 03 48 08 ea 20 70 25 0d | 03 52 0e e7 20 73 25 3c |.H.. p%.|.R.. s%<|
|00000450| 31 20 8c 20 e1 0d 03 5c | 17 e3 20 70 25 3d 6d 25 |1 . ...\|.. p%=m%|
|00000460| 20 b8 20 6d 25 2b 73 25 | 20 88 20 34 0d 03 66 1b | . m%+s%| . 4..f.|
|00000470| 20 c8 99 20 22 58 4f 53 | 5f 4d 6f 64 75 6c 65 22 | .. "XOS|_Module"|
|00000480| 2c 37 2c 2c 21 70 25 0d | 03 70 05 ed 0d 03 7a 05 |,7,,!p%.|.p....z.|
|00000490| e1 0d 03 84 05 3a 0d 03 | 8e 12 dd 20 a4 67 73 74 |.....:..|... .gst|
|000004a0| 72 61 6e 73 28 74 24 29 | 0d 03 98 0e ea 20 62 75 |rans(t$)|..... bu|
|000004b0| 66 66 25 2c 63 25 0d 03 | a2 0f de 20 62 75 66 66 |ff%,c%..|... buff|
|000004c0| 25 20 32 35 36 0d 03 ac | 27 c8 99 20 22 4f 53 5f |% 256...|'.. "OS_|
|000004d0| 47 53 54 72 61 6e 73 22 | 2c 74 24 2c 62 75 66 66 |GSTrans"|,t$,buff|
|000004e0| 25 2c 32 35 36 20 b8 20 | 2c 2c 63 25 0d 03 b6 0f |%,256 . |,,c%....|
|000004f0| 62 75 66 66 25 3f 63 25 | 3d 31 33 0d 03 c0 0b 3d |buff%?c%|=13....=|
|00000500| 24 62 75 66 66 25 0d 03 | ca 05 3a 0d 03 d4 0f dd |$buff%..|..:.....|
|00000510| 20 a4 66 75 6c 6c 28 74 | 24 29 0d 03 de 0e ea 20 | .full(t|$)..... |
|00000520| 62 75 66 66 25 2c 66 25 | 0d 03 e8 0f de 20 62 75 |buff%,f%|..... bu|
|00000530| 66 66 25 20 32 35 36 0d | 03 f2 2e c8 99 20 22 58 |ff% 256.|..... "X|
|00000540| 4f 53 5f 46 53 43 6f 6e | 74 72 6f 6c 22 2c 33 37 |OS_FSCon|trol",37|
|00000550| 2c 74 24 2c 62 75 66 66 | 25 2c 2c 2c 32 35 36 20 |,t$,buff|%,,,256 |
|00000560| b8 20 3b 66 25 0d 03 fc | 13 e7 20 28 66 25 20 80 |. ;f%...|.. (f% .|
|00000570| 31 29 20 8c 20 3d 22 22 | 0d 04 06 10 3d a4 6d 74 |1) . =""|....=.mt|
|00000580| 78 28 62 75 66 66 25 29 | 0d 04 10 05 3a 0d 04 1a |x(buff%)|....:...|
|00000590| 12 dd 20 a4 6d 74 78 6c | 28 6d 25 2c 6c 25 29 0d |.. .mtxl|(m%,l%).|
|000005a0| 04 24 08 ea 20 74 24 0d | 04 2e 09 74 24 3d 22 22 |.$.. t$.|...t$=""|
|000005b0| 0d 04 38 16 c8 95 20 3f | 6d 25 3e 33 31 20 80 20 |..8... ?|m%>31 . |
|000005c0| a9 74 24 3c 6c 25 0d 04 | 42 0d 20 74 24 2b 3d bd |.t$<l%..|B. t$+=.|
|000005d0| 3f 6d 25 0d 04 4c 0a 20 | 6d 25 2b 3d 31 0d 04 56 |?m%..L. |m%+=1..V|
|000005e0| 05 ce 0d 04 60 07 3d 74 | 24 0d 04 6a 05 3a 0d 04 |....`.=t|$..j.:..|
|000005f0| 74 10 dd 20 f2 70 72 70 | 6e 74 28 74 24 29 0d 04 |t.. .prp|nt(t$)..|
|00000600| 7e 1a c8 99 20 22 4f 53 | 5f 50 72 65 74 74 79 50 |~... "OS|_PrettyP|
|00000610| 72 69 6e 74 22 2c 74 24 | 0d 04 88 05 e1 0d ff    |rint",t$|....... |
+--------+-------------------------+-------------------------+--------+--------+