REM Decks.bbc 0.01 23-May-2005
      REM Show all decks
      :
      INSTALL "CardLib.bbc"
      :
      REM Setup
      PROCcdtInit
      :
      REM Turn off screen update
      PROCcdtRedraw(FALSE)
      :
      REM Show all decks
      FOR deck%=0 TO cdFaceDownLast-cdFaceDownFirst
        PROCcdtDraw(@memhdc%,2+(cdtWidth%*deck%)+(2*deck%),2,cdFaceDownFirst+deck%,mdFaceDown,0)
      NEXT
      :
      REM Redraw the screen to display cards
      PROCcdtRedrawArea(2,2,13*cdtWidth%,cdtHeight%)
      :
      REM Finish using the DLL
      PROCcdtTerm
      :
      REM Place the cursor beneath the cards
      PRINTTAB(0,7);
      :
      REM Done
      END