! DROPKICK merger (Listing 3)  by Jeff Tullin $ for B/B+/E/M/C with SWR & Bas2 ( (c) BAU 1990 2: < 6 F% 9,7)"BBC Acorn User DROPKICK" P 13,9)"by Jeff Tullin" Z d+ 7,14)"Name of file to be appended?" n! 16,15)"....... " x 16,15)N$  N$=N$,7)  dummy=(N$) Y dummy=0 9,20)"File not found (any key)":A=: 9,20)" " dummy e #dummy>&3200 9,20)"File too long (any key)":A=: 9,20)" ": DZ@ #dummy , 7,14)" Name of output file? " ! 16,15)"....... "  16,15)O$  16,17)"OK (Y/N)?" *FX15   A="YyNn",)  A % A>2 16,17)" ": t~@  *L.header 2800 " ("L. "+N$+" 3000") ,) ("S. "+O$+" 2800 +4000 D9CD 8000")