Bitwise operations: Difference between revisions
Content added Content deleted
(Added Neko) |
No edit summary |
||
Line 1,534: | Line 1,534: | ||
NOT A =-3 |
NOT A =-3 |
||
</pre> |
</pre> |
||
==={{header|IS-BASIC}}=== |
|||
<lang IS-BASIC>100 LET A=10:LET B=12 |
|||
110 PRINT A;"and";B;"=";A AND B |
|||
120 PRINT A;"band";B;"=";A BAND B |
|||
130 PRINT A;"or ";B;"=";A OR B |
|||
140 PRINT A;"bor";B;"=";A BOR B |
|||
150 PRINT A;"xor";B;"=";XOR(A,B) |
|||
160 PRINT " not";A;"=";NOT A |
|||
170 DEF XOR(A,B)=(A BOR B)-(A BAND B)/lang> |
|||
==={{header|Sinclair ZX81 BASIC}}=== |
==={{header|Sinclair ZX81 BASIC}}=== |