Statistics: Posted by jasbales — Mon Jul 20, 2009 5:49 pm
Statistics: Posted by burger2227 — Mon Jul 20, 2009 5:10 pm
Statistics: Posted by jasbales — Mon Jul 20, 2009 12:04 pm
Statistics: Posted by Harry Potter — Mon Jul 20, 2009 10:39 am
Code:
@ECHO OFF:About:: O--------------------------------------------------------------O:: |subShop.bat helps you create QB SUBs and FUNCTIONs in Crimson |:: | Editor. Pass in your source file as %1. |:: | |:: | This file was created by Jason Bales |:: | gamerplusplus@gmail.com |:: | http://gamerpp.blogspot.com/ |:: O--------------------------------------------------------------OCLSSETLOCALPROMPTCOLOR 47TITLE WELCOME TO THE SUB SHOP!!:: Are we to make a Sub or a Function?SET /p subOrFunction="Are we to make a Sub or a Function?: "CLS:: What is the name of the Sub or Function?SET /p name="What will we call it?: "CLS:: What are we passing in?SET /p parameters="What are we passing in?: ":: Simple choiceIF %subOrFunction% == SUB GOTO SUBIF %subOrFunction% == sub GOTO SUBIF %subOrFunction% == Sub GOTO SUBIF %subOrFunction% == SUb GOTO SUBIF %subOrFunction% == suB GOTO SUBIF %subOrFunction% == sUB GOTO SUBIF %subOrFunction% == sUb GOTO SUBREM Notice you only need to type SUB if you want a SUB.REM Any other input creates a FUNCTION.:: Write a FUNCTION> SCRATCH.TXT ECHO DECLARE FUNCTION %name% (%parameters%)>>SCRATCH.TXT TYPE %1>>SCRATCH.TXT ECHO.>>SCRATCH.TXT ECHO ' ____________________>>SCRATCH.TXT ECHO FUNCTION %name% (%parameters%)>>SCRATCH.TXT ECHO ' Write your code here>>SCRATCH.TXT ECHO %name% = ' Make sure the function returns something>>SCRATCH.TXT ECHO END FUNCTION> %1 TYPE SCRATCH.TXTGOTO FIN:: Write a SUB:SUB> SCRATCH.TXT ECHO DECLARE SUB %name% (%parameters%)>>SCRATCH.TXT TYPE %1>>SCRATCH.TXT ECHO.>>SCRATCH.TXT ECHO ' ____________________>>SCRATCH.TXT ECHO SUB %name% (%parameters%)>>SCRATCH.TXT ECHO ' Write your code here>>SCRATCH.TXT ECHO END SUB> %1 TYPE SCRATCH.TXT:FINDEL SCRATCH.TXTENDLOCAL
Statistics: Posted by jasbales — Sun Jul 19, 2009 4:48 am
Statistics: Posted by Guest — Sun Jun 21, 2009 5:32 am
Statistics: Posted by RichardWilliams — Wed Jun 17, 2009 11:20 am
Statistics: Posted by qbasicfreak — Thu Jun 11, 2009 6:45 am
Statistics: Posted by Guest — Tue Jun 09, 2009 4:01 pm
Code:
@echo offfor %%i in (*.zzz) do set p=%%~ni.zippkzip -ex -r -p a:\%p% *.bas *.frm *.bat *.lib *.qlb *.makset p=
Statistics: Posted by Harry Potter — Tue Jun 09, 2009 11:57 am
Code:
@echo offmd d:\%1cd d:\%1d:pkunzip -d c:\ramd\%1.zip%1d:cd\echo y|deltree %1
Try it out! I will add more batch files later.Statistics: Posted by Harry Potter — Tue Jun 09, 2009 11:46 am