/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / wst!blz4.dms / in.adf / bum6 / gtdemo.bb

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 00 3b 20 47 61 64 54 | 6f 6f 6c 73 20 44 65 6d |;.; GadT|ools Dem|
|00000010| 6f 00 3b 00 00 23 4f 75 | 74 70 75 74 3d 31 34 3a |o.;..#Ou|tput=14:|
|00000020| 23 54 65 78 74 3d 31 33 | 3a 23 53 74 72 69 6e 67 |#Text=13|:#String|
|00000030| 3d 31 32 3a 23 53 6c 69 | 64 65 72 3d 31 31 3a 23 |=12:#Sli|der=11:#|
|00000040| 53 63 72 6f 6c 6c 65 72 | 3d 31 30 00 23 50 61 6c |Scroller|=10.#Pal|
|00000050| 3d 39 3a 23 4e 75 6d 62 | 65 72 3d 38 3a 23 4d 58 |=9:#Numb|er=8:#MX|
|00000060| 3d 37 3a 23 4c 69 73 74 | 56 69 65 77 3d 36 3a 23 |=7:#List|View=6:#|
|00000070| 49 6e 74 65 67 65 72 3d | 35 3a 23 43 79 63 3d 34 |Integer=|5:#Cyc=4|
|00000080| 00 23 43 68 65 63 6b 42 | 6f 78 3d 33 3a 23 42 75 |.#CheckB|ox=3:#Bu|
|00000090| 74 74 6f 6e 3d 32 3a 23 | 77 30 3d 30 00 00 23 4d |tton=2:#|w0=0..#M|
|000000a0| 4f 55 53 45 4d 4f 56 45 | 3d 24 31 30 3a 23 49 4e |OUSEMOVE|=$10:#IN|
|000000b0| 54 55 49 54 49 43 4b 53 | 3d 24 34 30 30 30 30 30 |TUITICKS|=$400000|
|000000c0| 00 00 2e 6d 61 69 6e 00 | 20 20 80 06 20 61 64 64 |...main.|  .. add|
|000000d0| 65 76 65 6e 74 73 20 20 | 20 20 20 3b 65 6e 61 62 |events  |   ;enab|
|000000e0| 6c 65 20 69 6e 74 75 69 | 74 69 63 6b 73 20 61 6e |le intui|ticks an|
|000000f0| 64 20 6d 6f 75 73 65 6d | 6f 76 65 73 20 65 76 65 |d mousem|oves eve|
|00000100| 6e 74 73 00 20 20 80 06 | 20 73 65 74 75 70 6c 69 |nts.  ..| setupli|
|00000110| 73 74 73 20 20 20 20 3b | 64 69 6d 20 6c 69 73 74 |sts    ;|dim list|
|00000120| 73 20 66 6f 72 20 62 6f | 74 68 20 6c 69 73 74 76 |s for bo|th listv|
|00000130| 69 65 77 73 00 20 20 80 | 06 20 73 65 74 75 70 75 |iews.  .|. setupu|
|00000140| 69 20 20 20 20 20 20 20 | 3b 6f 70 65 6e 20 75 73 |i       |;open us|
|00000150| 65 72 20 69 6e 74 65 72 | 66 61 63 65 20 77 69 6e |er inter|face win|
|00000160| 64 6f 77 00 20 20 80 bb | 00 20 20 20 20 65 76 2e |dow.  ..|.    ev.|
|00000170| 6c 3d c5 02 00 20 20 20 | 20 80 0b 20 65 76 3c 3e |l=...   | .. ev<>|
|00000180| 23 4d 4f 55 53 45 4d 4f | 56 45 20 80 42 20 65 76 |#MOUSEMO|VE .B ev|
|00000190| 3c 3e 23 49 4e 54 55 49 | 54 49 43 4b 53 20 80 21 |<>#INTUI|TICKS .!|
|000001a0| 20 80 06 20 61 64 64 65 | 76 65 6e 74 00 20 20 80 | .. adde|vent.  .|
|000001b0| bc 20 65 76 3d 24 32 30 | 30 00 20 20 80 02 00 00 |. ev=$20|0.  ....|
|000001c0| 2e 61 64 64 65 76 65 6e | 74 73 3a 00 20 20 c5 35 |.addeven|ts:.  .5|
|000001d0| 20 23 4d 4f 55 53 45 4d | 4f 56 45 2b 23 49 4e 54 | #MOUSEM|OVE+#INT|
|000001e0| 55 49 54 49 43 4b 53 00 | 20 20 80 07 00 00 2e 73 |UITICKS.|  .....s|
|000001f0| 65 74 75 70 6c 69 73 74 | 73 00 20 20 80 01 20 2e |etuplist|s.  .. .|
|00000200| 69 74 65 6d 00 20 20 20 | 20 61 2e 77 00 20 20 20 |item.   | a.w.   |
|00000210| 20 62 24 00 20 20 80 02 | 20 80 01 00 20 20 80 04 | b$.  ..| ...  ..|
|00000220| 20 80 b3 20 72 65 73 75 | 6c 74 73 2e 69 74 65 6d | .. resu|lts.item|
|00000230| 28 31 30 30 30 29 00 20 | 20 80 04 20 80 b3 20 74 |(1000). | .. .. t|
|00000240| 65 73 74 2e 69 74 65 6d | 28 32 30 29 00 20 20 80 |est.item|(20).  .|
|00000250| 0c 20 c0 02 28 74 65 73 | 74 28 29 29 3a 74 65 73 |. ..(tes|t()):tes|
|00000260| 74 28 29 5c 62 3d 22 49 | 74 65 6d 20 23 22 2b dd |t()\b="I|tem #"+.|
|00000270| 83 28 69 29 3a 69 2b 31 | 3a 80 c1 00 20 20 80 07 |.(i):i+1|:...  ..|
|00000280| 00 00 2e 61 64 64 65 76 | 65 6e 74 00 20 20 c6 92 |...addev|ent.  ..|
|00000290| 20 23 77 30 2c 23 4f 75 | 74 70 75 74 00 20 20 80 | #w0,#Ou|tput.  .|
|000002a0| 0b 20 c0 06 28 72 65 73 | 75 6c 74 73 28 29 29 00 |. ..(res|ults()).|
|000002b0| 20 20 20 20 72 65 73 75 | 6c 74 73 28 29 5c 62 3d |    resu|lts()\b=|
|000002c0| 22 45 76 65 6e 74 23 22 | 2b dd 83 28 65 76 29 2b |"Event#"|+..(ev)+|
|000002d0| 22 20 43 6f 64 65 23 22 | 2b dd 83 28 c5 40 29 00 |" Code#"|+..(.@).|
|000002e0| 20 20 80 c0 00 20 20 80 | 0b 20 c0 06 28 72 65 73 |  ...  .|. ..(res|
|000002f0| 75 6c 74 73 28 29 29 00 | 20 20 20 20 72 65 73 75 |ults()).|    resu|
|00000300| 6c 74 73 28 29 5c 62 3d | 22 47 61 64 67 65 74 23 |lts()\b=|"Gadget#|
|00000310| 22 2b dd 83 28 c5 04 29 | 00 20 20 80 c0 00 20 20 |"+..(..)|.  ...  |
|00000320| c6 92 20 23 77 30 2c 23 | 4f 75 74 70 75 74 2c 72 |.. #w0,#|Output,r|
|00000330| 65 73 75 6c 74 73 28 29 | 00 20 20 80 07 00 00 2e |esults()|.  .....|
|00000340| 73 65 74 75 70 75 69 3a | 00 20 20 cf 01 20 30 2c |setupui:|.  .. 0,|
|00000350| 30 2c 30 2c 36 34 30 2c | 32 35 36 2c 32 2c 2d 33 |0,0,640,|256,2,-3|
|00000360| 32 37 36 38 2c 22 54 45 | 53 54 22 2c 30 2c 31 00 |2768,"TE|ST",0,1.|
|00000370| 20 20 c6 86 20 23 77 30 | 2c 23 4f 75 74 70 75 74 |  .. #w0|,#Output|
|00000380| 2c 33 36 39 2c 31 33 2c | 32 35 38 2c 31 36 35 2c |,369,13,|258,165,|
|00000390| 22 52 65 73 75 6c 74 73 | 22 2c 34 2c 72 65 73 75 |"Results|",4,resu|
|000003a0| 6c 74 73 28 29 00 20 20 | c6 8d 20 23 77 30 2c 23 |lts().  |.. #w0,#|
|000003b0| 54 65 78 74 2c 37 36 2c | 31 30 38 2c 31 31 37 2c |Text,76,|108,117,|
|000003c0| 31 34 2c 22 54 65 78 74 | 22 2c 31 2c 22 22 00 20 |14,"Text|",1,"". |
|000003d0| 20 c6 8c 20 23 77 30 2c | 23 53 74 72 69 6e 67 2c | .. #w0,|#String,|
|000003e0| 37 39 2c 37 31 2c 31 31 | 31 2c 31 35 2c 22 53 74 |79,71,11|1,15,"St|
|000003f0| 72 69 6e 67 22 2c 31 2c | 32 30 00 20 20 c6 8b 20 |ring",1,|20.  .. |
|00000400| 23 77 30 2c 23 53 6c 69 | 64 65 72 2c 32 38 30 2c |#w0,#Sli|der,280,|
|00000410| 31 32 33 2c 38 30 2c 31 | 32 2c 22 53 6c 69 64 65 |123,80,1|2,"Slide|
|00000420| 72 22 2c 31 36 31 2c 31 | 2c 31 36 2c 31 00 20 20 |r",161,1|,16,1.  |
|00000430| c6 8a 20 23 77 30 2c 23 | 53 63 72 6f 6c 6c 65 72 |.. #w0,#|Scroller|
|00000440| 2c 32 37 39 2c 31 30 34 | 2c 38 32 2c 31 32 2c 22 |,279,104|,82,12,"|
|00000450| 53 63 72 6f 6c 6c 65 72 | 22 2c 34 31 37 2c 31 2c |Scroller|",417,1,|
|00000460| 31 30 2c 30 00 20 20 c6 | 89 20 23 77 30 2c 23 50 |10,0.  .|. #w0,#P|
|00000470| 61 6c 2c 32 36 37 2c 36 | 31 2c 39 35 2c 33 33 2c |al,267,6|1,95,33,|
|00000480| 22 50 61 6c 65 74 74 65 | 22 2c 31 2c 32 00 20 20 |"Palette|",1,2.  |
|00000490| c6 88 20 23 77 30 2c 23 | 4e 75 6d 62 65 72 2c 37 |.. #w0,#|Number,7|
|000004a0| 39 2c 38 39 2c 31 31 32 | 2c 31 34 2c 22 4e 75 6d |9,89,112|,14,"Num|
|000004b0| 62 65 72 22 2c 31 2c 30 | 00 20 20 c6 87 20 23 77 |ber",1,0|.  .. #w|
|000004c0| 30 2c 23 4d 58 2c 32 38 | 38 2c 34 2c 34 39 2c 32 |0,#MX,28|8,4,49,2|
|000004d0| 38 2c 22 4d 58 22 2c 32 | 2c 22 4f 6e 65 7c 54 77 |8,"MX",2|,"One|Tw|
|000004e0| 6f 7c 50 6f 6f 22 00 20 | 20 c6 86 20 23 77 30 2c |o|Poo". | .. #w0,|
|000004f0| 23 4c 69 73 74 56 69 65 | 77 2c 31 30 30 2c 31 33 |#ListVie|w,100,13|
|00000500| 30 2c 39 38 2c 33 36 2c | 22 4c 69 73 74 56 69 65 |0,98,36,|"ListVie|
|00000510| 77 22 2c 31 2c 74 65 73 | 74 28 29 00 20 20 c6 85 |w",1,tes|t().  ..|
|00000520| 20 23 77 30 2c 23 49 6e | 74 65 67 65 72 2c 37 39 | #w0,#In|teger,79|
|00000530| 2c 35 32 2c 31 31 32 2c | 31 35 2c 22 49 6e 74 65 |,52,112,|15,"Inte|
|00000540| 67 65 72 22 2c 31 2c 30 | 00 20 20 c6 84 20 23 77 |ger",1,0|.  .. #w|
|00000550| 30 2c 23 43 79 63 2c 32 | 36 30 2c 33 37 2c 38 32 |0,#Cyc,2|60,37,82|
|00000560| 2c 31 37 2c 22 43 79 63 | 6c 65 22 2c 31 2c 22 20 |,17,"Cyc|le",1," |
|00000570| 4f 6e 65 20 7c 20 54 77 | 6f 20 7c 54 68 72 65 65 |One | Tw|o |Three|
|00000580| 22 00 20 20 c6 83 20 23 | 77 30 2c 23 43 68 65 63 |".  .. #|w0,#Chec|
|00000590| 6b 42 6f 78 2c 31 32 35 | 2c 33 34 2c 32 36 2c 31 |kBox,125|,34,26,1|
|000005a0| 31 2c 22 43 68 65 63 6b | 42 6f 78 22 2c 31 00 20 |1,"Check|Box",1. |
|000005b0| 20 c6 82 20 23 77 30 2c | 23 42 75 74 74 6f 6e 2c | .. #w0,|#Button,|
|000005c0| 37 30 2c 37 2c 31 33 33 | 2c 32 31 2c 22 42 75 74 |70,7,133|,21,"But|
|000005d0| 74 6f 6e 22 2c 31 36 00 | 20 20 c5 01 20 23 77 30 |ton",16.|  .. #w0|
|000005e0| 2c 30 2c 31 31 2c 36 34 | 30 2c 31 39 35 2c 24 31 |,0,11,64|0,195,$1|
|000005f0| 30 30 38 2c 22 47 61 64 | 54 6f 6f 6c 73 20 44 65 |008,"Gad|Tools De|
|00000600| 6d 6f 22 2c 31 2c 32 3a | c6 8e 20 23 77 30 2c 23 |mo",1,2:|.. #w0,#|
|00000610| 77 30 00 20 20 80 07 00 | 00                      |w0.  ...|.       |
+--------+-------------------------+-------------------------+--------+--------+