home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / misc / volume37 / mgiccube / part01 < prev    next >
Encoding:
Text File  |  1993-05-15  |  59.5 KB  |  1,762 lines
  1. Newsgroups: comp.sources.misc
  2. From: fleurant@hri.com (P.Fleurant)
  3. Subject: v37i038:  magiccube - a cube simulator for X11/Motif, Part01/05
  4. Message-ID: <csm-v37i038=magiccube.162752@sparky.IMD.Sterling.COM>
  5. X-Md4-Signature: ae469947ce34c680083cb5f03bd9a5b7
  6. Date: Mon, 10 May 1993 21:28:15 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: fleurant@hri.com (P.Fleurant)
  10. Posting-number: Volume 37, Issue 38
  11. Archive-name: magiccube/part01
  12. Environment: X11, Motif, ANSI-C
  13.  
  14. This is a R*b*ks' Cube Simulator with a solver by Don Taylor.
  15.  
  16. P.Fleurant                                          Horizon Research, Inc.
  17. fleurant@hri.com                                    Waltham, MA 
  18. -----------------------
  19. #! /bin/sh
  20. # This is a shell archive.  Remove anything before this line, then feed it
  21. # into a shell via "sh file" or similar.  To overwrite existing files,
  22. # type "sh file -c".
  23. # Contents:  cube cube/LICENSE cube/cube.h cube/layer1corner.c cube/lib
  24. #   cube/lib/Makefile
  25. # Wrapped by kent@sparky on Mon May 10 16:15:40 1993
  26. PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin ; export PATH
  27. echo If this archive is complete, you will see the following message:
  28. echo '          "shar: End of archive 1 (of 5)."'
  29. if test ! -d 'cube' ; then
  30.     echo shar: Creating directory \"'cube'\"
  31.     mkdir 'cube'
  32. fi
  33. if test -f 'cube/LICENSE' -a "${1}" != "-c" ; then 
  34.   echo shar: Will not clobber existing file \"'cube/LICENSE'\"
  35. else
  36.   echo shar: Extracting \"'cube/LICENSE'\" \(17982 characters\)
  37.   sed "s/^X//" >'cube/LICENSE' <<'END_OF_FILE'
  38. X            GNU GENERAL PUBLIC LICENSE
  39. X               Version 2, June 1991
  40. X
  41. X Copyright (C) 1989, 1991 Free Software Foundation, Inc.
  42. X                          675 Mass Ave, Cambridge, MA 02139, USA
  43. X Everyone is permitted to copy and distribute verbatim copies
  44. X of this license document, but changing it is not allowed.
  45. X
  46. X                Preamble
  47. X
  48. X  The licenses for most software are designed to take away your
  49. Xfreedom to share and change it.  By contrast, the GNU General Public
  50. XLicense is intended to guarantee your freedom to share and change free
  51. Xsoftware--to make sure the software is free for all its users.  This
  52. XGeneral Public License applies to most of the Free Software
  53. XFoundation's software and to any other program whose authors commit to
  54. Xusing it.  (Some other Free Software Foundation software is covered by
  55. Xthe GNU Library General Public License instead.)  You can apply it to
  56. Xyour programs, too.
  57. X
  58. X  When we speak of free software, we are referring to freedom, not
  59. Xprice.  Our General Public Licenses are designed to make sure that you
  60. Xhave the freedom to distribute copies of free software (and charge for
  61. Xthis service if you wish), that you receive source code or can get it
  62. Xif you want it, that you can change the software or use pieces of it
  63. Xin new free programs; and that you know you can do these things.
  64. X
  65. X  To protect your rights, we need to make restrictions that forbid
  66. Xanyone to deny you these rights or to ask you to surrender the rights.
  67. XThese restrictions translate to certain responsibilities for you if you
  68. Xdistribute copies of the software, or if you modify it.
  69. X
  70. X  For example, if you distribute copies of such a program, whether
  71. Xgratis or for a fee, you must give the recipients all the rights that
  72. Xyou have.  You must make sure that they, too, receive or can get the
  73. Xsource code.  And you must show them these terms so they know their
  74. Xrights.
  75. X
  76. X  We protect your rights with two steps: (1) copyright the software, and
  77. X(2) offer you this license which gives you legal permission to copy,
  78. Xdistribute and/or modify the software.
  79. X
  80. X  Also, for each author's protection and ours, we want to make certain
  81. Xthat everyone understands that there is no warranty for this free
  82. Xsoftware.  If the software is modified by someone else and passed on, we
  83. Xwant its recipients to know that what they have is not the original, so
  84. Xthat any problems introduced by others will not reflect on the original
  85. Xauthors' reputations.
  86. X
  87. X  Finally, any free program is threatened constantly by software
  88. Xpatents.  We wish to avoid the danger that redistributors of a free
  89. Xprogram will individually obtain patent licenses, in effect making the
  90. Xprogram proprietary.  To prevent this, we have made it clear that any
  91. Xpatent must be licensed for everyone's free use or not licensed at all.
  92. X
  93. X  The precise terms and conditions for copying, distribution and
  94. Xmodification follow.
  95. X
  96. X            GNU GENERAL PUBLIC LICENSE
  97. X   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
  98. X
  99. X  0. This License applies to any program or other work which contains
  100. Xa notice placed by the copyright holder saying it may be distributed
  101. Xunder the terms of this General Public License.  The "Program", below,
  102. Xrefers to any such program or work, and a "work based on the Program"
  103. Xmeans either the Program or any derivative work under copyright law:
  104. Xthat is to say, a work containing the Program or a portion of it,
  105. Xeither verbatim or with modifications and/or translated into another
  106. Xlanguage.  (Hereinafter, translation is included without limitation in
  107. Xthe term "modification".)  Each licensee is addressed as "you".
  108. X
  109. XActivities other than copying, distribution and modification are not
  110. Xcovered by this License; they are outside its scope.  The act of
  111. Xrunning the Program is not restricted, and the output from the Program
  112. Xis covered only if its contents constitute a work based on the
  113. XProgram (independent of having been made by running the Program).
  114. XWhether that is true depends on what the Program does.
  115. X
  116. X  1. You may copy and distribute verbatim copies of the Program's
  117. Xsource code as you receive it, in any medium, provided that you
  118. Xconspicuously and appropriately publish on each copy an appropriate
  119. Xcopyright notice and disclaimer of warranty; keep intact all the
  120. Xnotices that refer to this License and to the absence of any warranty;
  121. Xand give any other recipients of the Program a copy of this License
  122. Xalong with the Program.
  123. X
  124. XYou may charge a fee for the physical act of transferring a copy, and
  125. Xyou may at your option offer warranty protection in exchange for a fee.
  126. X
  127. X  2. You may modify your copy or copies of the Program or any portion
  128. Xof it, thus forming a work based on the Program, and copy and
  129. Xdistribute such modifications or work under the terms of Section 1
  130. Xabove, provided that you also meet all of these conditions:
  131. X
  132. X    a) You must cause the modified files to carry prominent notices
  133. X    stating that you changed the files and the date of any change.
  134. X
  135. X    b) You must cause any work that you distribute or publish, that in
  136. X    whole or in part contains or is derived from the Program or any
  137. X    part thereof, to be licensed as a whole at no charge to all third
  138. X    parties under the terms of this License.
  139. X
  140. X    c) If the modified program normally reads commands interactively
  141. X    when run, you must cause it, when started running for such
  142. X    interactive use in the most ordinary way, to print or display an
  143. X    announcement including an appropriate copyright notice and a
  144. X    notice that there is no warranty (or else, saying that you provide
  145. X    a warranty) and that users may redistribute the program under
  146. X    these conditions, and telling the user how to view a copy of this
  147. X    License.  (Exception: if the Program itself is interactive but
  148. X    does not normally print such an announcement, your work based on
  149. X    the Program is not required to print an announcement.)
  150. X
  151. XThese requirements apply to the modified work as a whole.  If
  152. Xidentifiable sections of that work are not derived from the Program,
  153. Xand can be reasonably considered independent and separate works in
  154. Xthemselves, then this License, and its terms, do not apply to those
  155. Xsections when you distribute them as separate works.  But when you
  156. Xdistribute the same sections as part of a whole which is a work based
  157. Xon the Program, the distribution of the whole must be on the terms of
  158. Xthis License, whose permissions for other licensees extend to the
  159. Xentire whole, and thus to each and every part regardless of who wrote it.
  160. X
  161. XThus, it is not the intent of this section to claim rights or contest
  162. Xyour rights to work written entirely by you; rather, the intent is to
  163. Xexercise the right to control the distribution of derivative or
  164. Xcollective works based on the Program.
  165. X
  166. XIn addition, mere aggregation of another work not based on the Program
  167. Xwith the Program (or with a work based on the Program) on a volume of
  168. Xa storage or distribution medium does not bring the other work under
  169. Xthe scope of this License.
  170. X
  171. X  3. You may copy and distribute the Program (or a work based on it,
  172. Xunder Section 2) in object code or executable form under the terms of
  173. XSections 1 and 2 above provided that you also do one of the following:
  174. X
  175. X    a) Accompany it with the complete corresponding machine-readable
  176. X    source code, which must be distributed under the terms of Sections
  177. X    1 and 2 above on a medium customarily used for software interchange; or,
  178. X
  179. X    b) Accompany it with a written offer, valid for at least three
  180. X    years, to give any third party, for a charge no more than your
  181. X    cost of physically performing source distribution, a complete
  182. X    machine-readable copy of the corresponding source code, to be
  183. X    distributed under the terms of Sections 1 and 2 above on a medium
  184. X    customarily used for software interchange; or,
  185. X
  186. X    c) Accompany it with the information you received as to the offer
  187. X    to distribute corresponding source code.  (This alternative is
  188. X    allowed only for noncommercial distribution and only if you
  189. X    received the program in object code or executable form with such
  190. X    an offer, in accord with Subsection b above.)
  191. X
  192. XThe source code for a work means the preferred form of the work for
  193. Xmaking modifications to it.  For an executable work, complete source
  194. Xcode means all the source code for all modules it contains, plus any
  195. Xassociated interface definition files, plus the scripts used to
  196. Xcontrol compilation and installation of the executable.  However, as a
  197. Xspecial exception, the source code distributed need not include
  198. Xanything that is normally distributed (in either source or binary
  199. Xform) with the major components (compiler, kernel, and so on) of the
  200. Xoperating system on which the executable runs, unless that component
  201. Xitself accompanies the executable.
  202. X
  203. XIf distribution of executable or object code is made by offering
  204. Xaccess to copy from a designated place, then offering equivalent
  205. Xaccess to copy the source code from the same place counts as
  206. Xdistribution of the source code, even though third parties are not
  207. Xcompelled to copy the source along with the object code.
  208. X
  209. X  4. You may not copy, modify, sublicense, or distribute the Program
  210. Xexcept as expressly provided under this License.  Any attempt
  211. Xotherwise to copy, modify, sublicense or distribute the Program is
  212. Xvoid, and will automatically terminate your rights under this License.
  213. XHowever, parties who have received copies, or rights, from you under
  214. Xthis License will not have their licenses terminated so long as such
  215. Xparties remain in full compliance.
  216. X
  217. X  5. You are not required to accept this License, since you have not
  218. Xsigned it.  However, nothing else grants you permission to modify or
  219. Xdistribute the Program or its derivative works.  These actions are
  220. Xprohibited by law if you do not accept this License.  Therefore, by
  221. Xmodifying or distributing the Program (or any work based on the
  222. XProgram), you indicate your acceptance of this License to do so, and
  223. Xall its terms and conditions for copying, distributing or modifying
  224. Xthe Program or works based on it.
  225. X
  226. X  6. Each time you redistribute the Program (or any work based on the
  227. XProgram), the recipient automatically receives a license from the
  228. Xoriginal licensor to copy, distribute or modify the Program subject to
  229. Xthese terms and conditions.  You may not impose any further
  230. Xrestrictions on the recipients' exercise of the rights granted herein.
  231. XYou are not responsible for enforcing compliance by third parties to
  232. Xthis License.
  233. X
  234. X  7. If, as a consequence of a court judgment or allegation of patent
  235. Xinfringement or for any other reason (not limited to patent issues),
  236. Xconditions are imposed on you (whether by court order, agreement or
  237. Xotherwise) that contradict the conditions of this License, they do not
  238. Xexcuse you from the conditions of this License.  If you cannot
  239. Xdistribute so as to satisfy simultaneously your obligations under this
  240. XLicense and any other pertinent obligations, then as a consequence you
  241. Xmay not distribute the Program at all.  For example, if a patent
  242. Xlicense would not permit royalty-free redistribution of the Program by
  243. Xall those who receive copies directly or indirectly through you, then
  244. Xthe only way you could satisfy both it and this License would be to
  245. Xrefrain entirely from distribution of the Program.
  246. X
  247. XIf any portion of this section is held invalid or unenforceable under
  248. Xany particular circumstance, the balance of the section is intended to
  249. Xapply and the section as a whole is intended to apply in other
  250. Xcircumstances.
  251. X
  252. XIt is not the purpose of this section to induce you to infringe any
  253. Xpatents or other property right claims or to contest validity of any
  254. Xsuch claims; this section has the sole purpose of protecting the
  255. Xintegrity of the free software distribution system, which is
  256. Ximplemented by public license practices.  Many people have made
  257. Xgenerous contributions to the wide range of software distributed
  258. Xthrough that system in reliance on consistent application of that
  259. Xsystem; it is up to the author/donor to decide if he or she is willing
  260. Xto distribute software through any other system and a licensee cannot
  261. Ximpose that choice.
  262. X
  263. XThis section is intended to make thoroughly clear what is believed to
  264. Xbe a consequence of the rest of this License.
  265. X
  266. X  8. If the distribution and/or use of the Program is restricted in
  267. Xcertain countries either by patents or by copyrighted interfaces, the
  268. Xoriginal copyright holder who places the Program under this License
  269. Xmay add an explicit geographical distribution limitation excluding
  270. Xthose countries, so that distribution is permitted only in or among
  271. Xcountries not thus excluded.  In such case, this License incorporates
  272. Xthe limitation as if written in the body of this License.
  273. X
  274. X  9. The Free Software Foundation may publish revised and/or new versions
  275. Xof the General Public License from time to time.  Such new versions will
  276. Xbe similar in spirit to the present version, but may differ in detail to
  277. Xaddress new problems or concerns.
  278. X
  279. XEach version is given a distinguishing version number.  If the Program
  280. Xspecifies a version number of this License which applies to it and "any
  281. Xlater version", you have the option of following the terms and conditions
  282. Xeither of that version or of any later version published by the Free
  283. XSoftware Foundation.  If the Program does not specify a version number of
  284. Xthis License, you may choose any version ever published by the Free Software
  285. XFoundation.
  286. X
  287. X  10. If you wish to incorporate parts of the Program into other free
  288. Xprograms whose distribution conditions are different, write to the author
  289. Xto ask for permission.  For software which is copyrighted by the Free
  290. XSoftware Foundation, write to the Free Software Foundation; we sometimes
  291. Xmake exceptions for this.  Our decision will be guided by the two goals
  292. Xof preserving the free status of all derivatives of our free software and
  293. Xof promoting the sharing and reuse of software generally.
  294. X
  295. X                NO WARRANTY
  296. X
  297. X  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
  298. XFOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
  299. XOTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
  300. XPROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
  301. XOR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  302. XMERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
  303. XTO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
  304. XPROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
  305. XREPAIR OR CORRECTION.
  306. X
  307. X  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
  308. XWILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
  309. XREDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
  310. XINCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
  311. XOUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
  312. XTO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
  313. XYOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
  314. XPROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
  315. XPOSSIBILITY OF SUCH DAMAGES.
  316. X
  317. X             END OF TERMS AND CONDITIONS
  318. X
  319. X    Appendix: How to Apply These Terms to Your New Programs
  320. X
  321. X  If you develop a new program, and you want it to be of the greatest
  322. Xpossible use to the public, the best way to achieve this is to make it
  323. Xfree software which everyone can redistribute and change under these terms.
  324. X
  325. X  To do so, attach the following notices to the program.  It is safest
  326. Xto attach them to the start of each source file to most effectively
  327. Xconvey the exclusion of warranty; and each file should have at least
  328. Xthe "copyright" line and a pointer to where the full notice is found.
  329. X
  330. X    <one line to give the program's name and a brief idea of what it does.>
  331. X    Copyright (C) 19yy  <name of author>
  332. X
  333. X    This program is free software; you can redistribute it and/or modify
  334. X    it under the terms of the GNU General Public License as published by
  335. X    the Free Software Foundation; either version 2 of the License, or
  336. X    (at your option) any later version.
  337. X
  338. X    This program is distributed in the hope that it will be useful,
  339. X    but WITHOUT ANY WARRANTY; without even the implied warranty of
  340. X    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  341. X    GNU General Public License for more details.
  342. X
  343. X    You should have received a copy of the GNU General Public License
  344. X    along with this program; if not, write to the Free Software
  345. X    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  346. X
  347. XAlso add information on how to contact you by electronic and paper mail.
  348. X
  349. XIf the program is interactive, make it output a short notice like this
  350. Xwhen it starts in an interactive mode:
  351. X
  352. X    Gnomovision version 69, Copyright (C) 19yy name of author
  353. X    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
  354. X    This is free software, and you are welcome to redistribute it
  355. X    under certain conditions; type `show c' for details.
  356. X
  357. XThe hypothetical commands `show w' and `show c' should show the appropriate
  358. Xparts of the General Public License.  Of course, the commands you use may
  359. Xbe called something other than `show w' and `show c'; they could even be
  360. Xmouse-clicks or menu items--whatever suits your program.
  361. X
  362. XYou should also get your employer (if you work as a programmer) or your
  363. Xschool, if any, to sign a "copyright disclaimer" for the program, if
  364. Xnecessary.  Here is a sample; alter the names:
  365. X
  366. X  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
  367. X  `Gnomovision' (which makes passes at compilers) written by James Hacker.
  368. X
  369. X  <signature of Ty Coon>, 1 April 1989
  370. X  Ty Coon, President of Vice
  371. X
  372. XThis General Public License does not permit incorporating your program into
  373. Xproprietary programs.  If your program is a subroutine library, you may
  374. Xconsider it more useful to permit linking proprietary applications with the
  375. Xlibrary.  If this is what you want to do, use the GNU Library General
  376. XPublic License instead of this License.
  377. END_OF_FILE
  378.   if test 17982 -ne `wc -c <'cube/LICENSE'`; then
  379.     echo shar: \"'cube/LICENSE'\" unpacked with wrong size!
  380.   fi
  381.   # end of 'cube/LICENSE'
  382. fi
  383. if test -f 'cube/cube.h' -a "${1}" != "-c" ; then 
  384.   echo shar: Will not clobber existing file \"'cube/cube.h'\"
  385. else
  386.   echo shar: Extracting \"'cube/cube.h'\" \(14880 characters\)
  387.   sed "s/^X//" >'cube/cube.h' <<'END_OF_FILE'
  388. X/**********************************************************************************
  389. X * cube.h: declarations for the cube program
  390. X *The following references were used:
  391. X   "The X Window System Programming And Applications with Xt
  392. X   OSF/MOTIF EDITION"
  393. X   by Douglas A Young 
  394. X   Prentice-Hall, 1990.
  395. X   ISBN 0-13-642786-3
  396. X
  397. X   "Mastering Rubik's Cube"
  398. X   by Don Taylor
  399. X   An Owl Book; Holt, Rinehart and Winston, New York, 1980
  400. X   ISBN 0-03-059941-5
  401. X
  402. X-------------------------------------------------------------------
  403. XCopyright (C) 1993 by Pierre A. Fleurant
  404. XPermission is granted to copy and distribute this program
  405. Xwithout charge, provided this copyright notice is included
  406. Xin the copy.
  407. XThis Software is distributed on an as-is basis. There will be
  408. XABSOLUTELY NO WARRANTY for any part of this software to work
  409. Xcorrect. In no case will the author be liable to you for damages
  410. Xcaused by the usage of this software.
  411. X-------------------------------------------------------------------
  412. X */
  413. X
  414. X#include <X11/StringDefs.h>
  415. X#include <X11/cursorfont.h>
  416. X#include <X11/Intrinsic.h> 
  417. X#include <X11/Xutil.h>
  418. X#include <Xm/Xm.h>
  419. X#include <Xm/DrawingA.h>
  420. X#include <Xm/RowColumn.h>
  421. X#include <Xm/Form.h>
  422. X#include <Xm/PushB.h>
  423. X#include <Xm/ToggleB.h>
  424. X#include <Xm/Label.h>
  425. X#include <math.h>
  426. X#include "libXs.h"
  427. X
  428. X#define DEFAULT_DELTA_ANGLE 30
  429. X
  430. X/* application context, display */
  431. XXtAppContext appContext;
  432. XDisplay *xDisplay;
  433. X
  434. X/* #define MotifBC YES */
  435. X
  436. XBoolean Draw_Enable           = TRUE; 
  437. XBoolean Cube_Side_Chosen      = FALSE;
  438. XBoolean Fill_Pattern_Chosen   = FALSE;
  439. X
  440. X/* Used for cornermap array. See align_subfaces in cube.c */
  441. Xtypedef struct {
  442. X  int a;
  443. X  int b;
  444. X  int c;
  445. X} Corner;
  446. X
  447. X/* Used for edge array. See align_subfaces in cube.c */
  448. Xtypedef struct {
  449. X  int a;
  450. X  int b;
  451. X} Edge;
  452. X
  453. X/*  help information */
  454. X
  455. Xchar *tophelp_str[] = {
  456. X  "Init Cube: init cube to pattern desired",
  457. X  "Pristine: to start with a pristine cube",
  458. X  "Quit: exit",
  459. X  "rotate,spin,flip: turns whole cube",
  460. X  "!front, !left, !right,...: operates on 1/3 of cube",
  461. X  "  ",
  462. X  "  ",
  463. X  "",""};
  464. X
  465. Xstatic unsigned char fg_bitmap[32] = {
  466. X      0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, /* solid foreground  */
  467. X      0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 
  468. X      0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 
  469. X      0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff  
  470. X};
  471. X#define fg_width  16
  472. X#define fg_height 16
  473. X
  474. X/* the initial colors of the 6 sides of the cube */
  475. Xchar *seed_color[] = {
  476. X/*  0      1        2         3             4        5     
  477. X    front  left     right     back          top      bottom  
  478. X */
  479. X   "red", "yellow", "orange", "light grey", "blue", "green"
  480. X};
  481. X
  482. X/* the names of the 6 sides of the cube */
  483. Xchar *side_names[] = {
  484. X  "front", "left", "right", "back", "top", "bottom"  
  485. X};
  486. X
  487. X/* Menu bar data */
  488. Xextern void spin_it();
  489. Xextern void rot_it();
  490. Xextern void flip_it();
  491. Xextern void quit_it();
  492. Xextern void init_cube();
  493. Xextern void clear_draw();
  494. Xextern void cubik_front();
  495. Xextern void cubik_left();
  496. Xextern void cubik_right();
  497. Xextern void cubik_back();
  498. Xextern void cubik_top();
  499. Xextern void cubik_bottom();
  500. X
  501. X/*
  502. X * Create the list of menu items for a sub menu pane.
  503. X */
  504. Xstatic xs_menu_struct OpData[] = {
  505. X  {"rotate", rot_it, "ignore", NULL, 0, NULL},
  506. X  {"spin", spin_it, "ignore", NULL, 0, NULL},
  507. X  {"flip", flip_it, "ignore", NULL, 0 ,NULL},
  508. X  {"!front", cubik_front, "ignore", NULL, 0, NULL},
  509. X  {"!left",  cubik_left, "ignore", NULL, 0, NULL},
  510. X  {"!right", cubik_right, "ignore", NULL, 0, NULL},
  511. X  {"!back",  cubik_back, "ignore", NULL, 0, NULL},
  512. X  {"!top",   cubik_top, "ignore", NULL, 0, NULL},
  513. X  {"!bottom",cubik_bottom, "ignore", NULL, 0, NULL}
  514. X};
  515. X
  516. X/*
  517. X * Describe the menu bar, giving only the names to appear in
  518. X * the menu bar and pointers to each pulldown pane.
  519. X */
  520. Xstatic xs_menu_struct PulldownData[] = {
  521. X  {"Operate" , NULL,  NULL,  
  522. X    OpData, XtNumber(OpData), NULL}
  523. X};
  524. X
  525. X/* Old cube0 values. 
  526. X   #define MR_X  150
  527. X   #define MR_Y  125
  528. X   #define Z_DEPTH 0
  529. X*/
  530. X/* With following values cube is centered about (0,0,0) */
  531. X#define MR_X  (-75)
  532. X#define MR_Y  (-75)
  533. X#define Z_DEPTH (-75)
  534. X
  535. X#define WINDOW_CENTER_X 225
  536. X#define WINDOW_CENTER_Y 200
  537. X
  538. X#define PROJECTION_DEPTH 500
  539. X#define FACE0_WIDTH  50
  540. X#define FACE0_HEIGHT 50
  541. X#define NUM_SUBPLANES 54
  542. X#define NUM_CUBIKPLANES 21 /* number of planes moved in cubikked op; 1/3 of cube moved */
  543. X 
  544. X
  545. X/* Double_XPoint arrays are used for all double calculations so that rotated, flipped,
  546. X   or spin'ed face does not look bad after many small increments of rotation. 
  547. X   The z coordnate is used to preserve info when spin`ed or flipped. The routine 
  548. X   shortface() converts the double_XPoint array to the regular XPoint array for drawing */
  549. Xtypedef struct {
  550. X  double x;
  551. X  double y;
  552. X  double z;
  553. X}double_XPoint;
  554. X
  555. X/* seed_face coordinates use mode=CoordModePrevious. They are converted to mode=CoordModeOrigin later. */
  556. Xdouble_XPoint rot_face[NUM_SUBPLANES][5];   /* the last spin'ed, flipped, or rotated face */
  557. Xdouble_XPoint cubik_face[NUM_SUBPLANES][5]; /* the cubikked face, a face that is turned only-1/3 of cube */
  558. Xdouble_XPoint seed_face[][5] = {
  559. X
  560. X  /* Side 0 (front)*/
  561. X  {MR_X, MR_Y, Z_DEPTH},
  562. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  563. X  {MR_X+FACE0_WIDTH, MR_Y, Z_DEPTH},
  564. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  565. X  {MR_X+2*FACE0_WIDTH, MR_Y, Z_DEPTH},
  566. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  567. X
  568. X  {MR_X, MR_Y+FACE0_HEIGHT, Z_DEPTH},
  569. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  570. X  {MR_X+FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH},
  571. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  572. X  {MR_X+2*FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH},
  573. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  574. X
  575. X  {MR_X, MR_Y+2*FACE0_HEIGHT, Z_DEPTH},
  576. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  577. X  {MR_X+FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH},
  578. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  579. X  {MR_X+2*FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH},
  580. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  581. X
  582. X  /* Side 1 (left) */
  583. X  {MR_X, MR_Y, Z_DEPTH},
  584. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  585. X  {MR_X, MR_Y, Z_DEPTH+FACE0_WIDTH},
  586. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  587. X  {MR_X, MR_Y, Z_DEPTH+2*FACE0_WIDTH},
  588. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  589. X
  590. X  {MR_X, MR_Y+FACE0_HEIGHT, Z_DEPTH},
  591. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  592. X  {MR_X, MR_Y+FACE0_HEIGHT, Z_DEPTH+FACE0_WIDTH},
  593. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  594. X  {MR_X, MR_Y+FACE0_HEIGHT, Z_DEPTH+2*FACE0_WIDTH},
  595. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  596. X
  597. X  {MR_X, MR_Y+2*FACE0_HEIGHT, Z_DEPTH},
  598. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  599. X  {MR_X, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+FACE0_WIDTH},
  600. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  601. X  {MR_X, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+2*FACE0_WIDTH},
  602. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  603. X
  604. X  /* Side 2 (right) */
  605. X  {MR_X+3*FACE0_WIDTH, MR_Y, Z_DEPTH},
  606. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  607. X  {MR_X+3*FACE0_WIDTH, MR_Y, Z_DEPTH+FACE0_WIDTH},
  608. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  609. X  {MR_X+3*FACE0_WIDTH, MR_Y, Z_DEPTH+2*FACE0_WIDTH},
  610. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  611. X
  612. X  {MR_X+3*FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH},
  613. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  614. X  {MR_X+3*FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH+FACE0_WIDTH},
  615. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  616. X  {MR_X+3*FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH+2*FACE0_WIDTH},
  617. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  618. X
  619. X  {MR_X+3*FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH},
  620. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  621. X  {MR_X+3*FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+FACE0_WIDTH},
  622. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  623. X  {MR_X+3*FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+2*FACE0_WIDTH},
  624. X              {0,0,FACE0_WIDTH},{0,FACE0_HEIGHT,0},{0,0,-FACE0_WIDTH},{0,-FACE0_HEIGHT,0},
  625. X
  626. X  /* Side 3 (back) */
  627. X  {MR_X, MR_Y, Z_DEPTH+3*FACE0_WIDTH},
  628. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  629. X  {MR_X+FACE0_WIDTH, MR_Y, Z_DEPTH+3*FACE0_WIDTH},
  630. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  631. X  {MR_X+2*FACE0_WIDTH, MR_Y, Z_DEPTH+3*FACE0_WIDTH},
  632. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  633. X
  634. X  {MR_X, MR_Y+FACE0_HEIGHT, Z_DEPTH+3*FACE0_WIDTH},
  635. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  636. X  {MR_X+FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH+3*FACE0_WIDTH},
  637. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  638. X  {MR_X+2*FACE0_WIDTH, MR_Y+FACE0_HEIGHT, Z_DEPTH+3*FACE0_WIDTH},
  639. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  640. X
  641. X  {MR_X, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+3*FACE0_WIDTH},
  642. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  643. X  {MR_X+FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+3*FACE0_WIDTH},
  644. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  645. X  {MR_X+2*FACE0_WIDTH, MR_Y+2*FACE0_HEIGHT, Z_DEPTH+3*FACE0_WIDTH},
  646. X              {FACE0_WIDTH,0,0},{0,FACE0_HEIGHT,0},{-FACE0_WIDTH,0,0},{0,-FACE0_HEIGHT,0},
  647. X
  648. X  /* Side 4 (top) */
  649. X  {MR_X, MR_Y, Z_DEPTH},
  650. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  651. X  {MR_X+FACE0_WIDTH, MR_Y, Z_DEPTH},
  652. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  653. X  {MR_X+2*FACE0_WIDTH, MR_Y, Z_DEPTH},
  654. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  655. X
  656. X  {MR_X, MR_Y, Z_DEPTH+FACE0_HEIGHT},
  657. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  658. X  {MR_X+FACE0_WIDTH, MR_Y, Z_DEPTH+FACE0_HEIGHT},
  659. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  660. X  {MR_X+2*FACE0_WIDTH, MR_Y, Z_DEPTH+FACE0_HEIGHT},
  661. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  662. X
  663. X  {MR_X, MR_Y, Z_DEPTH+2*FACE0_HEIGHT},
  664. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  665. X  {MR_X+FACE0_WIDTH, MR_Y, Z_DEPTH+2*FACE0_HEIGHT},
  666. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  667. X  {MR_X+2*FACE0_WIDTH, MR_Y, Z_DEPTH+2*FACE0_HEIGHT},
  668. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  669. X
  670. X  /* Side 5 (bottom) */
  671. X  {MR_X, MR_Y+3*FACE0_HEIGHT, Z_DEPTH},
  672. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  673. X  {MR_X+FACE0_WIDTH, MR_Y+3*FACE0_HEIGHT, Z_DEPTH},
  674. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  675. X  {MR_X+2*FACE0_WIDTH, MR_Y+3*FACE0_HEIGHT, Z_DEPTH},
  676. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  677. X
  678. X  {MR_X, MR_Y+3*FACE0_HEIGHT, Z_DEPTH+FACE0_HEIGHT},
  679. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  680. X  {MR_X+FACE0_WIDTH, MR_Y+3*FACE0_HEIGHT, Z_DEPTH+FACE0_HEIGHT},
  681. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  682. X  {MR_X+2*FACE0_WIDTH, MR_Y+3*FACE0_HEIGHT, Z_DEPTH+FACE0_HEIGHT},
  683. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  684. X
  685. X  {MR_X, MR_Y+3*FACE0_HEIGHT, Z_DEPTH+2*FACE0_HEIGHT},
  686. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  687. X  {MR_X+FACE0_WIDTH, MR_Y+3*FACE0_HEIGHT, Z_DEPTH+2*FACE0_HEIGHT},
  688. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  689. X  {MR_X+2*FACE0_WIDTH, MR_Y+3*FACE0_HEIGHT, Z_DEPTH+2*FACE0_HEIGHT},
  690. X              {FACE0_WIDTH,0,0},{0,0,FACE0_HEIGHT},{-FACE0_WIDTH,0,0},{0,0,-FACE0_HEIGHT},
  691. X
  692. X};
  693. Xint rot_angle,spin_angle,flip_angle;
  694. X
  695. X/* The subplanes that are moved in the cubikc_xxxx callback
  696. X * that make up a twisting of the 1/3 of the cube.
  697. X * 
  698. X */
  699. Xint seed_front[] = {
  700. X  0,1,2,3,4,5,6,7,8, 
  701. X  0,0,0,
  702. X  0,0,0,
  703. X  0,0,0,
  704. X  0,0,0
  705. X  };
  706. X
  707. Xint seed_left[] = {
  708. X  9,10,11,12,13,14,15,16,17,
  709. X  0,0,0,
  710. X  0,0,0,
  711. X  0,0,0,
  712. X  0,0,0
  713. X  };
  714. X
  715. Xint seed_right[] = {
  716. X  18,19,20,21,22,23,24,25,26,
  717. X  0,0,0,
  718. X  0,0,0,
  719. X  0,0,0,
  720. X  0,0,0
  721. X  };
  722. X
  723. Xint seed_back[] = {
  724. X  27,28,29,30,31,32,33,34,35,
  725. X  0,0,0,
  726. X  0,0,0,
  727. X  0,0,0,
  728. X  0,0,0
  729. X  };
  730. X
  731. Xint seed_top[] = {
  732. X  36,37,38,39,40,41,42,43,44,
  733. X  0,0,0,
  734. X  0,0,0,
  735. X  0,0,0,
  736. X  0,0,0
  737. X  };
  738. X
  739. Xint seed_bottom[] = {
  740. X  45,46,47,48,49,50,51,52,53,
  741. X  0,0,0,
  742. X  0,0,0,
  743. X  0,0,0,
  744. X  0,0,0
  745. X  };
  746. X/* the front[]. left[], .... arrays 
  747. X   indicate which subplane occupies a subplane location.
  748. X   When pristine these values are equal. (See seed_xxxx.)
  749. X   cubik_face[x][] gives the coordinates of a the xth
  750. X   subplane. The coordinates of a subplane change if a cubik
  751. X   operation operates on the said subplane. 
  752. X */
  753. Xint front[NUM_CUBIKPLANES],left[NUM_CUBIKPLANES];
  754. Xint right[NUM_CUBIKPLANES],back[NUM_CUBIKPLANES];
  755. Xint top[NUM_CUBIKPLANES],bottom[NUM_CUBIKPLANES];
  756. XCorner cornermap[6][6][6]; /* see align_subfaces in cube.c */
  757. XEdge   edgemap[6][6];      /* see align_subfaces in cube.c */
  758. X
  759. X
  760. Xdouble Delta_Angle = DEFAULT_DELTA_ANGLE; 
  761. X
  762. Xvoid  draw_line();
  763. Xvoid  draw_circle();
  764. Xvoid  draw_rectangle();
  765. Xvoid  draw_filled_circle();
  766. Xvoid  draw_filled_rectangle();
  767. X
  768. Xvoid  activate();
  769. Xvoid  refresh();
  770. Xvoid  refresh_cube();
  771. Xvoid  set_stipple();
  772. Xvoid  start_rubber_band();
  773. Xvoid  track_rubber_band();
  774. Xvoid  end_rubber_band();
  775. Xvoid  prev_to_org();
  776. Xvoid  facecpy();
  777. Xvoid  cubik();
  778. Xvoid  cubikcpy();
  779. Xvoid  update_cubik();
  780. Xvoid  lefthand_twist();
  781. Xvoid  righthand_twist();
  782. Xvoid  xs_help_callback();
  783. Xvoid  init_subplane_pattern();
  784. Xvoid  norm_face();
  785. Xvoid  projface();
  786. Xvoid  shortface();
  787. Xextern void xcube_init_cubik();
  788. Xextern void taylor();
  789. Xextern void ldfile();
  790. X
  791. Xvoid init_cornermap();
  792. Xvoid init_edgemap();
  793. Xvoid check_events();
  794. XBool test_for_event();
  795. END_OF_FILE
  796.   if test 14880 -ne `wc -c <'cube/cube.h'`; then
  797.     echo shar: \"'cube/cube.h'\" unpacked with wrong size!
  798.   fi
  799.   # end of 'cube/cube.h'
  800. fi
  801. if test -f 'cube/layer1corner.c' -a "${1}" != "-c" ; then 
  802.   echo shar: Will not clobber existing file \"'cube/layer1corner.c'\"
  803. else
  804.   echo shar: Extracting \"'cube/layer1corner.c'\" \(14286 characters\)
  805.   sed "s/^X//" >'cube/layer1corner.c' <<'END_OF_FILE'
  806. X/* layer1corner.c
  807. X   This incorporates Don Taylor's solution to the 
  808. X   Buvos Kocka (Hungarian Magic Cube). 
  809. X
  810. X   First Layer Corner Cube
  811. X
  812. X   The following references were used:
  813. X   "The X Window System Programming And Applications with Xt
  814. X   OSF/MOTIF EDITION"
  815. X   by Douglas A Young 
  816. X   Prentice-Hall, 1990.
  817. X   ISBN 0-13-642786-3
  818. X
  819. X   "Mastering Rubik's Cube"
  820. X   by Don Taylor
  821. X   An Owl Book; Holt, Rinehart and Winston, New York, 1980
  822. X   ISBN 0-03-059941-5
  823. X
  824. X-------------------------------------------------------------------
  825. XCopyright (C) 1993 by Pierre A. Fleurant
  826. XPermission is granted to copy and distribute this program
  827. Xwithout charge, provided this copyright notice is included
  828. Xin the copy.
  829. XThis Software is distributed on an as-is basis. There will be
  830. XABSOLUTELY NO WARRANTY for any part of this software to work
  831. Xcorrect. In no case will the author be liable to you for damages
  832. Xcaused by the usage of this software.
  833. X-------------------------------------------------------------------    
  834. X*/   
  835. X
  836. X#include "taylor.h"
  837. X
  838. Xextern void F(); /*  front  */
  839. Xextern void L(); /*  left   */
  840. Xextern void R(); /*  right  */
  841. Xextern void B(); /*  back   */
  842. Xextern void U(); /*  up     */
  843. Xextern void D(); /*  down   */
  844. X
  845. Xextern void first_layer_corner_tfr();   /* layer1c_txx */
  846. Xextern void first_layer_corner_trb();   /* layer1c_txx */
  847. Xextern void first_layer_corner_tbl();   /* layer1c_txx */
  848. Xextern void first_layer_corner_tlf();   /* layer1c_txx */
  849. X
  850. XBoolean first_layer_corner(w,wdata,call_data) /* These parameters needed for macros */
  851. X     Widget   w;
  852. X     widget_data *wdata;
  853. X     caddr_t  call_data;
  854. X{
  855. X  /* Search for the Top corner cubes,
  856. X     place in lower layer directly below
  857. X     destination cube then  
  858. X     dispatch to first_layer_corner_tXX accordingly.
  859. X     There are 8 corner cubes in all.
  860. X     */
  861. X
  862. X  /* Bottom Corner Cubes */
  863. X  /* There are 12 places a TOP can be in the bottom layer.
  864. X   */
  865. X  
  866. X  /*1*/
  867. X  if(Front(8) == TOP){
  868. X    if(Right(6) == FRONT){
  869. X      if(Bottom(2) == RIGHT){
  870. X    first_layer_corner_tfr(w,wdata,call_data); 
  871. X      }
  872. X      else if(Bottom(2) == LEFT){
  873. X    D(-1);
  874. X    first_layer_corner_tlf(w,wdata,call_data); 
  875. X      }
  876. X    }
  877. X    else if(Right(6) == RIGHT){
  878. X      if(Bottom(2) == FRONT){
  879. X    first_layer_corner_tfr(w,wdata,call_data); 
  880. X      }
  881. X      else if(Bottom(2) == BACK){
  882. X    D(1);
  883. X    first_layer_corner_trb(w,wdata,call_data); 
  884. X      }
  885. X    }
  886. X    else if(Right(6) == BACK){
  887. X      if(Bottom(2) == RIGHT){
  888. X    D(1);
  889. X    first_layer_corner_trb(w,wdata,call_data);
  890. X      }
  891. X      else if(Bottom(2) == LEFT){
  892. X    D(2);
  893. X    first_layer_corner_tbl(w,wdata,call_data);
  894. X      }
  895. X    }
  896. X    else if(Right(6) == LEFT){
  897. X      if(Bottom(2) == FRONT){
  898. X    D(-1);
  899. X    first_layer_corner_tlf(w,wdata,call_data);
  900. X      }
  901. X      else if(Bottom(2) == BACK){
  902. X    D(2);
  903. X    first_layer_corner_tbl(w,wdata,call_data);
  904. X      }
  905. X    }
  906. X  }
  907. X  
  908. X  else if(Right(6) == TOP){
  909. X    if(Front(8) == FRONT){
  910. X      if(Bottom(2) == RIGHT){
  911. X    first_layer_corner_tfr(w,wdata,call_data); 
  912. X      }
  913. X      else if(Bottom(2) == LEFT){
  914. X    D(-1);
  915. X    first_layer_corner_tlf(w,wdata,call_data); 
  916. X      }
  917. X    }
  918. X    else if(Front(8) == RIGHT){
  919. X      if(Bottom(2) == FRONT){
  920. X    first_layer_corner_tfr(w,wdata,call_data); 
  921. X      }
  922. X      else if(Bottom(2) == BACK){
  923. X    D(1);
  924. X    first_layer_corner_trb(w,wdata,call_data); 
  925. X      }
  926. X    }
  927. X    else if(Front(8) == BACK){
  928. X      if(Bottom(2) == RIGHT){
  929. X    D(1);
  930. X    first_layer_corner_trb(w,wdata,call_data);
  931. X      }
  932. X      else if(Bottom(2) == LEFT){
  933. X    D(2);
  934. X    first_layer_corner_tbl(w,wdata,call_data);
  935. X      }
  936. X    }
  937. X    else if(Front(8) == LEFT){
  938. X      if(Bottom(2) == FRONT){
  939. X    D(-1);
  940. X    first_layer_corner_tlf(w,wdata,call_data);
  941. X      }
  942. X      else if(Bottom(2) == BACK){
  943. X    D(2);
  944. X    first_layer_corner_tbl(w,wdata,call_data);
  945. X      }
  946. X    }
  947. X  }
  948. X  
  949. X  else if(Bottom(2) == TOP){
  950. X    if(Front(8) == FRONT){
  951. X      if(Right(6) == RIGHT){
  952. X    first_layer_corner_tfr(w,wdata,call_data); 
  953. X      }
  954. X      else if(Right(6) == LEFT){
  955. X    D(-1);
  956. X    first_layer_corner_tlf(w,wdata,call_data); 
  957. X      }
  958. X    }
  959. X    else if(Front(8) == RIGHT){
  960. X      if(Right(6) == FRONT){
  961. X    first_layer_corner_tfr(w,wdata,call_data); 
  962. X      }
  963. X      else if(Right(6) == BACK){
  964. X    D(1);
  965. X    first_layer_corner_trb(w,wdata,call_data); 
  966. X      }
  967. X    }
  968. X    else if(Front(8) == BACK){
  969. X      if(Right(6) == RIGHT){
  970. X    D(1);
  971. X    first_layer_corner_trb(w,wdata,call_data);
  972. X      }
  973. X      else if(Right(6) == LEFT){
  974. X    D(2);
  975. X    first_layer_corner_tbl(w,wdata,call_data);
  976. X      }
  977. X    }
  978. X    else if(Front(8) == LEFT){
  979. X      if(Right(6) == FRONT){
  980. X    D(-1);
  981. X    first_layer_corner_tlf(w,wdata,call_data);
  982. X      }
  983. X      else if(Right(6) == BACK){
  984. X    D(2);
  985. X    first_layer_corner_tbl(w,wdata,call_data);
  986. X      }
  987. X    }
  988. X  }
  989. X  
  990. X  /*2*/
  991. X  if(Right(8)  == TOP){
  992. X    if(Back(8) == FRONT){
  993. X      if(Bottom(8) == RIGHT){
  994. X    D(-1);
  995. X    first_layer_corner_tfr(w,wdata,call_data); 
  996. X      }
  997. X      else if(Bottom(8) == LEFT){
  998. X    D(2);
  999. X    first_layer_corner_tlf(w,wdata,call_data); 
  1000. X      }
  1001. X    }
  1002. X    else if(Back(8) == RIGHT){
  1003. X      if(Bottom(8) == FRONT){
  1004. X    D(-1);
  1005. X    first_layer_corner_tfr(w,wdata,call_data); 
  1006. X      }
  1007. X      else if(Bottom(8) == BACK){
  1008. X    first_layer_corner_trb(w,wdata,call_data); 
  1009. X      }
  1010. X    }
  1011. X    else if(Back(8) == BACK){
  1012. X      if(Bottom(8) == RIGHT){
  1013. X    first_layer_corner_trb(w,wdata,call_data);
  1014. X      }
  1015. X      else if(Bottom(8) == LEFT){
  1016. X    D(1);
  1017. X    first_layer_corner_tbl(w,wdata,call_data);
  1018. X      }
  1019. X    }
  1020. X    else if(Back(8) == LEFT){
  1021. X      if(Bottom(8) == FRONT){
  1022. X    D(2);
  1023. X    first_layer_corner_tlf(w,wdata,call_data);
  1024. X      }
  1025. X      else if(Bottom(8) == BACK){
  1026. X    D(1);
  1027. X    first_layer_corner_tbl(w,wdata,call_data);
  1028. X      }
  1029. X    }
  1030. X  }
  1031. X  
  1032. X  else if(Back(8)  == TOP){
  1033. X    if(Right(8) == FRONT){
  1034. X      if(Bottom(8) == RIGHT){
  1035. X    D(-1);
  1036. X    first_layer_corner_tfr(w,wdata,call_data); 
  1037. X      }
  1038. X      else if(Bottom(8) == LEFT){
  1039. X    D(2);
  1040. X    first_layer_corner_tlf(w,wdata,call_data); 
  1041. X      }
  1042. X    }
  1043. X    else if(Right(8) == RIGHT){
  1044. X      if(Bottom(8) == FRONT){
  1045. X    D(-1);
  1046. X    first_layer_corner_tfr(w,wdata,call_data); 
  1047. X      }
  1048. X      else if(Bottom(8) == BACK){
  1049. X    first_layer_corner_trb(w,wdata,call_data); 
  1050. X      }
  1051. X    }
  1052. X    else if(Right(8) == BACK){
  1053. X      if(Bottom(8) == RIGHT){
  1054. X    first_layer_corner_trb(w,wdata,call_data);
  1055. X      }
  1056. X      else if(Bottom(8) == LEFT){
  1057. X    D(1);
  1058. X    first_layer_corner_tbl(w,wdata,call_data);
  1059. X      }
  1060. X    }
  1061. X    else if(Right(8) == LEFT){
  1062. X      if(Bottom(8) == FRONT){
  1063. X    D(2);
  1064. X    first_layer_corner_tlf(w,wdata,call_data);
  1065. X      }
  1066. X      else if(Bottom(8) == BACK){
  1067. X    D(1);
  1068. X    first_layer_corner_tbl(w,wdata,call_data);
  1069. X      }
  1070. X    }
  1071. X  }
  1072. X  
  1073. X  else if(Bottom(8)  == TOP){
  1074. X    if(Right(8) == FRONT){
  1075. X      if(Back(8) == RIGHT){
  1076. X    D(-1);
  1077. X    first_layer_corner_tfr(w,wdata,call_data); 
  1078. X      }
  1079. X      else if(Back(8) == LEFT){
  1080. X    D(2);
  1081. X    first_layer_corner_tlf(w,wdata,call_data); 
  1082. X      }
  1083. X    }
  1084. X    else if(Right(8) == RIGHT){
  1085. X      if(Back(8) == FRONT){
  1086. X    D(-1);
  1087. X    first_layer_corner_tfr(w,wdata,call_data); 
  1088. X      }
  1089. X      else if(Back(8) == BACK){
  1090. X    first_layer_corner_trb(w,wdata,call_data); 
  1091. X      }
  1092. X    }
  1093. X    else if(Right(8) == BACK){
  1094. X      if(Back(8) == RIGHT){
  1095. X    first_layer_corner_trb(w,wdata,call_data);
  1096. X      }
  1097. X      else if(Back(8) == LEFT){
  1098. X    D(1);
  1099. X    first_layer_corner_tbl(w,wdata,call_data);
  1100. X      }
  1101. X    }
  1102. X    else if(Right(8) == LEFT){
  1103. X      if(Back(8) == FRONT){
  1104. X    D(2);
  1105. X    first_layer_corner_tlf(w,wdata,call_data);
  1106. X      }
  1107. X      else if(Back(8) == BACK){
  1108. X    D(1);
  1109. X    first_layer_corner_tbl(w,wdata,call_data);
  1110. X      }
  1111. X    }
  1112. X  }
  1113. X  
  1114. X  /*3*/
  1115. X  if(Back(6)  == TOP){
  1116. X    if(Left(8) == FRONT){
  1117. X      if(Bottom(6) == RIGHT){
  1118. X    D(2);
  1119. X    first_layer_corner_tfr(w,wdata,call_data); 
  1120. X      }
  1121. X      else if(Bottom(6) == LEFT){
  1122. X    D(1);
  1123. X    first_layer_corner_tlf(w,wdata,call_data); 
  1124. X      }
  1125. X    }
  1126. X    else if(Left(8) == RIGHT){
  1127. X      if(Bottom(6) == FRONT){
  1128. X    D(2);
  1129. X    first_layer_corner_tfr(w,wdata,call_data); 
  1130. X      }
  1131. X      else if(Bottom(6) == BACK){
  1132. X    D(-1);
  1133. X    first_layer_corner_trb(w,wdata,call_data); 
  1134. X      }
  1135. X    }
  1136. X    else if(Left(8) == BACK){
  1137. X      if(Bottom(6) == RIGHT){
  1138. X    D(-1);
  1139. X    first_layer_corner_trb(w,wdata,call_data);
  1140. X      }
  1141. X      else if(Bottom(6) == LEFT){
  1142. X    first_layer_corner_tbl(w,wdata,call_data);
  1143. X      }
  1144. X    }
  1145. X    else if(Left(8) == LEFT){
  1146. X      if(Bottom(6) == FRONT){
  1147. X    D(1);
  1148. X    first_layer_corner_tlf(w,wdata,call_data);
  1149. X      }
  1150. X      else if(Bottom(6) == BACK){
  1151. X    first_layer_corner_tbl(w,wdata,call_data);
  1152. X      }
  1153. X    }
  1154. X  }
  1155. X  
  1156. X  else if(Left(8)  == TOP){
  1157. X    if(Back(6) == FRONT){
  1158. X      if(Bottom(6) == RIGHT){
  1159. X    D(2);
  1160. X    first_layer_corner_tfr(w,wdata,call_data); 
  1161. X      }
  1162. X      else if(Bottom(6) == LEFT){
  1163. X    D(1);
  1164. X    first_layer_corner_tlf(w,wdata,call_data); 
  1165. X      }
  1166. X    }
  1167. X    else if(Back(6) == RIGHT){
  1168. X      if(Bottom(6) == FRONT){
  1169. X    D(2);
  1170. X    first_layer_corner_tfr(w,wdata,call_data); 
  1171. X      }
  1172. X      else if(Bottom(6) == BACK){
  1173. X    D(-1);
  1174. X    first_layer_corner_trb(w,wdata,call_data); 
  1175. X      }
  1176. X    }
  1177. X    else if(Back(6) == BACK){
  1178. X      if(Bottom(6) == RIGHT){
  1179. X    D(-1);
  1180. X    first_layer_corner_trb(w,wdata,call_data);
  1181. X      }
  1182. X      else if(Bottom(6) == LEFT){
  1183. X    first_layer_corner_tbl(w,wdata,call_data);
  1184. X      }
  1185. X    }
  1186. X    else if(Back(6) == LEFT){
  1187. X      if(Bottom(6) == FRONT){
  1188. X    D(1);
  1189. X    first_layer_corner_tlf(w,wdata,call_data);
  1190. X      }
  1191. X      else if(Bottom(6) == BACK){
  1192. X    first_layer_corner_tbl(w,wdata,call_data);
  1193. X      }
  1194. X    }
  1195. X  }
  1196. X  
  1197. X  else if(Bottom(6)  == TOP){
  1198. X    if(Back(6) == FRONT){
  1199. X      if(Left(8) == RIGHT){
  1200. X    D(2);
  1201. X    first_layer_corner_tfr(w,wdata,call_data); 
  1202. X      }
  1203. X      else if(Left(8) == LEFT){
  1204. X    D(1);
  1205. X    first_layer_corner_tlf(w,wdata,call_data); 
  1206. X      }
  1207. X    }
  1208. X    else if(Back(6) == RIGHT){
  1209. X      if(Left(8) == FRONT){
  1210. X    D(2);
  1211. X    first_layer_corner_tfr(w,wdata,call_data); 
  1212. X      }
  1213. X      else if(Left(8) == BACK){
  1214. X    D(-1);
  1215. X    first_layer_corner_trb(w,wdata,call_data); 
  1216. X      }
  1217. X    }
  1218. X    else if(Back(6) == BACK){
  1219. X      if(Left(8) == RIGHT){
  1220. X    D(-1);
  1221. X    first_layer_corner_trb(w,wdata,call_data);
  1222. X      }
  1223. X      else if(Left(8) == LEFT){
  1224. X    first_layer_corner_tbl(w,wdata,call_data);
  1225. X      }
  1226. X    }
  1227. X    else if(Back(6) == LEFT){
  1228. X      if(Left(8) == FRONT){
  1229. X    D(1);
  1230. X    first_layer_corner_tlf(w,wdata,call_data);
  1231. X      }
  1232. X      else if(Left(8) == BACK){
  1233. X    first_layer_corner_tbl(w,wdata,call_data);
  1234. X      }
  1235. X    }
  1236. X  }
  1237. X  
  1238. X  /*4*/
  1239. X  if(Left(6)  == TOP){
  1240. X    if(Front(6) == FRONT){
  1241. X      if(Bottom(0) == RIGHT){
  1242. X    D(1);
  1243. X    first_layer_corner_tfr(w,wdata,call_data); 
  1244. X      }
  1245. X      else if(Bottom(0) == LEFT){
  1246. X    first_layer_corner_tlf(w,wdata,call_data); 
  1247. X      }
  1248. X    }
  1249. X    else if(Front(6) == RIGHT){
  1250. X      if(Bottom(0) == FRONT){
  1251. X    D(1);
  1252. X    first_layer_corner_tfr(w,wdata,call_data); 
  1253. X      }
  1254. X      else if(Bottom(0) == BACK){
  1255. X    D(2);
  1256. X    first_layer_corner_trb(w,wdata,call_data); 
  1257. X      }
  1258. X    }
  1259. X    else if(Front(6) == BACK){
  1260. X      if(Bottom(0) == RIGHT){
  1261. X    D(2);
  1262. X    first_layer_corner_trb(w,wdata,call_data);
  1263. X      }
  1264. X      else if(Bottom(0) == LEFT){
  1265. X    D(-1);
  1266. X    first_layer_corner_tbl(w,wdata,call_data);
  1267. X      }
  1268. X    }
  1269. X    else if(Front(6) == LEFT){
  1270. X      if(Bottom(0) == FRONT){
  1271. X    first_layer_corner_tlf(w,wdata,call_data);
  1272. X      }
  1273. X      else if(Bottom(0) == BACK){
  1274. X    D(-1);
  1275. X    first_layer_corner_tbl(w,wdata,call_data);
  1276. X      }
  1277. X    }
  1278. X  }
  1279. X  
  1280. X  else if(Front(6)  == TOP){
  1281. X    if(Left(6) == FRONT){
  1282. X      if(Bottom(0) == RIGHT){
  1283. X    D(1);
  1284. X    first_layer_corner_tfr(w,wdata,call_data); 
  1285. X      }
  1286. X      else if(Bottom(0) == LEFT){
  1287. X    first_layer_corner_tlf(w,wdata,call_data); 
  1288. X      }
  1289. X    }
  1290. X    else if(Left(6) == RIGHT){
  1291. X      if(Bottom(0) == FRONT){
  1292. X    D(1);
  1293. X    first_layer_corner_tfr(w,wdata,call_data); 
  1294. X      }
  1295. X      else if(Bottom(0) == BACK){
  1296. X    D(2);
  1297. X    first_layer_corner_trb(w,wdata,call_data); 
  1298. X      }
  1299. X    }
  1300. X    else if(Left(6) == BACK){
  1301. X      if(Bottom(0) == RIGHT){
  1302. X    D(2);
  1303. X    first_layer_corner_trb(w,wdata,call_data);
  1304. X      }
  1305. X      else if(Bottom(0) == LEFT){
  1306. X    D(-1);
  1307. X    first_layer_corner_tbl(w,wdata,call_data);
  1308. X      }
  1309. X    }
  1310. X    else if(Left(6) == LEFT){
  1311. X      if(Bottom(0) == FRONT){
  1312. X    first_layer_corner_tlf(w,wdata,call_data);
  1313. X      }
  1314. X      else if(Bottom(0) == BACK){
  1315. X    D(-1);
  1316. X    first_layer_corner_tbl(w,wdata,call_data);
  1317. X      }
  1318. X    }
  1319. X  }
  1320. X
  1321. X  else if(Bottom(0)  == TOP){
  1322. X    if(Left(6) == FRONT){
  1323. X      if(Front(6) == RIGHT){
  1324. X    D(1);
  1325. X    first_layer_corner_tfr(w,wdata,call_data); 
  1326. X      }
  1327. X      else if(Front(6) == LEFT){
  1328. X    first_layer_corner_tlf(w,wdata,call_data); 
  1329. X      }
  1330. X    }
  1331. X    else if(Left(6) == RIGHT){
  1332. X      if(Front(6) == FRONT){
  1333. X    D(1);
  1334. X    first_layer_corner_tfr(w,wdata,call_data); 
  1335. X      }
  1336. X      else if(Front(6) == BACK){
  1337. X    D(2);
  1338. X    first_layer_corner_trb(w,wdata,call_data); 
  1339. X      }
  1340. X    }
  1341. X    else if(Left(6) == BACK){
  1342. X      if(Front(6) == RIGHT){
  1343. X    D(2);
  1344. X    first_layer_corner_trb(w,wdata,call_data);
  1345. X      }
  1346. X      else if(Front(6) == LEFT){
  1347. X    D(-1);
  1348. X    first_layer_corner_tbl(w,wdata,call_data);
  1349. X      }
  1350. X    }
  1351. X    else if(Left(6) == LEFT){
  1352. X      if(Front(6) == FRONT){
  1353. X    first_layer_corner_tlf(w,wdata,call_data);
  1354. X      }
  1355. X      else if(Front(6) == BACK){
  1356. X    D(-1);
  1357. X    first_layer_corner_tbl(w,wdata,call_data);
  1358. X      }
  1359. X    }
  1360. X  }
  1361. X
  1362. X  /* Top Corner Cubes */
  1363. X  /* There are 12 places a TOP can be in the top layer corner cubes layer.
  1364. X      If all first layer corners are ok, then True is returned.
  1365. X      Else if a TOP is found in top layer corner, with the wrong orientation then
  1366. X     the operation to bring it to the lower layer is performed.
  1367. X      Else False is returned. 
  1368. X   */
  1369. X
  1370. X  if(Top(0) == TOP &&
  1371. X     Top(2) == TOP &&
  1372. X     Top(6) == TOP &&
  1373. X     Top(8) == TOP &&
  1374. X     Front(0) == FRONT &&
  1375. X     Front(2) == FRONT &&
  1376. X     Right(0) == RIGHT &&
  1377. X     Right(2) == RIGHT &&
  1378. X     Back(0) == BACK &&
  1379. X     Back(2) == BACK &&
  1380. X     Left(0) == LEFT &&
  1381. X     Left(2) == LEFT)
  1382. X    return(True);
  1383. X  
  1384. X  /* Here if more passes needed.
  1385. X   * Check if any miss-oriented ones on top.
  1386. X   * If so, then bring it down to bottom layer.
  1387. X   */
  1388. X  if((Top(2)   == TOP ||  
  1389. X      Front(2) == TOP ||  
  1390. X      Right(0) == TOP) &&
  1391. X     (Top(2)   != TOP ||  
  1392. X      Front(2) != FRONT ||  
  1393. X      Right(0) != RIGHT)){
  1394. X    R(-1);D(1);R(1);
  1395. X    return(False);
  1396. X  }
  1397. X  
  1398. X  if((Top(8)   == TOP ||  
  1399. X      Right(2) == TOP ||  
  1400. X      Back(2)  == TOP) &&
  1401. X     (Top(8)   != TOP ||  
  1402. X      Right(2) != RIGHT ||  
  1403. X      Back(2)  != BACK)){
  1404. X    B(-1);D(1);B(1);
  1405. X    return(False);
  1406. X  }
  1407. X  
  1408. X  if((Top(6)   == TOP ||  
  1409. X      Back(0)  == TOP ||  
  1410. X      Left(2)  == TOP) &&
  1411. X     (Top(6)   != TOP ||  
  1412. X      Back(0)  != BACK ||  
  1413. X      Left(2)  != LEFT)){
  1414. X    L(-1);D(1);L(1);
  1415. X    return(False);
  1416. X  }
  1417. X  
  1418. X  if((Top(0)   == TOP ||  
  1419. X      Left(0)  == TOP ||  
  1420. X      Front(0) == TOP) &&
  1421. X     (Top(0)   != TOP ||  
  1422. X      Left(0)  != LEFT ||  
  1423. X      Front(0) != FRONT)){
  1424. X    F(-1);D(1);F(1);
  1425. X    return(False);
  1426. X  }
  1427. X  return(False);
  1428. X}
  1429. END_OF_FILE
  1430.   if test 14286 -ne `wc -c <'cube/layer1corner.c'`; then
  1431.     echo shar: \"'cube/layer1corner.c'\" unpacked with wrong size!
  1432.   fi
  1433.   # end of 'cube/layer1corner.c'
  1434. fi
  1435. if test ! -d 'cube/lib' ; then
  1436.     echo shar: Creating directory \"'cube/lib'\"
  1437.     mkdir 'cube/lib'
  1438. fi
  1439. if test -f 'cube/lib/Makefile' -a "${1}" != "-c" ; then 
  1440.   echo shar: Will not clobber existing file \"'cube/lib/Makefile'\"
  1441. else
  1442.   echo shar: Extracting \"'cube/lib/Makefile'\" \(8662 characters\)
  1443.   sed "s/^X//" >'cube/lib/Makefile' <<'END_OF_FILE'
  1444. X# Makefile generated by imake - do not edit!
  1445. X# $XConsortium: imake.c,v 1.51 89/12/12 12:37:30 jim Exp $
  1446. X#
  1447. X# The cpp used on this machine replaces all newlines and multiple tabs and
  1448. X# spaces in a macro expansion with a single space.  Imake tries to compensate
  1449. X# for this, but is not always successful.
  1450. X#
  1451. X
  1452. X###########################################################################
  1453. X# Makefile generated from "Imake.tmpl" and </tmp/IIf.a02079>
  1454. X# $XConsortium: Imake.tmpl,v 1.77 89/12/18 17:01:37 jim Exp $
  1455. X#
  1456. X# Platform-specific parameters may be set in the appropriate .cf
  1457. X# configuration files.  Site-wide parameters may be set in the file
  1458. X# site.def.  Full rebuilds are recommended if any parameters are changed.
  1459. X#
  1460. X# If your C preprocessor doesn't define any unique symbols, you'll need
  1461. X# to set BOOTSTRAPCFLAGS when rebuilding imake (usually when doing
  1462. X# "make Makefile", "make Makefiles", or "make World").
  1463. X#
  1464. X# If you absolutely can't get imake to work, you'll need to set the
  1465. X# variables at the top of each Makefile as well as the dependencies at the
  1466. X# bottom (makedepend will do this automatically).
  1467. X#
  1468. X
  1469. X###########################################################################
  1470. X# platform-specific configuration parameters - edit sun.cf to change
  1471. X
  1472. X# platform:  $XConsortium: sun.cf,v 1.38 89/12/23 16:10:10 jim Exp $
  1473. X# operating system:  SunOS 4.0.3
  1474. X
  1475. X###########################################################################
  1476. X# site-specific configuration parameters - edit site.def to change
  1477. X
  1478. X            SHELL = /bin/sh
  1479. X
  1480. X              TOP = ../.
  1481. X      CURRENT_DIR = ./lib
  1482. X
  1483. X               AR = ar clq
  1484. X  BOOTSTRAPCFLAGS =
  1485. X               CC = cc
  1486. X
  1487. X         COMPRESS = compress
  1488. X              CPP = /lib/cpp $(STD_CPP_DEFINES)
  1489. X    PREPROCESSCMD = cc -E $(STD_CPP_DEFINES)
  1490. X          INSTALL = install
  1491. X               LD = ld
  1492. X             LINT = lint
  1493. X      LINTLIBFLAG = -C
  1494. X         LINTOPTS = -axz
  1495. X               LN = ln -s
  1496. X             MAKE = make
  1497. X               MV = mv
  1498. X               CP = cp
  1499. X           RANLIB = ranlib
  1500. X  RANLIBINSTFLAGS =
  1501. X               RM = rm -f
  1502. X     STD_INCLUDES =
  1503. X  STD_CPP_DEFINES =
  1504. X      STD_DEFINES =
  1505. X EXTRA_LOAD_FLAGS =
  1506. X  EXTRA_LIBRARIES =
  1507. X             TAGS = ctags
  1508. X
  1509. X    SHAREDCODEDEF = -DSHAREDCODE
  1510. X         SHLIBDEF = -DSUNSHLIB
  1511. X
  1512. X    PROTO_DEFINES =
  1513. X
  1514. X     INSTPGMFLAGS =
  1515. X
  1516. X     INSTBINFLAGS = -m 0755
  1517. X     INSTUIDFLAGS = -m 4755
  1518. X     INSTLIBFLAGS = -m 0664
  1519. X     INSTINCFLAGS = -m 0444
  1520. X     INSTMANFLAGS = -m 0444
  1521. X     INSTDATFLAGS = -m 0444
  1522. X    INSTKMEMFLAGS = -m 4755
  1523. X
  1524. X          DESTDIR =
  1525. X
  1526. X     TOP_INCLUDES = -I$(INCROOT)
  1527. X
  1528. X      CDEBUGFLAGS = -O
  1529. X        CCOPTIONS =
  1530. X      COMPATFLAGS =
  1531. X
  1532. X      ALLINCLUDES = $(STD_INCLUDES) $(TOP_INCLUDES) $(INCLUDES) $(EXTRA_INCLUDES)
  1533. X       ALLDEFINES = $(ALLINCLUDES) $(STD_DEFINES) $(PROTO_DEFINES) $(DEFINES) $(COMPATFLAGS)
  1534. X           CFLAGS = $(CDEBUGFLAGS) $(CCOPTIONS) $(ALLDEFINES)
  1535. X        LINTFLAGS = $(LINTOPTS) -DLINT $(ALLDEFINES)
  1536. X           LDLIBS = $(SYS_LIBRARIES) $(EXTRA_LIBRARIES)
  1537. X        LDOPTIONS = $(CDEBUGFLAGS) $(CCOPTIONS)
  1538. X   LDCOMBINEFLAGS = -X -r
  1539. X
  1540. X        MACROFILE = sun.cf
  1541. X           RM_CMD = $(RM) *.CKP *.ln *.BAK *.bak *.o core errs ,* *~ *.a .emacs_* tags TAGS make.log MakeOut
  1542. X
  1543. X    IMAKE_DEFINES =
  1544. X
  1545. X         IRULESRC = $(CONFIGDIR)
  1546. X        IMAKE_CMD = $(IMAKE) -DUseInstalled -I$(IRULESRC) $(IMAKE_DEFINES)
  1547. X
  1548. X     ICONFIGFILES = $(IRULESRC)/Imake.tmpl $(IRULESRC)/Imake.rules \
  1549. X            $(IRULESRC)/Project.tmpl $(IRULESRC)/site.def \
  1550. X            $(IRULESRC)/$(MACROFILE) $(EXTRA_ICONFIGFILES)
  1551. X
  1552. X###########################################################################
  1553. X# X Window System Build Parameters
  1554. X# $XConsortium: Project.tmpl,v 1.63 89/12/18 16:46:44 jim Exp $
  1555. X
  1556. X###########################################################################
  1557. X# X Window System make variables; this need to be coordinated with rules
  1558. X# $XConsortium: Project.tmpl,v 1.63 89/12/18 16:46:44 jim Exp $
  1559. X
  1560. X          PATHSEP = /
  1561. X        USRLIBDIR = $(DESTDIR)/usr/lib
  1562. X           BINDIR = $(DESTDIR)/usr/bin/X11
  1563. X          INCROOT = $(DESTDIR)/usr/include
  1564. X     BUILDINCROOT = $(TOP)
  1565. X      BUILDINCDIR = $(BUILDINCROOT)/X11
  1566. X      BUILDINCTOP = ..
  1567. X           INCDIR = $(INCROOT)/X11
  1568. X           ADMDIR = $(DESTDIR)/usr/adm
  1569. X           LIBDIR = $(USRLIBDIR)/X11
  1570. X        CONFIGDIR = $(LIBDIR)/config
  1571. X       LINTLIBDIR = $(USRLIBDIR)/lint
  1572. X
  1573. X          FONTDIR = $(LIBDIR)/fonts
  1574. X         XINITDIR = $(LIBDIR)/xinit
  1575. X           XDMDIR = $(LIBDIR)/xdm
  1576. X           AWMDIR = $(LIBDIR)/awm
  1577. X           TWMDIR = $(LIBDIR)/twm
  1578. X           GWMDIR = $(LIBDIR)/gwm
  1579. X          MANPATH = $(DESTDIR)/usr/man
  1580. X    MANSOURCEPATH = $(MANPATH)/man
  1581. X           MANDIR = $(MANSOURCEPATH)n
  1582. X        LIBMANDIR = $(MANSOURCEPATH)3
  1583. X      XAPPLOADDIR = $(LIBDIR)/app-defaults
  1584. X
  1585. X        SOXLIBREV = 4.2
  1586. X          SOXTREV = 4.0
  1587. X         SOXAWREV = 4.0
  1588. X        SOOLDXREV = 4.0
  1589. X         SOXMUREV = 4.0
  1590. X        SOXEXTREV = 4.0
  1591. X
  1592. X       FONTCFLAGS = -t
  1593. X
  1594. X     INSTAPPFLAGS = $(INSTDATFLAGS)
  1595. X
  1596. X            IMAKE = imake
  1597. X           DEPEND = makedepend
  1598. X              RGB = rgb
  1599. X            FONTC = bdftosnf
  1600. X        MKFONTDIR = mkfontdir
  1601. X        MKDIRHIER = /bin/sh $(BINDIR)/mkdirhier.sh
  1602. X
  1603. X        CONFIGSRC = $(TOP)/config
  1604. X        CLIENTSRC = $(TOP)/clients
  1605. X          DEMOSRC = $(TOP)/demos
  1606. X           LIBSRC = $(TOP)/lib
  1607. X          FONTSRC = $(TOP)/fonts
  1608. X       INCLUDESRC = $(TOP)/X11
  1609. X        SERVERSRC = $(TOP)/server
  1610. X          UTILSRC = $(TOP)/util
  1611. X        SCRIPTSRC = $(UTILSRC)/scripts
  1612. X       EXAMPLESRC = $(TOP)/examples
  1613. X       CONTRIBSRC = $(TOP)/../contrib
  1614. X           DOCSRC = $(TOP)/doc
  1615. X           RGBSRC = $(TOP)/rgb
  1616. X        DEPENDSRC = $(UTILSRC)/makedepend
  1617. X         IMAKESRC = $(CONFIGSRC)
  1618. X         XAUTHSRC = $(LIBSRC)/Xau
  1619. X          XLIBSRC = $(LIBSRC)/X
  1620. X           XMUSRC = $(LIBSRC)/Xmu
  1621. X       TOOLKITSRC = $(LIBSRC)/Xt
  1622. X       AWIDGETSRC = $(LIBSRC)/Xaw
  1623. X       OLDXLIBSRC = $(LIBSRC)/oldX
  1624. X      XDMCPLIBSRC = $(LIBSRC)/Xdmcp
  1625. X      BDFTOSNFSRC = $(FONTSRC)/bdftosnf
  1626. X     MKFONTDIRSRC = $(FONTSRC)/mkfontdir
  1627. X     EXTENSIONSRC = $(TOP)/extensions
  1628. X
  1629. X  DEPEXTENSIONLIB =
  1630. X     EXTENSIONLIB = -lXext
  1631. X
  1632. X          DEPXLIB = $(DEPEXTENSIONLIB)
  1633. X             XLIB = $(EXTENSIONLIB) -lX11
  1634. X
  1635. X      DEPXAUTHLIB = $(USRLIBDIR)/libXau.a
  1636. X         XAUTHLIB =  -lXau
  1637. X
  1638. X        DEPXMULIB =
  1639. X           XMULIB = -lXmu
  1640. X
  1641. X       DEPOLDXLIB =
  1642. X          OLDXLIB = -loldX
  1643. X
  1644. X      DEPXTOOLLIB =
  1645. X         XTOOLLIB = -lXt
  1646. X
  1647. X        DEPXAWLIB =
  1648. X           XAWLIB = -lXaw
  1649. X
  1650. X LINTEXTENSIONLIB = $(USRLIBDIR)/llib-lXext.ln
  1651. X         LINTXLIB = $(USRLIBDIR)/llib-lX11.ln
  1652. X          LINTXMU = $(USRLIBDIR)/llib-lXmu.ln
  1653. X        LINTXTOOL = $(USRLIBDIR)/llib-lXt.ln
  1654. X          LINTXAW = $(USRLIBDIR)/llib-lXaw.ln
  1655. X
  1656. X          DEPLIBS = $(DEPXAWLIB) $(DEPXMULIB) $(DEPXTOOLLIB) $(DEPXLIB)
  1657. X
  1658. X         DEPLIBS1 = $(DEPLIBS)
  1659. X         DEPLIBS2 = $(DEPLIBS)
  1660. X         DEPLIBS3 = $(DEPLIBS)
  1661. X
  1662. X###########################################################################
  1663. X# Imake rules for building libraries, programs, scripts, and data files
  1664. X# rules:  $XConsortium: Imake.rules,v 1.67 89/12/18 17:14:15 jim Exp $
  1665. X
  1666. X###########################################################################
  1667. X# start of Imakefile
  1668. X
  1669. X#
  1670. X# Imakefile - Xs
  1671. X
  1672. XSTD_INCLUDES = -I/usr/local/X11R5/include -I/usr/local/include  -I./lib
  1673. XSTD_CPP_DEFINES =
  1674. XSTD_DEFINES =
  1675. XEXTRA_LOAD_FLAGS = -lXm -lX11 -lXt
  1676. XEXTRA_LIBRARIES = -L/usr/local/X11R5/lib -L/usr/lib
  1677. X
  1678. XSRCS =  concat.c str2flt.c invert.c quit.c talkto.c wprintf.c insert.c xmstr_to_str.c\
  1679. X    send_msg.c xor.c strtoxmstr.c menus.c help_dialog.c pix_buttons.c
  1680. X
  1681. XOBJS =  concat.o str2flt.o invert.o quit.o talkto.o wprintf.o insert.o xmstr_to_str.o\
  1682. X    send_msg.o  xor.o strtoxmstr.o menus.o help_dialog.o pix_buttons.o
  1683. X
  1684. X#
  1685. X# Make Xs
  1686. X#
  1687. X
  1688. Xall:: libXs.a
  1689. X
  1690. XlibXs.a:  $(OBJS)
  1691. X    $(RM) $@
  1692. X    $(AR) $@  $(OBJS)
  1693. X    $(RANLIB) $@
  1694. X
  1695. Xdepend::
  1696. X    $(DEPEND) -s "# DO NOT DELETE" -- $(ALLDEFINES) -- $(SRCS)
  1697. X
  1698. X###########################################################################
  1699. X# common rules for all Makefiles - do not edit
  1700. X
  1701. Xemptyrule::
  1702. X
  1703. Xclean::
  1704. X    $(RM_CMD) \#*
  1705. X
  1706. XMakefile::
  1707. X    -@if [ -f Makefile ]; then \
  1708. X    echo "    $(RM) Makefile.bak; $(MV) Makefile Makefile.bak"; \
  1709. X    $(RM) Makefile.bak; $(MV) Makefile Makefile.bak; \
  1710. X    else exit 0; fi
  1711. X    $(IMAKE_CMD) -DTOPDIR=$(TOP) -DCURDIR=$(CURRENT_DIR)
  1712. X
  1713. Xtags::
  1714. X    $(TAGS) -w *.[ch]
  1715. X    $(TAGS) -xw *.[ch] > TAGS
  1716. X
  1717. Xsaber:
  1718. X    #load $(ALLDEFINES) $(SRCS)
  1719. X
  1720. Xosaber:
  1721. X    #load $(ALLDEFINES) $(OBJS)
  1722. X
  1723. X###########################################################################
  1724. X# empty rules for directories that do not have SUBDIRS - do not edit
  1725. X
  1726. Xinstall::
  1727. X    @echo "install in $(CURRENT_DIR) done"
  1728. X
  1729. Xinstall.man::
  1730. X    @echo "install.man in $(CURRENT_DIR) done"
  1731. X
  1732. XMakefiles::
  1733. X
  1734. Xincludes::
  1735. X
  1736. X###########################################################################
  1737. X# dependencies generated by makedepend
  1738. X
  1739. END_OF_FILE
  1740.   if test 8662 -ne `wc -c <'cube/lib/Makefile'`; then
  1741.     echo shar: \"'cube/lib/Makefile'\" unpacked with wrong size!
  1742.   fi
  1743.   # end of 'cube/lib/Makefile'
  1744. fi
  1745. echo shar: End of archive 1 \(of 5\).
  1746. cp /dev/null ark1isdone
  1747. MISSING=""
  1748. for I in 1 2 3 4 5 ; do
  1749.     if test ! -f ark${I}isdone ; then
  1750.     MISSING="${MISSING} ${I}"
  1751.     fi
  1752. done
  1753. if test "${MISSING}" = "" ; then
  1754.     echo You have unpacked all 5 archives.
  1755.     rm -f ark[1-9]isdone
  1756. else
  1757.     echo You still must unpack the following archives:
  1758.     echo "        " ${MISSING}
  1759. fi
  1760. exit 0
  1761. exit 0 # Just in case...
  1762.