1. Forum
  2. FidoNet
  3. PASCAL LESSONS

  • help!

    From Chris Hoppman@1:129/305 to All on Mon Feb 23 04:31:09 2004
    Was wondering what this is about.

    b:boolean;
    by:byte;
    ---

    b := (by and 6 = 6);

    ---

    I have it in two places in my com routines that I am tring to convert to asm and don't really know how it goes about evaluating this experssion. So, don't know if I can convert it.

    I saw in the help file. If by = 6 then it's true/ if by <> 6 then it is false and via versa, but what does = 6 at the end of it play.

    I understand this. b := (by and 6), but don't understand b:=(by and 6 = 6);

    I havn't had time to do some test to figure it out and hoped for a quick answer in this group.

    chris

    --- Renegade v02-12.4 - Alpha
    * Origin: The Titantic BBS Telnet - ttb.slyip.com (1:129/305)
  • From Jasen Betts@3:640/1042 to Chris Hoppman on Tue Feb 24 08:53:38 2004
    Hi Chris.

    23-Feb-04 04:31:09, Chris Hoppman wrote to All


    Was wondering what this is about.

    b:boolean; by:byte; ---

    b := (by and 6 = 6);

    ---

    I have it in two places in my com routines that I am tring to
    convert to asm and don't really know how it goes about evaluating
    this experssion. So, don't know if I can convert it.

    something like

    mov al,by
    and al,6
    cmp al,6
    jnz @ZZ0
    mov b,1
    jmp @ZZ1
    @ZZ0:
    mov b,0
    @ZZ1:


    I saw in the help file. If by = 6 then it's true/ if by <> 6 then
    it is false and via versa, but what does = 6 at the end of it
    play.

    I understand this. b := (by and 6), but don't understand b:=(by
    and 6 = 6);

    do you understand this? b:= (by = 6)

    b:=(by and 6 = 6); means the same as b:=((by and 6) = 6);

    does that help ?

    Bye <=-

    ---
    * Origin: How to make Kleenex dance? Blow a little boogie in it. (3:640/1042)
  • From Chris Hoppman@1:129/305 to Jasen Betts on Wed Feb 25 05:18:05 2004
    do you understand this? b:= (by = 6)

    b:=(by and 6 = 6); means the same as b:=((by and 6) = 6);

    does that help ?

    Yes, I get it now.

    thanks
    bw

    --- Renegade v02-23.4 - Alpha
    * Origin: The Titantic BBS Telnet - ttb.slyip.com (1:129/305)