Simple toggle trick

[Randy Walker]

Long time ago I cane across the need to toggle a variable off and on. Until recently I forgot about this trick. This little snippet demonstrates how the tilde (not) symbol can be used to toggle a variable on each pass.
Run with or without Debugger:

Code: Select all

Repeat
  Select MessageRequester("See toggle Work?", Str(t)+" <<Yes to toggle this value.", #MB_YESNO)
    Case #IDYES
      t = ~ t
    Case #IDNO
      Break
  EndSelect
  Debug t
ForEver
End

[Bisonte]

If this is supposed to be a tip, and it is found by a beginner...
they will be confused at first.

What are these constants?

Please use PureBasic constants and not API constants (which, to my knowledge, only exist in Windows),
even if they are quicker to write... Not everyone use your environment and write in your style.

Thank you.

in this case

Code: Select all

#PB_MessageRequester_YesNo
#PB_MessageRequester_Yes
#PB_MessageRequester_No

[AZJIO]

Code: Select all

t = Bool(Not t)

If you read the flag from the ini file and someone writes 15 there, your version will stop working

[BarryG]

I've always used "t=1-t" because it makes it clear to anyone what it does.

[minimy]

l= 1
l!1
Debug l
l!1
Debug l
This work too

[Piero]

Code: Select all

a=6
a!4
Debug a
a!4
Debug a
a!4
Debug a

Code: Select all

a=~4
Debug 4&a|2
a=~a
Debug 4&a|2
a=~a
Debug 4&a|2

viewtopic.php?p=635000#p635000

[Randy Walker]

Indeed.... more good tricks. Thanks everyone for your contributions!!

[Randy Walker]

If this is supposed to be a tip, and it is found by a beginner...
they will be confused at first.

What are these constants?

Please use PureBasic constants and not API constants
Thank you.
[/code]

Wow!! Didn't think it would offend anyone. Have it your way...

Code: Select all

Repeat
  Select MessageRequester("See toggle Work?", Str(t)+" <<Yes to toggle this value.", #PB_MessageRequester_YesNo)
    Case #PB_MessageRequester_Yes
      t = ~ t
    Case #PB_MessageRequester_No
      Break
  EndSelect
  Debug t
ForEver
End

[Bisonte]

If this is supposed to be a tip, and it is found by a beginner...
they will be confused at first.

What are these constants?

Please use PureBasic constants and not API constants
Thank you.
[/code]

Wow!! Didn't think it would offend anyone. Have it your way...
...

Sorry its no offend... But your codes often have some mystical things (for beginners), their are
not in the PB Help ...