Mikä on helpoin tapa piirtää QB:llä "täytetty" ympyrä? Vanhalla kunnon 33 MHz:n 486:n Qbasic 1.1:llä kun ei tuo tunnu pelkällä circle käskyllä onnistuvan. Tai sitte en vaan osaa... :)
CIRCLE piirtää ympyrän ja PAINT täyttää sen (ja minkä tahansa muunkin suljetun kuvion). Komennon parametrit ovat koordinaatit, täyttöväri, ja se väri, joka muodostaa täytettävän alueen ääriviivat.
SCREEN 13 'sininen ympyrä... CIRCLE (100, 100), 50, 1 '...joka täytetään vihreällä PAINT (100, 100), 2, 1
Näin tehdään täytetty ympyrä reunaviivoilla.
Screen 13
CONST X = 100,Y = 100
CIRCLE (X, Y), 50, 9
PAINT (X, Y), 9
CIRCLE (X, Y), 50, 1
Janezkin vinkki oli lähes täydellisen samanlainen kuin Laaksosen vinkki. Tekee aivan samat jutut (eri väreillä tosin). tota viimistä CIRCLEä ei tarvis jos ekan CIRCLEn väri olis se mikä vikassa. :P
Upppsss... Niinpäs onkin. Ja minä tein sen vielä vaikeamman kautta. :(
Aihe on jo aika vanha, joten et voi enää vastata siihen.