5 9

REM KEYS

IFkey$ = CHR$(119)THEN GOSUB senddir: REM a$ = "#:Mw#"

IFkeyS = CHR$(101)THEN GOSUB senddir: REM a$ = "#:Me#"

IF key$ = CHR$(110) THEN GOSUB senddir: REM a$ = "#:Mn#"

IF key$ = CHR$(115) THEN GOSUB senddir: REM a$ = "#:Ms#"

IF key$ = "m" THEN GOSUB objects

IF key$ = "t" THEN GOSUB objects

IF key$ = "c" THEN GOSUB objects

IF key$ = "p" THEN GOSUB objects

IF key$ = "x" THEN CLS : END

IF key$ = "r" THEN RUN

GO TO 20

END

senddir:

west:

IF key$ = "w" THEN a$ = "#:Mw#": PRINT #1, a$: REM GO TO west east:

IF key$ = "e" THEN a$ = "#:Me#": PRINT #1, a$: REM GO TO east north:

IF key$ = "n" THEN a$ = "#:Mn#": PRINT #1, a$: REM GO TO north south:

IF key$ = "s" THEN a$ = "tt:Ms#": PRINT #1, a$: REM GO TO south GOSUB telpos key$ = INKEYS:

IF key$ = CHR$(32) THEN GO TO endl ELSE GO TO senddir endl: B$ = "#:Qe#": PRINT #1, B$

B$ = "#:Qw#": PRINT #1, B$

B$ = "#:Qn#": PRINT #1, B$

B$ = "#:Qs#": PRINT #1, B$

RETURN

telpos:

LOCATE 6, 7: PRINT "TELESCOPE POSITION";

c$ = "#:GR#": PRINT #1, c$; : d$ = INPUT$(8, 1): RAL$ = LEFT$(d$, 3):

RAMS = MID$(d$, 4, 4): LOCATE 7, 10: PRINT USING "RA : \\:\ \"; RAL$; RAM$; c$ = "#:GD#": PRINT #1, c$; : d$ = INPUT$(7, 1): RAL$ = LEFT$(d$, 3):

RAMS = MID$(d$, 5, 2): LOCATE 8, 10: PRINT "DEC: "; RAL$; CHR$(248); RAMS; "'"; c$ = "#:GA#": PRINT #1, c$; : d$ = INPUT$(7, 1): RALS = LEFT$(d$, 3):

RAMS = MID$(d$, 5, 2): LOCATE 9, 10: PRINT "ALT: "; RALS; CHR$(248); RAMS; ""'; c$ = "#:GZ#": PRINT #1, c$; : d$ = INPUT$(7, 1): RALS = LEFT$(d$, 3):

RAM$ = MID$(d$, 5, 2): LOCATE 10, 10: PRINT "AZ :"; RAL$; CHR$(248); RAMS; '"";

RETURN

TIME:

LOCATE 1, 32: PRINT "DATE"; : LOCATE 1, 64: PRINT "TIME";

c$ = "#:GS#": PRINT #1, c$; : d$ = INPUT$(9, 1): RAL$ = LEFT$(d$, 2):

RAMS = MID$(d$, 4, 2): RARS = MID$(d$, 7, 2): LOCATE 2, 55:

PRINT USING "Sidereal Time: \\:\\:\\"; RALS; RAM$; RAR$; C$ = "#:GL#":

PRINT #1, c$; : d$ = INPUT$(9, 1): RALS = LEFT$(d$, 2):

RAMS = MID$(d$, 4, 2): RAR$ = MID$(d$, 7, 2): LOCATE 3, 55: PRINT USING "Local (24hr) : \Y\Y\\"; RALS; RAM$; RARS;

C$ = "#:GG#": PRINT #1, c$; : d$ = INPUT$(4, 1): RAL$ = LEFT$(d$, 3): LOCATE 3, 25: PRINT USING "GMT Offset: \ \ Hours"; RAL$; c$ =

"#:GC#": PRINT #1, c$; : d$ = INPUT$(9, 1): RAL$ = LEFT$(d$, 2): RAMS = MID$(d$, 4, 2): RAR$ = MID$(d$, 7, 2): LOCATE 2, 25:

PRINT USING "Date : \\A\A\"; RALS; RAM$; RARS;

RETURN

objects:

counter =1 LOCATE 21,25

IF key$ = "m" THEN INPUT "Enter Messier number: "; m$: o$ = "#:LM" + m$

IF key$ = "t" THEN INPUT "Enter Star number: "; m$: o$ = "#:LS" + m$

IF key$ = "c" THEN INPUT "Enter CNGC number:"; m$: o$ = "#:LC" + m$

IF key$ = "p" THEN INPUT "Enter Planet number: "; m$: o$ = "#:LS" + m$ o$ = o$ + "#"

PRINT #1, o$ LOCATE 21, 15:

PRINT"";

PRINT #1, "#:LI#": infoS = INPUT$(33, 1): REM LOCATE 10, 20: PRINT info$;

Page 58
Image 58
Leisure Time LX20 instruction manual REM Keys, Telpos

LX20 specifications

The Leisure Time LX20 is an outstanding aquatic vehicle designed for leisure and recreational cruising. With its innovative design and advanced technology, it truly stands out in the world of personal watercraft. Built for performance and comfort, the LX20 is perfect for families, friends, or anyone looking to enjoy a day out on the water.

One of the main features of the LX20 is its spacious deck layout. The boat boasts ample lounge seating, providing enough room for passengers to relax and socialize while enjoying the beauty of nature. The ergonomic design of the seating ensures comfort during long excursions, whether you're fishing, sunbathing, or simply cruising along the coastline.

Powering the LX20 is a state-of-the-art engine, which offers impressive fuel efficiency without compromising on performance. The boat accelerates smoothly and reaches top speeds with minimal effort, making it suitable for water sports such as wakeboarding and tubing. The advanced hull design not only enhances stability and maneuverability but also ensures a smooth ride across choppy waters.

Technology plays a significant role in the LX20's appeal. Equipped with a user-friendly helm, the boat features an advanced navigation system, providing real-time GPS tracking, sonar capabilities, and weather alerts. This ensures that the captain can navigate with confidence, no matter where the adventure leads. The LX20 also includes Bluetooth speakers, allowing passengers to enjoy their favorite music while soaking up the sun.

Safety is a top priority in the design of the LX20. The boat is outfitted with essential safety features such as life jackets, fire extinguishers, and emergency flotation devices. The non-slip surfaces throughout the vessel minimize the risk of accidents, particularly when the boat is moving at high speeds or navigating rough waters.

In summary, the Leisure Time LX20 is a remarkable boat that caters to both adventure-seekers and those looking for relaxation. Its blend of spacious design, powerful engine, innovative technology, and strong safety features makes it an ideal choice for anyone who loves spending time on the water. Whether you’re planning a fishing trip, a family outing, or a leisurely cruise, the LX20 promises to deliver an unforgettable experience.