Keskustelu: Ohjelmointikysymykset: QB: draw ja TA

Miten DRAWin TA:ta komennolla voi pyörittää suorakaidetta KESKELTÄ ei vasemmasta yläkulmasta kuten se nyt tekee?

Aloita kuvion piirtäminen sen keskikohdasta, silloin myös suorakaide pyörii keskeltä. Esimerkki valottanee asiaa, aluksi liikutaan piirtämättä keskeltä vasempaan yläkulmaan:

SCREEN 13
DO
  FOR i% = 0 TO 359
    DRAW "bm160,100"
    DRAW "ta" + STR$(i% - 1) + "c0bl40bu20r80d40l80u40"
    DRAW "bm160,100"
    DRAW "ta" + STR$(i%) + "c15bl40bu20r80d40l80u40"
    WAIT &H3DA, 8
  NEXT
LOOP