anyone good at it?
if possible will make code for it.
just wondering if someone good has already made some kind of related stuff.
Thanks in advance.
All hail Ahkscript.
Balance Sheet, Final Accounts, Accounting
- smorgasbord
- Posts: 493
- Joined: 30 Sep 2013, 09:34
Balance Sheet, Final Accounts, Accounting
John ... you working ?
Re: Balance Sheet, Final Accounts, Accounting
yeah, these guyssmorgasbord wrote:just wondering if someone good has already made some kind of related stuff.
http://www.freshbooks.com
http://www.xero.com
Re: Balance Sheet, Final Accounts, Accounting
http://www.donationcoder.com/forum/inde ... ic=30387.0
and a basic one for savings here:
http://skwire.dcmembers.com/fp/?page=piggy-banks
As far as I know Skwire uses AHK
and a basic one for savings here:
http://skwire.dcmembers.com/fp/?page=piggy-banks
As far as I know Skwire uses AHK
- smorgasbord
- Posts: 493
- Joined: 30 Sep 2013, 09:34
Re: Balance Sheet, Final Accounts, Accounting
thanks @guest3456 and @garbidge
give me some time.
btw: i want something that helps in learning how balance sheet is prepared.
will post my code at the earliest.
PS: here is my code so far.. not complete yet..please do give inputs and also feel free to change the code,do whatever and post.
give me some time.
btw: i want something that helps in learning how balance sheet is prepared.
will post my code at the earliest.
PS: here is my code so far.. not complete yet..please do give inputs and also feel free to change the code,do whatever and post.
Code: Select all
#SingleInstance force
gui, show, Maximize
gui, font, v7
OnMessage(0x200, "WM_MOUSEMOVE")
gui, font, cBlue bold
Gui, Add, Text, cBlue, Dr. Trading and Profit and Loss Account for the year ended 31st March, 2014 Cr. Balance Sheet of X as on 31st March, 2014
gui, font,
Gui, Add, Text, x2 section, -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Gui, Add, Text, x23 section, % " Rs. | Rs. || Rs. | Rs. -||- Liabilities | - | Rs. || Assets | - | Rs."
Gui, Add, Text, x23 y62 section, % " TO Opening Stock "
Gui, Add, edit, vOS w70 h17 ys gSales, 0
OS_TT := "Opening Stock Dr. " . "`n" " To Cash Account Cr."
Gui, Add, Text, x23 y84 section h9, % " TO Purchases "
Gui, Add, edit, vP w70 ys gPurchases gSales, 0
Gui, Add, Text, x23 y100 section h9, % " Less: Ret Out/Drawin"
Gui, Add, edit, vRO w40 ys gPurchases gSales, 0
Gui, Add, edit, w70 vPRO readonly vPRO ys gSales
Gui, Add, Text, x23 y120 section h9, % " TO Frieght and Duty "
Gui, Add, edit, vFAD w70 h18 ys gSales, 0
Gui, Add, Text, x23 y140 section h9, % " TO Carriage Inwards "
Gui, Add, edit, vCI w70 h18 ys gSales, 0
Gui, Add, Text, x23 y160 section h9, % " TO Wages Salaries"
Gui, Add, edit, vWS w55 h18 ys gWages gSales, 0
Gui, Add, Text, x23 y176 section h9, % " Add: Outstanding Wages"
Gui, Add, edit, vOW w40 ys gWages gSales, 0
Gui, Add, Text, x23 y190 section h9, % " less: Wages "
Gui, Add, edit, v_W w40 ys gWages gSales, 0
Gui, Add, edit, vW w70 readonly ys
Gui, Add, Text, x23 y212 section h9, % " TO Coal Gas water "
Gui, Add, edit, vCGW w70 h17 ys gSales, 0
Gui, Add, Text, x23 y229 section h9, % " TO Factory lighting "
Gui, Add, edit, vFL w70 h17 ys gSales, 0
Gui, Add, Text, x23 y246 section h9, % " TO Manufacturing Expenses "
Gui, Add, edit, vME w70 h17 ys gSales, 0
Gui, Add, Text, x23 y262 section h9, % " TO Gross Profit c/d "
Gui, Add, Text, x23 y278 section h9, % " OR transferred TO P/L Account "
Gui, Add, edit, vGP w70 h17 ys readonly
Gui, Add, Text, x1 y343 section xs, C---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
gui, font, cBlack bold
Gui, Add, Text, x1 y330 section xs, % " Profit And Loss Account "
gui, font
Gui, Add, Text, x23 y288 h9 section, % "-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------"
;~ Gui, Add, edit, vSA w70 ys gSales, 0
Gui, Add, Text, x510 y352 h30, % "||"
Gui, Add, Text, x510 y380 h30, % "||"
Gui, Add, Text, x510 y408 h30, % "||"
Gui, Add, Text, x510 y436 h30, % "||"
Gui, Add, Text, x510 y464 h30, % "||"
Gui, Add, Text, x510 y492 h30, % "||"
Gui, Add, Text, x510 y520 h30, % "||"
Gui, Add, Text, x510 y548 h30, % "||"
Gui, Add, Text, x510 y586 h30, % "||"
Gui, Add, Text, x510 y614 h30, % "||"
Gui, Add, Text, x510 y642 h30, % "||"
;=============================================PARTITION======================================================================
m := 60
gui, font, bold
Loop, 23
{
Gui, Add, Text, x810 y%m% h30, % "||"
m := m+30
}
m =
gui, font
;============================================PARTITION=======================================================================
Gui, Add, Text, x850 y80, % "Sundry Creditors "
Gui, Add, edit, vSC x930 y80 w60 h18 gSales, 0 ; SA = Salaries Acc/Wa
gui, font, cBlue
Gui, Add, Text, x850 y97, % "Less: Res. For Disc."
gui, font, cBlue bold
Gui, Add, edit, vLRD x940 y97 w50 h18 gSales, 0 ; SA = Sa
gui, font
Gui, Add, edit, vLRD_ x1000 y97 w50 gSales, 0 ; LRD_
Gui, Add, Text, x850 y117, % "Rent Received in Adv"
Gui, Add, edit, vRRA x1000 y117 w50 h20 gSales, 0 ; RRA
Gui, Add, Text, x850 y137, % "Bills Payable"
Gui, Add, edit, vBP x1000 y137 w50 h20 gSales, 0 ; BP
Gui, Add, Text, x850 y157, % "Apprntce Premium Rec'd in Adv"
Gui, Add, edit, vAPRC x1000 y157 w50 h20 gSales, 0 ; APRC
Gui, Add, Text, x850 y177, % "Expenses Outstanding"
;~ Gui, Add, edit, vEO x960 y177 w50 h18 gSales, 0 ; EO
Gui, Add, Text, x850 y195, % " wages"
Gui, Add, edit, vEOW x960 y195 w50 h18 gSales, 0 ; EOW
Gui, Add, Text, x850 y213, % " Salaries"
Gui, Add, edit, vEOS x960 y213 w50 h18 gSales, 0 ; EOS
Gui, Add, Text, x850 y231, % " Others/Commision to Mngr"
Gui, Add, edit, vEOO x960 y231 w50 h18 gSales, 0 ; EO
Gui, Add, edit, vEOFinal x1000 y249 w50 h20 gSales, 0 ; EOFinal
Gui, Add, Text, x850 y271, % "Capital:"
Gui, Add, Text, x850 y289, % "Balance In the Beginning"
Gui, Add, edit, vCBB x950 y289 w50 h20 gSales, 0 ; EO
Gui, Add, Text, x850 y309 w120, % "Add: Net Profit During the year"
Gui, Add, edit, vCNPD x950 y313 w50 h20 ReadOnly gSales, 0 ; EO
Gui, Add, edit, vCTotal x950 y333 w50 h20 readonly gSales, 0 ; CTOtal
Gui, Add, Text, x850 y353 w120, % "Less: Drawings"
Gui, Add, edit, vCLD x950 y350 w50 h20 gSales, 0 ;
Gui, Add, edit, vCLDF x1000 y350 w50 h20 readonly gSales, 0 ; CLDF
Gui, Add, Text, x850 y375, % "Rent Accr but not paid "
Gui, Add, edit, vRABP x1000 y375 w50 h18 gSales, 0 ; RABP
Gui, Add, Text, x850 y570, % "===================================================================================="
Gui, Add, edit, vLiabi x1000 y578 w70 h25 readonly gSales, 0
Gui, Add, edit, vAssets x1250 y578 w70 h25 readonly gSales, 0
Gui, Add, Text, x850 y595, % "===================================================================================="
gui, font, italic bold
Gui, Add, Text, x1072 y80, % "Current Assets:"
gui, font
Gui, Add, Text, x1075 y94, % "Cash in hand"
gui, add, edit, vCIH x1250 y92 w60 h18 gsales, 0 ; CIH
Gui, Add, Text, x1075 y110, % "Cash at Bank"
gui, add, edit, vCAB x1250 y110 w60 h18 gsales, 0 ; CAB
Gui, Add, Text, x1075 y128, % "Bills Receivable"
gui, add, edit, vBR x1250 y128 w60 h18 gsales, 0 ;BR
Gui, Add, Text, x1075 y146, % "Investments"
gui, add, edit, vINv x1250 y146 w60 h18 gsales, 0 ; IN
Gui, Add, Text, x1050 y164, % "Sundry Debtors"
gui, add, edit, vSD x1190 y164 w60 h18 gsales, 0
gui, font, italic
Gui, Add, Text, x1050 y182, % "less:"
gui, font
Gui, Add, Text, x1072 y182, % "Provision for Bad Debts"
gui, add, edit, vPBD x1190 y182 w60 h18 gsales, 0
gui, add, edit, vPBD_ x1190 y200 w60 h18 readonly gsales, 0 ; PBD_ := SD - PBD
gui, font, italic
Gui, Add, Text, x1050 y218, % "less:"
gui, font
Gui, Add, Text, x1072 y218, % "Provision for Discount"
gui, add, edit, vP4D x1190 y218 w60 h18 gsales, 0
gui, add, edit, vP4D_ x1250 y218 w60 h18 readonly gsales, 0 ; P4D_ := PBD_ - P4D
;~ loan insurance stock
Gui, Add, Text, x1072 y236, % "Loan To X"
gui, add, edit, vLoan x1190 y236 w60 h18 gsales, 0
gui, font, italic
Gui, Add, Text, x1075 y254, % "Add:"
gui, font
Gui, Add, Text, x1098 y254, % "Interest Accrued"
gui, add, edit, vLoan_in x1190 y254 w60 h18 gsales, 0
gui, add, edit, vLoan_in_ x1250 y254 w60 h18 readonly gsales, 0 ; Loan_in_ := loan + loan_in
Gui, Add, Text, x1072 y272, % "Closing Stock"
gui, add, edit, vStock x1250 y272 w60 h18 gsales, 0
Gui, Add, Text, x1072 y290, % "Unexpired Insurance"
gui, add, edit, vUI x1250 y290 w60 h18 gsales, 0
Gui, Add, Text, x1072 y308, % "Insurance Company"
gui, add, edit, vIC x1250 y308 w60 h18 gsales, 0
Gui, Add, Text, x1072 y326, % "Exp. prepaid: Insurance"
gui, add, edit, vEPI x1190 y326 w60 h18 gsales, 0
Gui, Add, Text, x1072 y344, % " Rates & tax & others"
gui, add, edit, vEPRT x1190 y344 w60 h18 gsales, 0
gui, add, edit, vEPRT_ x1250 y344 w60 h18 readonly gsales, 0 ; EPRT_, % EPI + EPRT
gui, font, italic bold
Gui, Add, Text, x1075 y362, % "Fixed Assets:"
gui, font
Gui, Add, Text, x1072 y380, % "Land & Buildings"
gui, add, edit, vL_B x1190 y380 w60 h18 gsales, 0
gui, font, italic
Gui, Add, Text, x1075 y398, % "less:"
gui, font
Gui, Add, Text, x1098 y398, % " Depreciation"
gui, add, edit, vL_B_ x1190 y398 w60 h18 gsales, 0
gui, add, edit, vL_B__ x1250 y398 w60 h18 readonly gsales, 0 ; L_B__, % L_B - L_B_
Gui, Add, Text, x1072 y416, % "Pland & Machinery"
gui, add, edit, vP_M x1190 y416 w60 h18 gsales, 0
gui, font, italic
Gui, Add, Text, x1075 y434, % "Add:"
gui, font
Gui, Add, Text, x1098 y434, % "Installn Expenses"
gui, add, edit, vP_M_I x1190 y434 w60 h18 gsales, 0
gui, add, edit, vP_M_ x1190 y452 w60 h18 readonly gsales, 0 ; P_M_, % P_M + P_M_I
Gui, Add, Text, x1072 y470, % "Less: Depreciation"
gui, add, edit, vP_M_D x1190 y470 w60 h18 gsales, 0
gui, add, edit, vP_M__ x1250 y470 w60 h18 readonly gsales, 0 ; P_M__, % P_M_ - P_M_D
Gui, Add, Text, x1072 y488, % "Furnitures & Fixtures"
gui, add, edit, vF_F x1190 y488 w60 h18 gsales, 0
gui, font, italic
Gui, Add, Text, x1075 y506, % "less:"
gui, font
Gui, Add, Text, x1098 y506, % " Depreciation"
gui, add, edit, vF_F_ x1190 y506 w60 h18 gsales, 0
gui, add, edit, vF_F__ x1250 y506 w60 h18 readonly gsales, 0 ; F_F__, % F_F - F_F_
Gui, Add, Text, x1072 y524, % "Patents"
gui, add, edit, vpatent x1190 y524 w60 h18 gsales, 0
gui, font, italic
Gui, Add, Text, x1075 y542, % "less:"
gui, font
Gui, Add, Text, x1098 y542, % " Depreciation"
gui, add, edit, vpatent_ x1190 y542 w60 h18 gsales, 0
gui, add, edit, vpatent__ x1250 y542 w60 h18 readonly gsales, 0 ; patent__,% patent - patent_
Gui, Add, edit, vT x190 y294 w70 readonly
Gui, Add, edit, vT_ x680 y294 w70 readonly
Gui, Add, Text, x23 y305 h9 section, % "------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------"
Gui, Add, Text, x23 y355 h9 section, TO Salaries Wages
Gui, Add, edit, vSA w70 h18 ys gSales, 0 ; SA = Salaries Acc/Wa
Gui, Add, Text, x23 y371 section h9, % " Add: Outstanding Salaries"
Gui, Add, edit, vOS_ w40 ys gSales, 0 ; OS_ = Outstanding Salaries
Gui, Add, Text, x23 y387 section h9, % " less: Salaries "
Gui, Add, edit, v_S w40 ys gWages gSales, 0 ; _S = less Salaries
Gui, Add, edit, vS__ w70 gSales readonly ys ; S__ = SA + OS_ - _S
Gui, Add, Text, x23 y408 h9 section, % " TO Bank Charges "
Gui, Add, edit, vGEA w70 h17 ys, 0
Gui, Add, Text, x23 y425 h9 section, % " TO Insurance Acc"
Gui, Add, edit, vIA w70 ys gSales, 0 ; IA = Insurance Account
Gui, Add, Text, x23 y441 h9 section, % "Less: Insurance Prepaid"
Gui, Add, edit, vIP w40 ys gSales, 0 ; IP = Insurance Prepaid
Gui, Add, edit, vIAIP w70 readonly ys ; IAIP = IA - IP
Gui, Add, Text, x23 y462 h9 section, % " TO Rent Rates & Taxes"
Gui, Add, edit, vRRT w70 h17 ys gSales, 0 ; RRT = Rent Rated & Taxes
Gui, Add, Text, x23 y479 h9 section, % "Less: Prepaid "
Gui, Add, edit, vRRTP w40 ys gSales, 0 ; RRTP = Rent rates Taxes Prepaid
Gui, Add, edit, vRRT_ w70 readonly ys ; RRT_ = RRT - RRTP
Gui, Add, Text, x23 y500 h9 section, % " TO Printing & Stationery "
Gui, Add, edit, vP_S w70 h17 ys, 0
Gui, Add, Text, x23 y517 h9 section, % " TO Postage & Telegrams "
Gui, Add, edit, vP_T w70 h17 ys, 0
Gui, Add, Text, x23 y534 h9 section, % " TO Trade Expenses "
Gui, Add, edit, vTE w70 ys gSales, 0 ; TE = Trade Expenses
Gui, Add, Text, x23 y551 h9 section, % " Add: Outstanding "
Gui, Add, edit, vOTE w40 ys gSales, 0 ; OTE = Outstanding
Gui, Add, edit, vOTE_ w70 readonly ys gSales, 0 ; OTE_ = TE + OTE
Gui, Add, Text, x23 y571 h9 section, % " TO Heating & Lighting "
Gui, Add, edit, vHL w70 h17 ys, 0
Gui, Add, Text, x23 y587 h9 section, % " TO Loss BY Fire, Unrecovered "
Gui, Add, edit, vLFU w70 h17 ys, 0
Gui, Add, Text, x23 y604 h9 section, % " TO Alterations TO Shop "
Gui, Add, edit, vAS w70 h17 ys, 0
Gui, Add, Text, x23 y621 h9 section, % " TO Misc. "
Gui, Add, edit, vMSC w70 h17 ys, 0
Gui, Add, Text, x23 y637 section, % " TO N. P. - Trans'd TO Capital Acc. "
Gui, Add, edit, vNPT w70 h20 ys gSales
Gui, Add, Text, x23 y650 section, % " ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------"
Gui, Add, edit, vNP x191 y658 w70 readonly gSales
Gui, Add, edit, vNP_ x681 y658 w70 readonly gSales
Gui, Add, Text, x23 y671 section, % " ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------"
;~ Gui, Add, GroupBox,w300 h10 xs
;~ Gui, Add, edit, vNPT w70 h20 ys
Gui, Add, Text, x520 y62 h9, % " BY Sales "
Gui, Add, edit, vS x620 y62 w70 gSales, 0
Gui, Add, Text, x520 y85 h9 section, % " Less: Sales Ret/Ret inwards "
Gui, Add, edit, vSR x660 y62 w40 ys gSales, 0
Gui, Add, edit, vS_ w70 readonly ys gSales
Gui, Add, Text, x520 y108 h9 section, % " BY Insurance comp (Goods Destroyed)"
Gui, Add, edit, vGDF_ w70 ys gSales, 0
Gui, Add, Text, x520 y131 h9 section, % " BY Stock on 31st March, 2014 "
Gui, Add, edit, vSO3 w70 ys gSales, 0
;~ Gui, Add, Text, x520 y317 h9 section, % "By Gross Profit b/d "
Gui, Add, Text, x520 y354 h9 section, % "By Gross Profit b/d "
Gui, Add, Text, x520 y366 h9 section, % "OR tran'd from Trading Account"
Gui, Add, edit, vGP_ w70 section ReadOnly ys
Gui, Add, Text, x520 y386 h9 section, % " BY Discount Received "
Gui, Add, edit, vD w70 h17 ys gSales, 0
Gui, Add, Text, x520 y403 h9 section, % " BY Resere for Disc on Credirs "
gui, font, cBlue bold
Gui, Add, edit, vRDC w70 h17 ys gSales, 0
gui, font
Gui, Add, Text, x520 y420 h9 section, % " BY Rent Recieved "
Gui, Add, edit, vbRR w60 h20 ys gSales, 0
Gui, Add, Text, x520 y435 h9 section, % " less: Rec'd in Adv "
Gui, Add, edit, vblR w40 h20 ys gSales, 0
Gui, Add, edit, vblR_ w60 h20 ys readonly gSales, 0 ; blR_ = bRR - blR
Gui, Add, Text, x520 y455 h9 section, % " BY Dividends from Investment "
Gui, Add, edit, vDFI w60 h17 ys gSales, 0
Gui, Add, Text, x520 y472 h9 section, % " BY Int Acc on loan TO X etc"
Gui, Add, edit, vIAOL w60 h17 ys gSales, 0
Gui, Add, Text, x520 y489 h9 section, % " Add: Out. Interest "
Gui, Add, edit, vIAONO w40 h17 ys gSales, 0
Gui, Add, edit, vIAONO_ w60 h17 ys readonly gSales, 0 ; IAONO_ = IAOL + IAONO
Gui, Add, Text, x520 y506 h9 section, % " BY Apprentice Premium"
Gui, Add, edit, vAP w60 h17 ys gSales, 0
Gui, Add, Text, x520 y523 h9 section, % " Less:Rec'd in Adv "
Gui, Add, edit, vRIA w40 h17 ys gSales, 0
Gui, Add, edit, vRIA_ w60 h17 ys gSales, 0 ; RIA_ = AP - RIA
Gui, Add, Text, x520 y540 h9 section, % " BY Profit on sale of Assets "
Gui, Add, edit, vPSA w60 h17 ys gSales, 0
Gui, Add, Text, x280 y355 section, % " TO Depreciation on: "
;~ Gui, Add, edit, vtest x550 y62 w70 gSales, 0
Gui, Add, Text, y370 xs section, % " Plant & Machinery"
Gui, Add, edit, vDPM_ w40 h17 ys gSales, 0 ; DPM_
Gui, Add, Text, y385 xs section, % " Furnitures & Fix "
Gui, Add, edit, vDFF_ w40 h17 ys gSales, 0 ; DFF_
Gui, Add, Text, y400 xs section, % " Land & Building "
Gui, Add, edit, vDLB_ w40 h17 ys gSales, 0 ; DLB_
Gui, Add, Text, y415 xs section, % " Others if any "
Gui, Add, edit, vDOa_ w40 h17 ys gSales, 0 ; DOa_
Gui, Add, edit, vDEP_ w60 h20 ReadOnly ys gSales ; DEP_ = DOa_ + DLB_ + DFF_ + DPM_
Gui, Add, Text, y435 xs section, % "TO Prov 4 doub deb req"
Gui, Add, edit, vPDDR_ w40 h17 ys gSales, 0
gui, Add, Text, y450 xs section, % " Add: Bad Debts "
Gui, Add, edit, vPFBD_ w40 h17 ys gSales, 0
gui, Add, Text, y465 xs section, % " Less: Existing Prov"
Gui, Add, edit, vPFEP_ w40 h17 ys gSales, 0
gui, Add, Edit, vPFDDR_ w60 readonly ys gSales ; PFDDR_ = PDDR_ + PFBD_ - PFEP_
gui, Add, Text, y486 xs section, % " TO Prov for disc. on Debt Req"
Gui, Add, edit, vPFDD_ w50 h17 ys gSales, 0 ; PFDD_
gui, Add, Text, y501 xs section, % " Add: Disc. Allowed"
Gui, Add, edit, vPFDA_ w40 h17 ys gSales, 0 ; PFDA_ = add discount Allowed
Gui, Add, edit, vPFDAF_ w60 h17 ys readonly gSales, 0 ; PFDAF_ = PFDD_ + PFDA_
gui, Add, Text, y518 xs section, % " TO Interest on Capital " ; IOC
Gui, Add, edit, vIOC w60 h17 ys, 0
Gui, Show,, FINAL ACCOUNTS
return ; End of auto-execute section. The script is idle until the user does something.
GuiClose:
ButtonOK:
Gui, Submit ; Save the input from the user TO each control's associated variable.
MsgBox You entered "%FirstName% %LastName%".
ExitApp
esc::ExitApp
Sales:
Gui, Submit, NoHide
GuiControl,, S_, % S - SR
GuiControl,, T_, % S - SR + GDF_ +SO3
GuiControl,, T, % T_
GuiControl,, PRO, % P - RO
GuiControl,, GP, % T_ - ( OS + P - RO + FAD + CI + WS + OW - _W + CGW + FL + ME )
GuiControl,, W, % WS + OW - _W
GuiControl,, GP_, % GP
GuiControl,, S__, % SA + OS_ - _S
guicontrol,, IAIP, % IA - IP
guicontrol,, RRT_, % RRT - RRTP
guicontrol,, OTE_, % TE + OTE
guicontrol,, PFDAF_, % PFDD_ + PFDA_
guicontrol,, DEP_, % DOa_ + DLB_ + DFF_ + DPM_
guicontrol,, PFDDR_,% PDDR_ + PFBD_ - PFEP_
GuiControl,, blR_, % bRR - blR
GuiControl,, IAONO_,% IAOL + IAONO
GuiControl,, RIA_, % AP - RIA
GuiControl,, NP_, % GP_ + D + RDC + blR_ + DFI + IAONO_ + RIA_ + PSA
GuiControl,, NP, % NP_
GuiControl,, NPT, % NP - ( S__ + GEA + IAIP + RRT_ + P_S + P_T + OTE_ + HL + LFU + AS + MSC + DEP_ + PFDDR_ + PFDAF_ + IOC )
GuiControl,, LRD, % RDC
GuiControl,, CNPD, % NPT
guicontrol,,LRD_, % SC - LRD
guicontrol,,EOFinal, % EOW + EOS + EOO
;~ guicontrol,, CTotal, % CBB + CNDP
guicontrol,,CTotal, % CBB + CNPD
guicontrol,, CLDF, % CTotal - CLD
guicontrol,, Liabi, % LRD_ + RRA + BP + APRC + EOFinal + CLDF + RABP
guicontrol,, PBD_, % SD - PBD
GuiControl,, P4D_, % PBD_ - P4D
GuiControl,, Loan_in_, % loan + loan_in
GuiControl,, EPRT_, % EPI + EPRT
GuiControl,, L_B__, % L_B - L_B_
GuiControl,, P_M_, % P_M + P_M_I
GuiControl,, P_M__, % P_M_ - P_M_D
GuiControl,, F_F__, % F_F - F_F_
GuiControl,, patent__,% patent - patent_
GuiControl,, Assets, % CIH + CAB + BR + INv + P4D_ + loan_in_ + stock + UI + IC + EPRT_ + L_B__ + P_M__ + F_F__ + Patent__
;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2))
return
Purchases:
Gui, Submit, NoHide
;~ GuiControl,, PRO, % P - RO
;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2))
return
Wages:
Gui, Submit, NoHide
GuiControl,, W, % WS + OW - _W
GuiControl,, T_, % S_ + GDF_ +SO3
;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2))
return
TOtal_:
Gui, Submit, NoHide
GuiControl,, T_, % S_ + GDF_ +SO3
;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2))
return
OnMessage(0x200, "WM_MOUSEMOVE")
return
WM_MOUSEMOVE()
{
static CurrControl, PrevControl, _TT ; _TT is kept blank for use by the ToolTip command below.
CurrControl := A_GuiControl
If (CurrControl <> PrevControl and not InStr(CurrControl, " "))
{
ToolTip ; Turn off any previous tooltip.
SetTimer, DisplayToolTip, 1000
PrevControl := CurrControl
}
return
DisplayToolTip:
SetTimer, DisplayToolTip, Off
ToolTip % %CurrControl%_TT ; The leading percent sign tell it to use an expression.
SetTimer, RemoveToolTip, 3000
return
RemoveToolTip:
SetTimer, RemoveToolTip, Off
ToolTip
return
}
John ... you working ?
Re: Balance Sheet, Final Accounts, Accounting
Would be nice a link to a YouTube video demonstrating / explaining this script in action
Looks like maybe it presents user with some GUI (you think?!) for input and in the end summarizes those inputs?
What if anything it replaces though, what need does this solve which is not likely already solved by some common software a company would have?
Looks like maybe it presents user with some GUI (you think?!) for input and in the end summarizes those inputs?
What if anything it replaces though, what need does this solve which is not likely already solved by some common software a company would have?
Re: Balance Sheet, Final Accounts, Accounting
If you have updated this code then pls share updated code. CA student here............
smorgasbord wrote: ↑04 Dec 2014, 02:39thanks @guest3456 and @garbidge
give me some time.
btw: i want something that helps in learning how balance sheet is prepared.
will post my code at the earliest.
PS: here is my code so far.. not complete yet..please do give inputs and also feel free to change the code,do whatever and post.Code: Select all
#SingleInstance force gui, show, Maximize gui, font, v7 OnMessage(0x200, "WM_MOUSEMOVE") gui, font, cBlue bold Gui, Add, Text, cBlue, Dr. Trading and Profit and Loss Account for the year ended 31st March, 2014 Cr. Balance Sheet of X as on 31st March, 2014 gui, font, Gui, Add, Text, x2 section, ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Gui, Add, Text, x23 section, % " Rs. | Rs. || Rs. | Rs. -||- Liabilities | - | Rs. || Assets | - | Rs." Gui, Add, Text, x23 y62 section, % " TO Opening Stock " Gui, Add, edit, vOS w70 h17 ys gSales, 0 OS_TT := "Opening Stock Dr. " . "`n" " To Cash Account Cr." Gui, Add, Text, x23 y84 section h9, % " TO Purchases " Gui, Add, edit, vP w70 ys gPurchases gSales, 0 Gui, Add, Text, x23 y100 section h9, % " Less: Ret Out/Drawin" Gui, Add, edit, vRO w40 ys gPurchases gSales, 0 Gui, Add, edit, w70 vPRO readonly vPRO ys gSales Gui, Add, Text, x23 y120 section h9, % " TO Frieght and Duty " Gui, Add, edit, vFAD w70 h18 ys gSales, 0 Gui, Add, Text, x23 y140 section h9, % " TO Carriage Inwards " Gui, Add, edit, vCI w70 h18 ys gSales, 0 Gui, Add, Text, x23 y160 section h9, % " TO Wages Salaries" Gui, Add, edit, vWS w55 h18 ys gWages gSales, 0 Gui, Add, Text, x23 y176 section h9, % " Add: Outstanding Wages" Gui, Add, edit, vOW w40 ys gWages gSales, 0 Gui, Add, Text, x23 y190 section h9, % " less: Wages " Gui, Add, edit, v_W w40 ys gWages gSales, 0 Gui, Add, edit, vW w70 readonly ys Gui, Add, Text, x23 y212 section h9, % " TO Coal Gas water " Gui, Add, edit, vCGW w70 h17 ys gSales, 0 Gui, Add, Text, x23 y229 section h9, % " TO Factory lighting " Gui, Add, edit, vFL w70 h17 ys gSales, 0 Gui, Add, Text, x23 y246 section h9, % " TO Manufacturing Expenses " Gui, Add, edit, vME w70 h17 ys gSales, 0 Gui, Add, Text, x23 y262 section h9, % " TO Gross Profit c/d " Gui, Add, Text, x23 y278 section h9, % " OR transferred TO P/L Account " Gui, Add, edit, vGP w70 h17 ys readonly Gui, Add, Text, x1 y343 section xs, C--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- gui, font, cBlack bold Gui, Add, Text, x1 y330 section xs, % " Profit And Loss Account " gui, font Gui, Add, Text, x23 y288 h9 section, % "-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------" ;~ Gui, Add, edit, vSA w70 ys gSales, 0 Gui, Add, Text, x510 y352 h30, % "||" Gui, Add, Text, x510 y380 h30, % "||" Gui, Add, Text, x510 y408 h30, % "||" Gui, Add, Text, x510 y436 h30, % "||" Gui, Add, Text, x510 y464 h30, % "||" Gui, Add, Text, x510 y492 h30, % "||" Gui, Add, Text, x510 y520 h30, % "||" Gui, Add, Text, x510 y548 h30, % "||" Gui, Add, Text, x510 y586 h30, % "||" Gui, Add, Text, x510 y614 h30, % "||" Gui, Add, Text, x510 y642 h30, % "||" ;=============================================PARTITION====================================================================== m := 60 gui, font, bold Loop, 23 { Gui, Add, Text, x810 y%m% h30, % "||" m := m+30 } m = gui, font ;============================================PARTITION======================================================================= Gui, Add, Text, x850 y80, % "Sundry Creditors " Gui, Add, edit, vSC x930 y80 w60 h18 gSales, 0 ; SA = Salaries Acc/Wa gui, font, cBlue Gui, Add, Text, x850 y97, % "Less: Res. For Disc." gui, font, cBlue bold Gui, Add, edit, vLRD x940 y97 w50 h18 gSales, 0 ; SA = Sa gui, font Gui, Add, edit, vLRD_ x1000 y97 w50 gSales, 0 ; LRD_ Gui, Add, Text, x850 y117, % "Rent Received in Adv" Gui, Add, edit, vRRA x1000 y117 w50 h20 gSales, 0 ; RRA Gui, Add, Text, x850 y137, % "Bills Payable" Gui, Add, edit, vBP x1000 y137 w50 h20 gSales, 0 ; BP Gui, Add, Text, x850 y157, % "Apprntce Premium Rec'd in Adv" Gui, Add, edit, vAPRC x1000 y157 w50 h20 gSales, 0 ; APRC Gui, Add, Text, x850 y177, % "Expenses Outstanding" ;~ Gui, Add, edit, vEO x960 y177 w50 h18 gSales, 0 ; EO Gui, Add, Text, x850 y195, % " wages" Gui, Add, edit, vEOW x960 y195 w50 h18 gSales, 0 ; EOW Gui, Add, Text, x850 y213, % " Salaries" Gui, Add, edit, vEOS x960 y213 w50 h18 gSales, 0 ; EOS Gui, Add, Text, x850 y231, % " Others/Commision to Mngr" Gui, Add, edit, vEOO x960 y231 w50 h18 gSales, 0 ; EO Gui, Add, edit, vEOFinal x1000 y249 w50 h20 gSales, 0 ; EOFinal Gui, Add, Text, x850 y271, % "Capital:" Gui, Add, Text, x850 y289, % "Balance In the Beginning" Gui, Add, edit, vCBB x950 y289 w50 h20 gSales, 0 ; EO Gui, Add, Text, x850 y309 w120, % "Add: Net Profit During the year" Gui, Add, edit, vCNPD x950 y313 w50 h20 ReadOnly gSales, 0 ; EO Gui, Add, edit, vCTotal x950 y333 w50 h20 readonly gSales, 0 ; CTOtal Gui, Add, Text, x850 y353 w120, % "Less: Drawings" Gui, Add, edit, vCLD x950 y350 w50 h20 gSales, 0 ; Gui, Add, edit, vCLDF x1000 y350 w50 h20 readonly gSales, 0 ; CLDF Gui, Add, Text, x850 y375, % "Rent Accr but not paid " Gui, Add, edit, vRABP x1000 y375 w50 h18 gSales, 0 ; RABP Gui, Add, Text, x850 y570, % "====================================================================================" Gui, Add, edit, vLiabi x1000 y578 w70 h25 readonly gSales, 0 Gui, Add, edit, vAssets x1250 y578 w70 h25 readonly gSales, 0 Gui, Add, Text, x850 y595, % "====================================================================================" gui, font, italic bold Gui, Add, Text, x1072 y80, % "Current Assets:" gui, font Gui, Add, Text, x1075 y94, % "Cash in hand" gui, add, edit, vCIH x1250 y92 w60 h18 gsales, 0 ; CIH Gui, Add, Text, x1075 y110, % "Cash at Bank" gui, add, edit, vCAB x1250 y110 w60 h18 gsales, 0 ; CAB Gui, Add, Text, x1075 y128, % "Bills Receivable" gui, add, edit, vBR x1250 y128 w60 h18 gsales, 0 ;BR Gui, Add, Text, x1075 y146, % "Investments" gui, add, edit, vINv x1250 y146 w60 h18 gsales, 0 ; IN Gui, Add, Text, x1050 y164, % "Sundry Debtors" gui, add, edit, vSD x1190 y164 w60 h18 gsales, 0 gui, font, italic Gui, Add, Text, x1050 y182, % "less:" gui, font Gui, Add, Text, x1072 y182, % "Provision for Bad Debts" gui, add, edit, vPBD x1190 y182 w60 h18 gsales, 0 gui, add, edit, vPBD_ x1190 y200 w60 h18 readonly gsales, 0 ; PBD_ := SD - PBD gui, font, italic Gui, Add, Text, x1050 y218, % "less:" gui, font Gui, Add, Text, x1072 y218, % "Provision for Discount" gui, add, edit, vP4D x1190 y218 w60 h18 gsales, 0 gui, add, edit, vP4D_ x1250 y218 w60 h18 readonly gsales, 0 ; P4D_ := PBD_ - P4D ;~ loan insurance stock Gui, Add, Text, x1072 y236, % "Loan To X" gui, add, edit, vLoan x1190 y236 w60 h18 gsales, 0 gui, font, italic Gui, Add, Text, x1075 y254, % "Add:" gui, font Gui, Add, Text, x1098 y254, % "Interest Accrued" gui, add, edit, vLoan_in x1190 y254 w60 h18 gsales, 0 gui, add, edit, vLoan_in_ x1250 y254 w60 h18 readonly gsales, 0 ; Loan_in_ := loan + loan_in Gui, Add, Text, x1072 y272, % "Closing Stock" gui, add, edit, vStock x1250 y272 w60 h18 gsales, 0 Gui, Add, Text, x1072 y290, % "Unexpired Insurance" gui, add, edit, vUI x1250 y290 w60 h18 gsales, 0 Gui, Add, Text, x1072 y308, % "Insurance Company" gui, add, edit, vIC x1250 y308 w60 h18 gsales, 0 Gui, Add, Text, x1072 y326, % "Exp. prepaid: Insurance" gui, add, edit, vEPI x1190 y326 w60 h18 gsales, 0 Gui, Add, Text, x1072 y344, % " Rates & tax & others" gui, add, edit, vEPRT x1190 y344 w60 h18 gsales, 0 gui, add, edit, vEPRT_ x1250 y344 w60 h18 readonly gsales, 0 ; EPRT_, % EPI + EPRT gui, font, italic bold Gui, Add, Text, x1075 y362, % "Fixed Assets:" gui, font Gui, Add, Text, x1072 y380, % "Land & Buildings" gui, add, edit, vL_B x1190 y380 w60 h18 gsales, 0 gui, font, italic Gui, Add, Text, x1075 y398, % "less:" gui, font Gui, Add, Text, x1098 y398, % " Depreciation" gui, add, edit, vL_B_ x1190 y398 w60 h18 gsales, 0 gui, add, edit, vL_B__ x1250 y398 w60 h18 readonly gsales, 0 ; L_B__, % L_B - L_B_ Gui, Add, Text, x1072 y416, % "Pland & Machinery" gui, add, edit, vP_M x1190 y416 w60 h18 gsales, 0 gui, font, italic Gui, Add, Text, x1075 y434, % "Add:" gui, font Gui, Add, Text, x1098 y434, % "Installn Expenses" gui, add, edit, vP_M_I x1190 y434 w60 h18 gsales, 0 gui, add, edit, vP_M_ x1190 y452 w60 h18 readonly gsales, 0 ; P_M_, % P_M + P_M_I Gui, Add, Text, x1072 y470, % "Less: Depreciation" gui, add, edit, vP_M_D x1190 y470 w60 h18 gsales, 0 gui, add, edit, vP_M__ x1250 y470 w60 h18 readonly gsales, 0 ; P_M__, % P_M_ - P_M_D Gui, Add, Text, x1072 y488, % "Furnitures & Fixtures" gui, add, edit, vF_F x1190 y488 w60 h18 gsales, 0 gui, font, italic Gui, Add, Text, x1075 y506, % "less:" gui, font Gui, Add, Text, x1098 y506, % " Depreciation" gui, add, edit, vF_F_ x1190 y506 w60 h18 gsales, 0 gui, add, edit, vF_F__ x1250 y506 w60 h18 readonly gsales, 0 ; F_F__, % F_F - F_F_ Gui, Add, Text, x1072 y524, % "Patents" gui, add, edit, vpatent x1190 y524 w60 h18 gsales, 0 gui, font, italic Gui, Add, Text, x1075 y542, % "less:" gui, font Gui, Add, Text, x1098 y542, % " Depreciation" gui, add, edit, vpatent_ x1190 y542 w60 h18 gsales, 0 gui, add, edit, vpatent__ x1250 y542 w60 h18 readonly gsales, 0 ; patent__,% patent - patent_ Gui, Add, edit, vT x190 y294 w70 readonly Gui, Add, edit, vT_ x680 y294 w70 readonly Gui, Add, Text, x23 y305 h9 section, % "------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------" Gui, Add, Text, x23 y355 h9 section, TO Salaries Wages Gui, Add, edit, vSA w70 h18 ys gSales, 0 ; SA = Salaries Acc/Wa Gui, Add, Text, x23 y371 section h9, % " Add: Outstanding Salaries" Gui, Add, edit, vOS_ w40 ys gSales, 0 ; OS_ = Outstanding Salaries Gui, Add, Text, x23 y387 section h9, % " less: Salaries " Gui, Add, edit, v_S w40 ys gWages gSales, 0 ; _S = less Salaries Gui, Add, edit, vS__ w70 gSales readonly ys ; S__ = SA + OS_ - _S Gui, Add, Text, x23 y408 h9 section, % " TO Bank Charges " Gui, Add, edit, vGEA w70 h17 ys, 0 Gui, Add, Text, x23 y425 h9 section, % " TO Insurance Acc" Gui, Add, edit, vIA w70 ys gSales, 0 ; IA = Insurance Account Gui, Add, Text, x23 y441 h9 section, % "Less: Insurance Prepaid" Gui, Add, edit, vIP w40 ys gSales, 0 ; IP = Insurance Prepaid Gui, Add, edit, vIAIP w70 readonly ys ; IAIP = IA - IP Gui, Add, Text, x23 y462 h9 section, % " TO Rent Rates & Taxes" Gui, Add, edit, vRRT w70 h17 ys gSales, 0 ; RRT = Rent Rated & Taxes Gui, Add, Text, x23 y479 h9 section, % "Less: Prepaid " Gui, Add, edit, vRRTP w40 ys gSales, 0 ; RRTP = Rent rates Taxes Prepaid Gui, Add, edit, vRRT_ w70 readonly ys ; RRT_ = RRT - RRTP Gui, Add, Text, x23 y500 h9 section, % " TO Printing & Stationery " Gui, Add, edit, vP_S w70 h17 ys, 0 Gui, Add, Text, x23 y517 h9 section, % " TO Postage & Telegrams " Gui, Add, edit, vP_T w70 h17 ys, 0 Gui, Add, Text, x23 y534 h9 section, % " TO Trade Expenses " Gui, Add, edit, vTE w70 ys gSales, 0 ; TE = Trade Expenses Gui, Add, Text, x23 y551 h9 section, % " Add: Outstanding " Gui, Add, edit, vOTE w40 ys gSales, 0 ; OTE = Outstanding Gui, Add, edit, vOTE_ w70 readonly ys gSales, 0 ; OTE_ = TE + OTE Gui, Add, Text, x23 y571 h9 section, % " TO Heating & Lighting " Gui, Add, edit, vHL w70 h17 ys, 0 Gui, Add, Text, x23 y587 h9 section, % " TO Loss BY Fire, Unrecovered " Gui, Add, edit, vLFU w70 h17 ys, 0 Gui, Add, Text, x23 y604 h9 section, % " TO Alterations TO Shop " Gui, Add, edit, vAS w70 h17 ys, 0 Gui, Add, Text, x23 y621 h9 section, % " TO Misc. " Gui, Add, edit, vMSC w70 h17 ys, 0 Gui, Add, Text, x23 y637 section, % " TO N. P. - Trans'd TO Capital Acc. " Gui, Add, edit, vNPT w70 h20 ys gSales Gui, Add, Text, x23 y650 section, % " ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------" Gui, Add, edit, vNP x191 y658 w70 readonly gSales Gui, Add, edit, vNP_ x681 y658 w70 readonly gSales Gui, Add, Text, x23 y671 section, % " ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------" ;~ Gui, Add, GroupBox,w300 h10 xs ;~ Gui, Add, edit, vNPT w70 h20 ys Gui, Add, Text, x520 y62 h9, % " BY Sales " Gui, Add, edit, vS x620 y62 w70 gSales, 0 Gui, Add, Text, x520 y85 h9 section, % " Less: Sales Ret/Ret inwards " Gui, Add, edit, vSR x660 y62 w40 ys gSales, 0 Gui, Add, edit, vS_ w70 readonly ys gSales Gui, Add, Text, x520 y108 h9 section, % " BY Insurance comp (Goods Destroyed)" Gui, Add, edit, vGDF_ w70 ys gSales, 0 Gui, Add, Text, x520 y131 h9 section, % " BY Stock on 31st March, 2014 " Gui, Add, edit, vSO3 w70 ys gSales, 0 ;~ Gui, Add, Text, x520 y317 h9 section, % "By Gross Profit b/d " Gui, Add, Text, x520 y354 h9 section, % "By Gross Profit b/d " Gui, Add, Text, x520 y366 h9 section, % "OR tran'd from Trading Account" Gui, Add, edit, vGP_ w70 section ReadOnly ys Gui, Add, Text, x520 y386 h9 section, % " BY Discount Received " Gui, Add, edit, vD w70 h17 ys gSales, 0 Gui, Add, Text, x520 y403 h9 section, % " BY Resere for Disc on Credirs " gui, font, cBlue bold Gui, Add, edit, vRDC w70 h17 ys gSales, 0 gui, font Gui, Add, Text, x520 y420 h9 section, % " BY Rent Recieved " Gui, Add, edit, vbRR w60 h20 ys gSales, 0 Gui, Add, Text, x520 y435 h9 section, % " less: Rec'd in Adv " Gui, Add, edit, vblR w40 h20 ys gSales, 0 Gui, Add, edit, vblR_ w60 h20 ys readonly gSales, 0 ; blR_ = bRR - blR Gui, Add, Text, x520 y455 h9 section, % " BY Dividends from Investment " Gui, Add, edit, vDFI w60 h17 ys gSales, 0 Gui, Add, Text, x520 y472 h9 section, % " BY Int Acc on loan TO X etc" Gui, Add, edit, vIAOL w60 h17 ys gSales, 0 Gui, Add, Text, x520 y489 h9 section, % " Add: Out. Interest " Gui, Add, edit, vIAONO w40 h17 ys gSales, 0 Gui, Add, edit, vIAONO_ w60 h17 ys readonly gSales, 0 ; IAONO_ = IAOL + IAONO Gui, Add, Text, x520 y506 h9 section, % " BY Apprentice Premium" Gui, Add, edit, vAP w60 h17 ys gSales, 0 Gui, Add, Text, x520 y523 h9 section, % " Less:Rec'd in Adv " Gui, Add, edit, vRIA w40 h17 ys gSales, 0 Gui, Add, edit, vRIA_ w60 h17 ys gSales, 0 ; RIA_ = AP - RIA Gui, Add, Text, x520 y540 h9 section, % " BY Profit on sale of Assets " Gui, Add, edit, vPSA w60 h17 ys gSales, 0 Gui, Add, Text, x280 y355 section, % " TO Depreciation on: " ;~ Gui, Add, edit, vtest x550 y62 w70 gSales, 0 Gui, Add, Text, y370 xs section, % " Plant & Machinery" Gui, Add, edit, vDPM_ w40 h17 ys gSales, 0 ; DPM_ Gui, Add, Text, y385 xs section, % " Furnitures & Fix " Gui, Add, edit, vDFF_ w40 h17 ys gSales, 0 ; DFF_ Gui, Add, Text, y400 xs section, % " Land & Building " Gui, Add, edit, vDLB_ w40 h17 ys gSales, 0 ; DLB_ Gui, Add, Text, y415 xs section, % " Others if any " Gui, Add, edit, vDOa_ w40 h17 ys gSales, 0 ; DOa_ Gui, Add, edit, vDEP_ w60 h20 ReadOnly ys gSales ; DEP_ = DOa_ + DLB_ + DFF_ + DPM_ Gui, Add, Text, y435 xs section, % "TO Prov 4 doub deb req" Gui, Add, edit, vPDDR_ w40 h17 ys gSales, 0 gui, Add, Text, y450 xs section, % " Add: Bad Debts " Gui, Add, edit, vPFBD_ w40 h17 ys gSales, 0 gui, Add, Text, y465 xs section, % " Less: Existing Prov" Gui, Add, edit, vPFEP_ w40 h17 ys gSales, 0 gui, Add, Edit, vPFDDR_ w60 readonly ys gSales ; PFDDR_ = PDDR_ + PFBD_ - PFEP_ gui, Add, Text, y486 xs section, % " TO Prov for disc. on Debt Req" Gui, Add, edit, vPFDD_ w50 h17 ys gSales, 0 ; PFDD_ gui, Add, Text, y501 xs section, % " Add: Disc. Allowed" Gui, Add, edit, vPFDA_ w40 h17 ys gSales, 0 ; PFDA_ = add discount Allowed Gui, Add, edit, vPFDAF_ w60 h17 ys readonly gSales, 0 ; PFDAF_ = PFDD_ + PFDA_ gui, Add, Text, y518 xs section, % " TO Interest on Capital " ; IOC Gui, Add, edit, vIOC w60 h17 ys, 0 Gui, Show,, FINAL ACCOUNTS return ; End of auto-execute section. The script is idle until the user does something. GuiClose: ButtonOK: Gui, Submit ; Save the input from the user TO each control's associated variable. MsgBox You entered "%FirstName% %LastName%". ExitApp esc::ExitApp Sales: Gui, Submit, NoHide GuiControl,, S_, % S - SR GuiControl,, T_, % S - SR + GDF_ +SO3 GuiControl,, T, % T_ GuiControl,, PRO, % P - RO GuiControl,, GP, % T_ - ( OS + P - RO + FAD + CI + WS + OW - _W + CGW + FL + ME ) GuiControl,, W, % WS + OW - _W GuiControl,, GP_, % GP GuiControl,, S__, % SA + OS_ - _S guicontrol,, IAIP, % IA - IP guicontrol,, RRT_, % RRT - RRTP guicontrol,, OTE_, % TE + OTE guicontrol,, PFDAF_, % PFDD_ + PFDA_ guicontrol,, DEP_, % DOa_ + DLB_ + DFF_ + DPM_ guicontrol,, PFDDR_,% PDDR_ + PFBD_ - PFEP_ GuiControl,, blR_, % bRR - blR GuiControl,, IAONO_,% IAOL + IAONO GuiControl,, RIA_, % AP - RIA GuiControl,, NP_, % GP_ + D + RDC + blR_ + DFI + IAONO_ + RIA_ + PSA GuiControl,, NP, % NP_ GuiControl,, NPT, % NP - ( S__ + GEA + IAIP + RRT_ + P_S + P_T + OTE_ + HL + LFU + AS + MSC + DEP_ + PFDDR_ + PFDAF_ + IOC ) GuiControl,, LRD, % RDC GuiControl,, CNPD, % NPT guicontrol,,LRD_, % SC - LRD guicontrol,,EOFinal, % EOW + EOS + EOO ;~ guicontrol,, CTotal, % CBB + CNDP guicontrol,,CTotal, % CBB + CNPD guicontrol,, CLDF, % CTotal - CLD guicontrol,, Liabi, % LRD_ + RRA + BP + APRC + EOFinal + CLDF + RABP guicontrol,, PBD_, % SD - PBD GuiControl,, P4D_, % PBD_ - P4D GuiControl,, Loan_in_, % loan + loan_in GuiControl,, EPRT_, % EPI + EPRT GuiControl,, L_B__, % L_B - L_B_ GuiControl,, P_M_, % P_M + P_M_I GuiControl,, P_M__, % P_M_ - P_M_D GuiControl,, F_F__, % F_F - F_F_ GuiControl,, patent__,% patent - patent_ GuiControl,, Assets, % CIH + CAB + BR + INv + P4D_ + loan_in_ + stock + UI + IC + EPRT_ + L_B__ + P_M__ + F_F__ + Patent__ ;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2)) return Purchases: Gui, Submit, NoHide ;~ GuiControl,, PRO, % P - RO ;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2)) return Wages: Gui, Submit, NoHide GuiControl,, W, % WS + OW - _W GuiControl,, T_, % S_ + GDF_ +SO3 ;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2)) return TOtal_: Gui, Submit, NoHide GuiControl,, T_, % S_ + GDF_ +SO3 ;~ GuiControl,, Special, % (a+b)/(1+(a*b/c**2)) return OnMessage(0x200, "WM_MOUSEMOVE") return WM_MOUSEMOVE() { static CurrControl, PrevControl, _TT ; _TT is kept blank for use by the ToolTip command below. CurrControl := A_GuiControl If (CurrControl <> PrevControl and not InStr(CurrControl, " ")) { ToolTip ; Turn off any previous tooltip. SetTimer, DisplayToolTip, 1000 PrevControl := CurrControl } return DisplayToolTip: SetTimer, DisplayToolTip, Off ToolTip % %CurrControl%_TT ; The leading percent sign tell it to use an expression. SetTimer, RemoveToolTip, 3000 return RemoveToolTip: SetTimer, RemoveToolTip, Off ToolTip return }
Broken Link for safety