EasyManuals Logo

Atari 800 Basic Reference Manual

Atari 800
122 pages
To Next Page IconTo Next Page
To Next Page IconTo Next Page
To Previous Page IconTo Previous Page
To Previous Page IconTo Previous Page
Page #108 background imageLoading...
Page #108 background image
SEAGULL
OVER
OCEAN
This
program
combines
graphics
and
sounds.
The
sounds
are
not
"
pure"
sounds,
but
simulate
the
roar
ofthe
ocean
and
the
gull's
"tweet".
The
graphics
symbols
used
to
simulate
the
gull
could
not
be
printed
on
the
line
printer.
Enter
the
following
characters
in
line
20.
20 BIRD$ = " V
--
"
To
get
these
symbols,
use
&miG,
&3F,
1!13
R,
1!13
R.
10
Dit1
BIRD$(
4)
20
BIPD$=
11
u
30
FLAG=1
:
F~Ol·J=10:
COL=10
40
GRAPHICS
1 :
POKE
756
..
226
:
FOKE
752..
1
:.e
:3ETCOLO~:
0
..
(1,
0 :
:3ETCOLOR
1
..
:3
14
60
PR
It-H
#6
_;
11
the (u:ean"
70
R=UH(
F.:t·[!
( 0
;.::;::
11)
8J.J
POSIT
IOt
·
~
17,
1 7
90
FOR
T=0
TO
10
100
SOUt·iD
0
..
i,
8.
4
110
FOR
A=l
TO
50
: t·
JE:
:
<T
A
120
IF
F.:t-40(
~:n
::
{J.
8
THE~
·
4
FOP
D=l€1
TO
5
STE
P
-1:
SOUr·~D
1,
0,
1(1
..
It-H<
PhD
(
~3
)::;::1
0) =
t·iC<T
D:
:;ou~Jo
1 ..
~J
..
o
..
0
130
GO
:
:;UE:
20(1
140
~iE:
>=
:T
T
150
FOR
i=10
TO
0
STEP
-1
160
SOUND
0,T,8,4
170
FOR
A=
1
TO
50
: t·E
=<
T A
175
IF
F.:t-lOOJ
) >0 .
:3
THEt-4
FO~
:
0=
10
TO
5
STE
P -1 :
:::OUt·40
1 .. 0,
10
..
8 : t·
j£::<T
0 :
SOUHD
1
..
0
..
0 .. 0
180
FOF.:
H=l
TO
1f1:
t
·
~E
::·
::T
H
185
GOSUE:
20(1
190
HE>::T
T
195
GOTO
70
200
I:;OSIJ8
3(1(1
210
F·o~;
I T I
Of
·
~
COL
·'
ROl
~
J
22~~1
PF.~!t·~T
#6
.;
EIRn:t
<
FLAG.~
FLAG+1
>
230
FLA
I
~=FLAi~+
2:
IF
FLA1~=5
THEf·~
FLA(.;=
1
240
~~ETUr;!:ll
300
IF
F.~f·iD(
f1
> >
(~
. 5
THEf
·
~
~~E
T
U
F
~f
·~
310
F'OSI
TIOf
·i
CCL
F:
Ol·l
320
PF.:
I
t·iT
#6
_;
11
n
330
A=
I
t·lT(
Pr~D<
~3
>:
=t3
>-1
340
E:=
It·iT
(
Pf·~C
~<
[1
>:
:;::
:3 )-
.1
350
F.:Ql.J=Pm
·
l+A
360
IF
F.:l)l.J=~:1
THH~
Rm
·
l=
1
370
IF
~:m·J=20
THEri
F.:m·J
=
19
380
COL=COL+E:
39€1
IF
COL=ra
THH~
COL=l
400
IF
COL>
1
:;
THEt4
CO
L=
1
;::
410
RETURt
·l
Appendix
H-11

Table of Contents

Other manuals for Atari 800

Questions and Answers:

Question and Answer IconNeed help?

Do you have a question about the Atari 800 and is the answer not in the manual?

Atari 800 Specifications

General IconGeneral
ProcessorMOS Technology 6502
Processor Speed1.79 MHz
ROM10 KB
GraphicsANTIC and GTIA chips
Release Year1979
Display Resolutionup to 320 x 192
Colors128 colors
Sound4 channels
StorageCartridge, cassette, floppy disk
PortsCartridge, serial, monitor
Operating SystemAtari OS

Related product manuals