Sharp CE-140P Manual do Utilizador descarregar pdf (Página 48)

:l4(--~~

-----.".----

PRO

G R A M M E

1 0

P R

R A M M E

ich

Ubersende

Ihnen

von

mir

erstellte

Beitr~ge

fuer

den

Sharp

Pocketcomputer

1500

handelt

sich

dabei

um:

ein

Programm

zum

scrollen

von

Texten

mittels

der

Cursortasten,

ein

Programm

2ur

Zahlenumwandlung

von

dez->bel

bel->dez,

ein

Programm

zur

Berechnung

einer

inversen

Matrix

nach

dem

Austauschverfahren,

Passwortprogramm,

Ral

Schall

ein

Musikprogramm

fuer

1/2

Oktaven,

5160

Dueren

ein

Graphikprogramm,

Amselweg

ein

Editor-Hilfsprogramm

Maschinensprache,

einen

Tip

Basic-Programmen

(Pseudo-Zeilennummern),

ein

Statistikprogramm,

und

einige

ROM-Routinen,

die

von

Basic

aus

benutzt

werden

konnen.

Programm

Nr.

Scrollen

eines

Textes

Seite

-1-

Te~tber.ieh

einzuschr~nken,

werden

den

Variablen

RU,RO

und

H~uptprogramm

die

ent~prechenden

Werte

zugewiesen.

steht

fuer

die

~nter~

Grenze

der

Text-Data-Zeile,

steht

fuer

die

obere

Greoze.

ist

der

Abstand

zwisehen

den

einzelnen

Datazeile.

W~iterjin

muB

Hauptprogramm

die

Vari~ble

A$(0)

auf

Zeichen

dimensioniert

werden.

Routine:

10:

"SCROLL"CLS :WAIT 0:RM=RU:ON

ERROR

GOTO

11:

RESTORE RM:READ

A$(0):M=1:RL=LEN

A$(0)-25

12:

MID$(A$(0),M;26)

13:

I$=IN~~EY$:

I$=""GOTO

14:

CU=0:IF

I$=CHR$

BLET

M=M-l:CU=I:IF

M(IBEEP

I:M=l

15:

!$=CHR$

12LET

M=M+l:CU=l:IF

M>RLBEEP

I:M=RL

16:

CUGOTO

17:

I$=CHR$

10LET

.=RM+ST: CLJ=1:

RM>ROBEEP

RM=RO

18:

I$=CHR$

11LET

RM=RM-ST:CU=1:IF

RM<RUBEEP l:RM=RU

19:

CUGOTO

20:

. I F

1$="

"OR I $=CHR$ 13RETURN

21:

I$="+"LET

M=RL

22:

I$="-"LET

M=1

23:

GOTO

HaLlptprogramm:

100

"A"CLEAR

:DIM

A$(Q))*80

101

RU=200:RO=RU:ST=IZI:GOSUB "SCROLL"

102

RU=201:RO=205:ST=2:GOSUB

"SCROLL"

103

END

200

201

212)3

205

DATA

"Serollprogramm

ZLlm

scrollen

eines

Textes

. . "

"AnmerkLIn(;p

Dureh

um~ndern

von

Im=m-ll

und

Im=m+l/"

"in

den

Zeilen

und

in.

Im=m-261

Llnd

/m=m+26/"

"wird

der

Te>:t

jewei"ls

Zeichen

verse

hoben."

Programm

Nr.

Zah~enumwandlung

Wer

mit

dem

Computer

arbeitet,

arbeitet

zeitweilig

aueh

mit

Zahlensystemen.

die

Umwandlung

manchmal

jedoch

recht

langweilig

ist,

erledigt

dies

nun

der

1501Z1A.

Dabei

konnen

Zahlen

vom

Dezimalsystem

ein

beliebiges

System

~nd·umgekehrt

umgesetzt

werden.

Der

Zahlenbereieh

ist

fast

unbeschr~nkt

und

werden

auch

gebrochene

lahlen

umgewandelt.

Diese

werden

wie

normal

mit

einem

Dezimalpunkt

eingegeben

(2.B

C012)0.4

oder

49152.25)

SolI

d~s

Programm

auch

auf

anderen

Rechner

laufen,

ist

zum

Beispiel

beim

1401/02

darauf

aehten,

daB

die

alle

~lle

einfaehen

Stringvariablen

Doppelvariablen

dmzuwandeln

Bind.

Das

Programm

benutzt

zur

Urnwandlung

den

ASCII-Code.

Man

sollte

sieh

also

auf

die

normalen

Basis-Einheiten

beschr~nken,

sonst

Fehlausaqen

fUhren

wUrde.

Auherdem

kann

bei-Eingabe

einer

groBen

Basis

ein

Error

auftreten,

der

ASCII-Code

nur

bis

255

geht.

Heft

Seite

Das

Programm

scroll

nen

bel

ebi

gen

Tex

von

ma:·:.

lei

chen

laenge.

Der

Serollvorgang

wird

dureh

die

Cursortas~en

und

bestimmt,

wobei

mit

Cursor

reehts/links

eine

Textzeile

naeh

reehts/lin~s

geserollt

wird

und

mit

Cursor

hoch/runter

zwisehen

mehreren

Textzeilen

·~ebl~tt~rt·

wird.

Dureh Druek

auf

wird

zum

Textzeilenanfang,

mit

zum

leilenende

gesprungen.

diE

Routine

verI

assen

bet~tigt

man

Space

oder

Enter.

Die

serollende

Texte

werd~n

Datazeilen

a/jointfilesconvert/338009/bgelegt.Um

den

1 2 ... 43 44 45 46 47 48 49 50 51 52 53 ... 59 60

Jl,{MlQfI!'ll/tJJll 1
Literaturangebot 2
, , I 4
-' 5
SI:IBRP-Com 6
J)'B(3 7
') 7
* •••••• 8
* CE-12'P • 8
Pock~t-Co~puter 9
M~sikprogiamme 9
PC-1260/ 10
PC-1261 10
--- - - -- -- 11
JOUI" 12
11 . U 13
;8 14
AlfRlfl 15
PC-1251 16
I $,r 17
~nderung 18
D~en und 18
(c)="; 19
". 20
SHaRP-Comput 20
DEI IIIIIt 21
I I i I I -' 21
1 NEIN 22
";;" 23
-Handbuch 24
SCHREIB-SERVICE 25
26
':py\"'" 27
"-ll 27
PM" 28
.' 28
'sI:lA R 29
,' 30
'"' 31
::.:.a.: 31
'X 32
3' 32
.." 33
<r:,C 34
~& 35
- 18.00 36
'1_ 37
LISTING 38
BRIDGESTONE 38
"jQ$: 39
PC-1500 40
HARD-UNO 40
SOFTWARE 40
1'511 41
I PMP. 42
.a-_MUM' 43
"_" 44
"_I! 44
+'uet-' 45
SYSTEMHANDBUCH 46
PC-2500 46
" 47
"'.' 47
:l4(--~~ 48
"'IV" 49
"4" 50
~~~~~~~~~~~= 51
HARP-Comp-ut 52
'0) 53
:,.:,:,:" 54
;" : : ., : 54
.'-" 55
,. : : .' : 56
& A & 58
(L1~~A~Ff 59
Aufbau des 60
Spieffeldes 60

Comentários a estes Manuais

Sem comentários

Sharp CE-140P Manual do Utilizador Página 48

Comentários a estes Manuais

Manuais e produtos relacionados com Digitalizar e Imprimir Sharp CE-140P