ZX spectrum /звезда/ | BASIC ARCHICAD/GDL
FOR f = 0 TO 259 STEP 72 | 50 0 50 0
LET x = INT(50* COS(f* PI/180)) | 15 47 49 1
LET y = INT(50* SIN(f* PI/180)) | -41 29 49 2
PRINT x,y !REM PLOT x+128, y+88 | -41 -30 49 3
NEXT f | 15 -48 49 4
Ok! Ax!
Везде, на Т.Паскале, Делфи, си, М.Флеш и т.д. все действует нормально.