/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / bb_ext.dms / in.adf / LibsDev.lha / userlibprogs / FuncTest.bb2

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |;#######|########|
|00000010| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000020| 00 3b 23 20 45 78 61 6d | 70 6c 65 20 31 2e 31 20 |.;# Exam|ple 1.1 |
|00000030| 2d 20 4d 69 73 63 20 43 | 6f 6d 6d 61 6e 64 73 20 |- Misc C|ommands |
|00000040| 23 00 3b 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |#.;#####|########|
|00000050| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000060| 23 23 00 3b 00 3b 42 79 | 20 53 74 65 76 65 6e 20 |##.;.;By| Steven |
|00000070| 4d 61 74 74 79 00 3b 00 | 3b 54 68 69 73 20 70 72 |Matty.;.|;This pr|
|00000080| 6f 67 72 61 6d 20 74 65 | 73 74 73 20 6f 75 74 20 |ogram te|sts out |
|00000090| 73 6f 6d 65 20 6f 66 20 | 74 68 65 20 6f 74 68 65 |some of |the othe|
|000000a0| 72 20 63 6f 6d 6d 61 6e | 64 73 20 66 6f 75 6e 64 |r comman|ds found|
|000000b0| 20 69 6e 20 46 75 6e 63 | 2d 4c 69 62 72 61 72 79 | in Func|-Library|
|000000c0| 00 00 cf 02 20 30 00 d0 | 03 20 30 2c 30 00 00 80 |.... 0..|. 0,0...|
|000000d0| 08 20 72 65 61 64 63 6f | 6e 66 69 67 7b 7d 00 20 |. readco|nfig{}. |
|000000e0| 20 dd 82 20 22 52 65 61 | 64 69 6e 67 20 73 79 73 | .. "Rea|ding sys|
|000000f0| 74 65 6d 20 63 6f 6e 66 | 69 67 75 72 61 74 69 6f |tem conf|iguratio|
|00000100| 6e 2e 2e 2e 2e 22 00 20 | 20 61 24 3d dc 83 28 dc |n....". | a$=..(.|
|00000110| 84 28 a5 83 29 2c 37 2c | 32 29 00 20 20 dd 82 20 |.(..),7,|2).  .. |
|00000120| 22 59 6f 75 20 68 61 76 | 65 20 61 20 4c 49 53 41 |"You hav|e a LISA|
|00000130| 20 49 44 20 6f 66 20 24 | 22 2b 61 24 00 20 20 dd | ID of $|"+a$.  .|
|00000140| 82 20 22 22 00 20 20 80 | 0e 20 61 24 00 20 20 20 |. "".  .|. a$.   |
|00000150| 20 80 0f 20 22 46 38 22 | 00 20 20 20 20 20 20 dd | .. "F8"|.      .|
|00000160| 82 20 22 59 6f 75 20 68 | 61 76 65 20 61 6e 20 41 |. "You h|ave an A|
|00000170| 47 41 20 63 68 69 70 73 | 65 74 21 22 00 20 20 20 |GA chips|et!".   |
|00000180| 20 80 0f 20 22 46 43 22 | 00 20 20 20 20 20 20 dd | .. "FC"|.      .|
|00000190| 82 20 22 59 6f 75 20 68 | 61 76 65 20 61 6e 20 45 |. "You h|ave an E|
|000001a0| 43 53 20 63 68 69 70 73 | 65 74 21 22 00 20 20 20 |CS chips|et!".   |
|000001b0| 20 80 10 00 20 20 20 20 | 20 20 dd 82 20 22 59 6f | ...    |  .. "Yo|
|000001c0| 75 20 68 61 76 65 20 61 | 6e 20 55 6e 6b 6f 77 6e |u have a|n Unkown|
|000001d0| 2f 45 43 53 20 63 68 69 | 70 73 65 74 21 22 00 20 |/ECS chi|pset!". |
|000001e0| 20 80 02 20 80 0e 00 20 | 20 dd 82 20 22 22 00 20 | .. ... | .. "". |
|000001f0| 20 dd 82 20 22 59 6f 75 | 20 68 61 76 65 20 22 2c | .. "You| have ",|
|00000200| a5 86 2c 22 20 62 79 74 | 65 73 20 6f 66 20 52 41 |..," byt|es of RA|
|00000210| 4d 20 61 76 61 69 6c 61 | 62 6c 65 2e 2e 2e 22 00 |M availa|ble...".|
|00000220| 20 20 80 37 20 35 30 00 | 80 02 20 80 08 00 00 80 |  .7 50.|.. .....|
|00000230| 08 20 72 65 61 64 74 69 | 6d 65 72 7b 7d 00 20 20 |. readti|mer{}.  |
|00000240| dd 82 20 22 22 00 20 20 | dd 82 20 22 48 69 74 20 |.. "".  |.. "Hit |
|00000250| 54 68 65 20 4d 6f 75 73 | 65 20 42 75 74 74 6f 6e |The Mous|e Button|
|00000260| 20 4e 6f 77 21 22 00 20 | 20 74 2e 6c 3d a5 88 00 | Now!". | t.l=...|
|00000270| 20 20 80 0a 00 20 20 61 | 2e 66 3d 28 a5 88 2d 74 |  ...  a|.f=(..-t|
|00000280| 29 2f 35 30 00 20 20 61 | 24 3d dd 83 28 61 2e 66 |)/50.  a|$=..(a.f|
|00000290| 29 00 20 20 80 0b 20 dc | 83 28 61 24 2c 31 2c 31 |).  .. .|.(a$,1,1|
|000002a0| 29 3d 22 2e 22 20 80 21 | 20 61 24 3d 22 30 22 2b |)="." .!| a$="0"+|
|000002b0| 61 24 00 20 20 dd 82 20 | 22 54 68 61 74 20 54 6f |a$.  .. |"That To|
|000002c0| 6f 6b 20 59 6f 75 20 22 | 2b 61 24 2b 22 20 73 65 |ok You "|+a$+" se|
|000002d0| 63 6f 6e 64 73 20 74 6f | 20 70 72 65 73 73 20 74 |conds to| press t|
|000002e0| 68 65 20 6d 6f 75 73 65 | 20 62 75 74 74 6f 6e 21 |he mouse| button!|
|000002f0| 22 00 20 20 80 bb 00 20 | 20 80 bc 20 df 04 28 30 |".  ... | .. ..(0|
|00000300| 29 3d 30 00 20 20 80 37 | 20 35 30 00 80 02 20 80 |)=0.  .7| 50... .|
|00000310| 08 00 00 80 08 20 64 6f | 73 66 75 6e 63 74 69 6f |..... do|sfunctio|
|00000320| 6e 73 7b 7d 00 20 20 dd | 82 20 22 4d 61 6b 69 6e |ns{}.  .|. "Makin|
|00000330| 67 20 44 69 72 65 63 74 | 6f 72 79 20 50 6f 6f 20 |g Direct|ory Poo |
|00000340| 6f 6e 20 52 61 6d 20 44 | 69 73 6b 3a 22 00 20 20 |on Ram D|isk:".  |
|00000350| 73 75 63 63 65 73 73 3d | b6 90 28 22 52 61 6d 3a |success=|..("Ram:|
|00000360| 50 6f 6f 22 2b dc 86 28 | 30 29 29 00 20 20 80 0b |Poo"+..(|0)).  ..|
|00000370| 20 73 75 63 63 65 73 73 | 00 20 20 20 20 dd 82 20 | success|.    .. |
|00000380| 22 4f 6b 61 79 21 22 00 | 20 20 80 22 00 20 20 20 |"Okay!".|  .".   |
|00000390| 20 dd 82 20 22 4f 68 20 | 6e 6f 21 22 00 20 20 80 | .. "Oh |no!".  .|
|000003a0| 02 20 80 0b 00 00 20 20 | 80 37 20 35 30 00 20 20 |. ....  |.7 50.  |
|000003b0| dd 82 20 22 52 65 6e 61 | 6d 69 6e 67 20 52 61 6d |.. "Rena|ming Ram|
|000003c0| 20 44 69 73 6b 3a 50 6f | 6f 20 74 6f 20 52 61 6d | Disk:Po|o to Ram|
|000003d0| 20 44 69 73 6b 3a 50 6c | 6f 70 70 79 22 00 20 20 | Disk:Pl|oppy".  |
|000003e0| 73 75 63 63 65 73 73 3d | a5 85 28 22 52 61 6d 3a |success=|..("Ram:|
|000003f0| 50 6f 6f 22 2c 22 52 61 | 6d 3a 50 6c 6f 70 70 79 |Poo","Ra|m:Ploppy|
|00000400| 22 29 00 20 20 80 0b 20 | 73 75 63 63 65 73 73 00 |").  .. |success.|
|00000410| 20 20 20 20 dd 82 20 22 | 4f 6b 61 79 21 22 00 20 |    .. "|Okay!". |
|00000420| 20 80 22 00 20 20 20 20 | dd 82 20 22 4f 68 20 6e | .".    |.. "Oh n|
|00000430| 6f 21 22 00 20 20 80 02 | 20 80 0b 00 20 20 80 37 |o!".  ..| ...  .7|
|00000440| 20 35 30 00 00 20 20 dd | 82 20 22 54 68 65 20 66 | 50..  .|. "The f|
|00000450| 69 6c 65 73 69 7a 65 20 | 6f 66 20 53 3a 53 74 61 |ilesize |of S:Sta|
|00000460| 72 74 75 70 2d 53 65 71 | 75 65 6e 63 65 20 69 73 |rtup-Seq|uence is|
|00000470| 20 22 2c a5 8e 28 22 53 | 3a 73 74 61 72 74 75 70 | ",..("S|:startup|
|00000480| 2d 73 65 71 75 65 6e 63 | 65 22 29 00 20 20 80 37 |-sequenc|e").  .7|
|00000490| 20 35 30 00 00 20 20 61 | 24 3d 22 48 45 4c 4c 4f | 50..  a|$="HELLO|
|000004a0| 20 54 48 45 52 45 22 00 | 20 20 62 24 3d 22 58 58 | THERE".|  b$="XX|
|000004b0| 58 58 58 58 58 58 58 58 | 58 22 00 20 20 dd 82 20 |XXXXXXXX|X".  .. |
|000004c0| 22 61 24 3d 22 2c 61 24 | 00 20 20 80 37 20 33 30 |"a$=",a$|.  .7 30|
|000004d0| 00 20 20 dd 82 20 22 62 | 24 3d 22 2c 62 24 00 20 |.  .. "b|$=",b$. |
|000004e0| 20 80 37 20 33 30 00 20 | 20 dd 82 20 22 61 6e 64 | .7 30. | .. "and|
|000004f0| 20 61 66 74 65 72 20 49 | 20 77 61 76 65 20 6d 79 | after I| wave my|
|00000500| 20 6d 61 67 69 63 20 77 | 61 6e 64 2e 2e 2e 22 00 | magic w|and...".|
|00000510| 20 20 80 37 20 36 30 00 | 20 20 a5 8a 20 26 61 24 |  .7 60.|  .. &a$|
|00000520| 2c 26 62 24 2c dc 8f 28 | 61 24 29 00 20 20 dd 82 |,&b$,..(|a$).  ..|
|00000530| 20 22 61 24 3d 22 2c 61 | 24 00 20 20 80 37 20 33 | "a$=",a|$.  .7 3|
|00000540| 30 00 20 20 dd 82 20 22 | 62 24 3d 22 2c 62 24 00 |0.  .. "|b$=",b$.|
|00000550| 20 20 dd 82 20 22 41 6e | 64 20 68 6f 77 20 70 6f |  .. "An|d how po|
|00000560| 69 6e 74 6c 65 73 73 20 | 77 61 73 20 74 68 61 74 |intless |was that|
|00000570| 3f 22 00 20 20 80 37 20 | 35 30 00 80 02 20 80 08 |?".  .7 |50... ..|
|00000580| 00 00 80 08 20 6f 74 68 | 65 72 7b 7d 00 20 20 dd |.... oth|er{}.  .|
|00000590| 82 20 22 54 68 65 20 6c | 61 72 67 65 72 20 6f 66 |. "The l|arger of|
|000005a0| 20 35 30 20 61 6e 64 20 | 36 30 20 69 73 20 22 2c | 50 and |60 is ",|
|000005b0| a5 8d 28 35 30 2c 36 30 | 29 00 20 20 dd 82 20 22 |..(50,60|).  .. "|
|000005c0| 54 68 65 20 73 6d 61 6c | 6c 65 72 20 6f 66 20 35 |The smal|ler of 5|
|000005d0| 30 20 61 6e 64 20 36 30 | 20 69 73 20 22 2c a5 89 |0 and 60| is ",..|
|000005e0| 28 35 30 2c 36 30 29 00 | 20 20 80 37 20 35 30 00 |(50,60).|  .7 50.|
|000005f0| 80 02 20 80 08 00 00 72 | 65 61 64 63 6f 6e 66 69 |.. ....r|eadconfi|
|00000600| 67 7b 7d 00 72 65 61 64 | 74 69 6d 65 72 7b 7d 00 |g{}.read|timer{}.|
|00000610| 64 6f 73 66 75 6e 63 74 | 69 6f 6e 73 7b 7d 00 6f |dosfunct|ions{}.o|
|00000620| 74 68 65 72 7b 7d 00 dd | 82 20 22 22 00 dd 82 20 |ther{}..|. ""... |
|00000630| 22 41 6e 64 20 74 68 61 | 74 73 20 79 65 72 20 6c |"And tha|ts yer l|
|00000640| 6f 74 2e 2e 2e 22 00 80 | 0a 00 80 02 00 00       |ot..."..|......  |
+--------+-------------------------+-------------------------+--------+--------+