• TABLE OF CONTENTS
HIDE
 Front Cover
 Title Page
 Introduction
 Main
 Reference
 Back Cover






Group Title: Computer series
Title: A Sugarcane ripener analysis program for microcomputers
CITATION THUMBNAILS PAGE IMAGE ZOOMABLE
Full Citation
STANDARD VIEW MARC VIEW
Permanent Link: http://ufdc.ufl.edu/UF00095219/00002
 Material Information
Title: A Sugarcane ripener analysis program for microcomputers
Series Title: Computer series - Florida Cooperative Extension Service ; 679
Physical Description: 1 computer disk + : ;
Language: English
Creator: Alvarez, Jose, 1940-
Publisher: Florida Cooperative Extension Service, Institute of Food and Agricultural Sciences, University of Florida
Place of Publication: Gainesville, Fla.
Publication Date: 1985
Copyright Date: 1985
 Subjects
Subject: Sugarcane   ( lcsh )
Sugarcane industry -- Computer programs   ( lcsh )
Genre: bibliography   ( marcgt )
government publication (state, provincial, terriorial, dependent)   ( marcgt )
non-fiction   ( marcgt )
 Notes
Bibliography: Bibliography: p. 8.
General Note: "August 1985."
Statement of Responsibility: Jose Alvarez.
 Record Information
Bibliographic ID: UF00095219
Volume ID: VID00002
Source Institution: University of Florida
Holding Location: University of Florida
Rights Management: All rights reserved by the source institution and holding location.
Resource Identifier: oclc - 15010379

Table of Contents
    Front Cover
        Page i
        Page ii
    Title Page
        Page iii
    Introduction
        Page 1
    Main
        Page 2
        Page 3
        Page 4
        Page 5
        Page 6
        Page 7
    Reference
        Page 8
        Page 9
        Page 10
        Page 11
    Back Cover
        Page 12
Full Text


:.Z August 1985


Floppy disc included with this
item has been shelved separately.
Consult LUIS or ask circulation
staff for assistance.


Circular 679


A Sugarcane Ripener Analysis

For Microcomputers


Program


I COMPUTER SERIES


Jose Alvarez


7m


101
F636C Cooperative Extension Service / Institute of Food and Agricultural Sciences / University of Florida / John T. Woeste, Dean
679
guide








FLORIDA COOPERATIVE EXTENSION SERVICE
UNIVERSITY OF FLORIDA
INSTITUTE OF FOOD AND AGRICULTURAL SCIENCES
COOPERATIVE EXTENSION SERVICE AGRICULTURAL EXPERIMENT STATION
SCHOOL OF FOREST RESOURCES AND CONSERVATION COLLEGE OF AGRICULTURE
UNIVERSITY OF FLORIDA
'] REPLY TO: IFAS Software Support
(904) 392-7853 Building 120, Room 203
University of Florida
Gainesville, FL 32611
December 8, 1988

MEMORANDUM

TO: IFAS Software Customers

FR: Dennis G. Watson

RE: Running BASIC programs

The program you have just purchased was written in the BASIC programming language.
Originally, we distributed only the BASIC language source file and required that you use a
BASIC interpreter to run the program.

We now distribute BASIC programs in compiled form. This means that you do not have
to load BASIC prior to running the program. Until the documentation is updated to reflect
this change, please refer to the following instructions to start program 024, titled
"Sugarcane Ripener Analysis".

First, make a duplicate copy of the distribution disk. Store the distribution disk in a safe
place and use the duplicate copy as your working disk. To run the program simply type:

RIPEFACT

at the DOS prompt and press the Enter (or Return) key.

Once you have started the program, the instructions in the documentation should apply. In
some cases, the documentation or program may allow you the option of exiting to BASIC
or DOS. With a compiled program, regardless of which you choose, you will exit to
DOS.

If you need more space on your working disk, you can delete any files with the extension
".BAS". These are BASIC source files and you do not need them to run the program.

If you have any questions about this program, please contact the IFAS Software Support
office, Bldg 120 Room 203, Gainesville, FL 32611 or phone (904) 392-7853.





The Institute of Food and Agricultural Sciences is an Equal Employment Opportunity Affirmative Action Employer authorized to provide research,
educational information and other services only to individuals and institutions that function without regard to race, color, sex, or national origin.
COOPERATIVE EXTENSION WORK IN AGRICULTURE AND HOME ECONOMICS. STATE OF FLORIDA. IFAS, UNIVERSITY OF
cl nlRtA II c nFPARTMPNT OF AGRIClll TIRE AND BOARDS OF COUNTY COMMISSIONERS COOPERATING






















A SUGARCANE RIPENER ANALYSIS PROGRAM FOR MICROCOMPUTERS


Jose Alvarez




(c), 1985, IFAS, UF




















Jose Alvarez is Area Economist, Food and Resource Economics
Department, University of Florida, Everglades Research and
Education Center, Belle Glade, Florida 33430.





UHtiY SI1Y OF FLORA LIURAIES











INTRODUCTION

Ripening can be defined as the accumulation of sucrose in the

internodes of the sugarcane stalk (Legendre). The effect of

ripeners (also referred to as plant growth regulators) on

sugarcane production has been the subject of extensive research

throughout the world since 1949. Recent work in Florida has been

conducted by Orsenigo (1977), Holder and DeStefano (1979), Rice

et al. (1980) and Dusky et al. (1985), among others.

The potential economic effect of applying a ripening agent

before harvest can be determined with partial budgeting. This

technique is used to evaluate the change in costs and returns

associated with such practice. Although the arithmetic involved

is simple, a recent study showed that "sugarcane cultivars

responded differently to the application of a sucrose enhancer

and the time interval between application and harvest" (Dusky et

al.). Evaluating the economic effect from ripeners applied at

different times to several cultivars becomes a tedious task

subject to errors. The microcomputer program listed at the end

of this publication can be used to do the analysis in a fast and

accurate manner.

HARDWARE REQUIREMENTS

The program works on IBM PC microcomputers, or compatibles,

with a minimum configuration of 64K memory and 1 disk drive. A

printer is optional.

The program is written in BASIC. Minor changes in the BASIC

code or in screen formatting may be required to run the program on

other machines.







2


GETTING STARTED

Type the program and save the file under a name of your

choice. (The author used the name RIPEFACT.) To start a session

you must first load BASIC by booting the DOS disk and after the

A> prompt typing BASIC and pressing the key. If you have

one disk drive, replace the DOS disk with the disk containing the

program and type LOAD"RIPEFACT" . If your system has two

disk drives, type LOAD"B: RIPEFACT" . When Ok appears on the

screen, type RUN or simply press the {F2} key.

Some users may want to create a system disk that has BASIC

and the program file on it to avoid disk swapping. Other users

may prefer setting up an AUTOBOOT, AUTOEXEC disk. For the

corresponding instructions, consult the IBM user's manual.

RUNNING THE PROGRAM

Before running the program, the user must be aware of a few

facts: (a) remember the claims about physical changes that may

occur (like growth reduction and, in some cultivars, decreasing

trash content) due to ripener application and enter the

appropriate data; (b) the underlined characters in the sample run

are the input responses that must be provided in uppercase

characters. To make the program shorter and easier to type,

lowercase characters were not included; (c) when a percentage

figure is requested (i.e., trash content, sucrose in normal juice

and interest rate), do not enter them as decimals since the

program makes the conversions; and (d) if a printer is available,

any screen of information displayed on the monitor can be printed

by pressing the SHIFT -90 and {PrtSc} keys on the keyboard.













The program begins by displaying the title and credit screen.

Once the key is pressed, the program requests information

concerning the expected yield if the ripener is not applied:


The last line in the previous screen allows correcting the

information entered when necessary. Typing the letter N takes

the user to the beginning of that section. If the entries are

correct, typing a Y allows entering data for the next input

section:


ENTER THE EXPECTED YIELD IF THE RIPENER IS APPLIED:


CANE YIELD (GROSS TONS/ACRE) ? 28

TRASH CONTENT (%)
(ENTER AS %, NOT A DECIMAL) ? 5

SUCROSE IN NORMAL JUICE (".)
(ENTER AS %, NOT A DECIMAL) ? 13.07


ARE THESE ENTRIES OK (Y/N) ? Y


The same gross tonnage and trash content were entered for


ENTER THE EXPECTED YIELD WITHOUT THE RIPENER:


CANE YIELD (GROSS TONS/ACRE) ? .2

TRASH CONTENT (%)
(ENTER AS %. NOT A DECIMAL) ? J

SUCROSE IN NORMAL JUICE (%)
(ENTER AS ., NOT A DECIMAL) ? 12


ARE THESE ENTRIES OK (Y/N) ? Y











comparison purposes. The higher sucrose content is the result of

the ripener application.

The next step is entering data related to costs and returns.

The price of cane is assumed to be $0.21/ib, which translates

into $24.15 per standard ton when the fair price determination

factor is used (21 x 1.15 = 24.15). Ripener costs include 0.5 lb

of active ingredient per acre at $18/lb plus $2.15/acre for the

aircraft application. The interest rate charged is an opportunity

cost that reflects the fact that the money spent on the ripener

application will not be recovered until several months later:


ENTER THE FOLLOWING COST INFORMATION:


PRICE OF SUGARCANE ($/STANDARD TON) ? 24.15

COST OF RIPENER INCLUDING APPLICATION ($/ACRE) '? 11.15

INTEREST RATE (%)
(ENTER AS %, NOT A DECIMAL) ? 12

HARVESTING COST ($/GROSS TON) ? 9.50

MONTHS FROM RIPENER APPLICATION TO CANE PAYMENT (#) ? 6


ARE THESE ENTRIES OK (Y/N) ? Y



The computer now has all the information necessary to make

the calculations. But before showing the result, the following

message is displayed:












NOTE THAT THE RETURN FIGURE IN THE RESULT
ONLY REFLECTS THE YIELD AND COST DATA THAT
YOU ENTERED. OTHER FIXED AND VARIABLE COSTS
ARE ASSUMED TO BE EQUAL FOR BOTH SITUATIONS
AND HAVE NOT BEEN DEDUCTED FROM THE RESULT.


PRESS TO SEE THE RESULT?

After pressing the key, the result of the analysis

appears on the screen, along with the information previously

entered:


YIELD (GT/A)

TRASH (.)

SUCROSE (.)

PRICE ($/STD. TON)

HARVESTING COST ($/GT)

COST OF RIPENER ($/A)

INTEREST RATE (.)

MONTHS UNTIL PAYMENT (#)

RETURN ($/A). ... ..

LETTER TO CHANGE (A-K) OR


*PARTIAL BUDGETING RESULTS*

NO RIPENER RIPENER

A. 28 B. 28

C. 5 D. 5

E. 12 F. 13.07

G. 24.15 G. 24.15

H. 9.5 H. 9.5

1C I. 11.15

tfStt S J. 12

ttrSttt K. 6

344.85 401.77

Z TO END ?


The net return per' acre if the ripener is not applied

amounts to $344.85 versus $401.77 if the ripener is applied --a

positive difference of about $57 per acre. The last line of the

result screen allows changing, one at a time, any variable value

to asses the effect on net returns. Let us consider a decrease in

tonnage due to the ripener application. To do that, one has to











answer B to the "letter to change" question and then enter the

new value:

LETTER TO CHANGE (A-K) OR Z TO END ? B
NEW CANE YIELD WITH THE RIPENER (GROSS TONS/ACRE) ? 26.6



Assuming that the ripener application may decrease tonnage

by 5% reduces the net return figure to $381.09 per acre:


YIELD (GT/A)

TRASH (%)

SUCROSE (%)

PRICE ($/STD. TON)

HARVESTING COST ($/GT)

COST OF RIPENER ($/A)

INTEREST RATE (%)

MONTHS UNTIL PAYMENT (#)

RETURN ($/A) . . . .

LETTER TO CHANGE (A-K) OR Z


PARTIAL BUDGETING RESULTS*

0 RIPENER RIPENER

A. 28 B. 26.6

C. 5 D. 5

E. 12 F. 13.07

G. 24.15 G. 24.15

H. 9.5 H. 9.5

tt#1tr# I. 11.15

tttWtt J. 12

)|t$!## K. 6

344.85 381.09

TO END ?


The user may make as many changes as desired, always one at a

time, until he/she is satisfied with the result. To finish the

program, a Z must be answered to the "letter to change" question.











DISCLAIMER AND ORDERING INFORMATION
Disclaimer

The University of Florida (UF), Institute of Food and

Agricultural Sciences (IFAS), and Florida Cooperative Extension

Service (FCES) shall have no liability or responsibility to

cooperator or any other person or entity with respect to any

liability, loss, or damage caused or alleged to be caused,

directly or indirectly, by programs released by IFAS for sale or

cooperative use including, but not limited to, any interruption

*of service, loss of business, or anticipatory profits or

consequential damages resulting from use or operation. And in no

event shall FCES be liable for loss of profits, indirect,

special, or consequential damages arising out of any breach of

the agreement or obligations of this contract.

Condition of ReleasegorSale

All computer software distributed by IFAS or FCES are on a "AS

IS" basis without warranty. Distribution or resale without

written permission of the department of origin is not permitted.

OrcjerinInformati.on

For more information on this and other IFAS software contact

your county extension office or write tog

IFAS Software Communication and Distribution

G022 McCarty Hall

University of Florida

Gainesville, FL 32611











REFERENCES

Dusky, J.A.., M.S. Kang, B. Glaz and J.D. Miller. "Response of
Eight Sugarcane Cultivars to Ripeners." University of Florida,
EREC, Belle Glade (Manuscript in process of review).

Holder, D.G. and R.P. DeStefano. "Response of Clewiston (CL)
Varieties to Polaris in Florida During the 1978 to 1979 Season."
S.arJou.nal. 41 (1979):21.

Legendre, B.L. "Ripening of Sugarcane: Effects of Sunlight,
Temperature and Rainfall." CroE._Science (1975):349-352.

Orsenigo, J.R. "Polaris and Sucrose Enhancement in Florida
Sugarcane. Proc._ Su_~ ar ane Ri. eere Se.minarE, Rio de Janero,
Brazil, 1977, pp. 65-68.

Rice, E.R., D.G. Holder and R.P. DeStefano. "Response of
Several Florida Sugarcane Varieties Tested During the 1979-1980
Harvest." Sufga LJournal 43 (1980): 23-25.








100 CLS
110 PRINT: PRINT: PRINT: PRINT
120 PRINT TAB(25);"t*SUGARCANE RIPENER ANALYSIS**"
130 PRINT TAB(35);"VERSION 1.0"
140 PRINT: PRINT: PRINT TAB(34);"Developed by:"
150 PRINT: PRINT TAB(21);"FOOD AND RESOURCE ECONOMICS DEPARTMENT"
160 PRINT TAB(25);"COOPERATIVE EXTENSION SERVICE"
170 PRINT TAB(19);"INSTITUTE OF FOOD AND AGRICULTURAL SCIENCES"
180 PRINT TAB(30);"UNIVERSITY OF FLORIDA"
190 PRINT: PRINT TAB(22);"(C) IFAS, UNIVERSITY OF FLORIDA, 1985"
200 PRINT: PRINT: PRINT
210 INPUT "PRESS TO CONTINUE ";PS
220 CLS
230 PRINT "ENTER THE EXPECTED YIELD WITHOUT THE RIPENER:"
240 PRINT: PRINT
250 INPUT "CANE YIELD (GROSS TONS/ACRE) ";GT
260 PRINT
270 PRINT "TRASH CONTENT (%)"
280 INPUT "(ENTER AS %, NOT A DECIMAL) ";T
290 PRINT
300 PRINT "SUCROSE IN NORMAL JUICE (%)"
310 INPUT "(ENTER AS %, NOT A DECIMAL) ";S
320 PRINT:PRINT:INPUT "ARE THESE ENTRIES OK (Y/N) ";0O
330 IF O$="N" THEN GOTO 220
340 IF O$="Y" THEN GOTO 360
350 PRINT "ONLY Y OR N WILL WORK. TRY AGAIN.": GOTO 320
360 CLS
370 PRINT "ENTER THE EXPECTED YIELD IF THE RIPENER IS APPLIED:"
380 PRINT: PRINT
390 INPUT "CANE YIELD (GROSS TONS/ACRE) ";RGT
400 PRINT
410 PRINT "TRASH CONTENT (.)"
420 INPUT "(ENTER AS %, NOT A DECIMAL) ";RT
430 PRINT
440 PRINT "SUCROSE IN NORMAL JUICE (%)"
450 INPUT "(ENTER AS %, NOT A DECIMAL) ";RS
460 PRINT:PRINT:INPUT "ARE THESE ENTRIES OK (Y/N) ";0$
470 IF O$="N" THEN GOTO 360
480 IF 0$="Y" THEN GOTO 500
490 PRINT "ONLY Y OR N WILL WORK. TRY AGAIN.": GOTO 460
500 CLS
510 PRINT "ENTER THE FOLLOWING COST INFORMATION:"
520 PRINT:PRINT
530 INPUT "PRICE OF SUGARCANE ($/STANDARD TON) ";PS
540 PRINT
550 INPUT "COST OF RIPENER INCLUDING APPLICATION ($/ACRE) ";CR
560 PRINT
570 PRINT "INTEREST RATE (%)"
580 INPUT "(ENTER AS %, NOT A DECIMAL) ";IR
590 PRINT
600 INPUT "HARVESTING COST ($/GROSS TON) ";HC
610 PRINT
620 INPUT "MONTHS FROM RIPENER APPLICATION TO CANE PAYMENT (#) ";M
630 PRINT:PRINT:INPUT "ARE THESE ENTRIES OK (Y/N) "; 0
640 IF O$="N" THEN GOTO 500
650 IF 0$="Y" THEN GOTO 670
660 PRINT "ONLY Y OR N WILL WORK. TRY AGAIN.": GOTO 630
670 CLS
680 PRINT:PRINT:PRINT:PRINT
690 PRINT TAB(18);"NOTE THAT THE RETURN FIGURE IN THE RESULT
700 PRINT TAB(18);"ONLY REFLECTS THE YIELD AND COST DATA THAT
710 PRINT TAB(18);"YOU ENTERED. OTHER FIXED AND VARIABLE COSTS








720 PRINT TAB(18) "ARE .ASSUMED TO BE EQUAL FOR BOTH SITUATIONS
730 PRINT TAB(18); "AND HAVE NOT BEEN DEDUCTED FROM THE RESULT."
740 PRINT:PRINT: INPUT "PRESS TO SEE THE RESULT";P$
750 CLS
760 REM CALCULATING NET TONS
770 NT = G'T (GT T/ 100)
780 RNT = RGT (RGT RT/100)
790 REM COMPUTING QUALITY FACTORS
800 Fl = .9079 + (S 11.57)/10
810 F2 = .9079 + (RS 11.57)/10
820 REM CALCULATING OPPORTUNITY COST OF INVESTMENT
830 RC = CR + CR ((IR/100)/(12/M))
840 REM CALCULATING NET RETURNS
850 R1 = (NT F F1 PS) (GT HC)
860 R2 = (RNT F2 *-PS) (RGT HC) RC
870 REM ROUNDING RETURNS TO TWO DECIMAL PLACES
880 Ri = INT(100*Ri+.5)/I00
890 R2 = INT(100tR2+.5)/100
900 CLS
910 PRINT TAB(27);"*PARTIAL BUDGETING RESULTS*"
920 PRINT
930 PRINT TAB(27);"NO RIPENER";TAB(44);"RIPENER"
940 PRINT
950 PRINT "YIELD (GT/A)";TAB(29);"A. ";GT;TAB(44);"B. ";RGT
960 PRINT
970 PRINT "TRASH (%)";TAB(29);"C. ";T;TAB(44);"D. ";RT
980 PRINT
990 PRINT "SUCROSE (%.)";TAB(29);"E. ";S;,TAB(44);"F. ";RS
1000 PRINT
1010 PRINT "PRICE ($/STD. TON)";TAB(29);"G. ";PS;TAB(44);"G. ";PS
1020 PRINT
1030 PRINT "HARVESTING COST ($/GT)";TAB(29);"H. ";HC;TAB(44);"H. ";HC
1040 PRINT
1050 PRINT "COST OF RIPENER ($/A)";TAB(29);"t****SSS* ";TAB(44);"I. ";CR
1060 PRINT
1070 PRINT "INTEREST RATE (%)";TAB(29);"t***s(t** ";TAB(44); "J. ";IR
1080 PRINT
1090 PRINT "MONTHS UNTIL PAYMENT (#)";TAB(29);"tS*******";TAB(44)."K. ";M
1100 PRINT TAB(29);5" ...--";TAB(44); "___
1110 PRINT "RETURN ($/A) ... . . .";TAB(29);R1;TAB(44);R2
1120 PRINT
1130 INPUT "LETTER TO CHANGE (A-K) OR Z TO END ";C$
1140 IF C$="A" THEN INPUT "NEW CANE YIELD WITHOUT THE RIPENER (GROSS TONS/ACRE)
" GT
1150 IF C$="B" THEN INPUT "NEW CANE YIELD WITH THE RIPENER (GROSS TONS/ACRE) ";
GT
1160 IF C$="C" THEN INPUT "NEW TRASH CONTENT WITHOUT THE RIPENER (%) ";T
1170 IF C$="D" THEN INPUT "NEW TRASH CONTENT WITH THE RIPENER ('.) ";RT
1180 IF C$="E" THEN INPUT "NEW SUCROSE WITHOUT THE RIPENER (%) ";S
1190 IF C$="F" THEN INPUT "NEW SUCROSE WITH THE RIPENER (%) ";RS
1200 IF C$="G"" THEN INPUT "NEW PRICE OF SUGARCANE ($/STANDARD TON) ";PS
1210 IF C$="H" THEN INPUT "NEW HARVESTING COST ($/GROSS TON) ";HC
1220 IF C$="I" THEN INPUT "NEW COST OF RIPENER INCLUDING APPLICATION ($/ACRE)
CR
1230 IF C$="J" THEN INPUT "NEW INTEREST RATE (%) ";IR
1240 IF C$="K" THEN INPUT "NEW MONTHS UNTIL PAYMENT (#) ";M
1250 IF C$="Z" THEN GOTO 1270
1260 GOTO 750
1270 PRINT
1280 PRINT "END OF PROGRAM"
1290 END


R


;






Ill11111 l fl I
3 1262 04376881 0








SCIENCE
LIBRARY












































































This public document was produced at a cost of $161.27, or .75 cents per copy, to provide information on a micro-
computer program for analysis of sugar cane ripener. 08-215-85


COOPERATIVE EXTENSION SERVICE, UNIVERSITY OF FLORIDA, INSTITUTE OF FOOD AND AGRICULTURAL
SCIENCES, K. R. Tefertller, director, in cooperation with the United States Department of Agriculture, publishes this Infor-
matlon to further the purpose of the May 8 and June 30, 1914 Acts of Congress; and Is authorized to provide research, educa-
tional Information and other services only to individuals and institutions that function without regard to race, color, sex or
national origin. Single copies of Extension publications (excluding 4-H and Youth publications) are available free to Florida
residents from County Extension Offices. Information on bulk rates or copies for out-of-state purchasers Is available from
C. M. Hinton, Publications Distribution Center, IFAS Building 664, University of Florida, Gainesville, Florida 32611. Before publicizing this
publication, editors should contact this address to determine availability.




University of Florida Home Page
© 2004 - 2010 University of Florida George A. Smathers Libraries.
All rights reserved.

Acceptable Use, Copyright, and Disclaimer Statement
Last updated October 10, 2010 - - mvs