home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2000 February
/
PCWorld_2000-02_cd.bin
/
live
/
usr
/
X11R6
/
bin
/
cbb
< prev
next >
Wrap
Text File
|
1998-10-07
|
5KB
|
152 lines
#!/usr/bin/wish -f
#
# 'CBB' -- Check Book Balancer
# Front end to the perl engine.
#
# Written by Curtis Olson. Started August 25, 1994.
#
# Copyright (C) 1994 - 1997 Curtis L. Olson - curt@sledge.mn.org
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
#
# $Id: cbb,v 2.21 1998/08/14 14:28:33 curt Exp $
# (Log is kept at end of this file)
# the following is ok as [pwd] instead of [mypwd]. The [mypwd] routine
# hasn't been loaded yet anyways ... :-)
set lib_path "/usr/X11R6/lib/X11/cbb"
# Load first tcl piece (creates splash screen procedure)
source "$lib_path/init.tcl"
# read the default user files
set cbb(splash) 1
cbb_init_vars
if { $cbb(splash) } {
# disable main window and draw splash screen
wm withdraw .
cbb_splash
}
# Load the rest of the tcl pieces
source "$lib_path/balance.tcl"
source "$lib_path/balloon.tcl"
source "$lib_path/bindings.tcl"
source "$lib_path/categories.tcl"
source "$lib_path/common.tcl"
source "$lib_path/file.tcl"
source "$lib_path/filebox.tcl"
source "$lib_path/help.tcl"
source "$lib_path/main.tcl"
source "$lib_path/menu.tcl"
source "$lib_path/prefs.tcl"
source "$lib_path/reports.tcl"
source "$lib_path/splits.tcl"
source "$lib_path/undo.tcl"
# initialize variables, parse command line, setup main window, etc.
cbb_setup
# ----------------------------------------------------------------------------
# $Log: cbb,v $
# Revision 2.21 1998/08/14 14:28:33 curt
# Added desc-pie graph.
# Added option to eliminate splash screen.
# Other misc. tweaks and bug fixes.
#
# Revision 2.20 1997/05/06 02:35:01 curt
# Added "source prefs.tcl"
#
# Revision 2.19 1996/12/17 14:53:53 curt
# Updated copyright date.
#
# Revision 2.18 1996/12/16 04:18:14 curt
# Continuing the great overhaul of December 1996.
#
# Revision 2.17 1996/12/14 17:15:21 curt
# The great overhaul of December '96.
#
# Revision 2.16 1996/12/13 00:12:43 curt
# Added reports.tcl
#
# Revision 2.15 1996/12/11 18:33:29 curt
# Ran a spell checker.
#
# Revision 2.14 1996/12/11 04:32:27 curt
# Several minor tweaks.
#
# Revision 2.13 1996/12/11 01:03:41 curt
# Added balloon help support.
#
# Revision 2.12 1996/12/08 07:39:56 curt
# Rearranged quite a bit of code.
# Put most global variables in cbb() structure.
#
# Revision 2.11 1996/10/03 21:29:18 curt
# Added a devel menu to assist in development. Many changes to the code
# can be re-sourced in without restarting the application.
#
# Revision 2.10 1996/10/03 03:52:56 curt
# CBB now determines the current century automatically ... no need for it
# to be hard coded. Removed all hardcoded instances of the century (especially
# in reports.pl and recur.pl)
#
# Added an optional --debug flag to the invocation of CBB.
#
# Revision 2.9 1996/10/02 19:37:17 curt
# Replaced instances of hardcoded century (19) with a variable. We need to
# know the current century in cases where it is not provided and it is
# assumed to be the current century. Someday I need to figure out how
# to determine the current century, but I have a couple of years to do it. :-)
#
# I still need to fix conf-reports and reports.pl
#
# Revision 2.8 1996/09/30 15:14:34 curt
# Updated CBB URL, and hardwired wish path.
#
# Revision 2.7 1996/09/27 21:43:39 curt
# Added a text version of the manual to the Help menu.
#
# Revision 2.6 1996/09/26 19:53:36 curt
# Worked on splits totals to automatically keep track of the difference.
# Touch up tab completion.
#
# Revision 2.5 1996/09/14 16:51:30 curt
# Fixed a stupid bug in a debug statement that caused syntax errors when
# attempting to balance.
#
# Revision 2.4 1996/08/14 17:10:55 curt
# Add an "if $debug" wrapper around a puts statement.
#
# Revision 2.3 1996/07/13 02:57:36 curt
# Version 0.65
# Packing Changes
# Documentation changes
# Changes to handle a value in both debit and credit fields.
#
# Revision 2.2 1996/03/03 00:16:09 curt
# Modified Files: cbb categories.pl wrapper.pl file.tk main.tk menu.tk
# Added an account list at the bottom of the screen. Thanks to:
# Cengiz Alaettinoglu <cengiz@ISI.EDU> for this great addition.
#
# Revision 2.1 1996/02/27 05:35:33 curt
# Just stumbling around a bit with cvs ... :-(
#
# Revision 2.0 1996/02/27 04:40:42 curt
# Initial 2.0 revision. See "Log" files for old history.