### Author Topic: binary assignment  (Read 54 times)

#### jcfuller

• Jr. Member
•  • Posts: 83 ##### binary assignment
« on: May 22, 2020, 09:20:31 AM »
Kevin,
Line 6726
Changing:
Code: [Select]
`      IF *Stk[Tmp] = ASC("0") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),"x") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),".") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),"l") THEN        Stk\$[Tmp] = LTRIM\$(Stk\$[Tmp],48)   'allow leading zero's in numbers        IF Stk\$[Tmp] = "" THEN Stk\$[Tmp] = "0"      END IF[\code]TO[code]      IF *Stk[Tmp] = ASC("0") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),"b") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),"x") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),".") AND NOT iMatchWrd(MID\$(Stk\$[Tmp],2,1),"l") THEN        Stk\$[Tmp] = LTRIM\$(Stk\$[Tmp],48)   'allow leading zero's in numbers        IF Stk\$[Tmp] = "" THEN Stk\$[Tmp] = "0"      END IF`
Allows binary assinment:

Dim As Integer Index
Index = 0b00000000000000000000000001000000

James

#### MrBcx

• Sr. Member
•     • • Posts: 284 ##### Re: binary assignment
« Reply #1 on: May 24, 2020, 01:51:25 PM »
James,

This will be included in 7.4.7.

Thank you