Search found 3 matches

by Solkh
Wed Oct 08, 2014 10:12 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24325

Re: Программирование на smart BASIC. Урок 4

Все работает не плохо. Не хватает полной очистки экрана после смены ориентации экрана :!: Это да, но я так вначале и задумывал без очистки :) . И еще только заметил не работает начальная ориентация т.е. как ни поверни сначала всегда рисуются линии, а потом меняются круги с линиями наоборот. Вот не ...
by Solkh
Wed Oct 08, 2014 9:41 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24325

Re: Программирование на smart BASIC. Урок 4

Все работает не плохо. Не хватает полной очистки экрана после смены ориентации экрана :!: Это да, но я так вначале и задумывал без очистки :) . И еще только заметил не работает начальная ориентация т.е. как ни поверни сначала всегда рисуются линии, а потом меняются круги с линиями наоборот. Вот не ...
by Solkh
Wed Oct 08, 2014 8:35 am
Forum: Уроки по программированию
Topic: Программирование на smart BASIC. Урок 4
Replies: 42
Views: 24325

Re: Программирование на smart BASIC. Урок 4

У меня тоже получилось вот программа DEF xLINE() maxx = SCREEN_WIDTH() maxy = SCREEN_HEIGHT() x1 = RND(maxx) x2 = RND(maxx) y1 = RND(maxy) y2 = RND(maxy) DRAW COLOR RND(1),RND(1),RND(1) DRAW SIZE RND(8) DRAW LINE x1,y1 TO x2,y2 END DEF DEF yCIRCLE() maxx = SCREEN_WIDTH() maxy = SCREEN_HEIGHT() x = R...