PDA

Просмотр полной версии : Народ помогите)) что набирать ??



REMR
05.09.2008, 18:57
Народ появился спек рабочий , пытаюсь загрузить игру через магнитофон , что нужно нажать в бейсике?? кабели есть , мафон рабочий , все отлично ...
нужно набрать run L??:frown::speccy::smile:

valeron
05.09.2008, 19:04
LOAD "" Enter
И увидишь бордюр начнет мигать тогда включишь магнитофон.

billgilbert81
05.11.2008, 06:20
Прикольный вопрос!!! Прям детство вспомнил....

sv
05.11.2008, 11:45
нормально нормально,а вдруг у человека спектрума ниразу небыло..
или забыл..хотя..имхо если пару лет поюзал кассетный агрегат-такое из памяти не стирается:)..

AAA
05.11.2008, 12:46
головку мафона спиртиком протри перед процессом для уверенности. Если сигнал будет плыть, то надо подкрутить головку до чистого ууууууу. Но если мафон современный, то не надо.

sv
05.11.2008, 13:00
ага,а сколько болтиков подстроечных,в своё время,на головке поменял-ужос..резьба стачивалась от постоянных кручений (касеты то всякие были):)..

Rene Sens
06.11.2008, 11:20
А на меня иногда находит, так я на эмуляторе запускаю кассетную загрузку на нормальной скорости и слушаю, слушаю, слушаю... :)

TomCaT
07.11.2008, 09:38
А на меня иногда находит, так я на эмуляторе запускаю кассетную загрузку на нормальной скорости и слушаю, слушаю, слушаю... :)

+1, я тоже.

Avtofaer
07.11.2008, 12:15
Мужики у меня тот же вопрос. что нажимать, в смысле написать. давно дело было: программка на бейсике строчек пять. помню было BEEP .5,A; FOR A=1 TO 40; ... и в конце GOTO10 в смысле в начало. запускаем по RUN и получаем гамму в один голос от тона 1 до тона 40 по 0,5 сек. каждую ноту. что-то с памятью моей стало.

SAM style
07.11.2008, 13:22
10 for a=1 to 40
20 beep .5,a
30 next a
40 go to 10

Avtofaer
07.11.2008, 13:44
спасибо. вечером отполируем. а где еще простеньких программ рукописных можно насобирать?

AAA
07.11.2008, 14:22
где еще простеньких программ рукописных можно насобирать?

на сайте виртуал тр дос (http://trd.speccy.cz/) в разделе book есть все ответы на все твои вопросы

EEA
07.11.2008, 15:15
Именно небольшие простые программы на бейсике лучше посмотреть в ZX-Ревю 91-93, плюс (если не изменяет память) 94№3 и в некоторых других номерах. Есть книга "Игры на Бейсике своими руками", но там программы посложнее.

Искать
на сайте виртуал тр дос (http://trd.speccy.cz/) в разделе book есть все ответы на все твои вопросы

Avtofaer
07.11.2008, 16:24
непременно понабираю, и позапускаю.

Firelord
11.11.2008, 20:08
А на меня иногда находит, так я на эмуляторе запускаю кассетную загрузку на нормальной скорости и слушаю, слушаю, слушаю...
На меня тоже. Там местами попадалась весьма "музыкальная" загрузка. Взять хотя бы Finders Keepers (ближе к концу, это вообще симфония), Knight Lore (загрузка экрана). Местами даже лучше, чем определённая современная музыка. :-)

Kurles
11.11.2008, 23:40
спасибо. вечером отполируем. а где еще простеньких программ рукописных можно насобирать?

по мотивам прошлой -
10 for a=0 to 100
20 circle a,a,a
30 next a

=)

Vitamin
11.11.2008, 23:49
plot 100,90:draw 60,0,4000

последний параметр можно менять. +- порядок
:)

Avtofaer
12.11.2008, 01:09
классные узоры рисует. новички рекомендую. у нас даже мама стала набирать сама чтобы лишний раз посмотреть. всем спасибо.

BYTEMAN
12.11.2008, 22:21
На меня тоже. Там местами попадалась весьма "музыкальная" загрузка. Взять хотя бы Finders Keepers (ближе к концу, это вообще симфония), Knight Lore (загрузка экрана). Местами даже лучше, чем определённая современная музыка. :-)

Durak Медноногова, переведённый на кассету, звучит классно. Особенно последний блок :)

new
13.11.2008, 16:46
Программа для вывода разноцветных полосок (сгодится для тестирования).
10 FOR C =1 TO 22
20 FOR S= 0 TO 7
30 PRINT PAPER S; " "; (4 ПРОБЕЛА)
40 NEXT S: NEXT C

TomCaT
14.11.2008, 21:06
рисует Спектрум Спектрума )

в строке 90 число 8 можно менять в пределах от 1 до 8. Например, для 1 экран будет раскрашен сразу, а уже потом скошены полосы...

10 FOR A=1 TO 8
20 LET B=2^A-1: LET C=1
30 FOR D=0 TO 31
40 FOR E=0 TO 7
50 LET F=E*32+D
60 POKE 16128+A*256+F,B
70 POKE 18176+A*256+F,B
80 POKE 20224+A*256+F,B
90 IF A=8 THEN POKE 22528+F,C: POKE 22784+F,C: POKE 23040+F,C
100 LET C=C+9: IF C>63 THEN LET C=C-8: IF C=57 THEN LET C=1
110 NEXT E
120 LET C=C+9: IF C>63 THEN LET C=C-8: IF C=57 THEN LET C=1
130 NEXT D: NEXT A
140 PAUSE 0: PAUSE 0

REMR
30.12.2008, 13:18
рисует Спектрум Спектрума )

в строке 90 число 8 можно менять в пределах от 1 до 8. Например, для 1 экран будет раскрашен сразу, а уже потом скошены полосы...

10 FOR A=1 TO 8
20 LET B=2^A-1: LET C=1
30 FOR D=0 TO 31
40 FOR E=0 TO 7
50 LET F=E*32+D
60 POKE 16128+A*256+F,B
70 POKE 18176+A*256+F,B
80 POKE 20224+A*256+F,B
90 IF A=8 THEN POKE 22528+F,C: POKE 22784+F,C: POKE 23040+F,C
100 LET C=C+9: IF C>63 THEN LET C=C-8: IF C=57 THEN LET C=1
110 NEXT E
120 LET C=C+9: IF C>63 THEN LET C=C-8: IF C=57 THEN LET C=1
130 NEXT D: NEXT A
140 PAUSE 0: PAUSE 0

еле вбил это в мозг спектрума :speccy:

askad
31.12.2008, 09:58
попробывал это вбить на эмуляторе... - разрыв мозга наступил на второй строке :)

TomCaT
04.02.2009, 14:09
Во второй строке беда только с символом степени ^
На ZX он изображается как настоящая "стрелочка вверх" /|\, а на IBM - нет вертикальной палочки.

На Спектруме стрелочка вверх - на клавише H. Вводится (извиняюсь, ошибся :( ) "SymbolShift+H".

REMR
01.05.2009, 12:29
надо поднять тему!
Что еще есть)?

TomCaT
02.05.2009, 20:30
10 OVER 1
20 FOR A=0 TO 175
30 PLOT 0, 0
40 DRAW 255, A
50 NEXT A
60 FOR A=254 TO 0 STEP -1
70 PLOT 0, 0
80 DRAW A, 175
90 NEXT A
100 OVER 0

char
03.05.2009, 02:25
вчера повспоминал бейсик :)

16:
32:
64:
96:
112:
128:
256 BORDER 0: BORDER 7::::: BORDER 1::::: BORDER 2::::: BORDER 0: PAUSE 1: GO TO ABS (PEEK 23672-128)


---------------

10 BORDER 0: BORDER 2: BORDER 6: BORDER 7: BORDER 5: BORDER 1: BORDER 0: PAUSE 1
20 BORDER 0:::::::: BORDER 2: BORDER 6: BORDER 7: BORDER 5: BORDER 1: BORDER 0: PAUSE 1
30 GO TO 10

...возможно, потребуется подобрать количество двоеточий.

TomCaT
03.05.2009, 13:06
Гениально и просто, особенно анимация нарисованного.

DimkaM
04.05.2009, 12:28
вчера повспоминал бейсик :)

16:
32:
64:
96:
112:
128:
256 BORDER 0: BORDER 7::::: BORDER 1::::: BORDER 2::::: BORDER 0: PAUSE 1: GO TO ABS (PEEK 23672-128)


---------------

10 BORDER 0: BORDER 2: BORDER 6: BORDER 7: BORDER 5: BORDER 1: BORDER 0: PAUSE 1
20 BORDER 0:::::::: BORDER 2: BORDER 6: BORDER 7: BORDER 5: BORDER 1: BORDER 0: PAUSE 1
30 GO TO 10

...возможно, потребуется подобрать количество двоеточий.

Афигеть

char
04.05.2009, 14:46
:)
кстати, там в началах строк везде BORDER 0 можно убрать.
в анимашке можно удалить 128 строку, и вместо двоеточий, например, в 16 и 32 строке поставить BORDER 0.
и т.д.