/ RISC DISC 2 / RISC_DISC_2.iso / pd_share / music / cdlike / Utilities / RenCD

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0c f4 20 3e 52 | 65 6e 43 44 0d 00 14 2d |..... >R|enCD...-|
|00000010| f4 20 4a 75 67 67 6c 65 | 72 2c 20 52 65 6e 61 6d |. Juggle|r, Renam|
|00000020| 65 73 2f 52 65 77 72 69 | 74 65 73 20 70 61 72 74 |es/Rewri|tes part|
|00000030| 73 20 6f 66 20 61 20 43 | 44 0d 00 1e 18 c8 9b 22 |s of a C|D......"|
|00000040| 42 61 73 4c 69 62 72 61 | 72 79 3a 41 72 67 73 32 |BasLibra|ry:Args2|
|00000050| 22 0d 00 28 1d c8 9b 22 | 42 61 73 4c 69 62 72 61 |"..(..."|BasLibra|
|00000060| 72 79 3a 46 75 6e 63 74 | 69 6f 6e 73 31 22 0d 00 |ry:Funct|ions1"..|
|00000070| 32 0c ee 85 f6 3a f1 9e | 3a e0 0d 00 3c 05 3a 0d |2....:..|:...<.:.|
|00000080| 00 46 46 f2 69 6e 69 74 | 5f 61 72 67 73 28 22 63 |.FF.init|_args("c|
|00000090| 64 66 69 6c 65 2c 74 72 | 61 63 6b 2f 65 2c 6e 65 |dfile,tr|ack/e,ne|
|000000a0| 77 6e 61 6d 65 2c 74 69 | 74 6c 65 2f 73 2c 61 75 |wname,ti|tle/s,au|
|000000b0| 74 68 6f 72 2f 73 2c 73 | 77 61 70 2f 73 2c 64 65 |thor/s,s|wap/s,de|
|000000c0| 6c 2f 73 22 29 0d 00 50 | 05 3a 0d 00 5a 1c 63 64 |l/s")..P|.:..Z.cd|
|000000d0| 24 3d a4 61 72 67 73 5f | 74 65 78 74 28 22 63 64 |$=.args_|text("cd|
|000000e0| 66 69 6c 65 22 29 0d 00 | 64 1b 74 72 25 3d a4 61 |file")..|d.tr%=.a|
|000000f0| 72 67 73 5f 65 76 61 6c | 28 22 74 72 61 63 6b 22 |rgs_eval|("track"|
|00000100| 29 0d 00 6e 1d 6e 65 24 | 3d a4 61 72 67 73 5f 74 |)..n.ne$|=.args_t|
|00000110| 65 78 74 28 22 6e 65 77 | 6e 61 6d 65 22 29 0d 00 |ext("new|name")..|
|00000120| 78 05 3a 0d 00 82 1a 74 | 69 25 3d a4 61 72 67 73 |x.:....t|i%=.args|
|00000130| 5f 74 6f 6b 28 22 74 69 | 74 6c 65 22 29 0d 00 8c |_tok("ti|tle")...|
|00000140| 1b 61 75 25 3d a4 61 72 | 67 73 5f 74 6f 6b 28 22 |.au%=.ar|gs_tok("|
|00000150| 61 75 74 68 6f 72 22 29 | 0d 00 96 19 73 77 25 3d |author")|....sw%=|
|00000160| a4 61 72 67 73 5f 74 6f | 6b 28 22 73 77 61 70 22 |.args_to|k("swap"|
|00000170| 29 0d 00 a0 18 64 65 25 | 3d a4 61 72 67 73 5f 74 |)....de%|=.args_t|
|00000180| 6f 6b 28 22 64 65 6c 22 | 29 0d 00 aa 05 3a 0d 00 |ok("del"|)....:..|
|00000190| b4 59 e7 20 63 64 24 3d | 22 22 20 8c 20 85 20 30 |.Y. cd$=|"" . . 0|
|000001a0| 2c 22 53 79 6e 74 61 78 | 3a 20 52 65 6e 43 44 20 |,"Syntax|: RenCD |
|000001b0| 3c 63 64 66 69 6c 65 3e | 20 3c 74 72 61 63 6b 3e |<cdfile>| <track>|
|000001c0| 20 5b 3c 6e 65 77 6e 61 | 6d 65 3e 5d 20 2d 74 69 | [<newna|me>] -ti|
|000001d0| 74 6c 65 7c 2d 61 75 74 | 68 6f 72 7c 2d 73 77 61 |tle|-aut|hor|-swa|
|000001e0| 70 7c 2d 64 65 6c 22 0d | 00 be 05 3a 0d 00 c8 0a |p|-del".|...:....|
|000001f0| 74 72 25 2d 3d 31 0d 00 | d2 05 3a 0d 00 dc 23 de |tr%-=1..|..:...#.|
|00000200| 20 69 6e 66 6f 25 20 36 | 30 2c 69 6e 66 6f 32 25 | info% 6|0,info2%|
|00000210| 20 36 30 2c 68 65 61 64 | 65 72 25 20 32 38 0d 00 | 60,head|er% 28..|
|00000220| e6 0d 63 64 25 3d ad 20 | 63 64 24 0d 00 f0 05 3a |..cd%=. |cd$....:|
|00000230| 0d 00 fa 23 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |...#.. "|OS_GBPB"|
|00000240| 2c 33 2c 63 64 25 2c 68 | 65 61 64 65 72 25 2c 32 |,3,cd%,h|eader%,2|
|00000250| 39 2c 30 0d 01 04 05 3a | 0d 01 0e 16 e7 20 74 72 |9,0....:|..... tr|
|00000260| 25 3e 3d 68 65 61 64 65 | 72 25 3f 32 20 8c 0d 01 |%>=heade|r%?2 ...|
|00000270| 18 0a 20 d9 23 63 64 25 | 0d 01 22 40 20 85 20 30 |.. .#cd%|.."@ . 0|
|00000280| 2c 22 54 72 61 63 6b 20 | 6e 75 6d 62 65 72 20 6f |,"Track |number o|
|00000290| 75 74 20 6f 66 20 72 61 | 6e 67 65 20 2d 20 4e 6f |ut of ra|nge - No|
|000002a0| 20 74 72 61 63 6b 20 77 | 69 74 68 20 74 68 69 73 | track w|ith this|
|000002b0| 20 6e 75 6d 62 65 72 22 | 0d 01 2c 05 cd 0d 01 36 | number"|..,....6|
|000002c0| 05 3a 0d 01 40 21 e7 20 | 64 65 25 20 8c 20 f2 63 |.:..@!. |de% . .c|
|000002d0| 64 5f 64 65 6c 65 74 65 | 20 8b 20 f2 63 64 5f 6d |d_delete| . .cd_m|
|000002e0| 69 73 63 0d 01 4a 05 3a | 0d 01 54 05 e0 0d 01 5e |isc..J.:|..T....^|
|000002f0| 05 3a 0d 01 68 0e dd 20 | f2 63 64 5f 6d 69 73 63 |.:..h.. |.cd_misc|
|00000300| 0d 01 72 0d e7 20 74 72 | 25 3c 30 20 8c 0d 01 7c |..r.. tr|%<0 ...||
|00000310| 11 20 6e 65 24 3d c0 6e | 65 24 2c 32 30 29 0d 01 |. ne$=.n|e$,20)..|
|00000320| 86 14 20 e3 20 69 25 3d | 38 20 b8 20 32 37 20 88 |.. . i%=|8 . 27 .|
|00000330| 20 31 0d 01 90 12 20 20 | 68 65 61 64 65 72 25 3f | 1....  |header%?|
|00000340| 69 25 3d 30 0d 01 9a 06 | 20 ed 0d 01 a4 15 20 24 |i%=0....| ..... $|
|00000350| 28 68 65 61 64 65 72 25 | 2b 38 29 3d 6e 65 24 0d |(header%|+8)=ne$.|
|00000360| 01 ae 24 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |..$ .. "|OS_GBPB"|
|00000370| 2c 31 2c 63 64 25 2c 68 | 65 61 64 65 72 25 2c 32 |,1,cd%,h|eader%,2|
|00000380| 38 2c 30 0d 01 b8 05 cc | 0d 01 c2 2a 20 c8 99 20 |8,0.....|...* .. |
|00000390| 22 4f 53 5f 47 42 50 42 | 22 2c 33 2c 63 64 25 2c |"OS_GBPB|",3,cd%,|
|000003a0| 69 6e 66 6f 25 2c 36 30 | 2c 32 38 2b 74 72 25 2a |info%,60|,28+tr%*|
|000003b0| 36 30 0d 01 cc 06 20 3a | 0d 01 d6 0c 20 e7 20 73 |60.... :|.... . s|
|000003c0| 77 25 20 8c 0d 01 e0 0e | 20 20 6e 65 25 3d a0 6e |w% .....|  ne%=.n|
|000003d0| 65 24 0d 01 ea 19 20 20 | e7 20 6e 65 25 3d 30 20 |e$....  |. ne%=0 |
|000003e0| 84 20 6e 65 25 3d 74 72 | 25 20 8c 0d 01 f4 0c 20 |. ne%=tr|% ..... |
|000003f0| 20 20 d9 23 63 64 25 0d | 01 fe 47 20 20 20 85 20 |  .#cd%.|..G   . |
|00000400| 30 2c 22 43 61 6e 6e 6f | 74 20 65 78 63 68 61 6e |0,"Canno|t exchan|
|00000410| 67 65 20 74 72 61 63 6b | 73 20 2d 20 49 6c 6c 65 |ge track|s - Ille|
|00000420| 67 61 6c 20 76 61 6c 75 | 65 20 28 64 75 70 6c 69 |gal valu|e (dupli|
|00000430| 63 61 74 65 20 6f 72 20 | 7a 65 72 6f 29 22 0d 02 |cate or |zero)"..|
|00000440| 08 07 20 20 cd 0d 02 12 | 0c 20 20 6e 65 25 2d 3d |..  ....|.  ne%-=|
|00000450| 31 0d 02 1c 2c 20 20 c8 | 99 20 22 4f 53 5f 47 42 |1...,  .|. "OS_GB|
|00000460| 50 42 22 2c 33 2c 63 64 | 25 2c 69 6e 66 6f 32 25 |PB",3,cd|%,info2%|
|00000470| 2c 36 30 2c 32 38 2b 6e | 65 25 2a 36 30 0d 02 26 |,60,28+n|e%*60..&|
|00000480| 2c 20 20 c8 99 20 22 4f | 53 5f 47 42 50 42 22 2c |,  .. "O|S_GBPB",|
|00000490| 31 2c 63 64 25 2c 69 6e | 66 6f 32 25 2c 36 30 2c |1,cd%,in|fo2%,60,|
|000004a0| 32 38 2b 74 72 25 2a 36 | 30 0d 02 30 2b 20 20 c8 |28+tr%*6|0..0+  .|
|000004b0| 99 20 22 4f 53 5f 47 42 | 50 42 22 2c 31 2c 63 64 |. "OS_GB|PB",1,cd|
|000004c0| 25 2c 69 6e 66 6f 25 2c | 36 30 2c 32 38 2b 6e 65 |%,info%,|60,28+ne|
|000004d0| 25 2a 36 30 0d 02 3a 06 | 20 cc 0d 02 44 28 20 20 |%*60..:.| ...D(  |
|000004e0| e7 20 74 69 25 20 8c 20 | 70 74 72 25 3d 69 6e 66 |. ti% . |ptr%=inf|
|000004f0| 6f 25 20 8b 20 70 74 72 | 25 3d 69 6e 66 6f 25 2b |o% . ptr|%=info%+|
|00000500| 32 30 0d 02 4e 07 20 20 | 3a 0d 02 58 15 20 20 e3 |20..N.  |:..X.  .|
|00000510| 20 70 25 3d 30 20 b8 20 | 31 36 20 88 20 34 0d 02 | p%=0 . |16 . 4..|
|00000520| 62 10 20 20 20 70 74 72 | 25 21 70 25 3d 30 0d 02 |b.   ptr|%!p%=0..|
|00000530| 6c 07 20 20 ed 0d 02 76 | 07 20 20 3a 0d 02 80 0d |l.  ...v|.  :....|
|00000540| 20 20 70 74 72 25 2d 3d | 31 0d 02 8a 13 20 20 e3 |  ptr%-=|1....  .|
|00000550| 20 70 25 3d 31 20 b8 20 | a9 6e 65 24 0d 02 94 1a | p%=1 . |.ne$....|
|00000560| 20 20 20 70 74 72 25 3f | 70 25 3d 97 c1 6e 65 24 |   ptr%?|p%=..ne$|
|00000570| 2c 70 25 2c 31 29 0d 02 | 9e 07 20 20 ed 0d 02 a8 |,p%,1)..|..  ....|
|00000580| 07 20 20 3a 0d 02 b2 2b | 20 20 c8 99 20 22 4f 53 |.  :...+|  .. "OS|
|00000590| 5f 47 42 50 42 22 2c 31 | 2c 63 64 25 2c 69 6e 66 |_GBPB",1|,cd%,inf|
|000005a0| 6f 25 2c 36 30 2c 32 38 | 2b 74 72 25 2a 36 30 0d |o%,60,28|+tr%*60.|
|000005b0| 02 bc 06 20 cd 0d 02 c6 | 05 cd 0d 02 d0 05 3a 0d |... ....|......:.|
|000005c0| 02 da 09 d9 23 63 64 25 | 0d 02 e4 05 e1 0d 02 ee |....#cd%|........|
|000005d0| 05 3a 0d 02 f8 4a dd 20 | f2 63 64 5f 64 65 6c 65 |.:...J. |.cd_dele|
|000005e0| 74 65 3a f4 20 44 6f 65 | 73 6e 27 74 20 72 65 6d |te:. Doe|sn't rem|
|000005f0| 6f 76 65 20 74 68 65 20 | 73 6f 6e 67 20 64 61 74 |ove the |song dat|
|00000600| 61 20 61 6e 64 20 64 6f | 65 73 6e 27 74 20 77 6f |a and do|esn't wo|
|00000610| 72 6b 20 70 72 6f 70 65 | 72 6c 79 21 0d 03 02 05 |rk prope|rly!....|
|00000620| 3a 0d 03 0c 29 c8 99 20 | 22 4f 53 5f 47 42 50 42 |:...).. |"OS_GBPB|
|00000630| 22 2c 33 2c 63 64 25 2c | 69 6e 66 6f 25 2c 36 30 |",3,cd%,|info%,60|
|00000640| 2c 32 38 2b 74 72 25 2a | 36 30 0d 03 16 05 3a 0d |,28+tr%*|60....:.|
|00000650| 03 20 12 e7 20 69 6e 66 | 6f 25 21 34 38 3e 30 20 |. .. inf|o%!48>0 |
|00000660| 8c 0d 03 2a 18 20 e7 20 | 74 72 25 2b 31 3c 68 65 |...*. . |tr%+1<he|
|00000670| 61 64 65 72 25 3f 32 20 | 8c 0d 03 34 32 20 20 c8 |ader%?2 |...42  .|
|00000680| 99 20 22 4d 65 6d 4d 61 | 6e 5f 43 6c 61 69 6d 22 |. "MemMa|n_Claim"|
|00000690| 2c 28 68 65 61 64 65 72 | 25 3f 32 20 2d 20 74 72 |,(header|%?2 - tr|
|000006a0| 25 29 2a 36 30 20 b8 20 | 74 78 25 0d 03 3e 3f 20 |%)*60 . |tx%..>? |
|000006b0| 20 c8 99 20 22 4f 53 5f | 47 42 50 42 22 2c 33 2c | .. "OS_|GBPB",3,|
|000006c0| 63 64 25 2c 74 78 25 2c | 28 68 65 61 64 65 72 25 |cd%,tx%,|(header%|
|000006d0| 3f 32 20 2d 20 74 72 25 | 29 2a 36 30 2c 32 38 2b |?2 - tr%|)*60,28+|
|000006e0| 28 74 72 25 2b 31 29 2a | 36 30 0d 03 48 11 20 20 |(tr%+1)*|60..H.  |
|000006f0| 70 74 72 25 3d 74 78 25 | 2b 35 36 0d 03 52 12 20 |ptr%=tx%|+56..R. |
|00000700| 20 e3 20 69 25 3d 30 20 | b8 20 74 72 25 0d 03 5c | . i%=0 |. tr%..\|
|00000710| 22 20 20 20 e7 20 21 70 | 74 72 25 3e 30 20 8c 20 |"   . !p|tr%>0 . |
|00000720| 21 70 74 72 25 2d 3d 69 | 6e 66 6f 25 21 34 38 0d |!ptr%-=i|nfo%!48.|
|00000730| 03 66 0f 20 20 20 70 74 | 72 25 2b 3d 36 30 0d 03 |.f.   pt|r%+=60..|
|00000740| 70 07 20 20 ed 0d 03 7a | 3b 20 20 c8 99 20 22 4f |p.  ...z|;  .. "O|
|00000750| 53 5f 47 42 50 42 22 2c | 31 2c 63 64 25 2c 74 78 |S_GBPB",|1,cd%,tx|
|00000760| 25 2c 28 68 65 61 64 65 | 72 25 3f 32 20 2d 20 74 |%,(heade|r%?2 - t|
|00000770| 72 25 29 2a 36 30 2c 32 | 38 2b 74 72 25 2a 36 30 |r%)*60,2|8+tr%*60|
|00000780| 0d 03 84 1d 20 20 c8 99 | 20 22 4d 65 6d 4d 61 6e |....  ..| "MemMan|
|00000790| 5f 52 65 6c 65 61 73 65 | 22 2c 74 78 25 0d 03 8e |_Release|",tx%...|
|000007a0| 12 20 20 73 74 61 72 74 | 25 3d 69 6e 66 6f 25 0d |.  start|%=info%.|
|000007b0| 03 98 06 20 cd 0d 03 a2 | 24 20 61 74 25 3d 68 65 |... ....|$ at%=he|
|000007c0| 61 64 65 72 25 21 34 2b | 69 6e 66 6f 25 21 35 36 |ader%!4+|info%!56|
|000007d0| 2b 69 6e 66 6f 25 21 34 | 38 0d 03 ac 16 20 62 75 |+info%!4|8.... bu|
|000007e0| 66 66 73 69 7a 65 25 3d | 31 30 2a 31 30 32 34 0d |ffsize%=|10*1024.|
|000007f0| 03 b6 16 20 de 20 62 75 | 66 66 25 20 62 75 66 66 |... . bu|ff% buff|
|00000800| 73 69 7a 65 25 0d 03 c0 | 06 20 f5 0d 03 ca 3a 20 |size%...|. ....: |
|00000810| 20 c8 99 20 22 4f 53 5f | 47 42 50 42 22 2c 33 2c | .. "OS_|GBPB",3,|
|00000820| 63 64 25 2c 62 75 66 66 | 25 2c 62 75 66 66 73 69 |cd%,buff|%,buffsi|
|00000830| 7a 65 25 2c 61 74 25 20 | b8 20 2c 2c 2c 6e 6f 74 |ze%,at% |. ,,,not|
|00000840| 75 73 65 64 25 0d 03 d4 | 3e 20 20 c8 99 20 22 4f |used%...|>  .. "O|
|00000850| 53 5f 47 42 50 42 22 2c | 31 2c 63 64 25 2c 62 75 |S_GBPB",|1,cd%,bu|
|00000860| 66 66 25 2c 62 75 66 66 | 73 69 7a 65 25 2d 6e 6f |ff%,buff|size%-no|
|00000870| 74 75 73 65 64 25 2c 61 | 74 25 2d 69 6e 66 6f 25 |tused%,a|t%-info%|
|00000880| 21 34 38 0d 03 de 14 20 | 20 61 74 25 2b 3d 62 75 |!48.... | at%+=bu|
|00000890| 66 66 73 69 7a 65 25 0d | 03 e8 0c 20 fd 20 c5 23 |ffsize%.|... . .#|
|000008a0| 63 64 25 0d 03 f2 19 20 | a2 23 63 64 25 3d a2 23 |cd%.... |.#cd%=.#|
|000008b0| 63 64 25 2d 69 6e 66 6f | 25 21 34 38 0d 03 fc 05 |cd%-info|%!48....|
|000008c0| cd 0d 04 06 05 3a 0d 04 | 10 10 68 65 61 64 65 72 |.....:..|..header|
|000008d0| 25 3f 32 2d 3d 31 0d 04 | 1a 11 68 65 61 64 65 72 |%?2-=1..|..header|
|000008e0| 25 21 34 2d 3d 36 30 0d | 04 24 23 c8 99 20 22 4f |%!4-=60.|.$#.. "O|
|000008f0| 53 5f 47 42 50 42 22 2c | 31 2c 63 64 25 2c 68 65 |S_GBPB",|1,cd%,he|
|00000900| 61 64 65 72 25 2c 32 38 | 2c 30 0d 04 2e 05 3a 0d |ader%,28|,0....:.|
|00000910| 04 38 09 d9 23 63 64 25 | 0d 04 42 05 e1 0d ff    |.8..#cd%|..B.... |
+--------+-------------------------+-------------------------+--------+--------+