Announcement

Collapse
No announcement yet.

Converting VB to PB

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Converting VB to PB

    I have a chess program written in VB that I can not convert to PB
    I have tried both VB2PB and V2PB2 without any success. It is a
    German program called Minimax. Can anyone help or has anyone
    done the conversion already.
    Thanks
    William Rogers

    ------------------
    There is no gravity, the earth sucks.

  • #2
    VB DOS to PB/DOS ? VB Win to PB/DOS ? Which VB / PB versions ?

    ------------------
    Davide Vecchi
    [email protected]

    Comment


    • #3
      Since this is the PB/DOS forum, I'd assume VB-DOS==>PB-DOS.

      But.. I cannot find either referenced program (VB2PB and V2PB2) in the "examples" directory supplied with PB/DOS.

      Maybe the publishers of those programs can help?

      MCM


      Michael Mattias
      Tal Systems (retired)
      Port Washington WI USA
      [email protected]
      http://www.talsystems.com

      Comment


      • #4
        VB-DOS==>PB-DOS.

        (VB2PB and VB2PB2)

        Both programs came with both versions of my PB 3.0 and 3.5. There
        is even a program that is suppost to convert 'C' programs into
        PB in list of supplied things. There also used to be a CD that
        you could purchase with hundred of user submitted programs on it.
        They just don't work for me.
        Bill



        ------------------
        There is no gravity, the earth sucks.

        Comment


        • #5
          Originally posted by Michael Mattias:
          Since this is the PB/DOS forum, I'd assume VB-DOS==>PB-DOS.

          But.. I cannot find either referenced program (VB2PB and V2PB2) in the "examples" directory supplied with PB/DOS.

          Maybe the publishers of those programs can help?

          MCM

          I made a mistake the program is QB2PB AND QB2PB2 not visual basic
          Bill


          ------------------
          There is no gravity, the earth sucks.

          Comment


          • #6
            Can you be more specific than "they don't work"? What seems to be
            the problem?

            ------------------
            Tom Hanlin
            PowerBASIC Staff

            Comment


            • #7
              [QUOTE]Originally posted by Tom Hanlin:
              [B]Can you be more specific than "they don't work"? What seems to be
              the problem?

              When using the old QB2BP under pb.30 it created a new program
              but when I go into the new program I get all kinds of errors that
              I don't know what to do with them.
              When using the new QB2PB2 version, it does not work with either
              of my PB's.
              I know it has to be with the way the different basics do different
              operations, but I am at a loss to know the difference and to
              correct them.
              Bill




              ------------------
              There is no gravity, the earth sucks.

              Comment


              • #8
                .

                [This message has been edited by Karl Lessmann (edited April 27, 2003).]

                Comment


                • #9
                  William, without seeing the error codes / messages and possibly the source code, it will be very hard helping you .

                  ------------------
                  Davide Vecchi
                  [email protected]

                  Comment


                  • #10
                    Karl,

                    Code:
                    SUB PgCopy ( BYVAL FromPage AS INTEGER,_
                                 BYVAL ToPage AS INTEGER )       PUBLIC
                    
                       DIM VP_ptr(7) AS STRING PTR * 4000
                       DIM P AS LOCAL INTEGER
                    
                       IF (pbvScrnCard AND 1) = 1 THEN EXIT SUB '-- mono adapter
                       IF FromPage% = ToPage% THEN EXIT SUB
                       IF FromPage% < 0 OR FromPage% > 7 THEN EXIT SUB
                       IF ToPage% < 0 OR ToPage% > 7 THEN EXIT SUB
                    
                       VP_ptr(0) = pbvScrnBuff    '-- Pointer to the video buffer
                       FOR P% = 1 TO 7            '-- Pointer to the other 7 pages
                          VP_ptr(P%) = VP_ptr(P%-1) + &H01000000
                       NEXT
                       @VP_ptr(ToPage%) = @VP_ptr(FromPage%)
                    
                    END SUB

                    ------------------

                    Comment


                    • #11
                      .

                      [This message has been edited by Karl Lessmann (edited September 23, 2003).]

                      Comment

                      Working...
                      X