home *** CD-ROM | disk | FTP | other *** search
/ UnrealScript Game Programming All in One / UnrealScriptGameProgrammingAllInOne.iso / UGPAIOListings / UGPAIOListingsCh10 / CH10LIST / Classes / CH10_05LIST.uc < prev    next >
Encoding:
Text File  |  2006-01-31  |  2.0 KB  |  74 lines
  1. // %PARAMETERS = "CH10LIST C:\UT2004"
  2. //Identifies the package
  3. //CH10_05LIST.uc
  4.  
  5. class CH10_05LIST extends Commandlet;
  6. function int Main(string Args)
  7. {
  8.   //#1
  9.   local int iInteger;
  10.   local float rReal;
  11.   local byte fByte;
  12.   local string szStringNumber;
  13.   local string szStringWord;
  14.   local bool bBoolean;
  15.   
  16.   fByte = 23;
  17.   iInteger = 1001;
  18.   rReal = 123.45;
  19.   szStringNumber = "1001";
  20.   szStringWord = "Word";
  21.   bBoolean = true;
  22.  
  23.   log("*************");
  24.   log("CH10_05LIST Casting numbers to bool " $ Chr(13) $ "");
  25.  
  26.  //#2 
  27.   //Casting numbers to bool
  28.   //Number constant assigned to a bool
  29.   //Cast the number - error results with bBoolean = 1;
  30.   bBoolean = bool(1);
  31.   log("1. Bool value of true: " @ bBoolean );
  32.  
  33.   bBoolean = bool(111);
  34.   // bBoolean if assigned a value greater than 1
  35.   log("2. Bool value of a number constant (111): " @ bBoolean );
  36.  
  37.   bBoolean = bool(-12);
  38.   // bBoolean if -12
  39.   log("3. Bool value of a negative number (-12): " @ bBoolean );
  40.   //#3 
  41.   //Assign a byte; fByte = 23 a nonzero value
  42.   bBoolean = bool(fByte);
  43.   log("4. Bool value of byte (23):" @ bBoolean );
  44.  
  45.   // bBoolean is true, iInteger = 1001 a nonzero value
  46.   bBoolean = bool(iInteger);
  47.   log("5. Bool value of integer (1001):" @ bBoolean );
  48.  
  49.   //#4
  50.   // bBoolean is true rReal = 123.45 a nonzero value
  51.   bBoolean = bool(rReal);
  52.   log("6. Bool value of float (123.45):" @ bBoolean );
  53.  
  54.   //#5
  55.   // bBoolean is true,  "1001" a nonzero value
  56.   bBoolean = bool(szStringNumber);
  57.   log("7. Bool value of string number (1001):" @ bBoolean );
  58.  
  59.   // bBoolean is false, "Hello," as string translates to zero
  60.   bBoolean = bool(szStringWord);
  61.   log("8. Bool value of string - Hello:" @ bBoolean );
  62.  
  63.   // bBoolean is true. The letter has a positive value
  64.   bBoolean = bool('b');
  65.   log("9. Bool value of character " 
  66.                       $ Chr(39) $ "b" $ Chr(39)  @ bBoolean );
  67.  
  68.   bBoolean = bool("b");
  69.   log("10. Bool value of string as letter "
  70.                       $ Chr(34) $ "b" $ Chr(34)  @ bBoolean );
  71.  
  72.   return 0;
  73. }  
  74.