diff options
| author | Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com> | 2016-10-18 20:04:41 -0400 |
|---|---|---|
| committer | Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com> | 2016-10-18 20:04:41 -0400 |
| commit | 2f3562beb4bfe459b14188bad1fe340ba4363cac (patch) | |
| tree | cb5becfdd01430aca7a7fdf96455daed1febc183 /post.bas | |
| parent | f2e2a83641ee0ac1c3d9ec5ef62e7779578935d6 (diff) | |
| download | gwblog-2f3562beb4bfe459b14188bad1fe340ba4363cac.tar.gz gwblog-2f3562beb4bfe459b14188bad1fe340ba4363cac.zip | |
Nearly working code after adding support for directories to file sorting and textile processing.
Diffstat (limited to 'post.bas')
| -rw-r--r-- | post.bas | 19 |
1 files changed, 10 insertions, 9 deletions
@@ -4,14 +4,15 @@ 5003 REM TIT$ Title list 5004 REM LC List length 5005 REM FINDEX File to build -5006 REM HFILE$ Header template -5007 REM FFILE$ Footer template -5008 REM OUTFILE$ Output file -5009 REM LBL$ Template labels -5010 REM REPL$ Template -5011 REM replacements -5012 REM ILBL Length of template -5013 REM labels +5006 REM DIREC$ Posts src dir +5007 REM HFILE$ Header template +5008 REM FFILE$ Footer template +5009 REM OUTFILE$ Output file +5010 REM LBL$ Template labels +5011 REM REPL$ Template +5012 REM replacements +5013 REM ILBL Length of template +5014 REM labels 5009 REM =============================== 5020 OPEN OUTFILE$ FOR OUTPUT AS #13 @@ -30,7 +31,7 @@ 5150 PRINT#13, TTEXT$ 5500 REM Process textile now -5510 TFILE$ = SFL$[FINDEX] +5510 TFILE$ = DIREC$ + "\" + SFL$[FINDEX] 5520 HFILE$ = "WORK.TMP" 5530 GOSUB 10000 5540 OPEN "WORK.TMP" FOR INPUT AS #1 |