Publicité
A
li
and
more
about Sharp
PC-1500
at
http://www.PC-
1500.info
Listage
du
programme
:
10
WAIT
0
20
DIM
A$ (01
*
10
30 A$ (01
=
..
"
:
C
=
0
40
INPUT
"ENTREZ MESSAGE
(
<
10
CARAI", AS (01
50
CLS
60 FOR 1
=
1 TO (L
EN
A$
(01)
70 GCURSOR C
80
FOR
J
=
1 TO
3
90 GCURSOR C
100 PRINT MID$ (A$ (01,
1,
1)
105 C
=C+3
110 NEXT
J
120 C
=
C
+
S
130
NEXT
1
140
WAIT
150
GCURSOR 155
160 GPR INT "OO"
170 END
Touches
u
tilisées:
ŒJ
0000
rn
CD
CD
ODl••r••I
m rn
œ
ŒJ
OO
CAJ
1 8H1n1
rn
CD
OO
ŒJ
ŒJ CD
OOl••n•I
mm
rn
1
.....
,,
eu
m
rn
m
1
=
,
,
..
,"
1
c::i
1
...
,,r1
c:i
,
.... T,
o
m
1
=
1rn1
ENTE
•I
mmmoomŒD
m
1
...
"1
c::imrnmm
mm
1~·œ1
oo
m
rn
m
rn
mm
1
...
•0•1
m,
.,.,"1
rn
m rn
lsPACEl
[ÇJ
CD mm
[D
{SNIFTI
c::J
,.,.,,,,
CD
ŒJ
("'1nlŒJo:JOOCD
(••TERI
rn
œ
rn
mm t•NTE•I
mmmœ
m
CDt=tmrnœco
m
moom
..
,n1
rn
CIJ
IJ[J
ŒJ CO ''""'"'
rnrnrn
rn
œ
m
mœmm
''"""'
mm
mœ
ŒJ
CO
I
=
ICDCDCQJ
CTJ
l•••E•l
rnrnrnmmmm
œ
mm
1
•..,.•1
IIJOOŒJŒJ[[JŒJ
OD
CD
ŒDŒJ
OO ISH"Tl
lI)
[D[D
1
.... T1
rn
m rn
co
1
.... T1
eu
rn
' """ 1
w
CDCD
l<•U•I
o::JOOŒJ{];]I
=
l(];]ŒJCTJl •••<R)
OJOJOOŒJ
[TI
ŒJ
C!JQJl••TE•I
0J
(I)!IJO;J
I
=
1
[&J!IJ!I)
1
c•T<RI
95
Do not sale this PDF !!!
Publicité
