aUCBLogo Demos and Tests / showpalette


to showpalette [pal []]
; Usage i.e.: (showpalette loadpalette "topograf.pal)
   repeat count pal
   [   setpc pal.repCount
      fd 100 bk 100 rt 90 fd 1 lt 90
   ]   
end