\X LABSRL\IF LOGO_ACTV<>'N'\MOVE 'Y' TO LOGO_ACTV\ENDIF\WAIT LIM -1\READ K:LABDATA4.TXT
\X SET_LOGO\ON KEY F10 JUMP REDO_ALL\+
\IF LOGOXLOW<LOWXPRN\MOVE LOWXPRN TO LOGOXLOW\ENDIF\+
\IF LOGOYLOW<LOWYPRN\MOVE LOWYPRN TO LOGOYLOW\ENDIF\+
\MOVE HIGHXPRN TO LOGOXHGH\MOVE HIGHYPRN TO LOGOYHGH\+
\IF LOGOXLOW>=LOGOXHGH\MOVE HIGHXPRN TO LOGOXHGH\ENDIF\+
\IF LOGOYLOW>=LOGOYHGH\MOVE HIGHYPRN TO LOGOYHGH\ENDIF\+
\IF #501>#503\MOVE #503 TO #501\MOVE 'N' TO LOGO_ACTV\ENDIF\IF #502>#504\MOVE #504 TO #502\MOVE 'N' TO LOGO_ACTV\ENDIF
\BLA #320,0,639,#322\LOC #320,0\WID #321 DOTS
You can add a logo or other graphic. There are several ways you can do this including importing from other programs, or using one of our sample graphics. To keep the current setting for a graphic, just press <RETURN>.
\"
\IF LOGO_ACTV='Y'
Do you want to use the current graphic in it's current position? (Y to use the current image, N to change it's position or to eliminate it entirely.)
\ELSE
This label does not use a graphic. Do you want to leave the label without a graphic? (Y to leave image as is, N to add a graphic.)
\ENDIF
\CALLM PR_LBL\ON ERROR JUMP LOGONO\CALLM SHOW_LOGO\X LOGONO\CLEAR ON ERROR
\CURS CRSR_XLOC,10,80,10\MOVE 'Y' TO #200\QUEST #200,1,1\IF #200<>'Y' AND #200<>'N'\BEEP 78,79\JUMP SET_LOGO\ENDIF\IF #200='Y'\JUMP LOGO_OUT\ENDIF
\IF #200='N'\IF LOGO_ACTV='N'\MOVE 'X' TO LOGO_ACTV\MOVE 'Y' TO CHGD_LBL\JUMP REASK5\ENDIF\+
Do you want a logo for this label? (Y to have a logo, N not to.)
\CURS CRSR_XLOC,10,80,10\MOVE 'Y' TO #200\QUEST #200,1\IF #200<>'Y' AND #200<>'N'\BEEP 78,79\JUMP HAVEALOGO\ENDIF\IF #200='N'\MOVE 'N' TO LOGO_ACTV\MOVE 'Y' TO CHGD_LBL\JUMP LOGO_OUT\ENDIF\+
\X REASK5\LOC #320,0\BLA #320,0,639,#322\HEI 400
There are four ways to add a graphic.
\"
First, you can 'drop in' one of our 'canned' logos like the diskette logo we use for LABELER's labels.
\"
Second, you can use our utility program to display any .PCX-format picture which is in a compatible screen mode. (This is VGA screen mode #17, 640 dots by 480 dots, 2 colors.)
\"
Third, you can enter a command line which will execute your own image display program. Your program must be able to leave the image on the screen after it exits, it must display the image in VGA mode 17, and it must be able to fit in available memory.
\"
Fourth, if you use our animation software you can create your logo with it.
Now you should position the logo where you want it to print. Use the cursor keys or your mouse to move the crosshairs to the upper left edge of the desired position. You will be able to see what it will look like and change it if you like.
\"
If you are using the keyboard, use the number keys above the QWERTY portion of the keyboard to make the cursor move faster. Set it back to 1 (above the "Q") to position yourself EXACTLY. Click any mouse button or press <RETURN> when finished.
\"
NOTE #1: The horizontal axis will be rounded down to the nearest 8-dot boundary.
\"
NOTE #2: Press the space bar NOW to skip this step and not have a logo at all.
\X USE_CANNED\READ K:LOGOS.PIC\MOVE LOGO_NMBR TO U
\X LOGOCHOOSE\CALLM PR_LBL\FRAME ?\CLEAR SHOW\BLA #320,0,639,#322\LOC #320,0\IF U>A\MOVE A TO U\ENDIF\IF U<1\MOVE 1 TO U\ENDIF
Shown below is the current choice. To view the next one, press <PG DN>. To view the previous one, press <PG UP>. When you find the one you want, press <RETURN>.
\IF LABTYPE='5.25"'\BLA 0,#301,639,412\ENDIF\BLA 376,300,639,479\SHOW 376,300,U\WAIT NOW -1
\IF B=18688 OR B=18745\IF U>1\SUB 1 FROM U\ELSE\MOVE A TO U\ENDIF\IF B=20736 OR B=20787\IF U<A\ADD 1 TO U\ELSE\MOVE 1 TO U\ENDIF
\IF B=7181\MOVE U TO LOGO_NMBR\ELSE\JUMP LOGPICK\ENDIF\JUMP LOGOPOSI
\X USE_SHOW_PCX\BLA #320,0,639,#322\LOC #320,0
Enter the name of the PCX image which you want to display with our PCX-format display utility. Include all drive, path, etc. information in the standard format.
You now must mark the image's upper left and lower right boundaries. Then you will locate the image in the label. This process will be automated for future use.
\"
Use your mouse or the cursor arrows to move the cross-hair. To move the cross-hair quickly when using the keyboard, press the numeric keys above the QWERTY portion of the keyboard.
\"
When you are close to the desired location set the movement to ONE (1) dot by pressing the one above the "Q".
\"
Note: Piece will be shifted to the nearest 8-dot boundary on the horizontal axis.
\X WAIT1\WAIT NOW -1\IF F<>0\JUMP WAIT1\ENDIF\ON KEY F2\CLEAR MOUSE\RESTORE SCRE\MOUSE L=LOGO_XLORIG,LOGO_YLORIG\MOVE D TO LOGO_XLORIG\MOVE E TO LOGO_YLORIG
Now just do the same thing to set the lower right boundary. Press any key to begin...
\X WAIT2\WAIT NOW -1\IF F<>0\JUMP WAIT2\ENDIF\CLEAR MOUSE\RESTORE SCREEN\MOUSE L=LOGO_XHORIG,LOGO_YHORIG\MOVE D TO LOGO_XHORIG\MOVE E TO LOGO_YHORIG
\CLEAR PICS\FRAME LOGO_XLORIG,LOGO_YLORIG,LOGO_XHORIG-LOGO_XLORIG,LOGO_YHORIG-LOGO_YLORIG\MOVE 1 TO LOGO_NMBR
\JUMP LOGOPOSI
\X USE_CMDLN\BLA #320,0,639,#322\LOC #320,0
Enter the command line exactly as you would enter it from DOS, EXCEPT:
\"
Be sure to include the extension, .EXE or .COM, even though from DOS this would be optional.
\"
Note: Many picture display programs do not leave the image on the screen when they exit. If you have trouble getting your image to display properly, you may want to consider converting it to .PCX format and then displaying it with our utility program.