
|
INFO - FAQ - CC2-Forum - CCPro-Forum |
|
Try this out. Greetings, H.J. Windt define word1 word[1] define word2 word[2] define loop byte[5] #start input word1 for loop = 1 to 16 if (word1 and 1) <> 0 then word2 = (word2 or 1) else word2 = (word2 and &b1111111111111110) if loop = 16 then goto pass word1 = word1 shr 1 word2 = word2 shl 1 #pass next word1 = word2 print word1 goto start |
| Antwort schreiben |