Hello,
Can anyone tell me the source code for FLAMES game in
Control Language Programming(CLP)of AS/400.
Answer Posted / sujith shetty
#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<string.h>
void main()
{ char str1[20];
char str2[20];
int r,x,y,n,count1,count2,points=0;
clrscr();
cout<<"\nPlease enter a boy's name: \n\n";
gets(str1);
cout<<"\nEnter a girl's name: \n\n";
gets(str2);
count1=strlen(str1);
count2=strlen(str2);
for (x=0; x<count1; x++)
{ for (y=0; y<count2; y++)
{ if (str1[x]==str2[y])
points++;
else;}
if(points!=0)
points++;
}
for (n=1; n<count1; n++)
{ if (str1[0]==str1[n])
points++;
else;}
cout<<"\n$Flame match$ \n",points;
r=points%6;
switch®
{
case 1:cout<<"\nFriends";
break;
case 2:cout<<"\nLovers";
break;
case 3:cout<<"\nAnger";
break;
case 4:cout<<"\nMarriage";
break;
case 5:cout<<"\nEngaged";
break;
case 6:cout<<"\nSweethearts";
break;
}
getch();
}
| Is This Answer Correct ? | 0 Yes | 3 No |
Post New Answer View All Answers
import java.awt.*; import java.awt.event.*; public class Agency extends Frame implements ActionListener { Label l1,l2,l3,l4; Button b1; TextField t1,t2; String s1,s2,s3,s4; public static void main(String args[]) { new Agency().setVisible(true); } public Agency() { super("Gas Agency Package"); setSize(1280,800); setBackground(Color.lightGray); setLayout(null); // setLayout(new BorderLayout()); t1=new TextField(20); t1.setBounds(440,150,200,30); t1.setBackground(Color.white); t2=new TextField(20); t2.setBounds(440,180,200,30); t2.setBackground(Color.white); t2.setEchoChar('*'); l1=new Label("Gas Agency Package"); l1.setBounds(400,30,300,50); l1.setFont(new Font("TimesRoman",Font.BOLD,25)); l1.setAlignment(Label.CENTER); l2=new Label("Enter your ID and Passoword"); l2.setFont(new Font("TimesRoman",Font.BOLD,20)); l2.setBounds(270,80,300,50); l3=new Label("Enter ID"); l2.setFont(new Font ("TimesRoman",Font.BOLD,20)); l3.setBounds(270,150,120,50); l4=new Label("Enter Passoword"); l2.setFont(new Font ("TimesRoman",Font.BOLD,20)); l4.setBounds(270,180,140,50); add(l1); add(l2); add(l3); add(t1); add(l4); add(t2); b1=new Button("Login"); b1.setBackground(Color.white); b1.setBounds(400,280,100,70); b1.addActionListener(this); add(b1); } public void actionPerformed(ActionEvent e) { if(e.getSource()==b1) { s3="svce"; s4="svce"; s1=t1.getText(); s2=t2.getText(); if(s1.equals(s3) && s2.equals(s4)) { //System.out.println("password is correct"); MenuForm m= new MenuForm(); m.setVisible(true); //this.dispose(); } else { System.out.println("password not correct"); } this.dispose(); } } } plzzzzzzz xplain me this java code like why i m including this packages n the whole code plzzzzzz
Write a program to Print the Pascal triangle
Write a program that implements a date class containing day, month and year as data members. Implement assignment operator and copy constructor in this class.
can any body give me answer to this question please? please give me code in cl with the folling specifications. 1.Accept 2 parameters-date and date type 2.If date type is J then convert date to *MDY format 3.If date type is M convert date to *JUL format 4. Send a program message with the value of converted date? Please give me the answer.Because im practicing in my house.Im taking trining on AS/400.
Dear sirs, Hi, I would like to inform you that I want to perform a project using MLP neural network to recognize binary images containing three types of geometric shapes such as squares,rectangels and circles. Furthermore,each image includes only one geometric type. The output of network would be: '1' if the network detects square shape. '2' if the network detects rectangle shape. '3' if the network detects circle shape. '4' if none of these shapes detected. Would you please send me a matlab source code for this project? Your prompt reply would be so appreciated. regards,
what full form name of B.K.U.
how to test the orientation of the layout in android.to note any changes in the ui design when change orientation
plzzzzzzzzz xplain this code import java.awt.*; import java.awt.event.*; import java.awt.MenuItem.*; import java.sql.*; import java.util.Date; import sun.jdbc.odbc.*; import java.io.*; public class RefillBooking extends Frame implements ActionListener { Label l1,l2,l3,l4,l5,l6,l7,l8,l9,l10,l11,l12,l13; Button exit,save,next,top,prev,botm,ad,show; TextField txtBookingNo,txtConsNo,txtBookingDt,txtConsName,txtAddr1,txt PhNo,txtBookDtold,txtPrintDt,txtCMemoNo,txtOldDlryDt,adr2,ad r3,tot,stnry,rmrk; Date date=new Date(); String ConsName; String Addr1; public static void main(String sr[]) { new RefillBooking().setVisible(true); } public RefillBooking() { super("Refill Booking"); Statement stmt; ResultSet rs; //PreparedStatement pst; Connection con; try { Class.forName ("sun.jdbc.odbc.JdbcOdbcDriver"); con=DriverManager.getConnection("jdbc:odbc:Agency"); if (con!=null); System.out.println ("connected"); stmt =con.createStatement (); } catch(Exception e1) { System.out.println (e1); } setSize(1280,800); setBackground(Color.lightGray); setLayout(null); l1=new Label("Booking No"); l1.setBounds(260,60,90,30); l1.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l1.setAlignment(Label.CENTER); add(l1); l2=new Label("CONSMR NO"); l2.setBounds(30,60,90,30); l2.setFont(new Font("TimesRoman",Font.PLAIN,15)); l2.setAlignment(Label.CENTER); add(l2); l3=new Label("Book DATE (mm/dd/yyyy)"); l3.setBounds(520,60,190,30); l3.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l3.setAlignment(Label.CENTER); add(l3); l4=new Label("NAME"); l4.setBounds(30,150,45,30); l4.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l4.setAlignment(Label.CENTER); add(l4); l5=new Label("ADRS"); l5.setBounds(30,220,45,30); l5.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l5.setAlignment(Label.CENTER); add(l5); l6=new Label("PH NO"); l6.setBounds(500,150,45,30); l6.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l6.setAlignment(Label.CENTER); add(l6); l7=new Label("OldBkDt"); l7.setBounds(30,390,55,30); l7.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l7.setAlignment(Label.CENTER); add(l7); l8=new Label("Print Date"); l8.setBounds(320,390,65,30); l8.setFont(new Font("TimesRoman",Font.PLAIN,15)); l8.setAlignment(Label.CENTER); add(l8); l9=new Label("CMemo No"); l9.setBounds(700,390,65,30); l9.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l9.setAlignment(Label.CENTER); add(l9); l10=new Label("Del Date"); l10.setBounds(550,390,55,30); l10.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l10.setAlignment(Label.CENTER); add(l10); l13=new Label("REMARKS"); l13.setBounds (30,630,85,30); l13.setFont(new Font ("TimesRoman",Font.PLAIN,15)); l13.setAlignment (Label.CENTER); add(l13); txtBookingNo=new TextField(); txtBookingNo.setBounds(375,60,80,30); txtBookingNo.setBackground(Color.white); add(txtBookingNo); txtConsNo=new TextField(); txtConsNo.setBounds(130,60,80,30); txtConsNo.setBackground(Color.white); add(txtConsNo); txtBookingDt=new TextField(); txtBookingDt.setBounds(750,60,80,30); txtBookingDt.setBackground(Color.white); add(txtBookingDt); txtConsName=new TextField(); txtConsName.setBounds(100,150,200,30); txtConsName.setBackground(Color.white); add(txtConsName); txtAddr1=new TextField(); txtAddr1.setBounds(100,220,350,30); txtAddr1.setBackground(Color.white); add(txtAddr1); adr2=new TextField(); adr2.setBounds(100,250,350,30); adr2.setBackground(Color.white); add(adr2); adr3=new TextField(); adr3.setBounds(100,280,350,30); adr3.setBackground(Color.white); add(adr3); txtPhNo=new TextField(); txtPhNo.setBounds(570,150,150,30); txtPhNo.setBackground(Color.white); add(txtPhNo); txtBookDtold=new TextField(); txtBookDtold.setBounds(30,440,60,30); txtBookDtold.setBackground(Color.white); add(txtBookDtold); txtPrintDt=new TextField(); txtPrintDt.setBounds(320,440,60,30); txtPrintDt.setBackground(Color.white); add(txtPrintDt); txtCMemoNo=new TextField(); txtCMemoNo.setBounds(700,440,60,30); txtCMemoNo.setBackground(Color.white); add(txtCMemoNo); txtOldDlryDt=new TextField(); txtOldDlryDt.setBounds(550,440,60,30); txtOldDlryDt.setBackground(Color.white); add(txtOldDlryDt); rmrk=new TextField(); rmrk.setBounds(140,630,600,30); rmrk.setBackground(Color.white); add(rmrk); exit=new Button("EXIT"); exit.setBackground(Color.orange); exit.setBounds(760,700,40,40); exit.addActionListener(this); add(exit); save=new Button("SAVE"); save.setBackground(Color.orange); save.setBounds(715,700,40,40); save.addActionListener(this); add(save); next=new Button("NEXT"); next.setBackground(Color.orange); next.setBounds(90,700,40,40); next.addActionListener(this); add(next); top=new Button("TOP"); top.setBackground(Color.orange); top.setBounds(0,700,40,40); top.addActionListener(this); add(top); prev=new Button("PREV"); prev.setBackground(Color.orange); prev.setBounds(45,700,40,40); prev.addActionListener(this); add(prev); botm=new Button("BOTM"); botm.setBackground (Color.orange); botm.setBounds (135,700,40,40); botm.addActionListener (this); add(botm); ad=new Button("ADD"); ad.setBackground (Color.orange); ad.setBounds (300,700,40,40); ad.addActionListener (this); add(ad); show=new Button("SHOW"); show.setBackground (Color.orange); show.setBounds (345,700,40,40); show.addActionListener (this); add(show); } public void actionPerformed(ActionEvent e) { if(e.getSource()==exit) { this.dispose(); System.exit(0); } if(e.getSource()==save) { int bkflag=1; try { Connection con=DriverManager.getConnection("jdbc:odbc:Agency"); PreparedStatement pst=con.prepareStatement("INSERT INTO RefillBooking VALUES (?,?,?,?)"); pst.setInt (1,Integer.parseInt(txtBookingNo.getText())); pst.setInt (2,Integer.parseInt(txtConsNo.getText())); pst.setString (3,txtBookingDt.getText()); pst.setInt(4,bkflag); /* pst.setString (4,txtConsName.getText()); pst.setString (6,txtAddr1.getText()); pst.setString(7,adr2.getText ()); pst.setString(8,adr3.getText ()); pst.setInt(9,Integer.parseInt (txtCylQty.getText())); pst.setInt (10,Integer.parseInt(txtCylDep.getText())); pst.setInt (11,Integer.parseInt(txtRegQty.getText())); pst.setInt (12,Integer.parseInt(txtRegDep.getText())); pst.setInt (13,Integer.parseInt(tot.getText())); pst.setInt (14,Integer.parseInt(stnry.getText())); pst.setString(15,rmrk.getText ());*/ pst.executeUpdate(); con.close(); } catch(Exception e2) {System.out.println(e2);} } if(e.getSource()==show) { System.out.println("entered if body"); try { //to bring consumer's details Connection con2=DriverManager.getConnection("jdbc:odbc:Agency"); int consumer=Integer.parseInt (txtConsNo.getText()); PreparedStatement ps2=con2.prepareStatement("SELECT * FROM NewCon WHERE Cons_No=?"); ps2.setInt(1,consumer); ResultSet rs2= ps2.executeQuery(); while(rs2.next()) { System.out.print ("entered while"+rs2.getString(2)); txtConsName.setText (rs2.getString("Cons_Name")); txtAddr1.setText (rs2.getString("Adress1")); txtPhNo.setText (""+rs2.getInt("Ph_No")); adr2.setText (rs2.getString("Adress2")); adr3.setText (rs2.getString("Adress3")); rmrk.setText(""); } //Statement stmt3=con2.createStatement(); //ResultSet rs3=stmt3.executeQuery("SELECT CMemoNo,CMemo_Date,DeliveryDate FROM CashMemo where Cons_No="+consumer); con2.close(); } catch(Exception e2) {System.out.println(e2);} } if(e.getSource()==ad) { int newbkno=0; System.out.println("entered if body"); try { //to clear textboxes txtConsName.setText(""); txtAddr1.setText(""); txtBookingNo.setText(""); txtPhNo.setText(""); adr2.setText(""); adr3.setText(""); rmrk.setText(""); txtConsNo.setText(""); txtBookingDt.setText("" + date); txtBookDtold.setText(""); txtPrintDt.setText(""); txtCMemoNo.setText(""); txtOldDlryDt.setText(""); //to generate bookin no System.out.println("entered the try:"); Connection con1=DriverManager.getConnection("jdbc:odbc:Agency"); Statement stmt1=con1.createStatement(); ResultSet rs1=stmt1.executeQuery ("SELECT BookingNo FROM RefillBooking "); while(rs1.next()) { txtBookingNo.setText (""+rs1.getInt(1)); } newbkno=Integer.parseInt (txtBookingNo.getText()); System.out.println(newbkno); newbkno=newbkno+1; txtBookingNo.setText(""+newbkno); } catch(Exception e4){System.out.println(e4);} } } }
How to get the version(major,minor,revision ) of VB6.0 delphi code .I am able to fetch dll file of vb6.0 but not vba file .Can u send me the code snippet in delphi to get the value for vb6.0.
Write a Program to find whether the given number is a Armstrong number.
i want run following code on button click of view. i am trying to retrieve data from isc_order_details table and isc_product table. but after retriaval of data i m getting error like FIELD MUST BE ENTERED!! DECLARE m number; n number; CURSOR order_details IS SELECT PRODUCT_ORDER_QUAN,PRODUCT_ID FROM isc_order_details WHERE order_id=:isc_order_master.order_id; amount NUMBER (8,2):=0.0; alert number; BEGIN go_block('isc_order_details'); first_record; m:=:system.cursor_record; last_record; n:=:system.cursor_record; OPEN order_details; --for i in m..n loop FETCH order_details INTO :ISC_ORDER_DETAILS.PRODUCT_ORDER_QUAN,:ISC_ORDER_DETAIL S.PRODUCT_ID; IF order_details%FOUND THEN SELECT order_value,order_date INTO :ISC_ORDER_MASTER.ORDER_VALUE,:ISC_ORDER_MASTER.ORDER_D ATE FROM isc_order_master WHERE order_id=:ISC_ORDER_MASTER.ORDER_ID; SELECT product_desc,product_price INTO :ISC_ORDER_DETAILS.PRODUCT_DESC,:ISC_ORDER_DETAILS.PROD UCT_PRICE FROM isc_product WHERE product_id=:ISC_ORDER_DETAILS.PRODUCT_ID; next_record; END IF; EXIT WHEN order_details%NOTFOUND; END LOOP; last_record; CLOSE order_details; EXCEPTION when NO_DATA_FOUND then alert:=SHOW_ALERT('ENTER_DATA'); Go_Item('isc_order_master.order_id'); END;
How many digit have a Polaris 1995 300c.c. 2x4 nad how many have a Polaris 2007 300 c.c 2x4? And what site I can check this information???
JasperETL how to install and create simple project explain me clearly fnds iam wtg for ur rply
Write a Program to truncate a given floating point value (e.g.16.25=16).
Write a code snippet to display an integer in a binary format?