sOVI-EDIT CMD 7VI-FRAMECMDX™VI-GETS CMDżVI-LIST CMD ’FVI-LOCATCMD'#cåVI-MAIN CMDJ ĒVI-PACK CMDg Ū™VI-POSN CMDq:]VI-SOME CMD;’VIDEOLOGADD… %VIDEOLOGDBF‘S—VIDEOLOGNDX™8.•VIDEOLOGOLDŃHćVIDLABELCMD VIDLOG20DOC% Ÿ|VIDTAPE CMD0›VIDTAPE NDXD ™œVIDTITLECMDdżįVIDTITLENDXxT±Ė * Program..: VI-EDIT.CMD * Author...: Lyle Burks * Date.....: 06/07/85 * Notice...: Copyright 1985, All Rights Reserved * DO WHILE T STORE " " TO editchoice @ 14,0 SAY "COMMAND: (E)dit, (D)elete, (U)ndelete, "+; "(C)ontinue, (P)osition "; GET editchoice PICTURE "!" READ NOUPDATE CLEAR GETS @ 14,0 SAY clearline DO CASE CASE editchoice = " " * ---Exit. RETURN CASE editchoice = "P" * ---(P)osition STORE "X" TO poschoice DO WHILE poschoice <> " " DO VI-posn ENDDO CASE editchoice = "D" * ---(D)elete DELETE @ 1,55 SAY "DELETED" CASE editchoice = "U" * ---(U)ndelete RECALL @ 1,55 SAY " " CASE editchoice = "E" * ---(E)dit @ 14,0 SAY "Press to exit" IF # <> 0 DO VI-some READ ENDIF CASE editchoice = "C" * ---(C)ontinue to the next record. STORE # TO lastrecord CONTINUE * ---Check for END-OF-FILE. IF .NOT. EOF DO VI-gets CLEAR GETS ELSE * ---EOF encountered. GOTO lastrecord @ 14,0 SAY clearline @ 14,0 SAY "END-OF-FILE encountered" STORE " " TO select @ 15,0 SAY "Strike any key to continue..."; GET select READ NOUPDATE @ 14,0 SAY clearline @ 15,0 SAY clearline ENDIF ENDCASE ENDDO * EOF: VI-EDIT.CMD  * Program..: VI-FRAME.CMD * Author...: Lyle Burks * Date.....: 06/07/85 * Notice...: Copyright 1985, All Rights Reserved * @ 2, 0 SAY "----------------------------------------" @ 2,40 SAY "----------------------------------------" @ 4, 0 SAY "Tape......:" @ 5, 0 SAY "Title.....:" @ 6, 0 SAY "Hrs.......:" @ 7, 0 SAY "Min.......:" @ 8, 0 SAY "Indexstrt.:" @ 9, 0 SAY "Indexend..:" @ 10, 0 SAY "Timeleft..:" @ 13, 0 SAY "----------------------------------------" @ 13,40 SAY "----------------------------------------" RETURN * EOF: VI-FRAME.CMD  * Program..: VI-GETS.CMD * Author...: Lyle Burks * Date.....: 06/07/85 * Notice...: Copyright 1985, All Rights Reserved * IF * @ 1,55 SAY "DELETED" ELSE @ 1,55 SAY " " ENDIF @ 4,11 GET Tape @ 5,11 GET Title @ 6,11 GET Hrs @ 7,11 GET Min @ 8,11 GET Indexstrt @ 9,11 GET Indexend @ 10,11 GET Timeleft RETURN * EOF: VI-GETS.CMD  * Program..: VI-LIST.CMD * Author...: Lyle Burks * Date.....: June 7, 1985 * Notice...: Copyright 1985, All Rights Reserved * Notes....: * Reserved.: select, selectnum * SET TALK OFF SET BELL OFF SET COLON OFF DO WHILE T ERASE @ 1, 0 SAY "========================================" @ 1,40 SAY "========================================" @ 2, 0 SAY "||" @ 2,14 SAY "L I S T G E N E R A T O R F O R M O V I E S" @ 2,78 SAY "||" @ 3, 0 SAY "========================================" @ 3,40 SAY "========================================" @ 4, 0 SAY "||" @ 4,78 SAY "||" @ 5, 0 SAY "||" @ 5,78 SAY "||" @ 6, 0 SAY "||" @ 6,78 SAY "||" @ 7, 0 SAY "||" @ 7,78 SAY "||" @ 8, 0 SAY "||" @ 8,78 SAY "||" @ 9, 0 SAY "||" @ 9,78 SAY "||" @ 10, 0 SAY "========================================" @ 10,40 SAY "========================================" @ 5,28 SAY " 0. exit" @ 6,28 SAY " 1. list by title" @ 7,28 SAY " 2. list by tape number" STORE 3 TO selectnum DO WHILE selectnum < 0 .OR. selectnum > 2 STORE " " TO select @ 10,33 SAY " select : : " @ 10,42 GET select PICTURE "#" READ STORE VAL(select) TO selectnum ENDDO DO CASE CASE selectnum= 0 SET COLON ON SET BELL ON SET TALK ON CLEAR RETURN CASE selectnum= 1 * DO list by title DO vidtitle CASE selectnum= 2 * DO list by tape number DO vidtape ENDCASE ENDDO T * EOF: VI-LIST.CMD  * Program..: VI-LOCAT.CMD * Author...: Lyle Burks * Date.....: June 7, 1985 * Notice...: Copyright 1985, All Rights Reserved * STORE " " TO expression,string * ---LOCATE section. DO WHILE expression = " " @ 12,0 SAY 'EXAMPLE :STATE="CA"' @ 14,0 SAY clearline * @ 13,0 SAY "-" ACCEPT "Enter LOCATE expression " TO expression @ 12,0 SAY clearline STORE TRIM(expression) TO expression DO CASE CASE expression = " " * ---Exit. RETURN CASE 0 = TEST(&expression) * ---INVALID EXPRESSION. @ 15,0 SAY clearline STORE " " TO select @ 15,0 SAY "INVALID EXPRESSION: "+; "Strike any key to continue... "; GET select READ NOUPDATE @ 15,0 SAY clearline STORE " " TO expression OTHERWISE * ---LOCATE the record. * ---Close index file for a faster LOCATE. SET INDEX TO LOCATE FOR &expression IF .NOT. EOF * ---Found a matching record. STORE # TO lastrecord * ---Reopen index file. SET INDEX TO VIDTITLE GOTO lastrecord ELSE * ---Reopen index file and * ---reset EOF marker to true (.T.). SET INDEX TO VIDTITLE GO BOTTOM SKIP ENDIF ENDCASE ENDDO IF poschoice = "L" * ---Return to calling program if only the LOCATE was desired. RETURN ENDIF * * ---DISPLAY section. STORE " " TO string DO WHILE string = " " @ 12,0 SAY "EXAMPLE :NAME+ADDRESS" @ 14,0 SAY "E" ACCEPT "Enter DISPLAY string " TO string @ 12,0 SAY clearline STORE TRIM(string) TO string DO CASE CASE string = " " * ---Exit. @ 14,0 SAY clearline @ 15,0 SAY clearline RETURN CASE 0 = TEST(&string) * ---INVALID EXPRESSION. @ 15,0 SAY clearline STORE " " TO select @ 15,0 SAY "INVALID DISPLAY EXPRESSION: "+; "Strike any key to continue... "; GET select READ NOUPDATE @ 15,0 SAY clearline STORE " " TO string ENDCASE ENDDO * ---Now, DISPLAY the expression. STORE F TO is:eof,is:some DO WHILE .NOT. is:eof * ---The following set of dBASE II commands are to * ---clear-to-end-of-screen. If you have an IBM-PC, * ---you can replace these commands with the single * ---command, @ 4,0 ERASE * @ 4,0 SAY clearline @ 5,0 SAY clearline @ 6,0 SAY clearline @ 7,0 SAY clearline @ 8,0 SAY clearline @ 9,0 SAY clearline @ 10,0 SAY clearline @ 11,0 SAY clearline @ 12,0 SAY clearline @ 13,0 SAY clearline @ 14,0 SAY clearline @ 15,0 SAY clearline @ 16,0 SAY clearline @ 17,0 SAY clearline @ 18,0 SAY clearline @ 19,0 SAY clearline @ 20,0 SAY clearline @ 21,0 SAY clearline @ 22,0 SAY clearline @ 20, 0 SAY "----------------------------------------" @ 20,40 SAY "----------------------------------------" STORE 4 TO row DO WHILE .NOT. EOF .AND. row-3 <= 15 STORE T TO is:some @ row,0 SAY &string STORE row + 1 TO row CONTINUE ENDDO * ---A logical memory variable is used to detect the * ---end-of-file. The EOF function cannot be used since * ---it is reset by the READ statement below. STORE EOF TO is:eof IF .NOT. is:some * ---No matching records. @ 4,0 SAY "*** NO MATCHING RECORDS ***" ENDIF STORE " " TO select @ 21,0 SAY "Strike any key to continue... "; GET select READ NOUPDATE @ 21,0 SAY clearline ENDDO * ---The following set of dBASE II commands are to * ---clear-to-end-of-screen. If you have an IBM-PC, * ---you can replace these commands with the single * ---command, @ 4,0 ERASE * @ 4,0 SAY clearline @ 5,0 SAY clearline @ 6,0 SAY clearline @ 7,0 SAY clearline @ 8,0 SAY clearline @ 9,0 SAY clearline @ 10,0 SAY clearline @ 11,0 SAY clearline @ 12,0 SAY clearline @ 13,0 SAY clearline @ 14,0 SAY clearline @ 15,0 SAY clearline @ 16,0 SAY clearline @ 17,0 SAY clearline @ 18,0 SAY clearline @ 19,0 SAY clearline @ 20,0 SAY clearline @ 21,0 SAY clearline @ 22,0 SAY clearline GO TOP RETURN * EOF: VI-LOCAT.CMD  * Program..: VI-MAIN.CMD * Author...: Lyle Burks * Date.....: 06/07/85 * Notice...: Copyright 1985, All Rights Reserved * Reserved.: select, selectnum, editchoice, poschoice, * error, findkey, expression, string, is:eof * clearline, addchoice, is:some, lastrecord * SET TALK OFF SET BELL OFF SET COLON OFF * ---Use blanks to clear-to-end-of-line. STORE $(STR(0,81),1,80) TO clearline DO WHILE T ERASE @ 1, 0 SAY "========================================" @ 1,40 SAY "========================================" @ 2, 0 SAY "||" @ 2,21 SAY "V I D E O L O G M A I N M E N U" @ 2,78 SAY "||" @ 3, 0 SAY "========================================" @ 3,40 SAY "========================================" @ 4, 0 SAY "||" @ 4,78 SAY "||" @ 5, 0 SAY "||" @ 5,78 SAY "||" @ 6, 0 SAY "||" @ 6,78 SAY "||" @ 7, 0 SAY "||" @ 7,78 SAY "||" @ 8, 0 SAY "||" @ 8,78 SAY "||" @ 9, 0 SAY "||" @ 9,78 SAY "||" @ 10, 0 SAY "||" @ 10,78 SAY "||" @ 11, 0 SAY "||" @ 11,78 SAY "||" @ 12, 0 SAY "========================================" @ 12,40 SAY "========================================" @ 5,35 SAY " 0. exit" @ 6,35 SAY " 1. view" @ 7,35 SAY " 2. add" @ 8,35 SAY " 3. edit" @ 9,35 SAY " 4. pack" @ 10,35 SAY " 5. list" @ 11,35 SAY " 6. labels" STORE 7 TO selectnum DO WHILE selectnum < 0 .OR. selectnum > 6 STORE " " TO select @ 14,33 SAY " select : : " @ 14,42 GET select PICTURE "#" READ STORE VAL(select) TO selectnum ENDDO DO CASE CASE selectnum= 0 CLEAR SET COLON ON SET BELL ON SET TALK ON RETURN CASE selectnum= 1 * DO view USE VIDEOLOG INDEX VIDTITLE ERASE @ 1, 0 SAY "V I E W V I D E O L O G" @ 1,72 SAY DATE() DO VI-frame IF # = 0 * ---The data file is empty. STORE " " TO select @ 14,0 SAY "EMPTY DATA FILE" @ 15,0 SAY "Strike any key to continue..."; GET select READ NOUPDATE ELSE * ---The data file contains records. DO VI-gets CLEAR GETS STORE "X" TO poschoice DO WHILE poschoice <> " " DO VI-posn ENDDO ENDIF USE CASE selectnum= 2 * DO add USE VIDEOLOG INDEX VIDTITLE COPY STRUCTURE TO VIDEOLOG.add SELECT SECONDARY USE VIDEOLOG.add ERASE @ 1, 0 SAY "A D D V I D E O L O G" @ 1,72 SAY DATE() DO VI-frame @ 14,0 SAY "Press to exit" STORE "X" TO addchoice DO WHILE addchoice <> " " APPEND BLANK DO VI-gets READ * ---TITLE cannot be blank. STORE TRIM( TITLE ) TO addchoice ENDDO DELETE USE SELECT PRIMARY APPEND FROM VIDEOLOG.add USE CASE selectnum= 3 * DO edit USE VIDEOLOG INDEX VIDTITLE ERASE @ 1, 0 SAY "E D I T V I D E O L O G" @ 1,72 SAY DATE() DO VI-frame IF # = 0 * ---The data file is empty. STORE " " TO select @ 14,0 SAY "EMPTY DATA FILE" @ 15,0 SAY "Strike any key to continue..."; GET select READ NOUPDATE ELSE * ---The data file contains records. DO VI-gets CLEAR GETS DO VI-edit ENDIF USE CASE selectnum= 4 * DO pack DO VI-pack CASE selectnum=5 * DO list DO VI-list CASE selectnum=6 * DO labels DO vidlabel ENDCASE ENDDO T * EOF: VI-MAIN.CMD  * Program..: VI-PACK.CMD * Author...: Lyle Burks * Date.....: 06/07/85 * Notice...: Copyright 1985, All Rights Reserved * ERASE @ 2, 0 SAY "P A C K V I D E O L O G" @ 2,72 SAY DATE() @ 3, 0 SAY "========================================" @ 3,40 SAY "========================================" STORE "NO " TO select @ 5,0 SAY "PACK the entire file? [YES/NO] "; GET select PICTURE "!!!" READ NOUPDATE IF select <> "YES" RETURN ENDIF @ 6,0 SAY "VIDEOLOG.OLD will be your backup data file." IF FILE( "VIDEOLOG.OLD" ) STORE " " TO select @ $+1,0 SAY "Delete the old backup file? (Y/N) "; GET select PICTURE "!" READ NOUPDATE IF select <> "Y" RETURN ENDIF DELETE FILE VIDEOLOG.OLD ENDIF USE RENAME VIDEOLOG.DBF TO VIDEOLOG.OLD @ $+1,0 SAY " " * USE VIDEOLOG.OLD SET TALK ON SET ECHO ON COPY TO VIDEOLOG USE USE VIDEOLOG * ---Recreate index file. INDEX ON TITLE TO VIDTITLE USE USE VIDEOLOG INDEX VIDTITLE INDEX ON TAPE TO VIDTAPE USE SET ECHO OFF SET TALK OFF STORE " " TO select ERASE @ 22,0 SAY "Strike any key to continue..."; GET select READ NOUPDATE RETURN * EOF: VI-PACK.CMD  * Program..: VI-POSN.CMD * Author...: Lyle Burks * Date.....: June 7, 1985 * Notice...: Copyright 1985, All Rights Reserved * STORE " " TO poschoice @ 14,0 SAY clearline @ 14,0 SAY "COMMAND: (D)isplay, (F)ind, "+; "(L)ocate, (C)ontinue, (S)kip "; GET poschoice PICTURE "!" READ NOUPDATE CLEAR GETS @ 14,0 SAY clearline IF .NOT. (poschoice $ "DFLCS") RETURN ENDIF IF poschoice = "F" * ---(F)ind @ 13,0 SAY "-" ACCEPT "Enter TITLE " TO findkey @ 14,0 SAY clearline STORE TRIM(findkey) TO findkey IF findkey = " " RETURN ENDIF STORE # TO lastrecord FIND &findkey IF (# <> 0) DO VI-gets CLEAR GETS ELSE * ---NO FIND. GOTO lastrecord @ 14,0 SAY clearline @ 14,0 SAY '"'+findkey+'"'+" not in index" STORE " " TO select @ 15,0 SAY "Strike any key to continue..."; GET select READ NOUPDATE @ 14,0 SAY clearline @ 15,0 SAY clearline ENDIF ELSE * ---(S)kip, (C)ontinue, (D)isplay, or (L)ocate STORE # TO lastrecord DO CASE CASE poschoice = "S" * ---(S)kip. SKIP CASE poschoice = "C" * ---(C)ontinue. CONTINUE OTHERWISE * ---(D)isplay or (L)ocate DO VI-locat IF expression = " " RETURN ENDIF IF poschoice = "D" IF string = " " RETURN ENDIF DO VI-frame ENDIF ENDCASE * ---Check for END-OF-FILE. IF .NOT. EOF DO VI-gets CLEAR GETS ELSE * ---EOF encountered. GOTO lastrecord @ 14,0 SAY clearline @ 14,0 SAY "END-OF-FILE encountered" STORE " " TO select @ 15,0 SAY "Strike any key to continue..."; GET select READ NOUPDATE @ 14,0 SAY clearline @ 15,0 SAY clearline ENDIF ENDIF RETURN * EOF: VI-POSN.CMD  * Program..: VI-SOME.CMD * Author...: Lyle Burks * Date.....: June 7, 1985 * Notice...: Copyright 1985, All Rights Reserved * IF * @ 1,55 SAY "DELETED" ELSE @ 1,55 SAY " " ENDIF @ 4,11 GET Tape @ 5,11 SAY Title @ 6,11 GET Hrs @ 7,11 GET Min @ 8,11 GET Indexstrt @ 9,11 GET Indexend @ 10,11 GET Timeleft RETURN * EOF: VI-SOME.CMD  3TAPENŹyTITLECĶyHRSCėyMINCķyINDEXSTRTCļyINDEXENDCóyTIMELEFTC÷y 81Where the Red Fern Grow's 1 36 ?? 82TROLL 1 22 1/30 82King Solomon's Mines 1 39 83To Live and Die in LA 1 59 2/31 84House 1 33 1/23 80Cat's Eye 1 48 81Time Machine ? ? 84Something Wicked This Way Come1 34 85White Nights 2 16 2/14 * 0  0 .....: 06/07/85 * Notice...: Copyright 1985, All Rights Reserved * IF * @ 1,55 SAY "DELETED" ELSE @ 1,55 SAY " " ENDIF @ 4,11 GET Tape @ 5,11 GET Title @ 6,11 GET Hrs @ 7,11 GET Min @ 8,11 GET Indexstrt @ 9,11 GET Indexend @ 10,11 GET Timeleft RETURN * EOF: VI-GETS.CMD 3TAPENŁsTITLECÜsHRSCśsMINCüsINDEXSTRTCžsINDEXENDCtTIMELEFTCt  ELSE * ---The data file contains records. DO VI-gets CLEAR GETS STORE "X" TO poschoice DO WHILE poschoice <> " " DO VI-posn ENDDO ENDIF USE CASE selectnum= 2 * DO add USE VIDEOLOG INDEX VIDTITLE COPY STRUCTURE TO VIDEOLOG.add SELECT SECONDARY USE VIDEOLOG.add ERASE @ 1, 0 SAY "A D D V I D E O L O G" @ 1,72 SAY DATE() DO VI-frame @ 14, "TITLELASTNAM’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B’B½½½½½½½½½½½½½½½½½½½½½ 2Annie 3Dumbo Heaven Can Wait SLove of the Wilderness 'Nine to Five Shipwreck Star Wars Swiss Family Robinson The Clash of th v ^Abbott-Costello Meet FrankenstMAbsence of Malice AAcross the Great Divide -Adven. of Wilderness Family II6Adventures of Ikabod Crane BAdventures of Wilderness FamlyAirplane dAlice in Wonderland Alien =Amityville Horror 2Annie Close Encounters of 3rd Kind JDeathtrap 3Dumbo 0Sinbad Eye of the Tiger RSix Pack LSomewhere in Time XSpace Movie pSplash Star Trek - The Motion PictureNStar Trek II,Wrath of Khan BII,Star Trek III Search for SpockStar Wars DStartrek the Motion Picture B2@Super Fuzz /Superman II (Beta II) KSuperman III Superman the Motion Picture Swiss Family Robinson 2Annie 3Dumbo Heaven Can Wait SLove of the Wilderness 'Nine to Five Shipwreck Star Wars Swiss Family Robinson The Clash of the Titans 8The Miracle of Life (Beta II) The Wizard of OZ The 3 Worlds of Gulliver The Black Hole The Man from Snowy River The War of the Worlds _High Road to China Hopscotch mInvasion of the Body SnatcherssKarate Kid Kramer VS Kramer jKrull Lee Ann's Wedding (9-18-82) 1Lord of the Rings ;Love Bug SLove of the Wilderness HMissing [Never Ending Story hNever Say Never INight Crossing 'Nine to Five PThe Day the Earth Stood Still 5The Devil and Max Devlin The Electric Horseman #The Enforcer OThe Ewok Adventure &The Final Countdown The Incredible Shrinking WomanThe Jazz Singer rThe Last Starfighter >The Man Who Saw Tommorrow The Man from Snowy River 8The Miracle of Life (Beta II) Victor Victoria Victory <Winnie the Pooh nEmpire Strikes Back (Beta II) Empire Strikes Back Spec EffxsFlash Gordon UFollow Me Boys For Your Eyes Only ]Ghandi bGoldfinger qGorky Park *Gullivers Travels Hanger 18 !Hansel & Gretel ?Heartbeeps Heaven Can Wait !Hansel & Gretel Heaven Can Wait %The Muppet Movie tThe Natural uThe Philadelphia Experiment EThe Private Eyes YThe Secret of Nimh FThe Thief of Baghdad The War of the Worlds The Wizard of OZ oThree Lives of Thomasina )Time Bandits eTootsie Victor Victoria Victory fWar Games <Winnie the Pooh $TRON +Tale of the Frog Prince lTank "Taps The 3 Worlds of Gulliver The Black Hole VThe Blob The Cat from Outer Space The Clash of the Titans +Tale of the Frog Prince "Taps The 3 Worlds of Gulliver The Black Hole The Cat from Outer Space The Clash of the Titans Outland .People That Time Forgot Pete's Dragon 7Poltergeist (Beta II) QPolyanna aRaiders of the Lost Ark BII (Rapunzal kRomancing the Stone GRumpelstiltskin gSavannah Smiles TShaggy Dog Shipwreck (Rapunzal GRumpelstiltskin Shipwreck 4Bedknobs and Broomsticks WBlue Thunder Candleshoe 9Chariotts of Fire :China Syndrome \Cloak and Daggar Close Encounters of 3rd Kind cDark Crystal JDeathtrap `Diamonds are Forever 3Dumbo :China Syndrome Close Encounters of 3rd Kind JDeathtrap 3Dumbo CStar Wars (Beta II) DStartrek the Motion Picture B2ZSummer Magic @Super Fuzz /Superman II (Beta II) KSuperman III Superman the Motion Picture Swiss Family Robinson CStar Wars (Beta II) DStartrek the Motion Picture B2@Super Fuzz /Superman II (Beta II) KSuperman III Superman the Motion Picture Swiss Family Robinson iMaking of Raiders of Lost Ark Mary Poppins HMissing [Never Ending Story hNever Say Never INight Crossing 'Nine to Five SLove of the Wilderness iMaking of Raiders of Lost Ark Mary Poppins HMissing [Never Ending Story hNever Say Never INight Crossing 'Nine to Five oThree Lives of Thomasina )Time Bandits eTootsie Victor Victoria Victory fWar Games <Winnie the Pooh The Wizard of OZ oThree Lives of Thomasina )Time Bandits eTootsie Victor Victoria Victory fWar Games <Winnie the Pooh 3TAPENŁsTITLECÜsHRSCśsMINCüsINDEXSTRTCžsINDEXENDCtTIMELEFTCt  2Mary Poppins 2 190 763 0/30 * 2Shipwreck 1 41763 1149 * 3The War of the Worlds 1 22931 12253/08 * 4Candleshoe 1 410 590 0/33 * 4The Man from Snowy River 1 46590 1012 * 4Lee Ann's Wedding (9-18-82) 0 3110671173 * 6Close Encounters of 3rd Kind 2 190 764 0/25 * 6Outland 1 47764 1173 * 7The Black Hole 1 350 564 0/4 * 7The 3 Worlds of Gulliver 1 33564 960 * 7Hanger 18 1 15960 1260 * 8The Cat from Outer Space 1 430 606 0 * 33Star Trek-Motion Picture BII 2 10 1/15 * 33Empire Strikes Back Spec Effxs0 45 * 9The Incredible Shrinking Woman1 290 532 1/4 * 9The Clash of the Titans 1 57532 1026 * 10Kramer VS Kramer 2 0 0 603 0/48 * 10Heaven Can Wait 1 42603 1015 * 11Alien 1 560 1/07 * 11Airplane 1 27 * 12Victory 1 550 674 0/26 * 12For Your Eyes Only 2 9 675 1169 * 13Hopscotch 1 450 612 0/55 * 13Flash Gordon 1 50612 1059 * 14The Jazz Singer 1 5650 660 1/00 * 14The Wizard of OZ 1 38660 1055 * 15The Electric Horseman 1 520 677 0/23 * 15Victor Victoria 2 15677 1196 * 17TRON 1 360 782 * 17The Muppet Movie 782 1140 * 18The Final Countdown 1 360 560 0/5 * 18Nine to Five 1 49560 1014 * 18Rapunzal 1 0 1014 * 19Time Bandits 1 550 660 0/20 * 19Gullivers Travels 1 20660 988 * 19Tale of the Frog Prince 0 55988 * 20Star Trek III Search for Spock 0 * 21Adven. of Wilderness Family II1 450 613 * 21People That Time Forgot 613 992 * 22Superman II (Beta II) 2 8 0 971 1/18 * 23Sinbad Eye of the Tiger 1 520 891 * 23Lord of the Rings 891 * 24Annie 2 8 0 704 0/28 * 24Dumbo 1 4 704 965 * 25Bedknobs and Broomsticks 1 540 635 0/10 * 25The Devil and Max Devlin 1 37635 1021 * 25Adventures of Ikabod Crane 0 4010211149 * 26Poltergeist (Beta II) 1 550 903 0 * 26The Miracle of Life (Beta II) 1 9 903 1191 * 27Chariotts of Fire 2 4 0 697 0/24 * 27China Syndrome 2 2 697 1160 * 28Love Bug 1 470 615 0/91 * 28Winnie the Pooh 1 14615 918 * 29Amityville Horror 1 470 653 * 29The Man Who Saw Tommorrow 1 27653 1007 * 31Across the Great Divide 1 400 595 1/10 * 31Adventures of Wilderness Famly1 40595 1004 * 32Star Wars (Beta II) 1 590 10930 * 34The Private Eyes 1 300 549 0/18 * 35Missing 2 2 0 691 0/41 * 35Night Crossing 1 47691 * 36Deathtrap 1 560 662 0/30 * 36Superman III 2 5 693 1175 * 37Somewhere in Time 1 430 605 0/51 * 37Absence of Malice 1 56605 1075 * 38Star Trek II,Wrath of Khan BII1 530 886 0 * 38The Ewok Adventure 1 45886 end * 39The Day the Earth Stood Still 1 320 550 0/44 * 39Polyanna 2 14550 1075 * 40Six Pack 1 370 624 1/21 * 40Love of the Wilderness 1 32624 * 41Shaggy Dog 1 440 600 0/38 * 41Follow Me Boys 2 8 600 1083 * 42The Blob 1 230 503 0 * 42Blue Thunder 1 49503 973 * 42Space Movie 1 18973 1248 * 43The Secret of Nimh 1 230 522 1/19 * 43Summer Magic 1 480 522 * 44Never Ending Story 1 340 560 1/15 * 44Cloak and Daggar 1 41562 991 * 45Ghandi 3 8 0 958 0 * 45Abbott-Costello Meet Frankenst1 23958 1248 * 46High Road to China 1 450 612 0/45 * 46Diamonds are Forever 2 0 612 1098 * 47Raiders of the Lost Ark BII 1 550 0 * 47Goldfinger 1 30906 1250 * 48Dark Crystal 2 0 0 624 1/15 * 48Alice in Wonderland 1 15625 939 * 49Tootsie 1 550 662 0/43 * 49War Games 1 52662 1105 * 50Savannah Smiles 1 450 608 1/15 * 51Never Say Never 2 140 734 1/18 * 51Making of Raiders of Lost Ark 0 58734 961 * 52Krull 2 1 0 680 45 * 53Romancing the Stone 1 460 0/51 * 53Tank 1 53 * 54Invasion of the Body Snatchers1 450 659 1/10 * 55Empire Strikes Back (Beta II) 2 5 0 960 1/20 * 56Three Lives of Thomasina 1 400 586 0/53 * 56Splash 1 57586 1049 * 57Gorky Park 2 7 0/27 * 58The Last Starfighter 1 410 596 43 * 58Karate Kid 2 6 596 1111 * 59The Natural 2 170 0/30 * 59The Philadelphia Experiment 1 42 * 60Robin Hood 1 240 509 1/26 * 61Pete's Dragon 2 8 0 723 1/12 * 52Beat Street 1 46666 1088 * 63The Sword and the Stone 1 200 483 0 * 64Starman 1 570 658 30 * 64Ladyhawk 2 1 658 1144 * 60Willie Wonka & Choc. Factory 1 40509 ? * 65Amadeus 2 400 ? 0/10 * 62Ghostbusters 1 42907 end 0 * 622010 (Beta II) 1 560 907 * 24Thumbelina 0 50704 * 32Pinochio 1 271093end * 61Pippi Longstocking 1 40723 * 65Brewster's Millions 1 41? * 67Ewoks - Battle for Endor 1 330 1/20 * 68Alice in Wonderland 2 550 0 * 69A View to a Kill 2 110 0/45 * 1Superman the Motion Picture 2 160 750 0/7 * 1Swiss Family Robinson 2 8 750 1215 * 5Explorer's 1 460 1/00 * 34A Christmas Carol 1 400 * 50Mr Mom 1 30 * 68Fletch 1 35 * 54Muppet's Take Manhattan 1 35 * 63D.A.R.Y.L. 1 40 * 57Pale Rider 1 56 * 63Baby-Secret of Lost Legend 1 32483 * 66Breakin II-Electric Bugallo 1 34 3/0 * 72Bill Cosby Routine 1 44 2/45 * 67My Science Project 1 36 * 5Gremlins 1 46 * 70Apple Dumpling Gang 1 45 1/15 * 70Apple Dump. Gang, Rides Again 1 30 * 69Teen Wolf 1 32 * 71Star Wars-Return of Jedi BII 2 11 1/15 * 0Blank Record 0 0 0 0 0 * 30The Ice Pirates 1 34 2/56 * 16Man w/One Red Shoe 1 32 2/58 * 73The Goonies 1 54 1/10 * 74The Lion, Witch, Wardrobe 1 33 0 * 74The Last Unicorn 1 22 * 74The Water Babies 1 25 * 75Witness 1 52 1/02 * 75Protocol 1 36 * 76Cocoon BII 1 57 0 * 76Silver Bullet 1 35 * 77Chorus Line 1 58 0/45 * 77Jagged Edge 1 48 * 78Back to the Future ???? ?? * 79Murphy's Romance 1 47 1/0 * 79Jewell of the Nile 1 46 * 73The Omega Man 1 39 * 80Enemy Mine 1 48 0/54 * 81Where the Red Fern Grow's 1 36 ?? * 82TROLL 1 22 1/30 * 82King Solomon's Mines 1 39 * 83To Live and Die in LA 1 59 2/31 * 84House 1 33 1/23 * 80Cat's Eye 1 48 * 81Time Machine ? ? * 84Something Wicked This Way Come1 34 * 85White Nights 2 16 2/14  68Fletch 1 35 54Muppet's Take Manhattan 1 35 63D.A.R.Y.L. 1 40 57Pale Rider * Program..: VIDLABEL.CMD * Author...: Your Name * Date.....: 05/27/85 * Notice...: Copyright 1985, All Rights Reserved * Reserved.: select, condition, extra * SET TALK OFF SET BELL OFF STORE " " TO select USE VIDEOLOG ERASE @ 2, 0 SAY "V I D E O L O G M A I L I N G L A B E L S" @ 2,72 SAY DATE() @ 3, 0 SAY "========================================" @ 3,40 SAY "========================================" STORE " " TO select @ 5,0 SAY "Output to the screen or printer? [S/P] "; GET select PICTURE "!" READ DO CASE CASE select = "S" ERASE CASE select = "P" SET CONSOLE OFF SET PRINT ON OTHERWISE ERASE SET BELL ON SET TALK ON RETURN ENDCASE * ---Enter FOR for the labels, such as, * ---STORE "STATE = 'CA'" TO condition STORE " " TO condition DO WHILE .NOT. EOF IF condition <> " " IF .NOT. (&condition) SKIP LOOP ENDIF ENDIF STORE 0 TO extra ? tape ? title ? hrs+", "+min ? indexstrt+"-"+indexend ? ? DO WHILE extra > 0 ? STORE extra - 1 TO extra ENDDO SKIP ENDDO * SET PRINT OFF SET CONSOLE ON ? ? "THAT'S ALL FOLKS..." CLEAR SET TALK ON SET BELL ON RETURN * EOF: VIDLABEL.CMD condition exists. IF condition <> " " IF .NOT. (&condition) SKIP LOOP ENDIF ENDIF * * ---Print detail line. @ line, 0 SAY $(title,1, 30) @ line, 33 SAY $(STR(tape,3,0)1, 4) VIDLOG20.DOC Author: Lyle Burks Date: June 8, 1985, Reconstructed: August 30, 1986 Legal: This set of dBase command files may be given, copies, taken, shared, modified, or whatever. You may not sell any part or the whole. All rights are reserved, and are Copyrighted 1985. Purpose: The sole reason for generating this program is to provide an easy method of maintaining a simple log of your video tapes. Requirements: The only requirements for this program is that you own dBase II, and that you can type. The output requires that if you want a hard copy of the sorted listings, that you have a printer. Getting Started: Get dBase II up and running, and at the "." prompt you type .do vi-main. From that point on it is self explanatory. Modifications: If these command (.cmd) files can be streamlined by anyone that is proficient at dBase II, then have at it. Comments: Comments or suggestions may be left on the BAKUP bulletin board at 415-223-2237. Any critical remarks may not be made. Enjoy! Note: This library was originally named VIDEOLOG.LBR. Two members had been damaged and are replaced in this library. To avoid confusion, the library has been renamed to VIDLOG20.LBR.  * Program..: VIDTAPE.CMD * Author...: Lyle Burks * Date.....: 05/27/85 * Notice...: Copyright 1985, All Rights Reserved * Reserved.: pagenum, line, pagehdg, col:hdg, condition, * lastrec * SET TALK OFF SET BELL OFF SET MARGIN TO 5 STORE 1 TO pagenum STORE 254 TO line STORE "Videolog Listing by Tape No." TO pagehdg STORE (80-LEN(pagehdg))/2 TO col:hdg * * ---Open the datafile and print the report. USE VIDEOLOG INDEX VIDTAPE ERASE @ 2, 0 SAY pagehdg @ 2,72 SAY DATE() @ 3, 0 SAY "========================================" @ 3,40 SAY "========================================" STORE " " TO select @ 5,0 SAY "Output to the screen or printer? [S/P] "; GET select PICTURE "!" READ DO CASE CASE select = "S" ERASE STORE 22 TO pagelen CASE select = "P" SET FORMAT TO PRINT STORE 60 TO pagelen OTHERWISE ERASE SET BELL ON SET TALK ON RETURN ENDCASE * ---Enter FOR for the report, such as, * ---STORE "STATE = 'CA'" TO condition STORE " " TO condition DO WHILE .NOT. EOF IF line > pagelen IF select = "S" ERASE ELSE EJECT ENDIF @ 0,0 SAY "PAGE NO." @ 0,9 SAY STR(pagenum,3) @ 2,col:hdg SAY pagehdg * * ---Generate column headings. @ 4, 0 SAY "No." @ 4, 6 SAY "Title" @ 4, 39 SAY "Time" @ 4, 47 SAY "Hr" @ 4, 52 SAY "Mn" @ 4, 57 SAY "1st" @ 4, 64 SAY "End" @ 5, 0 SAY "===" @ 5, 6 SAY "==============================" @ 5, 39 SAY "=====" @ 5, 47 SAY "==" @ 5, 52 SAY "==" @ 5, 57 SAY "====" @ 5, 64 SAY "====" STORE pagenum+1 TO pagenum STORE 7 TO line ENDIF * ---Test to see if the condition exists. IF condition <> " " IF .NOT. (&condition) SKIP LOOP ENDIF ENDIF * * ---Print detail line. @ line, 0 SAY $(STR(tape,3,0),1, 3) @ line, 6 SAY $(title,1, 30) @ line, 39 SAY $(timeleft,1, 5) @ line, 47 SAY $(hrs,1, 2) @ line, 52 SAY $(min,1, 2) @ line, 57 SAY $(indexstrt,1, 4) @ line, 64 SAY $(indexend,1, 4) STORE line+1 TO line SKIP ENDDO @ line+1,0 SAY " " SET FORMAT TO SCREEN RELEASE ALL SET TALK ON SET BELL ON RETURN * EOF: VIDTAPE.CMD  STORE 60 TO pagelen OTHERWISE ERASE SET BELL ON SET TALK ON RETURN ENDCASE * ---Enter FOR for the report, such as, * ---STORE  2TAPE 6,0 SAY clearline @ 7,0 SAY clearline @ 8,0 SAY clearline @ 9,0 SAY clearline @ 10,0 SAY clearline @ 11,0 SAY clearline @ 12,0 SAY clearline @ 13,0 SAY clearline @ 14, SAY clearline @ 15,0 SAY clearline @ 16,0 SAY clearline @ 17,0 SAY clearline @ 18,0 SAY clearline @ 19,0 SAY clearline @ 20,0 SAY clearline @ 21,0 SAY clearline @ 22,0 SAY clearline @ 20, 0 SAY "----------------------------------------" @ 20,40 SAY " SAY clearline @ 15,0 SAY clearline @ 16,0 SAY clearline @ 17,0 SAY clearline @ 18,0 SAY clearline @ 19,0 SAY clearline @ 20,0 SAY clearline @ 21,0 SAY clearline @ 22,0 SAY clearline @ 20, 0 SAY "----------------------------------------" @ 20,40 SAY "----------------------------------------" STORE 4 TO row DO WHILE .NOT. EOF .AND. row-3 <= 15 STORE T TO is:some @ row,0 SAY &string STORE row + 1 TO row CONTINUE ENDDO * ---A AAAA A!A"A#A$A%A &A!'A!(A")A#*A#+A$,A$tA$-A%.A%/A%0A&1A&2A'3A'4A(5A(6A)9A1:A2 A3A3;A4<A5=A5>A6?A6@A7AA7BA8CA8DA9EA9FA@GA@HAAIAAJABKABLABMACA6A)NACeAW‰Ap¦A„#A$A%A &A!'A!(A")A#*A#+A$,A$-A%.A%/A%0A&1A&2A'3A' A3A3AAAA A!A"A#A$A%A &A!'A!(A")A#*A#+A$,A$-A%.A%/A%0A&1A&2A'3A' A3A37A)ŽA08A19A1:A2uA2 A3A3;A4~A4<A5=A5>A6?A6@A7AA7BA8CA8DA9EA9FA@GA@HAAIAAJABKABLABMACNACRAESAFTAFUAGVAGWAHXAHYAIZAI[AP\AQ]AQ^AR_AS`ASaATbAUcAVdAVeAWfAXgAXOADPADQAERAESAFTAFUAGVAGWAHXAHYAIZAI[APAP\AQ]AQ^ARlAR_AS`ASaATATbAUcAVdAVeAWƒAWfAXgAXhAYiAYjA`pA`kAavAarAbsAbmAc‚Ac„AcnAdoAdqAewAe…AfxAg‡AgyAh€AhzAi†ArƒAWfAXgAXhAYiAYjA`pA`kAavAarAbsAbmAc‚Ac„AcnAdoAdqAewAe…AfxAg‡AgyAh€AhzAi‹Ai‰ApŠApŒAq†ArAsAs‘At’At“At”Au•Au–Av—Av˜Aw™AwšAx›AyœAyžA€¤A€ŸA„A A‚”A‚¢Aƒ£A„ŠApŒAq†ArAsAs‘At’At“At”Au•Au–Av—Av˜Aw™AwšAx›AyœAyžA€¤A€ŸA„A A‚”A‚¢Aƒ£A„¦A„§A…ŒAq†ArAsAs‘At’At“At”Au•Au–Av—Av˜Aw™AwšAx›AyœAyžA€¤A€ŸA„A A‚”A‚¢Aƒ£A„ * Program..: VIDTITLE.CMD * Author...: Your Name * Date.....: 05/27/85 * Notice...: Copyright 1985, All Rights Reserved * Reserved.: pagenum, line, pagehdg, col:hdg, condition, * lastrec * SET TALK OFF SET BELL OFF SET MARGIN TO 5 STORE 1 TO pagenum STORE 254 TO line STORE "Videolog Listing by Title" TO pagehdg STORE (80-LEN(pagehdg))/2 TO col:hdg * * ---Open the datafile and print the report. USE VIDEOLOG INDEX VIDTITLE ERASE @ 2, 0 SAY pagehdg @ 2,72 SAY DATE() @ 3, 0 SAY "========================================" @ 3,40 SAY "========================================" STORE " " TO select @ 5,0 SAY "Output to the screen or printer? [S/P] "; GET select PICTURE "!" READ DO CASE CASE select = "S" ERASE STORE 22 TO pagelen CASE select = "P" SET FORMAT TO PRINT STORE 60 TO pagelen OTHERWISE ERASE SET BELL ON SET TALK ON RETURN ENDCASE * ---Enter FOR for the report, such as, * ---STORE "STATE = 'CA'" TO condition STORE " " TO condition DO WHILE .NOT. EOF IF line > pagelen IF select = "S" ERASE ELSE EJECT ENDIF @ 0,0 SAY "PAGE NO." @ 0,9 SAY STR(pagenum,3) @ 2,col:hdg SAY pagehdg * * ---Generate column headings. @ 4, 0 SAY "Title" @ 4, 33 SAY "Tape" @ 4, 40 SAY "Hr" @ 4, 45 SAY "Mn" @ 4, 50 SAY "Star" @ 4, 57 SAY "End" @ 4, 64 SAY "Time" @ 5, 0 SAY "==============================" @ 5, 33 SAY "====" @ 5, 40 SAY "==" @ 5, 45 SAY "==" @ 5, 50 SAY "====" @ 5, 57 SAY "====" @ 5, 64 SAY "=====" STORE pagenum+1 TO pagenum STORE 7 TO line ENDIF * ---Test to see if the condition exists. IF condition <> " " IF .NOT. (&condition) SKIP LOOP ENDIF ENDIF * * ---Print detail line. @ line, 0 SAY $(title,1, 30) @ line, 33 SAY $(STR(tape,3,0),1, 3) @ line, 40 SAY $(hrs,1, 2) @ line, 45 SAY $(min,1, 2) @ line, 50 SAY $(indexstrt,1, 4) @ line, 57 SAY $(indexend,1, 4) @ line, 64 SAY $(timeleft,1, 5) STORE line+1 TO line SKIP ENDDO @ line+1,0 SAY " " SET FORMAT TO SCREEN RELEASE ALL SET TALK ON SET BELL ON RETURN * EOF: VIDTITLE.CMD  STORE 60 TO pagelen OTHERWISE ERASE SET BELL ON SET TALK ON RETURN ENDCASE * ---Enter FOR for the report, such as, * ---STORE "S "TITLE 6,0 SAY clearline @ 7,0 SAY clearline @ 8,0 SAY clearline @ 9,0 SAY clearline @ 10,0 SAY clearline @ 11,0 SAY clearline @ 12,0 SAY clearline @ 13,0 SAY clearline @ 14,0 SAY clearline @ 15,0 SAY clearline @ 16,0 SAY clearline @ 17,0 SAY clearline @ 18,0 SAY clearline @ 19,0 SAY clearline @ 20,0 SAY clearline @ 21,0 SAY clearline @ 22,0 SAY clearline @ 20, 0 SAY "----------------------------------------" @ 20,40 SAY " SAY clearline @ 15,0 SAY clearline @ 16,0 SAY clearline @ 17,0 SAY clearline @ 18,0 SAY clearline @ 19,0 SAY clearline @ 20,0 SAY clearline @ 21,0 SAY clearline @ 22,0 SAY clearline @ 20, 0 SAY "----------------------------------------" @ 20,40 SAY "----------------------------------------" STORE 4 TO row DO WHILE .NOT. EOF .AND. row-3 <= 15 STORE T TO is:some @ row,0 SAY &string STORE row + 1 TO row CONTINUE ENDDO * ---A —Silver Bullet )Sinbad Eye of the Tiger FSix Pack ¦Something Wicked This Way Come@Somewhere in Time LSpace Movie dSplash BStar Trek II,Wrath of Khan BII%Star Trek III Search for Spock Star Trek-Motion Picture BII :Star Wars (Beta II) TRON $Tale of the Frog Prince `Tank The 3 Worlds of Gulliver XAlice in Wonderland lBeat Street 2Chariotts of Fire Empire Strikes Back Spec Effxs Hanger 18 oLadyhawk <Missing Outland EPolyanna Shipwreck :Star Wars (Beta II) The 3 Worlds of Gulliver The Incredible Shrinking WomanThe Muppet Movie The War of the Worlds Heaven Can Wait SHigh Road to China Hopscotch £House aInvasion of the Body Snatchers™Jagged Edge œJewell of the Nile gKarate Kid ”King Solomon's Mines Kramer VS Kramer ^Krull oLadyhawk ]Making of Raiders of Lost Ark Mary Poppins <Missing The Jazz Singer fThe Last Starfighter ’The Last Unicorn ‘The Lion, Witch, Wardrobe 7The Man Who Saw Tommorrow The Man from Snowy River 1The Miracle of Life (Beta II) The Muppet Movie hThe Natural The Omega Man iThe Philadelphia Experiment ;The Private Eyes MThe Secret of Nimh mThe Sword and the Stone The War of the Worlds 3China Syndrome ˜Chorus Line PCloak and Daggar Close Encounters of 3rd Kind –Cocoon BII ‚D.A.R.Y.L. WDark Crystal >Deathtrap TDiamonds are Forever ,Dumbo bEmpire Strikes Back (Beta II) Empire Strikes Back Spec EffxsVGoldfinger #Gullivers Travels Hanger 18 The Black Hole JThe Blob The Cat from Outer Space The Clash of the Titans DThe Day the Earth Stood Still .The Devil and Max Devlin The Electric Horseman CThe Ewok Adventure The Final Countdown The Goonies ŽThe Ice Pirates The Incredible Shrinking WomanThe Electric Horseman The Final Countdown The Incredible Shrinking Woman Mr Mom Muppet's Take Manhattan ›Murphy's Romance ‡My Science Project ONever Ending Story \Never Say Never =Night Crossing Nine to Five Outland 'People That Time Forgot kPete's Dragon uPinochio vPippi Longstocking 0Poltergeist (Beta II) EPolyanna žEnemy Mine xEwoks - Battle for Endor }Explorer's Flash Gordon €Fletch IFollow Me Boys For Your Eyes Only QGhandi rGhostbusters VGoldfinger eGorky Park ˆGremlins #Gullivers Travels Hanger 18 Hanger 18 yAlice in Wonderland Alien qAmadeus 6Amityville Horror +Annie ŠApple Dump. Gang, Rides Again ‰Apple Dumpling Gang „Baby-Secret of Lost Legend šBack to the Future lBeat Street KBlue Thunder …Breakin II-Electric Bugallo wBrewster's Millions Candleshoe 2Chariotts of Fire “The Water Babies The Wizard of OZ cThree Lives of Thomasina tThumbelina "Time Bandits „Time Machine ¢To Live and Die in LA YTootsie Victor Victoria Victory ZWar Games ŸWhere the Red Fern Grow's pWillie Wonka & Choc. Factory 5Winnie the Pooh ”Witness ŒStar Wars-Return of Jedi BII nStarman NSummer Magic (Superman II (Beta II) ?Superman III {Superman the Motion Picture |Swiss Family Robinson  TROLL TRON $Tale of the Frog Prince `Tank ‹Teen Wolf The 3 Worlds of Gulliver `Tank The 3 Worlds of Gulliver •Protocol URaiders of the Lost Ark BII !Rapunzal jRobin Hood _Romancing the Stone [Savannah Smiles HShaggy Dog Shipwreck URaiders of the Lost Ark BII !Rapunzal jRobin Hood _Romancing the Stone [Savannah Smiles HShaggy Dog Shipwreck Lee Ann's Wedding (9-18-82) *Lord of the Rings 4Love Bug GLove of the Wilderness ]Making of Raiders of Lost Ark Man w/One Red Shoe Mary Poppins <Missing Lee Ann's Wedding (9-18-82) *Lord of the Rings 4Love Bug GLove of the Wilderness ]Making of Raiders of Lost Ark Mary Poppins <Missing ƒPale Rider 'People That Time Forgot kPete's Dragon uPinochio vPippi Longstocking 0Poltergeist (Beta II) EPolyanna Outland ƒPale Rider 'People That Time Forgot kPete's Dragon uPinochio vPippi Longstocking 0Poltergeist (Beta II) EPolyanna -Bedknobs and Broomsticks †Bill Cosby Routine Blank Record KBlue Thunder …Breakin II-Electric Bugallo wBrewster's Millions Candleshoe ¤Cat's Eye 2Chariotts of Fire †Bill Cosby Routine KBlue Thunder …Breakin II-Electric Bugallo wBrewster's Millions Candleshoe 2Chariotts of Fire hThe Natural The Omega Man iThe Philadelphia Experiment ;The Private Eyes MThe Secret of Nimh mThe Sword and the Stone The War of the Worlds The Muppet Movie hThe Natural The Omega Man iThe Philadelphia Experiment ;The Private Eyes MThe Secret of Nimh mThe Sword and the Stone The War of the Worlds EPolyanna Shipwreck :Star Wars (Beta II) The 3 Worlds of Gulliver The Incredible Shrinking WomanThe Muppet Movie The War of the Worlds YTootsie 5Winnie the Pooh Shipwreck :Star Wars (Beta II) The 3 Worlds of Gulliver The Incredible Shrinking WomanThe Muppet Movie The War of the Worlds Outland Shipwreck :Star Wars (Beta II) The 3 Worlds of Gulliver The Incredible Shrinking WomanThe Muppet Movie The War of the Worlds Outland EPolyanna Shipwreck :Star Wars (Beta II) The 3 Worlds of Gulliver The Incredible Shrinking WomanThe Muppet Movie The War of the Worlds Victor Victoria Victory ZWar Games ŸWhere the Red Fern Grow's §White Nights pWillie Wonka & Choc. Factory 5Winnie the Pooh ”Witness Victor Victoria Victory ZWar Games ŸWhere the Red Fern Grow's pWillie Wonka & Choc. Factory 5Winnie the Pooh ”Witness