a = 1

b = 2

If a And b Then Print "A AND B are TRUE" Else Print "A AND B are FALSE"

If a _Andalso b Then Print "A _ANDALSO B are TRUE" Else Print "A _ANDALSO B are FALSE"

If 1 <> 0 And 2 <> 0 Then Print "It's TRUE"

(05-05-2024, 09:20 PM)SMcNeill Wrote: You guys may have noticed that we haven't had any Keyword's of the Day for ages now.  The reason for this is really rather simple -- we basically covered the vast majority of keywords and ran out of topics to cover! 

Fortunately, as QB64PE progresses, new commands and functionality gets added over time, and now that we're up to version 3.13, it's probably about time to take a few moments and start going into better detail about what these new functions are, why they were added, and what a person might use them for.  To facilitate this, I'm just going to start at version 3.13 and work my way backwards, down to version 3.0 or so, and try and highlight one function per day, until I've basically covered them all for us.

For today's entry, let's talk about the newest LOGICAL OPERATOR -- _ANDALSO.

First, a little code to discuss:

Code: (Select All)

a = 1

b = 2

If a And b Then Print "A AND B are TRUE" Else Print "A AND B are FALSE"

If a _Andalso b Then Print "A _ANDALSO B are TRUE" Else Print "A _ANDALSO B are FALSE"

Now, as all you folks probably know, AND is a bitwise comparision tool, that compares bits between two values.  It is NOT a logical comparision tool to determine if TRUE or FALSE exists.

1 AND 2 <--- both of these values are non-zero, so in QBASIC, their values are considered to be TRUE.  Now, TRUE and TRUE should logically be TRUE.  Right?

WRONG!!

As I mentioned before, these are NOT logical comparisons!

00000001  <--- 1, as written in binary
00000010  <--- 2, as written in binary
------------  <--- AND -- let's compare and AND the bits here
00000000  <--- the return value is 0 -- it's FALSE!

1 AND 2 = 0...  It's FALSE!

---

So what's the solution here, if we don't want to deal with binary comparisons?  The old method was to compare both against 0, as such:

Code: (Select All)

If 1 <> 0 And 2 <> 0 Then Print "It's TRUE"

IF the first value is not zero, AND the second value is not zero, then it's TRUE...  This is how we always used to have to create logical comparisons, instead of just allowing for bitwise AND to mess things up by itself.

---

But now, we have a new logical operator:  _ANDALSO

If 1 _ANDALSO 2 THEN PRINT "It's TRUE"

This basically does what the previous example does for us -- it compares both values against 0 to see if they're true, and if they're both true, then it assigns the end result as being true.

This is NOT bit-comparision -- use AND for that.  _ANDALSO is simply logical comparison.

IF Happy _ANDALSO Sexy Then Life = Good

---

_ANDALSO -- logical comparison of two values (are they TRUE/non-zero, or FALSE/zero).  They're that simple to understand and use.

https://qb64phoenix.com/qb64wiki/index.php/ANDALSO

' Normal implementation

IF handle < -1 THEN

    IF _WIDTH(handle) >= 640 THEN ...

END IF



' This doesn't work

IF handle < -1 AND _WIDTH(handle) >= 640 THEN ...



' This does work

IF handle < -1 _AndAlso _WIDTH(handle) >= 640 THEN ...

(05-06-2024, 06:39 PM)DSMan195276 Wrote: `_AndAlso` has 'short circuiting' behavior, so if the left side evaluates to false then the right side is not evaluated _at all_, since the result will always be false anyway. Additionally the evaluation order is guaranteed, the left side is always evaluated first before the right side. The combination means that you can use `_AndAlso` to completely avoid the 'invalid handle' error while still only using a single `IF` statement.