Audio storage, stereo switching

[Petr]

Good evening Mrs; I have always wanted to know where this would come from:


make wave sounds
FOR j = 1 TO 2
        READ wav$, n
        OPEN wav$ FOR BINARY AS #1
        FOR i = 1 TO n: READ z$: z$ = D93$(z$): PUT #1, , z$: NEXT
        CLOSE #1
        IF j = 1 THEN shootwav = _SNDOPEN(wav$, "SYNC") ELSE duckwav = _SNDOPEN(wav$, "SYNC")
        KILL wav$
NEXT


'wav sounds
DATA "_tmpshoot.wav",21
DATA "%wnkk&)%+  |f{j&18?%E7  ! $ eD  &K%c  $ -  &1,.?%)  ;(  &/,?,%Q+  &DDAA@@????<<33%zzkkgggg"
DATA "%ll&**GGWW\\]]]]\\]][[WWRROOMMLLJJIIJJ::%||jjbb__\\ZZXXZZddllvv{{~~yybbGG5566778877"
DATA "%77??OO__ffgggg&66^^#>>SSXXffpppppppppppppppppppp__OOOORRUUUUXXII&YY%aa++,,++        "
DATA "%77OOXX]]``xx&11NNXXXXZZ\\]]]]eekkssYY22%zzssvvsshhUUWW&11RRqqrrxx||#22<<9922**33FFVV"
DATA "&tt%pp                                &33#pppppppppp77&,,%bbggffaaKK33                "
DATA "%                      &33ttyy#..llpppppppppppppppppppppppppppppppppppppppppppppppp"
DATA "#pppppppp&DDJJQQhh#TTpp&88%                                                &bb#pppppppp"
DATA "#pppppp&99%            #__ppppppppppppMM%~~              &~~#pppppppppppppppp&FF%        "
DATA "%    #00pppppppppppp%                    nn#ppppppppppppppaa&==%OO\\gg&pp#pppppppppppppp"
DATA "#ppppppppppppppppppppppppppppppppppppppGG%              HHOOII                    "
DATA "%              &||yylldd^^``#..pppppppppppppppppppppppppppppppppppp%||              "
DATA "%                                #pppppppppppppppp__%iiAAEE\\#eepppppppppppppppppppp"
DATA "#ppppppppppppppppee--11AAWWpppp@@&??%==1100NN&aa#pppppppppppp]]55&  %                  "
DATA "%                          SS&::#22LLYYddNNYYpppppppppppppppppppp00%                "
DATA "%      !!                        }}&99**FF#//eecc77&mm__ZZZZ\\..%``#pppppppppppppppppp"
DATA "#pppppppppppppppppppppppppppppp%                  #ccpppppppppppppp&__%            &99"
DATA "#pppppppppppppp%99                #<<pppppppppppppppppppppppppppppppppppppppppp]]&dd"
DATA "%                                              &gg#pppppppppppppppppppppppppppppppp"
DATA "#pppppppppppppppppppppppppppp&<<%                aa#pppppppppp%ff          #$$pppppppp"
DATA "#pppppppp%~~                &OO#ppnnppooYYGGppppppppppppppppppii\\MMppPP..&gg,,%__&  %ss"
DATA "%ggccNN00                              "
DATA "_tmpduck.wav",33
DATA "%wnkk1/  |f{j&18?%E7  ! $ eD  &K%c  $ -  &1,.?%)  #^%)  &/,?,#K%.  &NVOREN?IISIRJTOZHJDIES"
DATA "&KXSXHLAGDLHRGVNYNPEFAPHYT[PS?EDLGRESNYOPJGAL@UU\VYCEAHDTFRLWQVKHBI=SO[Y]NI@DBVFP"
DATA "&ITS\MIAK>OGX[dPFBB@VCNJZTYNLEK?KE^XhVJ<BARBNFWV[IIEH@I>[]c\P:=AQ?KCTX^JIEIAJ:W_f"
DATA "&VE9;@P>JL\Y_LHDJ<JF_^eXF9FCO@JK]\XIHAI>KF`i_ZD7FDLCSJ]`VGI@IAJGcj\HB5GHIBVJ_bSCI"
DATA "&EGBFIgjWBB6HKEBYZ`\O@LJD?UNlfQ<E@KFJD\]_JLAPI>AZdnPE:GDLFLMe[[HNEOBEE`efIB5PHOGO"
DATA "&QfQNEMGKAKUtd\D@9UIJGSVfMJBSHGAT\pSC4J?XIKLgTQIICPCJLnbfL?1QINIQPcQK?REGATXpZGCA"
DATA "&6PIOKfTVMKBP@HCacgP@2PBJGVTgPG@WGF<O\v\GB@:RDIJj^]KHBU?D>\hkP@1RGMAPVjWJCLJK<NXp"
DATA "&iWBA>VLFAY__IE?NJC>\iiaF6EKP@PJaaQ>GNN@EHep\>><PKH@ZeaDC<JME:\lhhN7FKM>SJabQ;GQI"
DATA "&AEGgmX<>6HKG@]e]QC>NM><`Zm`F3CPLAIIb`L:KGP@=Fio[6<5HRG?^d]SB=NM8?`Yo^C1COJFFIdaM"
DATA "&<NAMA7LmjYC35KQEA]TeRB;OO<=JUoYC0?BNPLFcXJ=KDQK@He`WG98LRGCZSfQE8JPAELVnSD4@>LJF"
DATA "&PfSM;=BOLERiZg@56HIPFLQaRO:GBCEISj`f@A5BFGFUT]TY?G>>@RU`cY8G3CGNOVSXIYBFCDJ\[ePQ"
DATA "&6<FMGUOVV`AK<@CMJU_a]`9E:MILOJYcIW9@=CHPXbUYBI4CKRNTOWLU=EFLHSW\PV0DEOQSPLBP<UHQ"
DATA "&SOPUJUDQ@GRZJW@BCJJZMRMQ>EAMajY[DKAKBFJVUiKOB>HIBUL\PM6=DQT^LTCL;FNTX^CO>JJNOREM"
DATA "&BN9KNScbTZ9F9KQV]]RYCG@O=RACIOR`X^DO<@8DSgh`=G2FDIITGNGOETRMJ[C\INISUSAL<SKOIVAD"
DATA "&C=EXVdP[GRA=FUR]SXBRFGIL;IGONdT[SN>I?JYdJUMOK]CHHD:HETcjPWCHFQGGQSC^Q^OJ89<FGZLZ"
DATA "&O\PVKCFK?YC^\_WK7>=I1EQdaaSPPM6C9VVi_]NF=A*@7NVXZe]cHE!2Jb`s\TC:!@AMINC\_lO@B43N"
DATA "&MrqfUD)37B>GLdUoVFK4.?0fw{]J:+(17KNiNo]W[535%t&Rc~# &sa9%ys&3UD^Ehblb7-9%y&IAn#,<&d,3%p|&N9Q"
DATA "&DqkdoE1/$A;|f#E(&A!%n&!J8M-bltg>;1/1%{&hu#E6&[4%dz&;>@.ed}mH=.2%zz&Yh#SC&I>%cp&,I;5pe#1&sS7*8%sy&Jb#U"
DATA "#T&b%vi&!>L83i#(7&`A3*<!$m#/\_&h%yiv&G?>4g{#4&h;%t&16,.m#.b)&-%|jm&JC=<#8&|#1&f5%s&?-2-i#>j&x%}Q&2%t&O:6P#F$&]4+"
DATA "&)R%}&*I#QJ&|d%qZ&E055^`#I&{Q-=,3 /U#_K&i%r]M&A@7(l#$!&|L%o&?8,%o&Y^#eM&Y%N_T&JL:%y&x#1&wqC%k&M9%}t&z# p9&;%@w&4AH:"
DATA "&6#7+&`;<%v&W/%y&8#NM!&=%TB&A::0aq#+&|H+O.,%w&RS#jN&T%ifp&L?6/}#-&rI)%k&W8(%n#(J8D&/%9&,/F$BD#@7&W%v&:6;3.-#V]&h%|P"
DATA "%4&O>:%z&l#2&~x7%k&R:,%d&o#JSK&<%Ef&*O)8?#B3&] !6?$%~&.#J]/&5%@0&1=?%{&l#,-&~?%r&G7,%b&cn#lM&N%Qb& A?94#@7&`-1%}&U) 3#R"
DATA "#W&}u%p1&>F:%k&r#. (&:%k&S8%}^&qr#pR&@%1_&2EH#K?&X%q&-%z&Y/%{|#^g&~~%h &<J7%k&~m#\(&4%V&I@%{{&Da#pU&75%\U&]>33#TU>&M(%{&R"
DATA "&0%||&}#Qg&n%^:&NAO)J{#^&v3$1L<%r&B}#pA&4(%Vn&b;;=#LN9&C%{&:Y)-%u&w#_^&`%d?&BFL1T|#U&f/ .U2%u&T#)pj&i%~_n&Y=<:~#D$"
DATA "&=*5KN%b~#4_T&X%[Xt&OJ0Z# K>&B%z&7U!%w&X#)pi&h%sZ& ODL5#*I&z7)4BU%n&.#8WE&I%hSv&V/4c#)MA&H%v&3S(%y&[S#SD&:%hm&;YU%w"
DATA "&?#0?&u9(%{&8:%q&A#B[>&}%_V&!TE6Wm#@>&Y3,9,%~&\S#Na&n%~^r&QNC=fn|bA@3*$/i#,SE&a,%lo&?CTLe^r_M51(*7ap#?3&q"
DATA "&B%xd&/FVKXRt^W?6745NU#9&~`[.%g&+CPCT@hbdE9<95R6s~wR%zy&57SGFKfgkP>;<8GIpn#,&n2 ,1^NCKZZuTE"
DATA "&=<7BCaq#6&xQ8 %|&WGFNRJm_UB?,9=VZ#$&oWW1%y&97QHNSj\aP=7@2PFhst[5+/*I<QVbWaULB@4GEb^qq[B."
DATA "%y&?9^IUR]\[LE5F<MNklvaF+-1QCQKX[fPD8C=LCM\trWL0%~&7DXMXK__YDC:LJVAVevaM@0)=BYFILf`]"
DATA "&D91J:JO`ercVD1+ACNPFImk^G9,@DJMhhgcJ@<+BIMJK=lgbG4.?=ODoocOD6:4DGYFKDZgrN;0A;RJg"
DATA "&qhPGF>398ZXGHKTkcA3D8FCSVpfKME9>2LP]TI2TekP3 9:K;Up# &b6) .NSO=H@eqcJC;F92>rvlNBEI"
DATA "&FSCUNKIVHQLKJNJTB[INKKHNDTJTPNIMDTHSGPGOMNHRGPGTKVMQDMHPGRIQIRJRLRHRDOIOMPHPJX@P"
DATA "&EKKOMVFTHPKPEMKUKULP"

What is this supposed to be? To insert a program, use the icon in the upper left and insert the program between the square brackets qb square brackets then program and finally square brackets /qb square brackets. Your sound probably saved in Base64 can not be used, because the D93$ function is missing. On the other hand, thank you. You just reminded me that the programs listed here do not work in QB64PE but only in QB64, because the syntax and actual use of the _MemSound command have changed. For this reason, I will now start modernizing this thread so that SaveSound also works in QB64PE.