Search found 3 matches
- Wed Oct 08, 2014 10:12 am
- Forum: Уроки по программированию
- Topic: Программирование на smart BASIC. Урок 4
- Replies: 42
- Views: 24325
Re: Программирование на smart BASIC. Урок 4
Все работает не плохо. Не хватает полной очистки экрана после смены ориентации экрана :!: Это да, но я так вначале и задумывал без очистки :) . И еще только заметил не работает начальная ориентация т.е. как ни поверни сначала всегда рисуются линии, а потом меняются круги с линиями наоборот. Вот не ...
- Wed Oct 08, 2014 9:41 am
- Forum: Уроки по программированию
- Topic: Программирование на smart BASIC. Урок 4
- Replies: 42
- Views: 24325
Re: Программирование на smart BASIC. Урок 4
Все работает не плохо. Не хватает полной очистки экрана после смены ориентации экрана :!: Это да, но я так вначале и задумывал без очистки :) . И еще только заметил не работает начальная ориентация т.е. как ни поверни сначала всегда рисуются линии, а потом меняются круги с линиями наоборот. Вот не ...
- 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...