BBS: Inland Empire Archive
Date: 03-16-93 (21:35) Number: 351
From: EARL MONTGOMERY Refer#: NONE
To: ALL Recvd: NO
Subj: VGACLIP (TSR) Conf: (2) Quik_Bas
Permission granted to post this. It contains a TSR to capture any 320
*200*256 graphics screen in BSAVE format along with the original
palettes. No seperate palette data files! The saved screens can then
be BLOADED back into your own QB programs. See the following two
messages: Basic loader and small doc file.
CLS:?STRING$(50,178):DEFINT A-Z
Y$="*+,-./":FOR A=0 TO 6:P(A)=2^A:NEXT:OPEN "B",1,"VGACLIP.EXE
T$="abcdefghijklmnopqrstuvwxyz":T$=T$+UCASE$(T$)+"0123456789()
G"nPfIbK*zbaiaGga))pib*bqdm*icaE,e*caq9aSd,r,Cb+ug
G",D,6b+qi,M,Xc+yl+GW,hd+mn,2,Hd+O
G"o+W8-e+Kq+qfb+Ke+0s+Gob+cf+8u+qvb+Ff+
G"Ww+WEb+bg+Sy,Mb+Ig+WA+qTb+Kh+yF+W(b,i*
G"auG+Gcc+ti+GH+q*icaAaGiamcaI*maCca4aWjaieaNaGyaCcaGaG
G"laihaUaGFa4caLaGn*ca5aqmaKdabcqoaKia5aGtaieaQbGqa4baGcaC*ka4b
G"aOambaOcWiaKkaBdGqaeCacbG4bieaVhGqaySacbWIdieaw*Ra8baScqnaWkaG
G"baRamhaScqlaml*bWSaqba3caCaClakaqWaubacdqnaimaL*ZaycaodGd*na
G"x*0aWbavd///////,
G"/////////
G"///////+GySz1rbnetj
G"bfi*GKb+M///d//8))acbUW*u4A*
G"qPjdaCca4A*qPjWeieaJQ*HQ*JY*hBGda8cc4YfaqPjdaWka4A*qPjdaWk
G"aHY*JaCDdKEAaOP*ydaqPjcaimaqHly*LMo*OamcW1nq6)*Um*u4A*qP
G"PdcieaJcbaHcbaJkbaJaCDdKEeaGRz*LMm*RaOzvaicaP7*46haqPjdaWkaA
G"wfaIaq6o*UqcauAY*ScGMvbGiaGRT*LMm*RaGR4*LMm*RaGlebaLMm*R
G"aGRpbafUu*uAY*N*Uu*uAQ*PcWOy*Uu*uAY*(cqOyaWiax3aP7*Aka
G"aU*UofauAY*ScaUo*u4A*qPjWaieaP3maAk*cbW)gOba)BJgaOjcaClaqP
G"PcamlaqHlh*LMmaWjaGlEbafUC*uAs*OcqUcaWkihfUW*uAc*bdauAI*5
G"*u4ccaqPjdaCca4ccaqHlh*LMiaqo*fUcgauAI*5*u4ccaqPjdaCca4c6R
G"qPzea8ja6E8aZaS7Pxba6M8aSdd5l6bja4ObQgGjiEqOK*qJsca98Va(noU*k
G"uAgbaFcaUG*uZamu4Yq)ZinuAQ*UaGMmaWNaOP*4caAUcacbGMPhGqaGRb*
G"LMEbGqaOzvaic/*4UnaoInJgWAa67i08cfc7tlmnhYOUgaJaVlybSc20
G"QuZHSB9a44WMSOhcaGJdBYIoicadgSclY(kHNOjXgGhhWOhQgWVSpqUOaWmaZ)8
G"RovUWaquldkSbqltnhsvlYUvxTOFgKOpypWI2HWImmop7Y(a7mVCwm4WmTZ839G
G"MgaW0a8VDiOjda4laR)YvbfKMkaq1aG1G5lGDHS6I2HWI0jqkoyAab4aPbKus)B
G"d2dOjda4laj(qI)jW8K(LxDPmb*qv4EGdndrxlx1ISpi7bD1XgGC+WIgPqJw
G"9RMeaq2aqlpYKCZHSl*iNtlI9V4gWIxFuOQgWQlAecRUOrgSku5E*0cuZHKLC
G"V4HJEOAalAfc0cuZH8HCGStWZvGXgGCa9SW20raT(0Ci)BNcAQ*mdWxlwExkBa
G"aA6*ldW6IB1vE4ObSgGjk6aGait7(giaMOib8acDeWtc1nGrIlVbAQ*qdWbJJ
G"GbmITJa)X8KU4WF8Lxlx1ISB1vlAhclsWI(zWIvymb)BCb)RPda4maiwbIeSiYd
G"O84nfuqAQ*vdWvlAhclsNal6Nbl2Naj6J2d81G5lGCVKyhP4GPbeGdKgqsjD0r
G"j(qI)jqu7eSDcSyWlI88KM1kiVt02jWIrVOYlAJ2dmpPlo8)2HGMk*Za8VDgOP
G"caWmaF5vxkt+mdW5yG0buhiocSjHcjaMSOhscWOshqIEqDa6BYXgajalbGjm6
G"GKaS)YZaCogiDa0DHJaVi2hAG0bCOhuhG(MmkKaysIEija7VmuEG72a4i2hBaYb
G"CeaFGLma)mavTi7lANblsNa3tHUGfqOSgWkqFSbZgW))tBmGcBanhY)))))))))
G")))))))))))))))))))))))))))))))))))))))))))))))))d/.
G"//aqvlYUvx5YG(Wja)thchBaYbahaRlX)2zGMatGqaCSbihWBaS
G"aW0zWxE1LYe*JoWdbl6fcl(Hli6rVa4cI(4lalAebUmkSaSOrcuW*4YOUcGdF
G"qlnnhsIEOkamAaRa4WbWIWV(bGUyma6NgaSq8RHaOBLdGoNba7e)Qia6U6aOhza
G"WsXVocGUbpa6ggaSw8RKaO71dG(Eba7f)Aja6kbbOdxaWgYVAcGUOqa6LfaSL8R
G"NaOlweGUwbaRj)kka6IhbO)uaWIYVMcGUysa6efaSj8RGaORAdGEobyXhhBaYba
G"*Pl0)UySb7cW)7ZjutfLuvz1vEyGlmAHSa4sIMqla4UnaoI9G(mB*qxm67i0l
G"AsSbSFVqHaTr1Cij6XSbOjNfieaU8VlUcWGetGMaxGqaOVloAHSa4YIMqla7FWh
G"F5vxAL1wy1PlgBWU*WWvTi7w5XIEHWIFSW20jGJB7Oh8qWma7iWZMGVccGUQna
G"6YcGCbnlc(6ha6IXaOxkaYrZSq4RHaOBLdGoMai3jZoHVkcGURoa6lcGCAmlf(6
G"ia6g8aO7haY1WSw4RKaO71dGECam3b4c*FSovqo7f(Aja6kbbO3faYX(SH4RMa
G"OlkeGouai33ZwIVEcGUyra6dbGCspRj(kka6IhbOBdaYv8SO4RPaOlMeGEkaihU
G"F8VDi8VDgOPbfiea9+0Dk(E1LYe*u0wtZHKyhmwKayrBjnhYWdYZ)1ja(dlZ
G")rpE0JBYoxq3a5VE8mITj7CKa1v)IeSitcOVjjEGjj(Ka7J7))NibjsKaRd9(Ua
G"Op)c*0nKla6ZUa8FDi4IXg8l*S(mUaOp6c*1TIht5sXEOk*(daB9bDi4cG(
G"Wla)xheUySb)c*C6Y)E4haOFK)p7I)o8la67Y)U4ha7df5G5Iog0la11aTc0Sf
G"K8Gl6yGVaqNby5Y)UiiaAAybcbGlgBWVaibwpZPl(BGUa4Y)EyiaC6I)oOlaDUV
G"Yc*NU4Vb6cGl)7HIaWPl(7GUa05(kl*C6I)gOlaU8VhocaNU4Vd6cqN7RS*W
G"jG8daDeWde1TX(nJcu(tSl(BGUaWPl)7HKaWPl(7GUa0jw0vU(U4Vb6cGl)7HKa
G"WPl(7GUa05(kl*C6I)gOlaU8VhwcaNU4Vd6cqN7RS*WjG8dqDoqltUySb8c*
G"D6Y)UOj*Ypd39UlgBaVa8FN7ZPl)7HMa4IXgWl*OS*WPl(BGUa4Y)E4jaC6Y
G"JgyladsSaU4Vd6cGl)BJTa05YC6I)gOlaU8VhIcaNU8Ob4cWGelGl(7GUa4Y)2G
'>> Continued on pg. 2
--- Maximus 2.01wb
* Origin: Rabbit and Snake's BBS - Richardson, Texas (1:124/6108)
