home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / OTL-BBU3.DMS / in.adf / EXAMPLES / acommodity.bb2 next >
Unknown  |  1993-10-07  |  4.6 KB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% TrID OMF - Relocatable Object Module Format default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 80 cb 00 80 c3 00 00 80 | 12 20 63 6f 6d 6d 6f 64 |........|. commod|
|00000010| 69 74 69 65 73 2e 62 62 | 32 00 00 80 33 2e 4e 65 |ities.bb|2...3.Ne|
|00000020| 77 42 72 6f 6b 65 72 20 | 6e 62 72 6f 6b 65 72 00 |wBroker |nbroker.|
|00000030| 80 33 2e 4d 73 67 50 6f | 72 74 20 2a 62 72 6f 6b |.3.MsgPo|rt *brok|
|00000040| 65 72 5f 6d 70 00 80 33 | 2e 53 63 72 65 65 6e 20 |er_mp..3|.Screen |
|00000050| 2a 6d 79 73 63 72 65 65 | 6e 00 80 33 2e 4e 65 77 |*myscree|n..3.New|
|00000060| 57 69 6e 64 6f 77 20 6e | 65 77 77 69 6e 64 6f 77 |Window n|ewwindow|
|00000070| 00 80 33 2e 57 69 6e 64 | 6f 77 20 2a 6d 79 77 69 |..3.Wind|ow *mywi|
|00000080| 6e 64 6f 77 00 80 33 2e | 49 6e 70 75 74 45 76 65 |ndow..3.|InputEve|
|00000090| 6e 74 20 69 65 31 2c 69 | 65 32 2c 69 65 33 00 80 |nt ie1,i|e2,ie3..|
|000000a0| 33 2e 6c 00 00 3b 4f 75 | 72 20 70 6f 70 6b 65 79 |3.l..;Ou|r popkey|
|000000b0| 00 23 45 56 54 5f 48 4f | 54 4b 45 59 3d 31 00 3b |.#EVT_HO|TKEY=1.;|
|000000c0| 4f 74 68 65 72 20 65 76 | 65 6e 74 73 00 23 49 45 |Other ev|ents.#IE|
|000000d0| 56 45 4e 54 3d 32 00 00 | 23 53 49 47 42 52 45 41 |VENT=2..|#SIGBREA|
|000000e0| 4b 46 5f 43 54 52 4c 5f | 43 3d 31 80 7c 31 32 00 |KF_CTRL_|C=1.|12.|
|000000f0| 00 3b 54 68 65 20 61 70 | 70 65 61 72 65 6e 63 65 |.;The ap|pearence|
|00000100| 20 69 6e 20 45 78 63 68 | 61 6e 67 65 00 62 72 6f | in Exch|ange.bro|
|00000110| 6b 65 72 6e 61 6d 65 24 | 3d 22 54 65 73 74 43 6f |kername$|="TestCo|
|00000120| 6d 6d 22 2b dc 86 28 30 | 29 00 62 72 6f 6b 65 72 |mm"+..(0|).broker|
|00000130| 74 69 74 65 6c 24 3d 22 | 42 6c 69 74 7a 32 2d 54 |titel$="|Blitz2-T|
|00000140| 65 73 74 63 6f 6d 6d 6f | 64 69 74 79 22 2b dc 86 |estcommo|dity"+..|
|00000150| 28 30 29 00 62 72 6f 6b | 65 72 64 65 73 63 24 3d |(0).brok|erdesc$=|
|00000160| 22 54 68 69 73 20 69 73 | 20 74 68 65 20 64 65 73 |"This is| the des|
|00000170| 63 72 69 70 74 69 6f 6e | 22 2b dc 86 28 30 29 00 |cription|"+..(0).|
|00000180| 00 3b 43 72 65 61 74 65 | 20 42 72 6f 6b 65 72 2d |.;Create| Broker-|
|00000190| 70 6f 72 74 00 2a 62 72 | 6f 6b 65 72 5f 6d 70 3d |port.*br|oker_mp=|
|000001a0| fe e2 28 29 00 6e 62 72 | 6f 6b 65 72 5c 6e 62 5f |..().nbr|oker\nb_|
|000001b0| 50 6f 72 74 3d 2a 62 72 | 6f 6b 65 72 5f 6d 70 00 |Port=*br|oker_mp.|
|000001c0| 00 3b 53 75 63 68 65 73 | 73 66 75 6c 3f 00 80 0b |.;Suches|sful?...|
|000001d0| 20 2a 62 72 6f 6b 65 72 | 5f 6d 70 3c 3e 30 00 00 | *broker|_mp<>0..|
|000001e0| 20 20 3b 46 69 6c 6c 20 | 69 6e 20 42 72 6f 6b 65 |  ;Fill |in Broke|
|000001f0| 72 2d 64 61 74 61 00 00 | 20 20 6e 62 72 6f 6b 65 |r-data..|  nbroke|
|00000200| 72 5c 6e 62 5f 56 65 72 | 73 69 6f 6e 3d 23 4e 42 |r\nb_Ver|sion=#NB|
|00000210| 5f 56 45 52 53 49 4f 4e | 00 00 20 20 6e 62 72 6f |_VERSION|..  nbro|
|00000220| 6b 65 72 5c 6e 62 5f 4e | 61 6d 65 3d 26 62 72 6f |ker\nb_N|ame=&bro|
|00000230| 6b 65 72 6e 61 6d 65 24 | 00 20 20 6e 62 72 6f 6b |kername$|.  nbrok|
|00000240| 65 72 5c 6e 62 5f 54 69 | 74 6c 65 3d 26 62 72 6f |er\nb_Ti|tle=&bro|
|00000250| 6b 65 72 74 69 74 65 6c | 24 00 20 20 6e 62 72 6f |kertitel|$.  nbro|
|00000260| 6b 65 72 5c 6e 62 5f 44 | 65 73 63 72 3d 26 62 72 |ker\nb_D|escr=&br|
|00000270| 6f 6b 65 72 64 65 73 63 | 24 00 00 20 20 3b 57 65 |okerdesc|$..  ;We|
|00000280| 20 77 61 6e 74 20 74 6f | 20 62 65 20 75 6e 69 71 | want to| be uniq|
|00000290| 75 65 20 61 6e 64 20 69 | 6e 66 6f 72 6d 65 64 20 |ue and i|nformed |
|000002a0| 61 62 6f 75 74 20 32 6e | 64 20 61 74 74 65 6d 70 |about 2n|d attemp|
|000002b0| 74 20 74 6f 20 73 74 61 | 72 74 00 20 20 6e 62 72 |t to sta|rt.  nbr|
|000002c0| 6f 6b 65 72 5c 6e 62 5f | 55 6e 69 71 75 65 3d 23 |oker\nb_|Unique=#|
|000002d0| 4e 42 55 5f 4e 4f 54 49 | 46 59 7c 23 4e 42 55 5f |NBU_NOTI|FY|#NBU_|
|000002e0| 55 4e 49 51 55 45 00 00 | 20 20 3b 57 65 20 68 61 |UNIQUE..|  ;We ha|
|000002f0| 76 65 20 61 20 77 69 6e | 64 6f 77 00 20 20 6e 62 |ve a win|dow.  nb|
|00000300| 72 6f 6b 65 72 5c 6e 62 | 5f 46 6c 61 67 73 3d 23 |roker\nb|_Flags=#|
|00000310| 43 4f 46 5f 53 48 4f 57 | 5f 48 49 44 45 00 00 20 |COF_SHOW|_HIDE.. |
|00000320| 20 3b 43 72 65 61 74 65 | 20 42 72 6f 6b 65 72 00 | ;Create| Broker.|
|00000330| 20 20 2a 62 72 6f 6b 65 | 72 3d f8 02 28 6e 62 72 |  *broke|r=..(nbr|
|00000340| 6f 6b 65 72 2c 30 29 00 | 00 20 20 3b 53 75 63 68 |oker,0).|.  ;Such|
|00000350| 65 73 73 66 75 6c 20 61 | 6e 64 20 6e 6f 74 20 61 |essful a|nd not a|
|00000360| 6c 72 65 61 64 79 20 73 | 74 61 72 74 65 64 3f 00 |lready s|tarted?.|
|00000370| 20 20 80 0b 20 2a 62 72 | 6f 6b 65 72 3c 3e 30 00 |  .. *br|oker<>0.|
|00000380| 20 20 20 20 63 78 73 69 | 67 66 6c 61 67 3d 31 80 |    cxsi|gflag=1.|
|00000390| 7c 2a 62 72 6f 6b 65 72 | 5f 6d 70 5c 6d 70 5f 53 ||*broker|_mp\mp_S|
|000003a0| 69 67 42 69 74 00 00 20 | 20 20 20 3b 54 68 69 73 |igBit.. |   ;This|
|000003b0| 20 69 73 20 6f 75 72 20 | 70 6f 70 6b 65 79 00 20 | is our |popkey. |
|000003c0| 20 20 20 72 61 77 24 3d | 22 63 74 72 6c 20 6c 73 |   raw$=|"ctrl ls|
|000003d0| 68 69 66 74 20 6c 61 6c | 74 20 66 31 22 2b dc 86 |hift lal|t f1"+..|
|000003e0| 28 30 29 00 20 20 20 20 | 2a 63 78 66 69 6c 74 65 |(0).    |*cxfilte|
|000003f0| 72 3d f8 01 28 23 43 58 | 5f 46 49 4c 54 45 52 2c |r=..(#CX|_FILTER,|
|00000400| 26 72 61 77 24 2c 30 29 | 00 20 20 20 20 f8 0a 20 |&raw$,0)|.    .. |
|00000410| 2a 62 72 6f 6b 65 72 2c | 2a 63 78 66 69 6c 74 65 |*broker,|*cxfilte|
|00000420| 72 00 20 20 20 20 2a 63 | 78 73 65 6e 64 65 72 3d |r.    *c|xsender=|
|00000430| f8 01 28 23 43 58 5f 53 | 45 4e 44 2c 2a 62 72 6f |..(#CX_S|END,*bro|
|00000440| 6b 65 72 5f 6d 70 2c 23 | 45 56 54 5f 48 4f 54 4b |ker_mp,#|EVT_HOTK|
|00000450| 45 59 29 00 20 20 20 20 | f8 0a 20 2a 63 78 66 69 |EY).    |.. *cxfi|
|00000460| 6c 74 65 72 2c 2a 63 78 | 73 65 6e 64 65 72 00 20 |lter,*cx|sender. |
|00000470| 20 20 20 2a 63 78 74 72 | 61 6e 73 6c 61 74 65 3d |   *cxtr|anslate=|
|00000480| f8 01 28 23 43 58 5f 54 | 52 41 4e 53 4c 41 54 45 |..(#CX_T|RANSLATE|
|00000490| 2c 30 2c 30 29 00 20 20 | 20 20 f8 0a 20 2a 63 78 |,0,0).  |  .. *cx|
|000004a0| 66 69 6c 74 65 72 2c 2a | 63 78 74 72 61 6e 73 6c |filter,*|cxtransl|
|000004b0| 61 74 65 00 00 20 20 20 | 20 3b 54 68 69 73 20 69 |ate..   | ;This i|
|000004c0| 73 20 6f 75 72 20 6b 65 | 79 20 74 6f 20 62 65 20 |s our ke|y to be |
|000004d0| 6d 61 70 70 65 64 20 28 | 3c 46 31 3e 20 2d 3e 20 |mapped (|<F1> -> |
|000004e0| 22 44 69 72 22 29 00 20 | 20 20 20 72 61 77 24 3d |"Dir"). |   raw$=|
|000004f0| 22 66 31 22 2b dc 86 28 | 30 29 00 20 20 20 20 3b |"f1"+..(|0).    ;|
|00000500| 43 72 65 61 74 65 20 33 | 20 49 6e 70 75 74 45 76 |Create 3| InputEv|
|00000510| 65 6e 74 73 00 20 20 20 | 20 69 65 31 5c 69 65 5f |ents.   | ie1\ie_|
|00000520| 4e 65 78 74 45 76 65 6e | 74 3d 69 65 32 00 20 20 |NextEven|t=ie2.  |
|00000530| 20 20 69 65 31 5c 69 65 | 5f 43 6c 61 73 73 3d 23 |  ie1\ie|_Class=#|
|00000540| 49 45 43 4c 41 53 53 5f | 52 41 57 4b 45 59 00 20 |IECLASS_|RAWKEY. |
|00000550| 20 20 20 69 65 31 5c 69 | 65 5f 43 6f 64 65 3d 24 |   ie1\i|e_Code=$|
|00000560| 31 33 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |13      |        |
|00000570| 20 20 20 20 20 20 20 20 | 3b 22 72 22 00 20 20 20 |        |;"r".   |
|00000580| 20 69 65 32 5c 69 65 5f | 4e 65 78 74 45 76 65 6e | ie2\ie_|NextEven|
|00000590| 74 3d 69 65 33 00 20 20 | 20 20 69 65 32 5c 69 65 |t=ie3.  |  ie2\ie|
|000005a0| 5f 43 6c 61 73 73 3d 23 | 49 45 43 4c 41 53 53 5f |_Class=#|IECLASS_|
|000005b0| 52 41 57 4b 45 59 00 20 | 20 20 20 69 65 32 5c 69 |RAWKEY. |   ie2\i|
|000005c0| 65 5f 43 6f 64 65 3d 24 | 31 37 20 20 20 20 20 20 |e_Code=$|17      |
|000005d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000005e0| 3b 22 69 22 00 20 20 20 | 20 69 65 33 5c 69 65 5f |;"i".   | ie3\ie_|
|000005f0| 43 6c 61 73 73 3d 23 49 | 45 43 4c 41 53 53 5f 52 |Class=#I|ECLASS_R|
|00000600| 41 57 4b 45 59 00 20 20 | 20 20 69 65 33 5c 69 65 |AWKEY.  |  ie3\ie|
|00000610| 5f 43 6f 64 65 3d 24 32 | 32 20 20 20 20 20 20 20 |_Code=$2|2       |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |        |       ;|
|00000630| 22 64 22 00 20 20 20 20 | 69 65 33 5c 69 65 5f 51 |"d".    |ie3\ie_Q|
|00000640| 75 61 6c 69 66 69 65 72 | 3d 23 49 45 51 55 41 4c |ualifier|=#IEQUAL|
|00000650| 49 46 49 45 52 5f 4c 53 | 48 49 46 54 00 20 20 20 |IFIER_LS|HIFT.   |
|00000660| 20 2a 63 78 66 69 6c 74 | 65 72 3d f8 01 28 23 43 | *cxfilt|er=..(#C|
|00000670| 58 5f 46 49 4c 54 45 52 | 2c 26 72 61 77 24 2c 30 |X_FILTER|,&raw$,0|
|00000680| 29 00 20 20 20 20 f8 0a | 20 2a 62 72 6f 6b 65 72 |).    ..| *broker|
|00000690| 2c 2a 63 78 66 69 6c 74 | 65 72 00 20 20 20 20 2a |,*cxfilt|er.    *|
|000006a0| 63 78 74 72 61 6e 73 6c | 61 74 65 3d f8 01 28 23 |cxtransl|ate=..(#|
|000006b0| 43 58 5f 54 52 41 4e 53 | 4c 41 54 45 2c 69 65 31 |CX_TRANS|LATE,ie1|
|000006c0| 2c 30 29 00 20 20 20 20 | f8 0a 20 2a 63 78 66 69 |,0).    |.. *cxfi|
|000006d0| 6c 74 65 72 2c 2a 63 78 | 74 72 61 6e 73 6c 61 74 |lter,*cx|translat|
|000006e0| 65 00 00 20 20 20 20 3b | 41 63 74 69 76 61 74 65 |e..    ;|Activate|
|000006f0| 20 61 6c 6c 00 20 20 20 | 20 f8 03 20 2a 62 72 6f | all.   | .. *bro|
|00000700| 6b 65 72 2c 31 00 00 20 | 20 20 20 3b 45 76 65 72 |ker,1.. |   ;Ever|
|00000710| 79 74 68 69 6e 67 20 77 | 6f 72 6b 73 00 20 20 20 |ything w|orks.   |
|00000720| 20 72 65 73 75 6c 74 3d | 31 00 00 20 20 20 20 3b | result=|1..    ;|
|00000730| 4d 61 69 6e 20 6c 6f 6f | 70 00 20 20 20 20 80 bb |Main loo|p.    ..|
|00000740| 00 00 20 20 20 20 20 20 | 3b 57 61 69 74 69 6e 67 |..      |;Waiting|
|00000750| 20 66 6f 72 20 43 54 52 | 4c 2d 43 2c 20 6f 72 20 | for CTR|L-C, or |
|00000760| 43 58 2d 6d 65 73 73 61 | 67 65 20 6f 72 20 77 69 |CX-messa|ge or wi|
|00000770| 6e 64 6f 77 2d 6d 65 73 | 73 61 67 65 00 20 20 20 |ndow-mes|sage.   |
|00000780| 20 20 20 73 69 67 72 63 | 76 64 3d fe ab 28 23 53 |   sigrc|vd=..(#S|
|00000790| 49 47 42 52 45 41 4b 46 | 5f 43 54 52 4c 5f 43 7c |IGBREAKF|_CTRL_C||
|000007a0| 63 78 73 69 67 66 6c 61 | 67 7c 77 69 6e 73 69 67 |cxsigfla|g|winsig|
|000007b0| 66 6c 61 67 29 00 00 20 | 20 20 20 20 20 3b 57 69 |flag).. |     ;Wi|
|000007c0| 6e 64 6f 77 2d 6d 65 73 | 73 61 67 65 3f 00 20 20 |ndow-mes|sage?.  |
|000007d0| 20 20 20 20 80 0b 20 73 | 69 67 72 63 76 64 20 80 |    .. s|igrcvd .|
|000007e0| 42 20 77 69 6e 73 69 67 | 66 6c 61 67 00 00 20 20 |B winsig|flag..  |
|000007f0| 20 20 20 20 20 20 3b 47 | 65 74 20 6d 65 73 73 61 |      ;G|et messa|
|00000800| 67 65 20 66 72 6f 6d 20 | 77 69 6e 64 6f 77 2d 70 |ge from |window-p|
|00000810| 6f 72 74 00 20 20 20 20 | 20 20 20 20 2a 6d 73 67 |ort.    |    *msg|
|00000820| 3d fe b4 28 2a 6d 79 77 | 69 6e 64 6f 77 5c 55 73 |=..(*myw|indow\Us|
|00000830| 65 72 50 6f 72 74 29 00 | 00 20 20 20 20 20 20 20 |erPort).|.       |
|00000840| 20 3b 41 63 74 75 61 6c | 6c 79 20 61 20 6d 65 73 | ;Actual|ly a mes|
|00000850| 73 61 67 65 20 68 65 72 | 65 3f 00 20 20 20 20 20 |sage her|e?.     |
|00000860| 20 20 20 80 0b 20 2a 6d | 73 67 00 20 20 20 20 20 |   .. *m|sg.     |
|00000870| 20 20 20 20 20 fe b5 28 | 2a 6d 73 67 29 00 00 20 |     ..(|*msg).. |
|00000880| 20 20 20 20 20 20 20 20 | 20 3b 43 6c 6f 73 65 20 |        | ;Close |
|00000890| 77 69 6e 64 6f 77 00 20 | 20 20 20 20 20 20 20 20 |window. |        |
|000008a0| 20 80 06 20 77 69 6e 6f | 66 66 00 20 20 20 20 20 | .. wino|ff.     |
|000008b0| 20 20 20 80 c0 00 20 20 | 20 20 20 20 80 c0 00 00 |   ...  |    ....|
|000008c0| 20 20 20 20 20 20 3b 47 | 65 74 20 6d 65 73 73 61 |      ;G|et messa|
|000008d0| 67 65 73 20 66 72 6f 6d | 20 63 78 2d 70 6f 72 74 |ges from| cx-port|
|000008e0| 20 6c 6f 6f 70 00 20 20 | 20 20 20 20 80 bb 00 00 | loop.  |    ....|
|000008f0| 20 20 20 20 20 20 20 20 | 3b 47 65 74 20 6d 65 73 |        |;Get mes|
|00000900| 73 61 67 65 20 66 72 6f | 6d 20 63 78 2d 70 6f 72 |sage fro|m cx-por|
|00000910| 74 00 20 20 20 20 20 20 | 20 20 2a 6d 73 67 3d fe |t.      |  *msg=.|
|00000920| b4 28 2a 62 72 6f 6b 65 | 72 5f 6d 70 29 00 00 20 |.(*broke|r_mp).. |
|00000930| 20 20 20 20 20 20 20 3b | 41 63 74 75 61 6c 6c 79 |       ;|Actually|
|00000940| 20 61 20 6d 65 73 73 61 | 67 65 20 68 65 72 65 3f | a messa|ge here?|
|00000950| 00 20 20 20 20 20 20 20 | 20 80 0b 20 2a 6d 73 67 |.       | .. *msg|
|00000960| 00 00 20 20 20 20 20 20 | 20 20 20 20 3b 47 65 74 |..      |    ;Get|
|00000970| 20 49 44 2c 20 54 79 70 | 65 2c 20 45 76 65 6e 74 | ID, Typ|e, Event|
|00000980| 20 66 72 6f 6d 20 6d 65 | 73 73 61 67 65 00 20 20 | from me|ssage.  |
|00000990| 20 20 20 20 20 20 20 20 | 6d 73 67 69 64 3d f8 14 |        |msgid=..|
|000009a0| 28 2a 6d 73 67 29 00 20 | 20 20 20 20 20 20 20 20 |(*msg). |        |
|000009b0| 20 6d 73 67 74 79 70 3d | f8 12 28 2a 6d 73 67 29 | msgtyp=|..(*msg)|
|000009c0| 00 20 20 20 20 20 20 20 | 20 20 20 2a 69 65 76 65 |.       |   *ieve|
|000009d0| 6e 74 3d f8 13 28 2a 6d | 73 67 29 00 00 20 20 20 |nt=..(*m|sg)..   |
|000009e0| 20 20 20 20 20 20 20 fe | b5 28 2a 6d 73 67 29 00 |       .|.(*msg).|
|000009f0| 00 20 20 20 20 20 20 20 | 20 20 20 3b 57 68 69 63 |.       |   ;Whic|
|00000a00| 68 20 74 79 70 65 3f 00 | 20 20 20 20 20 20 20 20 |h type?.|        |
|00000a10| 20 20 80 0e 20 6d 73 67 | 74 79 70 00 00 20 20 20 |  .. msg|typ..   |
|00000a20| 20 20 20 20 20 20 20 20 | 20 20 20 3b 49 6e 70 75 |        |   ;Inpu|
|00000a30| 74 2d 45 76 65 6e 74 00 | 20 20 20 20 20 20 20 20 |t-Event.|        |
|00000a40| 20 20 20 20 80 0f 20 23 | 43 58 4d 5f 49 45 56 45 |    .. #|CXM_IEVE|
|00000a50| 4e 54 00 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |NT..    |        |
|00000a60| 20 20 3b 57 68 69 63 68 | 20 49 44 3f 00 20 20 20 |  ;Which| ID?.   |
|00000a70| 20 20 20 20 20 20 20 20 | 20 20 20 80 0e 20 6d 73 |        |   .. ms|
|00000a80| 67 69 64 00 00 20 20 20 | 20 20 20 20 20 20 20 20 |gid..   |        |
|00000a90| 20 20 20 20 20 20 20 3b | 4f 75 72 20 70 6f 70 6b |       ;|Our popk|
|00000aa0| 65 79 21 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |ey!.    |        |
|00000ab0| 20 20 20 20 80 0f 20 23 | 45 56 54 5f 48 4f 54 4b |    .. #|EVT_HOTK|
|00000ac0| 45 59 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |EY.     |        |
|00000ad0| 20 20 20 20 20 80 06 20 | 77 69 6e 6f 6e 00 00 20 |     .. |winon.. |
|00000ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000af0| 20 3b 4f 74 68 65 72 20 | 49 6e 70 75 74 65 76 65 | ;Other |Inputeve|
|00000b00| 6e 74 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |nt.     |        |
|00000b10| 20 20 20 80 0f 20 23 49 | 45 56 45 4e 54 00 00 20 |   .. #I|EVENT.. |
|00000b20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |        |       .|
|00000b30| 10 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..      |        |
|00000b40| 20 20 20 20 3b 55 6e 6b | 6e 6f 77 6e 20 49 45 56 |    ;Unk|nown IEV|
|00000b50| 45 4e 54 21 00 20 20 20 | 20 20 20 20 20 20 20 20 |ENT!.   |        |
|00000b60| 20 20 20 80 02 20 80 0e | 00 00 20 20 20 20 20 20 |   .. ..|..      |
|00000b70| 20 20 20 20 20 20 20 20 | 3b 43 6f 6d 6d 61 6e 64 |        |;Command|
|00000b80| 20 66 72 6f 6d 20 45 78 | 63 68 61 6e 67 65 00 20 | from Ex|change. |
|00000b90| 20 20 20 20 20 20 20 20 | 20 20 20 80 0f 20 23 43 |        |   .. #C|
|00000ba0| 58 4d 5f 43 4f 4d 4d 41 | 4e 44 00 00 20 20 20 20 |XM_COMMA|ND..    |
|00000bb0| 20 20 20 20 20 20 20 20 | 20 20 3b 57 68 69 63 68 |        |  ;Which|
|00000bc0| 20 49 44 3f 00 20 20 20 | 20 20 20 20 20 20 20 20 | ID?.   |        |
|00000bd0| 20 20 20 80 0e 20 6d 73 | 67 69 64 00 00 20 20 20 |   .. ms|gid..   |
|00000be0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |        |       ;|
|00000bf0| 44 69 73 61 62 6c 65 20 | 6f 75 72 20 42 72 6f 6b |Disable |our Brok|
|00000c00| 65 72 00 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |er.     |        |
|00000c10| 20 20 20 80 0f 20 23 43 | 58 43 4d 44 5f 44 49 53 |   .. #C|XCMD_DIS|
|00000c20| 41 42 4c 45 00 20 20 20 | 20 20 20 20 20 20 20 20 |ABLE.   |        |
|00000c30| 20 20 20 20 20 20 20 f8 | 03 20 2a 62 72 6f 6b 65 |       .|. *broke|
|00000c40| 72 2c 30 00 00 20 20 20 | 20 20 20 20 20 20 20 20 |r,0..   |        |
|00000c50| 20 20 20 20 20 20 20 3b | 45 6e 61 62 6c 65 20 61 |       ;|Enable a|
|00000c60| 67 61 69 6e 00 20 20 20 | 20 20 20 20 20 20 20 20 |gain.   |        |
|00000c70| 20 20 20 20 20 80 0f 20 | 23 43 58 43 4d 44 5f 45 |     .. |#CXCMD_E|
|00000c80| 4e 41 42 4c 45 00 20 20 | 20 20 20 20 20 20 20 20 |NABLE.  |        |
|00000c90| 20 20 20 20 20 20 20 20 | f8 03 20 2a 62 72 6f 6b |        |.. *brok|
|00000ca0| 65 72 2c 31 00 00 20 20 | 20 20 20 20 20 20 20 20 |er,1..  |        |
|00000cb0| 20 20 20 20 20 20 20 20 | 3b 42 79 65 62 79 65 00 |        |;Byebye.|
|00000cc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000cd0| 80 0f 20 23 43 58 43 4d | 44 5f 4b 49 4c 4c 00 20 |.. #CXCM|D_KILL. |
|00000ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000cf0| 20 72 65 73 75 6c 74 3d | 30 00 00 20 20 20 20 20 | result=|0..     |
|00000d00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 53 68 |        |     ;Sh|
|00000d10| 6f 77 20 6f 75 72 20 77 | 69 6e 64 6f 77 00 20 20 |ow our w|indow.  |
|00000d20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 80 0f |        |      ..|
|00000d30| 20 23 43 58 43 4d 44 5f | 41 50 50 45 41 52 00 20 | #CXCMD_|APPEAR. |
|00000d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000d50| 20 80 06 20 77 69 6e 6f | 6e 00 00 20 20 20 20 20 | .. wino|n..     |
|00000d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 43 6c |        |     ;Cl|
|00000d70| 6f 73 65 20 77 69 6e 64 | 6f 77 00 20 20 20 20 20 |ose wind|ow.     |
|00000d80| 20 20 20 20 20 20 20 20 | 20 20 20 80 0f 20 23 43 |        |   .. #C|
|00000d90| 58 43 4d 44 5f 44 49 53 | 41 50 50 45 41 52 00 20 |XCMD_DIS|APPEAR. |
|00000da0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000db0| 20 80 06 20 77 69 6e 6f | 66 66 00 00 20 20 20 20 | .. wino|ff..    |
|00000dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 55 |        |      ;U|
|00000dd0| 73 65 72 20 74 72 69 65 | 64 20 74 6f 20 73 74 61 |ser trie|d to sta|
|00000de0| 72 74 20 75 73 20 61 67 | 61 69 6e 2c 20 73 6f 20 |rt us ag|ain, so |
|00000df0| 73 68 6f 77 20 77 69 6e | 64 6f 77 00 20 20 20 20 |show win|dow.    |
|00000e00| 20 20 20 20 20 20 20 20 | 20 20 20 20 80 0f 20 23 |        |    .. #|
|00000e10| 43 58 43 4d 44 5f 55 4e | 49 51 55 45 00 20 20 20 |CXCMD_UN|IQUE.   |
|00000e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 80 |        |       .|
|00000e30| 06 20 77 69 6e 6f 6e 00 | 00 20 20 20 20 20 20 20 |. winon.|.       |
|00000e40| 20 20 20 20 20 20 20 20 | 20 80 10 00 20 20 20 20 |        | ...    |
|00000e50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 55 |        |      ;U|
|00000e60| 6e 6b 6e 6f 77 6e 20 49 | 44 21 00 20 20 20 20 20 |nknown I|D!.     |
|00000e70| 20 20 20 20 20 20 20 20 | 20 80 02 20 80 0e 00 00 |        | .. ....|
|00000e80| 20 20 20 20 20 20 20 20 | 20 20 20 20 80 10 00 20 |        |    ... |
|00000e90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 55 6e |        |     ;Un|
|00000ea0| 6b 6e 6f 77 6e 20 54 79 | 70 21 00 20 20 20 20 20 |known Ty|p!.     |
|00000eb0| 20 20 20 20 20 80 02 20 | 80 0e 00 00 20 20 20 20 |     .. |....    |
|00000ec0| 20 20 20 20 80 c0 00 00 | 20 20 20 20 20 20 20 20 |    ....|        |
|00000ed0| 3b 42 72 65 61 6b 2d 73 | 69 67 6e 61 6c 00 20 20 |;Break-s|ignal.  |
|00000ee0| 20 20 20 20 20 20 80 0b | 20 73 69 67 72 63 76 64 |      ..| sigrcvd|
|00000ef0| 20 80 42 20 23 53 49 47 | 42 52 45 41 4b 46 5f 43 | .B #SIG|BREAKF_C|
|00000f00| 54 52 4c 5f 43 00 20 20 | 20 20 20 20 20 20 20 20 |TRL_C.  |        |
|00000f10| 72 65 73 75 6c 74 3d 30 | 00 20 20 20 20 20 20 20 |result=0|.       |
|00000f20| 20 80 c0 00 00 20 20 20 | 20 20 20 80 bc 20 2a 6d | ....   |   .. *m|
|00000f30| 73 67 3d 30 00 00 20 20 | 20 20 80 bc 20 72 65 73 |sg=0..  |  .. res|
|00000f40| 75 6c 74 3d 30 00 00 20 | 20 20 20 3b 4b 69 6c 6c |ult=0.. |   ;Kill|
|00000f50| 20 43 58 2d 42 72 6f 6b | 65 72 00 20 20 20 20 f8 | CX-Brok|er.    .|
|00000f60| 05 28 2a 62 72 6f 6b 65 | 72 29 00 00 20 20 20 20 |.(*broke|r)..    |
|00000f70| 3b 43 6c 65 61 72 20 43 | 58 2d 70 6f 72 74 00 20 |;Clear C|X-port. |
|00000f80| 20 20 20 80 bb 00 20 20 | 20 20 20 20 2a 6d 73 67 |   ...  |    *msg|
|00000f90| 3d fe b4 28 2a 62 72 6f | 6b 65 72 5f 6d 70 29 00 |=..(*bro|ker_mp).|
|00000fa0| 20 20 20 20 20 20 80 0b | 20 2a 6d 73 67 00 20 20 |      ..| *msg.  |
|00000fb0| 20 20 20 20 20 20 fe b5 | 20 2a 6d 73 67 00 20 20 |      ..| *msg.  |
|00000fc0| 20 20 20 20 80 c0 00 20 | 20 20 20 80 bc 20 2a 6d |    ... |   .. *m|
|00000fd0| 73 67 3d 30 00 00 20 20 | 80 c0 00 00 20 20 3b 4b |sg=0..  |....  ;K|
|00000fe0| 69 6c 6c 20 43 58 2d 70 | 6f 72 74 00 20 20 fe e3 |ill CX-p|ort.  ..|
|00000ff0| 20 2a 62 72 6f 6b 65 72 | 5f 6d 70 00 00 80 c0 00 | *broker|_mp.....|
|00001000| 00 3b 43 6c 6f 73 65 20 | 77 69 6e 64 6f 77 00 80 |.;Close |window..|
|00001010| 06 20 77 69 6e 6f 66 66 | 00 80 02 00 00 3b 54 68 |. winoff|.....;Th|
|00001020| 69 73 20 73 75 62 20 6f | 70 65 6e 73 20 74 68 65 |is sub o|pens the|
|00001030| 20 77 69 6e 64 6f 77 00 | 2e 77 69 6e 6f 6e 00 80 | window.|.winon..|
|00001040| 0b 20 77 69 6e 73 69 67 | 66 6c 61 67 3d 30 00 20 |. winsig|flag=0. |
|00001050| 20 2a 6d 79 73 63 72 65 | 65 6e 3d ff d1 28 30 29 | *myscre|en=..(0)|
|00001060| 00 20 20 74 69 74 65 6c | 24 3d 22 54 65 73 74 2d |.  titel|$="Test-|
|00001070| 43 6f 6d 6d 6f 64 69 74 | 79 22 2b dc 86 28 30 29 |Commodit|y"+..(0)|
|00001080| 00 20 20 6e 65 77 77 69 | 6e 64 6f 77 5c 4c 65 66 |.  newwi|ndow\Lef|
|00001090| 74 45 64 67 65 3d 32 30 | 2c 32 30 2c 32 30 30 2c |tEdge=20|,20,200,|
|000010a0| 31 30 30 2c 31 2c 32 2c | 38 20 3b 28 23 57 69 6e |100,1,2,|8 ;(#Win|
|000010b0| 64 6f 77 43 6c 6f 73 65 | 29 00 20 20 6e 65 77 77 |dowClose|).  neww|
|000010c0| 69 6e 64 6f 77 5c 46 6c | 61 67 73 3d 23 57 49 4e |indow\Fl|ags=#WIN|
|000010d0| 44 4f 57 43 4c 4f 53 45 | 7c 23 57 49 4e 44 4f 57 |DOWCLOSE||#WINDOW|
|000010e0| 44 52 41 47 7c 23 53 49 | 4d 50 4c 45 5f 52 45 46 |DRAG|#SI|MPLE_REF|
|000010f0| 52 45 53 48 7c 23 52 4d | 42 54 52 41 50 00 20 20 |RESH|#RM|BTRAP.  |
|00001100| 6e 65 77 77 69 6e 64 6f | 77 5c 46 69 72 73 74 47 |newwindo|w\FirstG|
|00001110| 61 64 67 65 74 3d 30 2c | 30 2c 26 74 69 74 65 6c |adget=0,|0,&titel|
|00001120| 24 2c 2a 6d 79 73 63 72 | 65 65 6e 2e 53 63 72 65 |$,*myscr|een.Scre|
|00001130| 65 6e 2c 30 2c 2d 31 2c | 2d 31 2c 2d 31 2c 2d 31 |en,0,-1,|-1,-1,-1|
|00001140| 2c 23 43 55 53 54 4f 4d | 53 43 52 45 45 4e 00 20 |,#CUSTOM|SCREEN. |
|00001150| 20 2a 6d 79 77 69 6e 64 | 6f 77 3d ff 9e 28 6e 65 | *mywind|ow=..(ne|
|00001160| 77 77 69 6e 64 6f 77 29 | 00 20 20 ff d2 20 30 2c |wwindow)|.  .. 0,|
|00001170| 2a 6d 79 73 63 72 65 65 | 6e 00 20 20 77 69 6e 73 |*myscree|n.  wins|
|00001180| 69 67 66 6c 61 67 3d 31 | 80 7c 2a 6d 79 77 69 6e |igflag=1|.|*mywin|
|00001190| 64 6f 77 5c 55 73 65 72 | 50 6f 72 74 5c 6d 70 5f |dow\User|Port\mp_|
|000011a0| 53 69 67 42 69 74 00 80 | c0 00 80 07 00 00 3b 54 |SigBit..|......;T|
|000011b0| 68 69 73 20 73 75 62 20 | 63 6c 6f 73 65 73 20 74 |his sub |closes t|
|000011c0| 68 65 20 77 69 6e 64 6f | 77 00 2e 77 69 6e 6f 66 |he windo|w..winof|
|000011d0| 66 00 80 0b 20 77 69 6e | 73 69 67 66 6c 61 67 3c |f... win|sigflag<|
|000011e0| 3e 30 00 20 20 ff 88 20 | 2a 6d 79 77 69 6e 64 6f |>0.  .. |*mywindo|
|000011f0| 77 00 20 20 77 69 6e 73 | 69 67 66 6c 61 67 3d 30 |w.  wins|igflag=0|
|00001200| 00 80 c0 00 80 07 00 00 | 80 25 2e 62 20 22 24 56 |........|.%.b "$V|
|00001210| 45 52 3a 20 54 65 73 74 | 2d 43 6f 6d 6d 6f 64 69 |ER: Test|-Commodi|
|00001220| 74 79 20 31 2e 30 20 28 | 30 37 2e 30 39 2e 39 33 |ty 1.0 (|07.09.93|
|00001230| 29 22 2c 30 00 80 27 00 | 00                      |)",0..'.|.       |
+--------+-------------------------+-------------------------+--------+--------+