%%HP: T(3)A(R)F(.);
@ Advertisement for HP 48 Casino Card, by Preston Brown.
DIR
  RUNDEMO
    \<< { { "" "      Casino 48S" "" }
{ "      Created By" "  Preston Brown Labs" "" }
{ "Enjoy four games:" "Blackjack, Video Poker" "Slots and Roulette." }
{ "        Plus" "   the Casino lobby" "" } GRB1
{ "Walk to your table and" "   play Blackjack." "" } GRB2
{ "" "         Hit" "" }
{ "" "         Stay" "" }
{ "" "      Double Down" "" }
{ "" "      Split Pairs" "" }
{ "" " Or get a little help" "" } GRB3
{ " Recommend gives the" " best basic strategy" " for winning." }
{ "" "" "" }
{ "        Play" "     Video Poker" "" } GRB4
{ " Select discards and" "     then draw." "" }
{ "  A pair of Aces or" "    better wins!" "" }
{ "" "" "" }
{ "        Play" "   the Slot Machine" "" } GRB5
{ " Pull the handle and" "watch the wheels spin." "" }
{ "" "" "" }
{ "        Play" "      Roulette" "" } GRB6
{ "   Place many bets" " and spin the wheel." "" }
{ "" "" "" }
{ "   All the fun and " "excitement of a Casino" "   for your 48SX!" }
{ "" "   Get yours today!" "" } } \-> data
      \<< PICT RCL ERASE { # 0h # 0h } PVIEW 1 data SIZE
        FOR I ERASE data I GET DUP TYPE
          IF 6 ==
          THEN EVAL PICT { # 0h # 0h } ROT REPL SPEED WAIT
          ELSE OBJ\-> DROP SWAP ROT 3 \->GROB PICT { # 0h # 6h } ROT REPL 3
\->GROB PICT { # 0h # 14h } ROT REPL 3 \->GROB PICT { # 0h # 22h } ROT REPL
          END SPEED WAIT
        NEXT TEXT PICT STO
      \>>
    \>>
  SPEED 3
  GRB1 @ casino lobby
GROB 131 64 E0060008000008300000000000000000001104000800000440000000000000000000183483ED1083040EC2E000000000000000E4444418000404005511000000000000000D74C7180087046E55F1000000000000001504401820440441551000000000000000E83E83E11087087E54E00000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF70FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF70FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF70942942942942942942942942942942942094294294294294294294294294294294209429429429429429429429429429429420942942942942942942942942942942942094294294294294294294294294294294209429429429429429429429429429429420942942942942942942942942942942942094FFFFFFFF72942942942942942942942094FFFFFFFF72942942942942942942942094FFFFFFFF72942942942942942942942094780124807294294294294294294294209478012480729429421001008429429420947801248072942942CF31FF042942942094780124807294294220390C6429429420947801248072942942FF2DFB6429429420947801248072940842142509242942942094780124807294E84214250FB42942942094FFFFFFFF7290F94214250D942942942094700000007298AA42F72DFF9421429420FFFFFFFFFFFFFB0AF714A509CFFC9FFF70FFFFFFFFFFFFFB1BF755A579EF7E3FFF70FFFFFFFFFFFFFBEAF714A579EF755FFF70000000000000001100141405000140000000000000000000E0001C0403000360000000000000000000F100F70CF1000D50000000000000000008E20000000000022000000000000000008BFB30000000000C100000000000000000EEFF60000000000F700000000000007000300040000000049DD000000000000CF000700060000000080F7000000000000C9100F30C30000000CFFFFFF0000000000C4100CFFB000000002E3000C0000000000403008C38000000001F1000E00000000004C000800000000008FFFFFFF000000000084000000000000008FFFFFFB000000000007000000000000008000000200000000008F000000000000008000000200000000008700000000000000000000000000000000870000000000000000000000000000000088000000000000000000000000000000008C000000000000000000000000000000008D1000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF7037B5BD9DB3732A5CD3D1177674CD3BA870BA25DD5D5D7BAA6FDDD5B7757FEDDAAD703324ED9D1D73A27CDBD5B7767CEDDAAD70BAA4DD5D5D7BBA6FD7D5B7757FED5BAD703BA5BD91537B3A5CD911B7754CEDB2AD70FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70
  GRB2 @ blackjack screen
GROB 131 64 7000810000831D7F540C308000148300009000010006441501440440806876440000193E01E476441501C4044EC164144600001540111D00441D3F450C319008344500001D7E11F50645150146044F906054C400009401111406421501440441826C34440000783E93E40085EC7F540C3E01001E83000000000000000000000000000000000000000000000000000000000000000000000000EFFDFFFFFFFFFFFFFFFFFFF00000000000FFFFFFFFFFFFFFFFFFFFFFF1000000000030060000000000000000008100000000003006000000000000000000810000000000300600000000000000000081000000000038164400000000000000008100000000003406440000000000000000810000000000320642000000000000000081000000000032064100000000000000008100000000003E16C000000000000000008100000000003226410000000000000000810000000000322642CFFFFFFFFFFFFF10810000000000322644400CFFFFFFF700108100000000003C16444008FFFFFFF700108100000000003006004008FFFFFFF300108100000000003366014000FFFFFFF30810810000000000B496824000100000010C10810000000000B886444020EFFFFFF106108100000000003146284050EFFFFFF816108100000000003146105880CFFFFFF41310810000000000322628440140000042911081000000000034164442028FFFFF72A11081000000000034168241048FFFFF31C110810000000000380601420280005512C1108100000000003006004401CE305512A110810000000000300600488080405512911081000000000030060040508E10551491108100000000003006004020440055189110810000000000300600400040005510811081000000000030060040002060551081108100000000003006004000209055108110810000000000300600400090405510811081000000000030060040007D3055108110810000000000300600400001005510811081000000000030060040008F005510811081000000000030060040002104551081108100000000003006004000951255FFF11081000000000030060040006A0E65FFF3108100000000003006004000000000FFF3108100000000003006004000000000FFFF108100000000003006004000C70000FFFF108100000000003006004000E7000EFFFF108100000000003006004008FF008FFFFF10810000000000300600400CFF30CFFFFF10810000000000300600400EFF30CFFFFF10810000000000300600400FFF70EFFFFF10810000000000300600408FFF70EFFFFF108100000000000000000000000000000000000000000000FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70FBA8FD31B5799D5BD31D17336ABD554770FBADFDDB55755D5ADD5DB7BAB39D557770F3ADFDBB1B755558DB1DB733ABAD554570FBADFD7B5B755949D7DDB7BABBBDB57270FBADFD9B5B799D5BD9D1B7B26ABDB54770FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70
  GRB3 @ blackjack help screen
GROB 131 64 383200000000001F1000000000000000007442000000000810100000000000000000F40783110EC3001800E470C2E47E000000F932041101540014001D00451D01100000F04287110154001200150045150F100000744A44E101540012001500451501000000383487010E44083200E40044E40E000000000000E00000000000000000000000000000010000001008100000010000000000000001000000100010000001000000000000044F83F00E93E01E47087F8319700000000441541101540111D004015415000000000451D71101D7E11F5008315459300000000451501101501111400041545140000000082193110E93E93E400C3193AC3000000000000000000000000000000000000000000C7000E00083000483000000E0000000000040001100440006440000001100000000002000110044000446083D10197E000000001000E00087000445044300F5011000000806001910046004C4044100150F1000000806001910026004440441001501000000080400E01081400E83083100197E00000000020008000020000000000000000000003C100048000400018100000000000000007420004800040001010000000000000000F44EC34C1087E44F01E00EC30C2E47E000F541540800441541111101540451D01100F44154080044154111F10154045150F10074215408204415411110015404515010003C1E44001087E87F83E00E44044E40E0000000000000000000000000000000000000080100000100004001400000000000000008010000010000408160000000000000000C1F83F00F83D970014000000000000000080114110114344001400000000000000008019711019714400140000000000000000821541101541440014000000000000000001197110197187083E00000000000000000000000000000000000000000000000003C100048000008148008300004000000007420004800000010800440000400000000F44EC34C1087F016C1044E101D3EC30000F541540800401114800871001541540000F44154080083111480004E00554F540000742154082004F0148200201055414400003C1E440010C3183E01081F00A44E44000000000000000010000000000000000000000040006000000C7000483000000E0000000040004000000040006440000001100000087E83483D97002000446083D10197E000044114444340001000445044300F501100044F974C71830806004C4044100150F1000441444401040806004440441001501000087E87E831C3080400E83083100197E00000000000000000020000000000000000000000000000000000000000000000000000FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70FBA8FD31B5799D5BD31D17336ABD554770FBADFDDB55755D5ADD5DB7BAB39D557770F3ADFDBB1B755558DB1DB733ABAD554570FBADFD7B5B755949D7DDB7BABBBDB57270FBADFD9B5B799D5BD9D1B7B26ABDB54770FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70
  GRB4 @ video poker screen
GROB 131 64 E0060008000440000000400000000000001104000800040000000040000000000000183483ED1087687E93D97E100000000000E4444418004444010434410000000000000D74C7180044483187144E0000000000001504401820444041441440100000000000E83E83E11087EC3E97187F00000000000000000000000000000000000000000000000000000000000000000000000000000000EFFFFBFFFFFEFFFFBFFFFFEFFFFFFFFF70FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7030000C0000030000C0000030000000000030000C0000030000C0000030000000000030000C0000030000C000003000000000003E300C0700038100C483003C100000000032000C8800034000C6440032200000000032000C8800032000C444003220000000003E100C8800032000C4460032200000000030200C880003E100C4450032200000000030200C8800032200C4C40032200000000030200C8A8FF32200C444003A2EFFFFFF7032200C8480032200C444003212004683003C100C0B8003C100CE83003C2200C16C0030000C0080830000C0000030020048913038000C0280E33600C020003362004606403C100C8F80FB4900E05000B49200C108103E300CCF90FB8800D88000B882004000603F700C8F80E31400D401083142004C0600BFF00E0780831400D20204314200400000BFF00ECF98F32200E4010832226C4E0E00BBE00FEFBCF34100E880003412925020003B600FCA9C734100C0500034121150200038000F0788338000C020003802284010003C100E8F80830000C0000030022840200030000C0080C30000C0000030024440000030000C0080030000C0000030024440700030000C008CA30000C00000300282C0004030000C008CD30000C0000030020141003030000C0088F30000C00000300200860C0030000C0084530000C0000030020048130030000C0088F30000C0000030020040E00030000C008CF30000C0000830020020004030000C008CA30000C0000430020810003030000C0080230000C00008300206E10C0030000C008EF30000C000003002083E136030000C0084B30000E00000300283C3E81030000C0080330000D000003002CF3C166030000C0088B30000D000003002EFF3E97030000C0088F30000D000003002FFFF3E7030000C008EF30000E00000300AFFFFFF7030000C008FF30000E00000300EFFFFFF7030000C008FF30000C00000300EFFFFFF7030000C008FF30000C00000300EFFFFFF7030000C008FF30000C00000300EFFFFFF7030000C008FF30000C00000300EFFFFFF7030000C008FF30000C00008300EFFFFFF700000000000000000000000000000000000FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70FC66ED3B997FC66ED3B997FC66EDCCDE60FAABFDBAEE7FAABFDBAEE7FAABFDAAAE60FA6BFDBADE7FA6BFDBADE7FA6BFDAC8A60FAEAFDBABE7FAEAFDBABE7FAEAFDAAA460FC27ED3BC97FC27ED3BC97FC27EDCAAE60FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70
  GRB5 @ slot machine jackpot screen
GROB 131 64 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000008FFFFFFFFFFFFFFFFFFFFFFF7000000000800000000000000000000000400000000082AFFFF700EFFFF108FFFF71500000000082AFFFF700EFFFF108FFFF7150000000008AA100060060008108100065500000000086B102060060C0810810206B500000000082A103060060E181081030615000000000808183060068F781081830604000000000888103060068F78108103064400000000088818E06006CFF810818E064400000000088814276006CFF81081427644000000000888126F6006CFF8108126F64400000000088813FE6006EFF910813FE64400000000080897F66006EFF910897F6604000000000829976060060E08108976069400000000086913006006040810813006B40000000008E910006006000810810006F40000000008A910006006000810810006D4000000000829100060060008108100069400000000080894C2700621BC10894C27040000000008089A2A6006AA8A1089A2A6040000000008489E266006AB891089E266840000000008C8BA2A600EAA8A108BA2A6C40000000008CBFAC2700EB2BC108FAC27F40000000008CF1000EFF70008FFF1000EF40000000008CB10006006000810810006F40000000008C89BB36006EEE81089BB36C40000000008489A216006AA481089A216840000000008089B216006EA481089B21604000000000808982160062A481089821604000000000808983160062E481089831604000000000808100060060008108100060400000000080810006006000810810006040000000008081030600608081081030604000000000808187060060C0810818706040000000008081EF160060E081081EF16040000000008081EF160060C081081EF16040000000008081FF360060A381081FF36040000000008081FF3600609C91081FF36040000000008081FF3600688DB1081FF36040000000008089FF76006CCBB1089FF76040000000008089FF76006EDB91089FF760400000000080818306006E918108183060400000000080810106006C008108101060400000000080810006006000810810006040000000008081000600600081081000604000000000808FFFF700EFFFF108FFFF7040000000000000000000000000000000000000000FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF707457FDFFFF7FFFFFDFFFF7751DDD3BA8707557FDFFFF7FFFFFDFFFF775DDDDDAAD707457FDFFFF7FFFFFDFFFF77515DDDAAD707757FDFFFF7FFFFFDFFFF7F6D9CD5BAD707744CDFFFF7FFFFFDFFFF7F61DDDB2AD70FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70
  GRB6 @ roulette screen
GROB 131 64 F810000000000000C308000000000000001110000000000000440800000000000000111E87E00193157044EC1E100000000000F010501101541D00C31901000000000000101E50F10154150044F90E000000000000101150100E541500441820100000000000183E97E00093E500C3E01F000000000000000000000E00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF709208FF30800EFF00208FF30800EFF002005B383FB386E66C6EAB915BBBE464CEC2005328DFB2848E6F4A2297532A8AEDD822005B381FB384EE6C4EA3911B39EA64CEE20092285F32842EED4AA09D7B888AEDD8A2001A381FB38EE64CEEABB17BB8E464CEE2009208FF30800EFF00208FF30800EFF002005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF705FFF00EFFFF308FFFFF00EFFFF308FF30057CFE06CF99B9A917CEEE6CC11BBB113009EDF206DFBB39AB7F5D88E5F7532A7D300F7CFE06CFBB39BBB74DEE64C11BBB1130016FF806DFBB31ABD77D2867DD73A87730016CFE06CF11B3A1D7CEEE64C11BBB113009EFF00EFFFF308FFFFF00EFFFF308FF3005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF705308FF308FFFFF00208FF308FFFFF002005B185FB389B76C6CA9B11BBB1174EEA20092185F328B5FED4229A773A875FDE8A20012181F318B5F6C4E29B11BBB117CEEE20012187FB08B5FED4A21ADDB0AD5FDE882001A387FB081B74CEEABB11BBB1174CE82001208FF308FFFFF00208FF308FFFFF00200FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF70020000000002000000000200000000020002C8D1CC1002C5A1893002CDC0CC1002000284808010020DA20120020551801002000288808C1002CDB2093002CD418C10020002809084000244B209000205518400020002CD80CD1002C5A18B3002C5D0CD10020002000000000200000000020000000002000EFFFFFFFFFFFFFFFFFFFFFFFFFFFFF30002000020000EF7000000020000200002000A1893ABAB466C10624C2BB910EC1C9300021092A8A8565F20A2A2AAAA20A4105200029393ABAB766C2062E26AAA20ACDDD300021092A098665F20A2A2AAAA20A01053000A38B3A39B465C106EAC2BB910ED1CD30002000020000EF7000000020000200002000EFFFFFFFFFFFFFFFFFFFFFFFFFFFFF300000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70F44DED764C7FFFFFD39117751DDD3BA8707759ED75FE7FFFFFDD5DB775DDDDDAAD70F641ED76CE7FFFFFDB91B77515DDDAAD70F575ED75FE7FFFFFD75DB7F6D9CD5BAD70767DED76CE7FFFFFD991B7F61DDDB2AD70FFFFFDFFFF7FFFFFDFFFF7FFFFFDFFFF70
END
