DEMO -> Graphisme               

Write your own message and watch it appear in circular form with this neat 10-liner. Changing the string TEXTS in line 10 you can write what you will and if you play around with the height (he), width (le) and thickness (th) variables in line 20, you can make it look just that little bit different.

Paru sous forme de listing dans le magazine Amstrad Computer User (May 1990)
Auteur : M. FOSTER

* Repompage sous le titre "360 Degrees"
Paru sous forme de listing dans le magazine Amstrad Action Issue 64, January 1991.
Auteur : Simon CLARKE

Le listing, comme publié dans Amstrad Computer User, contient un petit bug ; la variable "col" est définie deux fois. Ce bug peut être corrigé en modifiant la ligne 30 :

AVANT :

30 length=LEN(text$):steps=360/length:sti=steps/mo:thi=th/mo:col=1

APRES :

30 length=LEN(text$):steps=360/length:sti=steps/mo:thi=th/mo