Radio Shack CTR-118 User Manual Page 178
- Page / 196
- Table of contents
- BOOKMARKS
Rated. / 5. Based on customer reviews
H-6
1040 IF V2<5000 PRINT "MADE A NEW CRATER" : GOTO 5000
1050 IF V2>4999 PRINT "BORED A HOLE INTO THE PLANET" : GOTO 5000
1100 IF V2<1 PRINT "NICE TOUCH--VERY GOOD" : GOTO 5000
1110 IF V2<5 PRINT "NOT T00 BAD" : GOTO 5000
1120 PRINT "KIND OF ROUGH" : GOTO 5000
1140 IF V2<30 PRINT "YOU WILL NOT BE ABLE TO TAKE OFF" : GOTO 5000
1150 IF V2<45 PRINT "YOU ARE INJURED. THE LANDER IS ON FIRE" : GOTO 5000
1160 PRINT "THERE ARE NO SURVIVORS"
5000 PRINT "VELOCITY AT IMPACT * * *" TAB(40); ABS(V2) ;"KM/HR"
5010 PRINT "ELAPSED TIME * * * * * *" TAB(40); T1 ;"SECONDS"
5020 END
Customer Information
This program allows you (or your customers) to store information in a file for
future reference. It stores Name, Address and Phone Number; the file can be
recalled, modified, etc., by specifying the desired action using the "Menu"
(Table of Commands).
This would be a handy way to create a mailing/phone list.
10 CLEAR 1000 :CLS :DIM N$(50) :DIM A$(50) :DIM P$(50)
20 CLS :PRINT@ 10,"* * MENU * *" :PRINT :PRINT
30 PRINT "TO BUILD A FILE TYPE 1
40 PRINT "TO SEE THE ENTIRE FILE TYPE 2
50 PRINT "TO SEE AN INDIVIDUAL NAME TYPE 3
60 PRINT "TO MAKE CORRECTIONS TYPE 4
70 PRINT "TO SAVE THE CURRENT FILE ON TAPE TYPE 5
80 PRINT "TO INPUT A FILE FROM TAPE TYPE 6
90 INPUT Q : ON Q GOTO 100, 200, 300, 400, 500, 600
100 INPUT"WHEN READY, HIT ENTER (TO CLOSE THE FILE TYPE 9999 FOR NAME)";X
110 FOR I=1 TO 50 :CLS :PRINT"ENTER YOUR NAME (LAST FIRST NO COMMAS PLEASE)
112 PRINT"THEN HIT THE 'ENTER' KEY" ;:INPUT N$(I)
115 IF N$(I)="9999" THEN P1=I :GOTO150
120 INPUT"ENTER YOUR ADDRESS (NO COMMAS)"; A$(I)
130 INPUT"ENTER YOUR PHONE # "; P$(I)
135 IF FRE(X$) < 100 GOTO150
140 NEXT
150 PRINT"FILE CLOSED --" :INPUT"TO SEE THE MENU HIT ENTER": X
160 GOTO20
200 CLS :FOR I=1 TO P1 :PRINT N$(I). A$(I). P$(I) :NEXT
210 INPUT"TO SEE THE MENU HIT ENTER": X :GOTO20
300 CLS :INPUT"ENTER THE NAME. LAST FIRST (NO COMMAS)"; N$
310 FOR I=1 TO P1 :IF N$(I)=N$ THEN330
315 NEXT
320 PRINT"NAME NOT IN FILE" :GOTO340
330 PRINT N$(I), A$(I), P$(I)
340 PRINT :PRINT"FOR ANOTHER NAME TYPE 1. OTHERWISE 0"; :INPUT X
350 IF X=1 GOTO300 ELSE20
400 CLS :PRINT"ENTER THE NAME FOR THE LINE YOU WISH TO CHANGE (NO COMMAS)"
405 INPUT N$
- LIMITED WARRANTY 2
- One Tandy Center 3
- Fort Worth, Texas 76102 3
- CONTENTS 5
- This Reference Manual and You 7
- Setting up the System 9
- Notes on Using the Recorder 10
- Special Notes: 11
- 1 / General Information 13
- Operating Modes 14
- Special Function Keys 15
- Variable Names 16
- Variable Types 16
- Arithmetic Operators 17
- Relational Operators 18
- String Operators 19
- Order of Operations 19
- Intrinsic Functions 20
- Graphics 20
- Error Messages 20
- Abbreviations 20
- Keyboard Rollover 21
- Glossary for LEVEL II BASIC 22
- 2 / Commands 23
- CLOAD? " 25
- CSAVE"1" 26
- CSAVE"A" 26
- DELETE 5 26
- DELETE 11-18 26
- 3 / Input-Output 31
- @ position, item list 33
- PRINT TAB 33
- (expression) 33
- PRINT USING 34
- PRINT #-1 42
- INPUT #-1 42
- Sample Program 43
- 10 INPUT#-1,A1,B$,L$ 43
- 20 PRINT A1,B$,L$ 43
- 40 GOTO 10 43
- 4 / Program Statements 45
- 10 DEFINT A,I,N 46
- 10 DEFINT I-N 46
- 100 DEFSNG I,W-Z 47
- 10 DEFDBL S-Z, A-E 47
- 10 DEFSTR L-Z 48
- 10 CLEAR 1000 48
- ON ERROR GOTO 57
- Data Conversion 62
- Typing of Constants 62
- Type Conversion 63
- 5 / Strings 67
- String Input/Output 68
- String Comparisons 69
- String Operations 70
- String Space 70
- (string) 71
- (string, n) 74
- STRING$ 76
- Coding/Decoding Program 78
- Instring Subroutine 78
- 6 / Arrays 81
- Other Types of Arrays 84
- 7 / Arithmetic Functions 89
- 100 K%=CINT(X#)+CINT(Y#) 90
- 100 Y=COS(X+3.3) 90
- 100 PRINT CSNG(A#+B#) 90
- 100 PRINT EXP(-X) 91
- 100 Y=ABS(A-FIX(A)) 91
- 100 Z=INT(A*100+.5)/100 91
- 100 PRINT LOG(3.3*X) 91
- 8 / Special Features 95
- ERR /2+1 98
- (address) 100
- CALL 0A7FH 103
- JP 0A9AH 103
- (variable name) 107
- Logical Operators 109
- 20 GOTO 10 111
- 9 / Editing 113
- ENTER key 114
- Space-bar 114
- 100 FOR I=1 TO 10_ 115
- 100 FOR I=_ 115
- L (List Line) 116
- X (Extend Line) 116
- I (Insert) 117
- A (Cancel and Restart) 117
- E (Save Changes and Exit) 117
- Q (Cancel and Exit) 118
- H (Hack and Insert) 118
- D (Delete) 118
- 100 FOR I=1 TO 1_ 119
- 10 / Expansion Interface 121
- Line Printer 122
- LPRINT CHR$(10) 124
- LINE ONE 124
- LINE TWO 124
- LINE THREE 124
- POKE 16424,40 125
- POKE 16425,0 125
- Mini-Disks - (DISK BASIC) 126
- Additions to LEVEL II 126
- Expansion of RAM Memory 127
- 11 / Saving Time and Space 129
- Speeding Up Execution 130
- Appendix 131
- A / Level II Summary 133
- Commands 135
- Input/Output Statements 138
- Program Statements 140
- String Functions 144
- Arithmetic Functions* 145
- Special Functions 146
- LEVEL II Reserved Words* 148
- B / Error Codes 151
- Explanation of Error Messages 152
- Hard-To-Find Errors 153
- C / TRS-80 Character Codes 155
- Decimal/Hexadecimal Codes 156
- Control Codes: 0-31 157
- Graphics Codes: 128-191 158
- Graphic Characters 161
- D / Memory Map 163
- Important Addresses 164
- F / Derived Functions 167
- G / Base Conversions 169
- H / User Programs 173
- Sort Routine 175
- Space-Ship Lander 176
- Customer Information 178
- Target Practice 180
- Using Your Cassette Deck 185
- LEVEL II 187
- Hints and Tips 187
Related products and manuals for Cassette players Radio Shack CTR-118
(2 pages)
(19 pages)
Cassette players Radio Shack 14-1265 User Manual
(195 pages)
(195 pages)
© 2020, manymanuals.com. All rights reserved. | 0.258 s |
Manymanuals.com
Manymanuals.de
Manymanuals.fr
Manymanuals.it
Manymanuals.pl
Manymanuals.cz
Manymanuals.es
Manymanuals-pt.com
Comments to this Manuals