INFO - FAQ - CC2-Forum - CCPro-Forum |
|
Oke ....great Only I have the compiler c-control/basic version 1.33 and then work the task" CASE" not I"ve basic ++ gedownload but its works not with M. unit2.0...... not yet,.... I go, however, further with basic ++ Is there also a step to step ?? > > > How can I this example smaller write > > in advance warm thanks > > Hello, > > maybe you try it that way (in BASIC++ or a few modifications in CCBASIC): > > > 'Stuuring voor de MC14067B een 16 channel Analoge multiplexer > > 'poort > > DEFINE ADin AD[1] > define poort1 port[1] > define poort2 port[2] > define poort3 port[3] > define poort4 port[4] > 'VAR > > DEFINE I BYTE[1] > DEFINE Ieen BIT[1] > DEFINE Itwee BIT[2] > DEFINE Idrie BIT[3] > DEFINE Ivier BIT[4] > > define ingang1 bit[17] > define ingang2 bit[18] > define ingang3 bit[19] > define ingang4 bit[20] > define ingang5 bit[21] > define ingang6 bit[22] > define ingang7 bit[23] > define ingang8 bit[24] > define ingang9 bit[25] > define ingang10 bit[26] > define ingang11 bit[27] > define ingang12 bit[28] > define ingang13 bit[29] > define ingang14 bit[30] > define ingang15 bit[31] > > define temp as bit[32] > > for i = 0 to 15 > poort1 = ieen > poort2 = itwee > poort3 = idrie > poort4 = ivier > > IF ADin<140 THEN > temp=ON > ELSE > IF ADin>240 THEN > temp=OFF > ELSE > goto resm > END IF > END IF > > select case i > case 0 > ingang1 = temp > case 1 > ingang2 = temp > case 2 > ingang3 = temp > case 3 > ingang4 = temp > case 4 > ingang5 = temp > case 5 > ingang6 = temp > case 6 > ingang7 = temp > case 7 > ingang8 = temp > case 8 > ingang9 = temp > case 9 > ingang10 = temp > case 10 > ingang11 = temp > case 11 > ingang12 = temp > ingang13 = temp > ingang14 = temp > ingang15 = temp > end select > > #resm > > next i > > > Greetings, > > Stefan |
Antwort schreiben |