С помощью этого кода на Quick Basic 4.5 выводится знак копирайта, который символизирует все права. Они защищены. Поэтому этот код нельзя копировать без всяческого на то разрешения всяких людей вроде меня. Я ведь никто, все знают – но зато мои права защищены от пиратства. Этот код никто не имеет права копировать без разрешения, ведь права-то защищены!
Вообще, кто скопирует этот код, получит лицензией прямо по пальцам. Этот символ используется для устрашения пиратов, которые пытаются скопировать этот код и воспроизвести у себя на КуикБарсике4.5. Всё это нависает дамокловым лучом для отстрастки, конечно же. Отстрастка!
SCREEN13
c1 = 90 ^ 2
c2 = 80 ^ 2
c3 = 60 ^ 2
c4 = 50 ^ 2
FORx = -160TO160
FORy = -100TO100
c = 7
r1 = x * x + y * y
r2 = (x * x * 5 / 4) + y * y
l1 = x - y
l2 = x + y
IFr1 < c1ANDr1 > c2THENc = 0
IFr2 > c4ANDr2 < c3AND (l1 < 0ORl2 < 0) THENc = 0
PSET (x + 160, y + 100), c
NEXTx
NEXTy
LOCATE25, 11: PRINT"All Rights Reserved"; : SLEEP0