From 5de3dd4762ca33a0f92e79ffa4fe2ff67069d531 Mon Sep 17 00:00:00 2001
From: tpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>
Date: Wed, 24 Feb 2010 01:49:02 +0000
Subject: Added KDE3 version of ktechlab

git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/applications/ktechlab@1095338 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
---
 src/flowparts/sub.cpp | 62 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 62 insertions(+)
 create mode 100644 src/flowparts/sub.cpp

(limited to 'src/flowparts/sub.cpp')

diff --git a/src/flowparts/sub.cpp b/src/flowparts/sub.cpp
new file mode 100644
index 0000000..222b167
--- /dev/null
+++ b/src/flowparts/sub.cpp
@@ -0,0 +1,62 @@
+/***************************************************************************
+ *   Copyright (C) 2003 by David Saxton                                    *
+ *   david@bluehaze.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.                                   *
+ ***************************************************************************/
+
+#include "sub.h"
+
+#include "libraryitem.h"
+#include "flowcode.h"
+
+#include <klocale.h>
+
+Item* Sub::construct( ItemDocument *itemDocument, bool newItem, const char *id )
+{
+	return new Sub( (ICNDocument*)itemDocument, newItem, id );
+}
+
+LibraryItem* Sub::libraryItem()
+{
+	return new LibraryItem(
+		QString("flow/sub"),
+		i18n("Subroutine"),
+		i18n("Common"),
+		"sub.png",
+		LibraryItem::lit_flowpart,
+		Sub::construct );
+}
+
+Sub::Sub( ICNDocument *icnDocument, bool newItem, const char *id )
+	: FlowContainer( icnDocument, newItem, (id) ? id : "sub" )
+{
+	m_name = i18n("Sub");
+	m_desc = i18n("Defines the starting point of a subroutine. Call this subroutine using \"Call Sub\"");
+	
+	createProperty( "sub", Variant::Type::Combo );
+	property("sub")->setCaption( i18n("Subroutine") );
+	property("sub")->setValue("MySub");
+}
+
+Sub::~Sub()
+{
+}
+
+void Sub::dataChanged()
+{
+	setCaption( "Sub " + dataString("sub") );
+}
+
+void Sub::generateMicrobe( FlowCode *code )
+{
+	code->addCode( "\nsub "+dataString("sub")+"\n{" );
+	code->addCodeBranch( outputPart("int_in") );
+	code->addCode("}");
+}
+
+
+// #include "sub.moc"
-- 
cgit v1.2.3